Rutina de seek VFP9.0
Publicado por Alejandro Chavarria (14 intervenciones) el 25/06/2012 21:06:54
¡Hola Programadores del mundo!
Les tengo una pequeña consulta con respecto a la rutina de el comando SEEK
al momento de que ejecuto un formulario me busque el registro indexado. si lo encuentra que me notifique , si no, que lo guarde. Al parecer me esta dando problemas ya que cuando le doy al botón guardar solo me salta la condición que diga que ya existe el registro , pero siempre lo guarda.
¿que estoy haciendo mal?. Aquí les dejo mi rutina :
SET ORDER TO num_cheque
SEEK (thisform.txtnum_cheque.value )
IF FOUND()
MESSAGEBOX("NUMERO DE CHEQUE YA INGRESADO EN LA BASE DE DATOS", 48, "ERROR")
ELSE
Reemplazar registro with thisformtxtbox.value . . .
ENDIF
Saludos desde Honduras.
Les tengo una pequeña consulta con respecto a la rutina de el comando SEEK
al momento de que ejecuto un formulario me busque el registro indexado. si lo encuentra que me notifique , si no, que lo guarde. Al parecer me esta dando problemas ya que cuando le doy al botón guardar solo me salta la condición que diga que ya existe el registro , pero siempre lo guarda.
¿que estoy haciendo mal?. Aquí les dejo mi rutina :
SET ORDER TO num_cheque
SEEK (thisform.txtnum_cheque.value )
IF FOUND()
MESSAGEBOX("NUMERO DE CHEQUE YA INGRESADO EN LA BASE DE DATOS", 48, "ERROR")
ELSE
Reemplazar registro with thisformtxtbox.value . . .
ENDIF
Saludos desde Honduras.
Valora esta pregunta
0