FiveTech Software tech support forums

Tengo dos tablas relacionadas mediante SET RELATION USE Polizas NEW SET INDEX TO I1Poliza USE Facturas NEW Set index to I2Factur USE Siniestr NEW INDEX ON Siniestr->NumControl TO I1Sini DESCENDING SET INDEX TO I1Sini GO TOP SET RELATION TO NumPoliza INTO Polizas, ...

... fFeNotif:=Siniestr->FechaNoti fFeVisita:=Siniestr->FechaVisit cNota:=Siniestr->Notas3 cNota:=OemToAnsi(cNota) SELE 2 SET INDEX TO I1Poliza DbSeek(cNumPoliza) cClaveCia:=Polizas->ClaveCia cRamo:=Polizas->Ramo cNombre:=OemToAnsi(Polizas->Nombre) cDomicilio:=OemToAnsi(Polizas->Domicilio) ...

... fFeNotif PICTURE "@D" ID 14 OF oDlg REDEFINE GET fFeVisita PICTURE "@D" ID 15 OF oDlg REDEFINE GET cNumPoliza ID 16 OF oDlG SELE 2 SET INDEX TO I1Poliza SEEK cNumPoliza IF .NOT. EOF() cRamo:=Polizas->Ramo cNombre:=Polizas->Nombre cDomicilio:=Polizas->Domicilio cPoblacion:=Polizas->Poblacion ...

... fFeNotif PICTURE "@D" ID 14 OF oDlg REDEFINE GET fFeVisita PICTURE "@D" ID 15 OF oDlg REDEFINE GET cNumPoliza ID 16 OF oDlG SELE 2 SET INDEX TO I1Poliza SEEK cNumPoliza IF .NOT. EOF() cRamo:=Polizas->Ramo cNombre:=Polizas->Nombre cDomicilio:=Polizas->Domicilio cPoblacion:=Polizas->Poblacion ...