FranciscoA wrote:Hola Adrian.
Como te dice Jose Luis, utiliza tus validaciones a como lo vienes haciendo por cada Get, pero al final, en el boton Aceptar, vuelve a validar.
Ej:
Redefine Get oGet1 Var... Valid TuFuncion(var1,var2...)
Redefine Get oGet2 Var... Valid TuFuncion(var1,var2...)
Redefine Get oGet3 Var... Valid TuFuncion(var1,var2...)
Redefine button oBt1....... Action TodoOK(var1,var3,varx...)
//----------------------------------------------------------------------
Function TodoOk (var1,var3,varx...)
if empty(var1) .or. empty(var3...) //o cualquier otro tipo de validacion
Return .f.
endif
Return .t.
Tambien prueba a usar la clausula WHEN en los gets
Ej:
Redefine Get oGet1 Var... Valid TuFuncion(var1,var2...)
Redefine Get oGet2 Var... Valid TuFuncion(var1,var2...) WHEN var1
Redefine Get oGet3 Var... Valid TuFuncion(var1,var2...) WHEN var2 etc
Saludos.
Gracias Francisco, creo que lo hare de la forma como me explico Jose Luis, desde boton aceptar , validar cada get que seria por ejemplo:
FUNCTION BOTONACEPTAR()
IF EMPTY(cNomUsua)
MsgAlert("Error: Teclear nombre usuario!")
oGet[01]:SetFocus()
oGet[01]:Refresh()
ENDIF
IF EMPTY(cCveUsua)
MsgAlert("Error: Teclear clave")
oGet[02]:SetFocus()
oGet[02]:Refresh()
ENDIF
IIF nCveMotiv =0
MsgAlert("Error: Teclear código")
oGet[03]:SetFocus()
oGet[03]:Refresh()
ENDIF
Es correcto, asi como sugieren, cierto ? hare las pruebas y gracias a los dos Francisco y Jose Luis
Saludos y buen dia.