lValidaAceptar( oWnd, aNoVal ) -> lOk
Revisa todos las validaciones (VALID) en todos los controles de
una ventana.
Parámetros
oWnd
Ventana a revisar
aNoVal
Matriz de objetos que no se validarán, puede
enviarse un solo objeto, si no se envía valida todos
Devuelve
lOk
Devuelve si todos los objetos se validaron
satisfactoriamente
Descripción
Revisa todos las validaciones (VALID) en todos los controles
activos de una ventana, si existen folders, también revisa los
controles dentro de ellos. Los controles desahabilitados no los
valida. En caso de que un control no apruebe la validación,
dicho control tomará el foco y en ese momento se detendrá la
validación.
Ejemplo
function main
local oDlg
local cGet := " "
local nGet := 1
local dGet := date()
define dialog oDlg
@ 1, 1 get cGet valid !empty( cGet )
@ 3, 1 get nGet valid nGet < 50
@ 5, 1 get dGet valid dGate > date()
activate dialog valid lValidaAceptar( oDlg )
return nil