Página 1 de 1

Consulta sobre Delete en ADO cuando es ultimo registro !!

Publicado: Mié Feb 14, 2007 11:29 pm
por Fernando Hernandez
Buenas a todos
Tengo un problema cuando trato de eliminar el ultimo registro del dataset
(usando ADO con una conexion a Oracle Express).
Ver Imagen1.jpg
Luego que lo borra me regresa el error de imagen2.jpg
De donde la linea 130 esta en el metodo :
METHOD MantenSuprimir( oSender ) CLASS TFrmPais
LOCAL clBorrar, clRecno, clSql
IF MsgNoYes( "¿ Desea Eliminar el Código [
"+Rtrim(::osqltable1:Descripcion)+" ] ?" )
::oSqlTable1:delete() <---- ESTA ES LA LINEA 130
ENDIF
RETURN NIL
Luego cuando le doy OK al boton, me muestra el error de Xailer siguiente :
// ERROR POSTERIOR AL MENSAJE DE ORACLE
***************************** Registro de errores
*****************************
Fecha: 02/14/07
Hora: 16:19:48
Memoria libre: 94840
Area actual: 1
------------------------- Información del
compilador --------------------------
Versión Xailer: Xailer 1.2.1 Version 1.2a
Compilador: xHarbour build 0.99.61 Intl. (SimpLex) PCode Version: 7
Compilador C/C++: Borland C++ 5.5.1
Plataforma: Windows XP Professional 5.01.2600 Service Pack 2
----------------------- Información detallada del
error -----------------------
Subsistema: ADODB.RecordSet
Código de error: 16389
Estado: .F.
Descripción: E_FAIL
Operación: EDITMODE
Argumentos:
Fichero:
Código error SO: 0
Pila de llamadas:
TOLEAUTO:EDITMODE (0)
(b)XADORECORDS:XADORECORDS (81)
TADORECORDS:DELETED (0)
TSQLTABLE:DELETED (814)
TDBBROWSE:DSNAVIGATE (845)
TSQLTABLE:UPDATECONTROLS (1119)
TSQLTABLE:DELETE (535)
TFRMPAIS:MANTENSUPRIMIR (130)
TMAIN:MANTENSUPRIMIR (179)
TOPTIONITEM:ONCLICK (0)
TOPTIONITEM:CLICK (273)
TOPTIONLIST:WMLBUTTONDOWN (0)
RUNFORM (0)
TAPPLICATION:RUN (208)
MAIN (15)
GRACIAS POR LA AYUDA
FERNANDO HERNANDEZ


Attached files

Consulta sobre Delete en ADO cuando es ultimo registro !!

Publicado: Vie Feb 16, 2007 10:53 am
por ignacio
Fernando,
Espero que arreglado.
Un saludo,
--
Ignacio Ortiz de Zúñiga
http://www.xailer.com
"Fernando Hernandez" <dbfer@dilico.com.sv> escribió en el mensaje
news:[email=45d38c1d@news.xailer.com...]45d38c1d@news.xailer.com...[/email]
> Buenas a todos
>
> Tengo un problema cuando trato de eliminar el ultimo registro del dataset
> (usando ADO con una conexion a Oracle Express).
>
> Ver Imagen1.jpg
>
> Luego que lo borra me regresa el error de imagen2.jpg
>
> De donde la linea 130 esta en el metodo :
>
> METHOD MantenSuprimir( oSender ) CLASS TFrmPais
> LOCAL clBorrar, clRecno, clSql
> IF MsgNoYes( "¿ Desea Eliminar el Código [
> "+Rtrim(::osqltable1:Descripcion)+" ] ?" )
> ::oSqlTable1:delete() <---- ESTA ES LA LINEA 130
> ENDIF
> RETURN NIL
>
> Luego cuando le doy OK al boton, me muestra el error de Xailer siguiente :
>
> // ERROR POSTERIOR AL MENSAJE DE ORACLE
> ***************************** Registro de errores
> *****************************
>
> Fecha: 02/14/07
> Hora: 16:19:48
> Memoria libre: 94840
> Area actual: 1
>
> ------------------------- Información del
> compilador --------------------------
>
> Versión Xailer: Xailer 1.2.1 Version 1.2a
> Compilador: xHarbour build 0.99.61 Intl. (SimpLex) PCode Version: 7
> Compilador C/C++: Borland C++ 5.5.1
> Plataforma: Windows XP Professional 5.01.2600 Service Pack 2
>
> ----------------------- Información detallada del
> error -----------------------
>
> Subsistema: ADODB.RecordSet
> Código de error: 16389
> Estado: .F.
> Descripción: E_FAIL
> Operación: EDITMODE
> Argumentos:
> Fichero:
> Código error SO: 0
>
> Pila de llamadas:
> TOLEAUTO:EDITMODE (0)
> (b)XADORECORDS:XADORECORDS (81)
> TADORECORDS:DELETED (0)
> TSQLTABLE:DELETED (814)
> TDBBROWSE:DSNAVIGATE (845)
> TSQLTABLE:UPDATECONTROLS (1119)
> TSQLTABLE:DELETE (535)
> TFRMPAIS:MANTENSUPRIMIR (130)
> TMAIN:MANTENSUPRIMIR (179)
> TOPTIONITEM:ONCLICK (0)
> TOPTIONITEM:CLICK (273)
> TOPTIONLIST:WMLBUTTONDOWN (0)
> RUNFORM (0)
> TAPPLICATION:RUN (208)
> MAIN (15)
>
>
>
> GRACIAS POR LA AYUDA
>
> FERNANDO HERNANDEZ
>
>
>


Attached files AdoRecords.rar (5.5 KB)Â

Consulta sobre Delete en ADO cuando es ultimo registro !!

Publicado: Vie Feb 16, 2007 6:24 pm
por Fernando Hernandez
Lo instale y lo probe, antes de eso habia estado probando con try y catch,
pero tenia que estar refrescando el dataset asi :
METHOD MantenSuprimir( oSender ) CLASS TFrmPais
LOCAL clBorrar, clRecno, clSql
IF MsgNoYes( "¿ Desea Eliminar el Código [
"+Rtrim(::osqltable1:Descripcion)+" ] ?" )
Try
::oSqlTable1:delete()
Catch
::osqltable1:refresh()
End
::asignarico()
ENDIF
RETURN NIL
Pero con la nueva version que me envio ya no es necesario; ademas que me
hace el refresh del dataset sin necesidad de usar el Try-Catch. Esto
soluciona el 2do mensaje de error que me enviaba; sin embargo, el primero
siempre me lo da justo despues que elimino el ultimo registro, (ver
adjunto). Incluso en la tabla de oracle le quite para que me permitiera
nulos en los campos.
Que cree que podria ser ;
Atentamente
Fernando Hernandez
"Ignacio Ortiz de Zúñiga" <NoName@xailer.com> escribió en el mensaje
news:45d57f31$[email=1@news.xailer.com...]1@news.xailer.com...[/email]
> Fernando,
>
> Espero que arreglado.
>
> Un saludo,
>
> --
> Ignacio Ortiz de Zúñiga
> http://www.xailer.com
>
>
> "Fernando Hernandez" <dbfer@dilico.com.sv> escribió en el mensaje
> news:[email=45d38c1d@news.xailer.com...]45d38c1d@news.xailer.com...[/email]
>> Buenas a todos
>>
>> Tengo un problema cuando trato de eliminar el ultimo registro del dataset
>> (usando ADO con una conexion a Oracle Express).
>>
>> Ver Imagen1.jpg
>>
>> Luego que lo borra me regresa el error de imagen2.jpg
>>
>> De donde la linea 130 esta en el metodo :
>>
>> METHOD MantenSuprimir( oSender ) CLASS TFrmPais
>> LOCAL clBorrar, clRecno, clSql
>> IF MsgNoYes( "¿ Desea Eliminar el Código [
>> "+Rtrim(::osqltable1:Descripcion)+" ] ?" )
>> ::oSqlTable1:delete() <---- ESTA ES LA LINEA 130
>> ENDIF
>> RETURN NIL
>>
>> Luego cuando le doy OK al boton, me muestra el error de Xailer siguiente
>> :
>>
>> // ERROR POSTERIOR AL MENSAJE DE ORACLE
>> ***************************** Registro de errores
>> *****************************
>>
>> Fecha: 02/14/07
>> Hora: 16:19:48
>> Memoria libre: 94840
>> Area actual: 1
>>
>> ------------------------- Información del
>> compilador --------------------------
>>
>> Versión Xailer: Xailer 1.2.1 Version 1.2a
>> Compilador: xHarbour build 0.99.61 Intl. (SimpLex) PCode Version: 7
>> Compilador C/C++: Borland C++ 5.5.1
>> Plataforma: Windows XP Professional 5.01.2600 Service Pack 2
>>
>> ----------------------- Información detallada del
>> error -----------------------
>>
>> Subsistema: ADODB.RecordSet
>> Código de error: 16389
>> Estado: .F.
>> Descripción: E_FAIL
>> Operación: EDITMODE
>> Argumentos:
>> Fichero:
>> Código error SO: 0
>>
>> Pila de llamadas:
>> TOLEAUTO:EDITMODE (0)
>> (b)XADORECORDS:XADORECORDS (81)
>> TADORECORDS:DELETED (0)
>> TSQLTABLE:DELETED (814)
>> TDBBROWSE:DSNAVIGATE (845)
>> TSQLTABLE:UPDATECONTROLS (1119)
>> TSQLTABLE:DELETE (535)
>> TFRMPAIS:MANTENSUPRIMIR (130)
>> TMAIN:MANTENSUPRIMIR (179)
>> TOPTIONITEM:ONCLICK (0)
>> TOPTIONITEM:CLICK (273)
>> TOPTIONLIST:WMLBUTTONDOWN (0)
>> RUNFORM (0)
>> TAPPLICATION:RUN (208)
>> MAIN (15)
>>
>>
>>
>> GRACIAS POR LA AYUDA
>>
>> FERNANDO HERNANDEZ
>>
>>
>>
>
>
>


Attached files

Consulta sobre Delete en ADO cuando es ultimo registro !!

Publicado: Lun Feb 19, 2007 11:50 am
por ignacio
Fernando,
Espero que con este nuevo módulo ya le funcione correctamente. Perdón por
las molestias.
Un saludo
--
Ignacio Ortiz de Zúñiga
http://www.xailer.com
"Fernando Hernandez" <dbfer@dilico.com.sv> escribió en el mensaje
news:[email=45d5e79b@news.xailer.com...]45d5e79b@news.xailer.com...[/email]
> Lo instale y lo probe, antes de eso habia estado probando con try y catch,
> pero tenia que estar refrescando el dataset asi :
>
> METHOD MantenSuprimir( oSender ) CLASS TFrmPais
> LOCAL clBorrar, clRecno, clSql
> IF MsgNoYes( "¿ Desea Eliminar el Código [
> "+Rtrim(::osqltable1:Descripcion)+" ] ?" )
> Try
> ::oSqlTable1:delete()
> Catch
> ::osqltable1:refresh()
> End
> ::asignarico()
> ENDIF
> RETURN NIL
>
> Pero con la nueva version que me envio ya no es necesario; ademas que
> me
> hace el refresh del dataset sin necesidad de usar el Try-Catch. Esto
> soluciona el 2do mensaje de error que me enviaba; sin embargo, el primero
> siempre me lo da justo despues que elimino el ultimo registro, (ver
> adjunto). Incluso en la tabla de oracle le quite para que me permitiera
> nulos en los campos.
>
> Que cree que podria ser ;
>
> Atentamente
>
> Fernando Hernandez
>
>
> "Ignacio Ortiz de Zúñiga" <NoName@xailer.com> escribió en el mensaje
> news:45d57f31$[email=1@news.xailer.com...]1@news.xailer.com...[/email]
>> Fernando,
>>
>> Espero que arreglado.
>>
>> Un saludo,
>>
>> --
>> Ignacio Ortiz de Zúñiga
>> http://www.xailer.com
>>
>>
>> "Fernando Hernandez" <dbfer@dilico.com.sv> escribió en el mensaje
>> news:[email=45d38c1d@news.xailer.com...]45d38c1d@news.xailer.com...[/email]
>>> Buenas a todos
>>>
>>> Tengo un problema cuando trato de eliminar el ultimo registro del
>>> dataset
>>> (usando ADO con una conexion a Oracle Express).
>>>
>>> Ver Imagen1.jpg
>>>
>>> Luego que lo borra me regresa el error de imagen2.jpg
>>>
>>> De donde la linea 130 esta en el metodo :
>>>
>>> METHOD MantenSuprimir( oSender ) CLASS TFrmPais
>>> LOCAL clBorrar, clRecno, clSql
>>> IF MsgNoYes( "¿ Desea Eliminar el Código [
>>> "+Rtrim(::osqltable1:Descripcion)+" ] ?" )
>>> ::oSqlTable1:delete() <---- ESTA ES LA LINEA 130
>>> ENDIF
>>> RETURN NIL
>>>
>>> Luego cuando le doy OK al boton, me muestra el error de Xailer siguiente
>>> :
>>>
>>> // ERROR POSTERIOR AL MENSAJE DE ORACLE
>>> ***************************** Registro de errores
>>> *****************************
>>>
>>> Fecha: 02/14/07
>>> Hora: 16:19:48
>>> Memoria libre: 94840
>>> Area actual: 1
>>>
>>> ------------------------- Información del
>>> compilador --------------------------
>>>
>>> Versión Xailer: Xailer 1.2.1 Version 1.2a
>>> Compilador: xHarbour build 0.99.61 Intl. (SimpLex) PCode Version: 7
>>> Compilador C/C++: Borland C++ 5.5.1
>>> Plataforma: Windows XP Professional 5.01.2600 Service Pack 2
>>>
>>> ----------------------- Información detallada del
>>> error -----------------------
>>>
>>> Subsistema: ADODB.RecordSet
>>> Código de error: 16389
>>> Estado: .F.
>>> Descripción: E_FAIL
>>> Operación: EDITMODE
>>> Argumentos:
>>> Fichero:
>>> Código error SO: 0
>>>
>>> Pila de llamadas:
>>> TOLEAUTO:EDITMODE (0)
>>> (b)XADORECORDS:XADORECORDS (81)
>>> TADORECORDS:DELETED (0)
>>> TSQLTABLE:DELETED (814)
>>> TDBBROWSE:DSNAVIGATE (845)
>>> TSQLTABLE:UPDATECONTROLS (1119)
>>> TSQLTABLE:DELETE (535)
>>> TFRMPAIS:MANTENSUPRIMIR (130)
>>> TMAIN:MANTENSUPRIMIR (179)
>>> TOPTIONITEM:ONCLICK (0)
>>> TOPTIONITEM:CLICK (273)
>>> TOPTIONLIST:WMLBUTTONDOWN (0)
>>> RUNFORM (0)
>>> TAPPLICATION:RUN (208)
>>> MAIN (15)
>>>
>>>
>>>
>>> GRACIAS POR LA AYUDA
>>>
>>> FERNANDO HERNANDEZ
>>>
>>>
>>>
>>
>>
>>
>
>
>


Attached files AdoRecords.rar (5.5 KB)Â

Consulta sobre Delete en ADO cuando es ultimo registro !!

Publicado: Lun Feb 19, 2007 5:04 pm
por Fernando Hernandez
Muchas Gracias, ahora si funciona sin ningun problema.
Entiendo que ADO en xailer aun esta en desarrollo y que este tipo de
problemas se pueden encontrar, sin embargo agradezco su pronta solucion a
todas mis preguntas.
Solo una mas, por curiosidad, a que se debia este comportamiento ??
Gracias y Saludos.
"Ignacio Ortiz de Zúñiga" <NoName@xailer.com> escribió en el mensaje
news:45d980ea$[email=1@news.xailer.com...]1@news.xailer.com...[/email]
> Fernando,
>
> Espero que con este nuevo módulo ya le funcione correctamente. Perdón por
> las molestias.
>
> Un saludo
>
> --
> Ignacio Ortiz de Zúñiga
> http://www.xailer.com
>
>
> "Fernando Hernandez" <dbfer@dilico.com.sv> escribió en el mensaje
> news:[email=45d5e79b@news.xailer.com...]45d5e79b@news.xailer.com...[/email]
>> Lo instale y lo probe, antes de eso habia estado probando con try y
>> catch,
>> pero tenia que estar refrescando el dataset asi :
>>
>> METHOD MantenSuprimir( oSender ) CLASS TFrmPais
>> LOCAL clBorrar, clRecno, clSql
>> IF MsgNoYes( "¿ Desea Eliminar el Código [
>> "+Rtrim(::osqltable1:Descripcion)+" ] ?" )
>> Try
>> ::oSqlTable1:delete()
>> Catch
>> ::osqltable1:refresh()
>> End
>> ::asignarico()
>> ENDIF
>> RETURN NIL
>>
>> Pero con la nueva version que me envio ya no es necesario; ademas que
>> me
>> hace el refresh del dataset sin necesidad de usar el Try-Catch. Esto
>> soluciona el 2do mensaje de error que me enviaba; sin embargo, el primero
>> siempre me lo da justo despues que elimino el ultimo registro, (ver
>> adjunto). Incluso en la tabla de oracle le quite para que me permitiera
>> nulos en los campos.
>>
>> Que cree que podria ser ;
>>
>> Atentamente
>>
>> Fernando Hernandez
>>
>>
>> "Ignacio Ortiz de Zúñiga" <NoName@xailer.com> escribió en el mensaje
>> news:45d57f31$[email=1@news.xailer.com...]1@news.xailer.com...[/email]
>>> Fernando,
>>>
>>> Espero que arreglado.
>>>
>>> Un saludo,
>>>
>>> --
>>> Ignacio Ortiz de Zúñiga
>>> http://www.xailer.com
>>>
>>>
>>> "Fernando Hernandez" <dbfer@dilico.com.sv> escribió en el mensaje
>>> news:[email=45d38c1d@news.xailer.com...]45d38c1d@news.xailer.com...[/email]
>>>> Buenas a todos
>>>>
>>>> Tengo un problema cuando trato de eliminar el ultimo registro del
>>>> dataset
>>>> (usando ADO con una conexion a Oracle Express).
>>>>
>>>> Ver Imagen1.jpg
>>>>
>>>> Luego que lo borra me regresa el error de imagen2.jpg
>>>>
>>>> De donde la linea 130 esta en el metodo :
>>>>
>>>> METHOD MantenSuprimir( oSender ) CLASS TFrmPais
>>>> LOCAL clBorrar, clRecno, clSql
>>>> IF MsgNoYes( "¿ Desea Eliminar el Código [
>>>> "+Rtrim(::osqltable1:Descripcion)+" ] ?" )
>>>> ::oSqlTable1:delete() <---- ESTA ES LA LINEA 130
>>>> ENDIF
>>>> RETURN NIL
>>>>
>>>> Luego cuando le doy OK al boton, me muestra el error de Xailer
>>>> siguiente
>>>> :
>>>>
>>>> // ERROR POSTERIOR AL MENSAJE DE ORACLE
>>>> ***************************** Registro de errores
>>>> *****************************
>>>>
>>>> Fecha: 02/14/07
>>>> Hora: 16:19:48
>>>> Memoria libre: 94840
>>>> Area actual: 1
>>>>
>>>> ------------------------- Información del
>>>> compilador --------------------------
>>>>
>>>> Versión Xailer: Xailer 1.2.1 Version 1.2a
>>>> Compilador: xHarbour build 0.99.61 Intl. (SimpLex) PCode Version:
>>>> 7
>>>> Compilador C/C++: Borland C++ 5.5.1
>>>> Plataforma: Windows XP Professional 5.01.2600 Service Pack 2
>>>>
>>>> ----------------------- Información detallada del
>>>> error -----------------------
>>>>
>>>> Subsistema: ADODB.RecordSet
>>>> Código de error: 16389
>>>> Estado: .F.
>>>> Descripción: E_FAIL
>>>> Operación: EDITMODE
>>>> Argumentos:
>>>> Fichero:
>>>> Código error SO: 0
>>>>
>>>> Pila de llamadas:
>>>> TOLEAUTO:EDITMODE (0)
>>>> (b)XADORECORDS:XADORECORDS (81)
>>>> TADORECORDS:DELETED (0)
>>>> TSQLTABLE:DELETED (814)
>>>> TDBBROWSE:DSNAVIGATE (845)
>>>> TSQLTABLE:UPDATECONTROLS (1119)
>>>> TSQLTABLE:DELETE (535)
>>>> TFRMPAIS:MANTENSUPRIMIR (130)
>>>> TMAIN:MANTENSUPRIMIR (179)
>>>> TOPTIONITEM:ONCLICK (0)
>>>> TOPTIONITEM:CLICK (273)
>>>> TOPTIONLIST:WMLBUTTONDOWN (0)
>>>> RUNFORM (0)
>>>> TAPPLICATION:RUN (208)
>>>> MAIN (15)
>>>>
>>>>
>>>>
>>>> GRACIAS POR LA AYUDA
>>>>
>>>> FERNANDO HERNANDEZ
>>>>
>>>>
>>>>
>>>
>>>
>>>
>>
>>
>>
>
>
>

Consulta sobre Delete en ADO cuando es ultimo registro !!

Publicado: Lun Feb 19, 2007 5:11 pm
por ignacio
Fernando,
Había una llamada al método Ado:MoveLast() que ADO no permite cuando el
recorset está vacio.
<<A call to either MoveFirst or MoveLast when the Recordset is empty (both
BOF and EOF are True) generates an error.>>
Saludos
--
Ignacio Ortiz de Zúñiga
http://www.xailer.com
"Fernando Hernandez" <dbfer@dilico.com.sv> escribió en el mensaje
news:[email=45d9c976@news.xailer.com...]45d9c976@news.xailer.com...[/email]
> Muchas Gracias, ahora si funciona sin ningun problema.
>
> Entiendo que ADO en xailer aun esta en desarrollo y que este tipo de
> problemas se pueden encontrar, sin embargo agradezco su pronta solucion a
> todas mis preguntas.
>
> Solo una mas, por curiosidad, a que se debia este comportamiento ??
>
> Gracias y Saludos.
>
> "Ignacio Ortiz de Zúñiga" <NoName@xailer.com> escribió en el mensaje
> news:45d980ea$[email=1@news.xailer.com...]1@news.xailer.com...[/email]
>> Fernando,
>>
>> Espero que con este nuevo módulo ya le funcione correctamente. Perdón por
>> las molestias.
>>
>> Un saludo
>>
>> --
>> Ignacio Ortiz de Zúñiga
>> http://www.xailer.com
>>
>>
>> "Fernando Hernandez" <dbfer@dilico.com.sv> escribió en el mensaje
>> news:[email=45d5e79b@news.xailer.com...]45d5e79b@news.xailer.com...[/email]
>>> Lo instale y lo probe, antes de eso habia estado probando con try y
>>> catch,
>>> pero tenia que estar refrescando el dataset asi :
>>>
>>> METHOD MantenSuprimir( oSender ) CLASS TFrmPais
>>> LOCAL clBorrar, clRecno, clSql
>>> IF MsgNoYes( "¿ Desea Eliminar el Código [
>>> "+Rtrim(::osqltable1:Descripcion)+" ] ?" )
>>> Try
>>> ::oSqlTable1:delete()
>>> Catch
>>> ::osqltable1:refresh()
>>> End
>>> ::asignarico()
>>> ENDIF
>>> RETURN NIL
>>>
>>> Pero con la nueva version que me envio ya no es necesario; ademas que
>>> me
>>> hace el refresh del dataset sin necesidad de usar el Try-Catch. Esto
>>> soluciona el 2do mensaje de error que me enviaba; sin embargo, el
>>> primero
>>> siempre me lo da justo despues que elimino el ultimo registro, (ver
>>> adjunto). Incluso en la tabla de oracle le quite para que me permitiera
>>> nulos en los campos.
>>>
>>> Que cree que podria ser ;
>>>
>>> Atentamente
>>>
>>> Fernando Hernandez
>>>
>>>
>>> "Ignacio Ortiz de Zúñiga" <NoName@xailer.com> escribió en el mensaje
>>> news:45d57f31$[email=1@news.xailer.com...]1@news.xailer.com...[/email]
>>>> Fernando,
>>>>
>>>> Espero que arreglado.
>>>>
>>>> Un saludo,
>>>>
>>>> --
>>>> Ignacio Ortiz de Zúñiga
>>>> http://www.xailer.com
>>>>
>>>>
>>>> "Fernando Hernandez" <dbfer@dilico.com.sv> escribió en el mensaje
>>>> news:[email=45d38c1d@news.xailer.com...]45d38c1d@news.xailer.com...[/email]
>>>>> Buenas a todos
>>>>>
>>>>> Tengo un problema cuando trato de eliminar el ultimo registro del
>>>>> dataset
>>>>> (usando ADO con una conexion a Oracle Express).
>>>>>
>>>>> Ver Imagen1.jpg
>>>>>
>>>>> Luego que lo borra me regresa el error de imagen2.jpg
>>>>>
>>>>> De donde la linea 130 esta en el metodo :
>>>>>
>>>>> METHOD MantenSuprimir( oSender ) CLASS TFrmPais
>>>>> LOCAL clBorrar, clRecno, clSql
>>>>> IF MsgNoYes( "¿ Desea Eliminar el Código [
>>>>> "+Rtrim(::osqltable1:Descripcion)+" ] ?" )
>>>>> ::oSqlTable1:delete() <---- ESTA ES LA LINEA 130
>>>>> ENDIF
>>>>> RETURN NIL
>>>>>
>>>>> Luego cuando le doy OK al boton, me muestra el error de Xailer
>>>>> siguiente
>>>>> :
>>>>>
>>>>> // ERROR POSTERIOR AL MENSAJE DE ORACLE
>>>>> ***************************** Registro de errores
>>>>> *****************************
>>>>>
>>>>> Fecha: 02/14/07
>>>>> Hora: 16:19:48
>>>>> Memoria libre: 94840
>>>>> Area actual: 1
>>>>>
>>>>> ------------------------- Información del
>>>>> compilador --------------------------
>>>>>
>>>>> Versión Xailer: Xailer 1.2.1 Version 1.2a
>>>>> Compilador: xHarbour build 0.99.61 Intl. (SimpLex) PCode Version:
>>>>> 7
>>>>> Compilador C/C++: Borland C++ 5.5.1
>>>>> Plataforma: Windows XP Professional 5.01.2600 Service Pack 2
>>>>>
>>>>> ----------------------- Información detallada del
>>>>> error -----------------------
>>>>>
>>>>> Subsistema: ADODB.RecordSet
>>>>> Código de error: 16389
>>>>> Estado: .F.
>>>>> Descripción: E_FAIL
>>>>> Operación: EDITMODE
>>>>> Argumentos:
>>>>> Fichero:
>>>>> Código error SO: 0
>>>>>
>>>>> Pila de llamadas:
>>>>> TOLEAUTO:EDITMODE (0)
>>>>> (b)XADORECORDS:XADORECORDS (81)
>>>>> TADORECORDS:DELETED (0)
>>>>> TSQLTABLE:DELETED (814)
>>>>> TDBBROWSE:DSNAVIGATE (845)
>>>>> TSQLTABLE:UPDATECONTROLS (1119)
>>>>> TSQLTABLE:DELETE (535)
>>>>> TFRMPAIS:MANTENSUPRIMIR (130)
>>>>> TMAIN:MANTENSUPRIMIR (179)
>>>>> TOPTIONITEM:ONCLICK (0)
>>>>> TOPTIONITEM:CLICK (273)
>>>>> TOPTIONLIST:WMLBUTTONDOWN (0)
>>>>> RUNFORM (0)
>>>>> TAPPLICATION:RUN (208)
>>>>> MAIN (15)
>>>>>
>>>>>
>>>>>
>>>>> GRACIAS POR LA AYUDA
>>>>>
>>>>> FERNANDO HERNANDEZ
>>>>>
>>>>>
>>>>>
>>>>
>>>>
>>>>
>>>
>>>
>>>
>>
>>
>>
>
>