Hi all
I wish that when changing lines a combo is filled in the foot of the view.
Code:
Procedure OnChangeCurrentRow String sFromRowID String sToRowID
Forward Send OnChangeCurrentRow sFromRowID sToRowID
Send OnFill of oWebComboHemeroteca
End_Procedure
But the process is executed but the cwebcombo does not show the data
Code:
Object oWebComboHemeroteca is a cWebCombo
Set piColumnSpan to 7
Set psLabel to "Documentos:"
Set piColumnIndex to 23
Set piLabelOffset to 100
Set pbServerOnFocus to True
Set pbServerOnChange to True
Procedure OnFill
Forward Send OnFill
Clear Hemeroteca
Move CabezaDC.Registro to Hemeroteca.Registro
Find ge Hemeroteca by 1
While (Found and (CabezaDC.Registro=Hemeroteca.Registro))
Send AddComboItem (Trim(Hemeroteca.Archivo)) (trim(hemeroteca.Descripcion))
Find gt Hemeroteca by 1
Loop
End_Procedure
Procedure OnChange String sNewValue String sOldValue
Forward Send OnChange sNewValue sOldValue
End_Procedure
End_Object
what did I forget?