Estoy tratando de hacer algo parecido al ejemplo \hmg\samples\valid.1, quiero decir, usando el "truco" del Valid
y tengo el siguiente código:
Code: Select all
DEFINE COMBOBOX tpoArt
ROW 80
COL 100
WIDTH 350
ITEMS ( aListTpos := ListaTposArts( ) )
SORT .T.
DISPLAYEDIT .T.
ON DISPLAYCHANGE ComboSearchAutoFill( THIS.NAME, THIS.DISPLAYVALUE, THISWINDOW.NAME )
FONTSIZE 09
FONTBOLD .T.
VALID frmAddArticulo.tpoArt.VALUE > 0 MESSAGE "Ingrese una clasificación"
//VALID !EMPTY( frmAddArticulo.tpoArt.DISPLAYVALUE ) MESSAGE "Ingrese una clasificación"
END COMBOBOX
Alguna idea acerca de cómo debería de hacer correctamente la expresión a validar?.
Gracias
Saludos