Encuentra datos que no existen
Hola Victoramf. Estoy trabajando en un sistema, y tengo 2 problemas:
1) Ingreso un código (AA55, por ejemplo) para realizar una consulta, despliega los todos bien, pero si solo ingreso AA, también despliega los datos. No se que cambiarle, estoy usando
ALLTRIM(), tambien probé IF SEEK() y nada
este es parte del codigo:
select carros
set order to bin
SEEK (ALLTRIM(THISFORM.txtbin.value))
IF FOUND()
THISFORM.txtmarca.value=marca
...
else
messagabox("el BIN no existe")
Endif
2) En otro form para modificar, no modifica, sé que se realiza todo el proceso porque al final me muestra la ventana que confirma el reemplazo, pero los datos en la tabla quedan intactos.
Luego de hacer todas las comprobaciones
...
otherwise
replace bin with thisform.bin.value, marca with ....
messagebox("los cambios se aplicaron correctamente")
Espero me podas ayudar, de cualquier forma gracias
[email protected] (por si lo quieres mandar al correo)
1) Ingreso un código (AA55, por ejemplo) para realizar una consulta, despliega los todos bien, pero si solo ingreso AA, también despliega los datos. No se que cambiarle, estoy usando
ALLTRIM(), tambien probé IF SEEK() y nada
este es parte del codigo:
select carros
set order to bin
SEEK (ALLTRIM(THISFORM.txtbin.value))
IF FOUND()
THISFORM.txtmarca.value=marca
...
else
messagabox("el BIN no existe")
Endif
2) En otro form para modificar, no modifica, sé que se realiza todo el proceso porque al final me muestra la ventana que confirma el reemplazo, pero los datos en la tabla quedan intactos.
Luego de hacer todas las comprobaciones
...
otherwise
replace bin with thisform.bin.value, marca with ....
messagebox("los cambios se aplicaron correctamente")
Espero me podas ayudar, de cualquier forma gracias
[email protected] (por si lo quieres mandar al correo)
1 respuesta
Respuesta de Víctor Arturo Mercado Fernández
1
1) Agrega la línea:
Set Exact On
En la sección de seteo.
2)El que te muestre el mensaje no es garantía de que esté haciendo el reemplazo, ejecuta el código paso a paso para verificar que realmente lo está haciendo.
Set Exact On
En la sección de seteo.
2)El que te muestre el mensaje no es garantía de que esté haciendo el reemplazo, ejecuta el código paso a paso para verificar que realmente lo está haciendo.
Muchas gracias Victoramf! Quedó solucionado el primer problema.
Y con el segundo, aunque sé que sin ver todo el código es difícil dar una respuesta,
¿Por qué si llega al OTHERWISE no se reemplazan los datos?
No se realmente como ejecutar el código paso a paso, ¿en el debugger? Allí ya probé y YO no pude comprobar nada.
He revisado el código y no encuentro nada mal, tengo otros form que si reemplazan
Así a groso modo, ¿cuál podría ser el problema?
Y con el segundo, aunque sé que sin ver todo el código es difícil dar una respuesta,
¿Por qué si llega al OTHERWISE no se reemplazan los datos?
No se realmente como ejecutar el código paso a paso, ¿en el debugger? Allí ya probé y YO no pude comprobar nada.
He revisado el código y no encuentro nada mal, tengo otros form que si reemplazan
Así a groso modo, ¿cuál podría ser el problema?
Puede ser que él apuntador esté en el principio o fin de archivo, la instrucción se realiza pero no hay campos que reciban esa información, no marca error pero tampoco ejecuta la acción.
Y esa es una explicación.
Y esa es una explicación.
