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
Précédent
Suivant
Répondre
Voir le fil de ce thread
Voir le fil de ce thread à partir de ce message seulement
Voir tous les messages de ce thread
Voir tous les messages de ce thread à partir de ce message seulement