FiveTech Software tech support forums

... LOCAL cDomi := SPACE(30) LOCAL cPobla := SPACE(25) LOCAL cTele := SPACE(10) LOCAL fFeSini := CTOD(" - - ") LOCAL fFeNotif := CTOD(" - - ") LOCAL fFeVisita := CTOD(" - - ") LOCAL fFecha := DATE() LOCAL GetList := {} LOCAL aCia := {"LIBERTY ","PH ","ARAG "} LOCAL CiaAseg := SPACE(25) LOCAL cClave2 ...

... REDEFINE GET cNumSini ID 12 OF oDlg REDEFINE GET fFeSini PICTURE "@D" ID 13 OF oDlg REDEFINE GET 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 ...

... REDEFINE GET cNumSini ID 12 OF oDlg REDEFINE GET fFeSini PICTURE "@D" ID 13 OF oDlg REDEFINE GET 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 ...