Programador
Publicado por Bosco Garita (10 intervenciones) el 05/02/2008 16:55:25
Borrado en SQL desde VFP 9.0
Tengo una base de datos en SQL Server 2000 y tengo dos conexiones; una conexión ADO y otra ODBC.
Usando la conexión ODBC estoy enviando una sentencia SQL de borrado y está correcta pero me devuelve un -1. Usando la variable _CLIPTEXT de VFP 9.0 envié esta sentencia al Query Analyser para verificar que estuviera correcta. Lo está. La ejecuté ahí y funcionó perfectamente. Cree entonces un Stored Procedure que realizara la misma labor recibiendo los parámetros necesarios. Lo ejecuté desde el Query Analyser y lo hizo perfectamente. Procedí entonces a hacerlo desde VFP y sucedió el mismo error. Tampoco funcionó.
En todos mis programas siempre me ha funcionado pero en este caso no encuentro la solución.
Si alguien me puede ayudar se lo agradecería muchísimo.
El código es más o menos asi:
lcComprobante = Thisform.txtComprobante.value
lcSentenciaSQL = "Delete from Movimientos Where no_comprob = '&lcComprobante'"
lnResultado = SQLEXEC(pnConexion,lcSentenciaSQL)
No existe ninguna restricción en la base de datos para que este comando no se ejecute pero el resultado en lnResultado es -1
Muchas gracias.
Tengo una base de datos en SQL Server 2000 y tengo dos conexiones; una conexión ADO y otra ODBC.
Usando la conexión ODBC estoy enviando una sentencia SQL de borrado y está correcta pero me devuelve un -1. Usando la variable _CLIPTEXT de VFP 9.0 envié esta sentencia al Query Analyser para verificar que estuviera correcta. Lo está. La ejecuté ahí y funcionó perfectamente. Cree entonces un Stored Procedure que realizara la misma labor recibiendo los parámetros necesarios. Lo ejecuté desde el Query Analyser y lo hizo perfectamente. Procedí entonces a hacerlo desde VFP y sucedió el mismo error. Tampoco funcionó.
En todos mis programas siempre me ha funcionado pero en este caso no encuentro la solución.
Si alguien me puede ayudar se lo agradecería muchísimo.
El código es más o menos asi:
lcComprobante = Thisform.txtComprobante.value
lcSentenciaSQL = "Delete from Movimientos Where no_comprob = '&lcComprobante'"
lnResultado = SQLEXEC(pnConexion,lcSentenciaSQL)
No existe ninguna restricción en la base de datos para que este comando no se ejecute pero el resultado en lnResultado es -1
Muchas gracias.
Valora esta pregunta


0