FoxPro/Visual FoxPro - SENTENCIA SET DELETE ON

   
Vista:

SENTENCIA SET DELETE ON

Publicado por Daniela (8 intervenciones) el 12/08/2009 21:27:33
HOLA: QUERÍA SABER CÚAL ES EL FORMATO DE LA SENTENCIA "SET DELETE ON", O SI SOLO TENGO QUE PONER ESO EN EL BOTÓN ELIMINAR?
GRACIAS...
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:SENTENCIA SET DELETE ON

Publicado por Cesar (35 intervenciones) el 13/08/2009 00:59:47
Solo lo tienes que poner en el evento load de tu formulario. Pero seria que lo pongas en tu programa principal donde escribes todos tus sets asi que lo pones un sola vez y no necesitas pornerlo en cada formulario.

Saludos desde Peru
Cesar
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:SENTENCIA SET DELETE ON

Publicado por Gabriel (406 intervenciones) el 14/08/2009 05:10:37
Hola Daniela :

Despues de varios meses que vuelvo a entrar a este foro que me ayudo en mis inicios y justo buscando un ejemplo que vi anteriormente.

Para que tengas una mejor idea, a continuacion te muestro un ejemplo mas avanzado y practico que vengo utilizando en mis formularios.

Evento : CLICK

#DEFINE MSGBOX_YES 6
#DEFINE C_MSGBOX1 36
#DEFINE C_DELETE_LOC "¿Esta seguro de Eliminar el Registro?"

ELIMINA2 = " Orden Nro." + STR(Thisform.PRES_ORD.Value,4,0) +"/"+ PADL(Thisform.ORDEN_P.Value,6,"0")
**********************************************
* REALIZA LA BUSQUEDA DE LA ORDEN A ELIMINAR *
**********************************************
SELECT 1
Use PRESTADO Index PRESTAS
IF MESSAGEBOX(C_DELETE_LOC + CHR(13)+ ;
ELIMINA2,C_MSGBOX1, "Atención" ) = MSGBOX_YES

SEEK STR(Thisform.PRES_ORD.Value,4,0) + STR (Thisform.ORDEN_P.Value,6,0)

IF FOUND()
SET DELETE ON
DELETE
WAIT WINDOW "Eliminando el Registro..." TIMEOUT .5
SCATTER MEMVAR
Thisform.Refresh
ENDIF

ENDIF

Espero haber respondido acertadamente a tu pregunta....

Saludos

GABRIEL
(Lima-Perú
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:SENTENCIA SET DELETE ON

Publicado por DANIELA (8 intervenciones) el 14/08/2009 14:49:38
Muchas gracias por la ayuda!! Voy a probarlo!
Saludos
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar