No logro borrar un registro de una tabla DBF
If MsgNoYes("Está seguro?","Borrar el renglón")
::oTablaFactura:Delete() // tambien probe NW->( dbDelete() )
::oTablaFactura:Refresh()
EndIf
Siendo ::oTablaFactura un TDbfDataSet inicializado asi
Use Factura New Exclusive
cTemp := NombreTemp() // me devuelve un nombre de archivo temporal
Copy to (cTemp)
Factura->( dbCloseArea() )
WITH OBJECT ::oTablaFactura
:cName := cTemp
:cAlias := "NW"
:lShared := .F.
:lOpen := .T.
END
No tengo ningun mensaje de error, simplemente no lo borra.
Gracias
Juan
In order for this site to work correctly we need to store a small file (called a cookie) on your computer. Most every site in the world does this, however since the 25th of May 2011, by law we have to get your permission first. Please abandon the forum if you disagree.
Para que este foro funcione correctamente es necesario guardar un pequeño fichero (llamado cookie) en su ordenador. La mayoría de los sitios de Internet lo hacen, no obstante desde el 25 de Marzo de 2011 y por ley, necesitamos de su permiso con antelación. Abandone este foro si no está conforme.
Para que este foro funcione correctamente es necesario guardar un pequeño fichero (llamado cookie) en su ordenador. La mayoría de los sitios de Internet lo hacen, no obstante desde el 25 de Marzo de 2011 y por ley, necesitamos de su permiso con antelación. Abandone este foro si no está conforme.
Deleted() en DBF
-
jrcsistemas
- Mensajes: 180
- Registrado: Lun Sep 15, 2008 2:53 pm
-
Armando Ruiz
- Mensajes: 12
- Registrado: Jue May 15, 2008 4:48 am
Deleted() en DBF
Hola Juan,
Ya probaste colocar al inicio de tu programar los siguiente:
SET DELETE ON
Lo que hace esto es no tomar en cuenta los registros marcados como borrados
Saludos
Armando Ruiz
"Juan Castañeda" <jrcsistemas@speedy.com.ar> escribió en el mensaje de
noticias news:[email=492c7895@svctag-j7w3v3j....]492c7895@svctag-j7w3v3j....[/email]
> No logro borrar un registro de una tabla DBF
>
> If MsgNoYes("Está seguro?","Borrar el renglón")
> ::oTablaFactura:Delete() // tambien probe NW->( dbDelete() )
> ::oTablaFactura:Refresh()
> EndIf
>
> Siendo ::oTablaFactura un TDbfDataSet inicializado asi
>
> Use Factura New Exclusive
> cTemp := NombreTemp() // me devuelve un nombre de archivo temporal
> Copy to (cTemp)
> Factura->( dbCloseArea() )
>
> WITH OBJECT ::oTablaFactura
> :cName := cTemp
> :cAlias := "NW"
> :lShared := .F.
> :lOpen := .T.
> END
>
> No tengo ningun mensaje de error, simplemente no lo borra.
>
> Gracias
>
> Juan
>
>
Ya probaste colocar al inicio de tu programar los siguiente:
SET DELETE ON
Lo que hace esto es no tomar en cuenta los registros marcados como borrados
Saludos
Armando Ruiz
"Juan Castañeda" <jrcsistemas@speedy.com.ar> escribió en el mensaje de
noticias news:[email=492c7895@svctag-j7w3v3j....]492c7895@svctag-j7w3v3j....[/email]
> No logro borrar un registro de una tabla DBF
>
> If MsgNoYes("Está seguro?","Borrar el renglón")
> ::oTablaFactura:Delete() // tambien probe NW->( dbDelete() )
> ::oTablaFactura:Refresh()
> EndIf
>
> Siendo ::oTablaFactura un TDbfDataSet inicializado asi
>
> Use Factura New Exclusive
> cTemp := NombreTemp() // me devuelve un nombre de archivo temporal
> Copy to (cTemp)
> Factura->( dbCloseArea() )
>
> WITH OBJECT ::oTablaFactura
> :cName := cTemp
> :cAlias := "NW"
> :lShared := .F.
> :lOpen := .T.
> END
>
> No tengo ningun mensaje de error, simplemente no lo borra.
>
> Gracias
>
> Juan
>
>
-
jrcsistemas
- Mensajes: 180
- Registrado: Lun Sep 15, 2008 2:53 pm
Deleted() en DBF
Perdón.
Pero no puedo creer que despues de 20 años de clipper me olvidaba de hacer
Pack
(lo tome como que delete ya borraba fisicamente el registro)
Ya funciona perfecto
Gracias Armando por tu respuesta
Juan
Pero no puedo creer que despues de 20 años de clipper me olvidaba de hacer
Pack
(lo tome como que delete ya borraba fisicamente el registro)
Ya funciona perfecto
Gracias Armando por tu respuesta
Juan