Sigo tratando de hacer "algo", con el tema de las validaciones, el siguiente código me genera un error de:
Error de Rango: Acceso al array, pero es en la línea de ONCLICK donde está el problema, lo muestro como estoy tratando de hacer.
Code: Select all
FOR i:=1 TO LEN( aWarnings )
ValCtrl := GetProperty( "frmAddArticulo", aWarnings[i], "VALUE" )
IF EMPTY( ValCtrl )
cCtrl2 := "lblDesc" + ALLTRIM(STR(i))
nRowFrm += 20
DEFINE LABEL &cCtrl2
ROW nRowFrm
COL 100
WIDTH 350
HEIGHT 20
VALUE ( aCampos[i] + " de artículo, no debe quedar vacío" )
ONCLICK { DoMethod( "frmAddArticulo", aWarnings[i], "SETFOCUS" ), frmWarning.RELEASE }
END LABEL
ENDIF
NEXT
Gracias
Saludos