FiveTech Software tech support forums

... ADD COLUMN TO oLB; HEADER "Garantía" ; DATA OemToAnsi(Garant->Garantia) ; ALIGN DT_LEFT ADD COLUMN TO oLB; HEADER "Capital" ; DATA (Garant->CapitalIni) ; PICTURE "99,999,999.99"; ALIGN DT_RIGHT REDEFINE BUTTON ID 25 OF oDlg ACTION (iLd:=.t., iPr:=.T.,oDlg:End()) REDEFINE BUTTON ID 26 OF ...

... TO oLBX; HEADER "Garantía" ; DATA OemToAnsi(Garant->Garantia) ; EDITABLE; ALIGN DT_LEFT ADD COLUMN TO oLBX; HEADER "Capital" ; DATA (Garant->CapitalIni) ; EDITABLE; PICTURE "99,999,999.99"; ALIGN DT_RIGHT @ 6.7, 1.4 BUTTON "&Nuevo " OF oDlg ACTION (AltaGaran(oLbx,cNumPoliza)) @ 6.7, 9.4 ...

... ID 22 OF oDlg END IF REDEFINE GET cNota ID 20 OF oDlg /* REDEFINE LISTBOX oLb FIELDS Garant->NumGaranti,Garant->Garantia,STR(Garant->CapitalIni); HEADERS "Nº Póliza","Garantía","Capital" ID 21 OF oDlg SELE 1 INDEX ON Siniestr->NumPoliza TO TEMPORAL2 FOR Siniestr->NumPoliza==cNumPoliza ...

... ID 22 OF oDlg END IF REDEFINE GET cNota ID 20 OF oDlg /* REDEFINE LISTBOX oLb FIELDS Garant->NumGaranti,Garant->Garantia,STR(Garant->CapitalIni); HEADERS "Nº Póliza","Garantía","Capital" ID 21 OF oDlg SELE 1 INDEX ON Siniestr->NumPoliza TO TEMPORAL2 FOR Siniestr->NumPoliza==cNumPoliza ...