Here is the code...
Dialog = 4 + 32 + 256
* 4 = Botones Sí y No
* 32 = Icono del signo de interrogación
* 256 = El segundo botón es el predeterminado
nRec = recno("reclamos")
sele valid_rcl && Copy from Reclamos, use to looking up the value repit
locate for thisform.poste.value=poste and thisform.elementos.value=idelemento and thisform.fallas.value=idfalla and estado_act="01" and !recno("valid_rcl")=nRec
if found()
nodefault && To prevent the usual LostFocus from acting
resp =messagebox("El Reclamo que esta Tratando de Agregar, ya esta en la Base de Datos.",Dialog,"Control de Reclamos")
thisform.poste.setfocus()
if resp = 6
thisform.refresh()
endif
endif
Previous
Next
Reply
View the map of this thread
View the map of this thread starting from this message only
View all messages of this thread
View all messages of this thread starting from this message only