Page 1 of 1

borrar registros en 2 tablas

PostPosted: Sat Oct 04, 2008 1:09 pm
by pakotel
hola ojala me puedan ayudar estoy haciendo un programa para generar una orden para lo cual uso 2 tablas en una me crea el maestro d eordenes y en otra su detalle si genero una orden con 10 piezas en la tabla de maestro me crea un registro y en la tabla de detalle me crea 10 registros el problema viene cuando borro la orden en la tabla de maestro si me borra el registro pero en el detalle solo me borar el primer registro de la orden alguin tendra algun ekejemplo para solucionar que el borardo sea de todos los registros que genere por orden

PostPosted: Sat Oct 04, 2008 2:00 pm
by MauroArevalo
Pakotel:

Aca va una:

Code: Select all  Expand view
USE MAESTRO NEW ALIA MAE EXCLUSIVE
USE MOVIMIE NEW ALIA MOV EXCLUSIVE

SELE MAE
DELE ALL FOR NUM_ORD="5125""
PACK

SELE MOV
DELE ALL FOR NUM_ORD="5125""
PACK


Otra opción podria ser:

Code: Select all  Expand view
USE MAESTRO NEW ALIA MAE SHARED
USE MOVIMIE NEW ALIA MOV SHARED

SELE MAE
IF FLOCK()
  DELE ALL FOR NUM_ORD="5125""
ENDIF
UNLOCK

SELE MOV
IF FLOCK()
  DELE ALL FOR NUM_ORD="5125""
ENDIF
UNLOCK


Saludos

PostPosted: Sat Oct 04, 2008 2:00 pm
by MauroArevalo
Pakotel:

Aca va una:

Code: Select all  Expand view
USE MAESTRO NEW ALIA MAE EXCLUSIVE
USE MOVIMIE NEW ALIA MOV EXCLUSIVE

SELE MAE
DELE ALL FOR NUM_ORD="5125""
PACK

SELE MOV
DELE ALL FOR NUM_ORD="5125""
PACK


Otra opción podria ser:

Code: Select all  Expand view
USE MAESTRO NEW ALIA MAE SHARED
USE MOVIMIE NEW ALIA MOV SHARED

SELE MAE
IF FLOCK()
  DELE ALL FOR NUM_ORD="5125""
ENDIF
UNLOCK

SELE MOV
IF FLOCK()
  DELE ALL FOR NUM_ORD="5125""
ENDIF
UNLOCK


Saludos

gracias MauroArevalo

PostPosted: Fri Oct 10, 2008 3:17 pm
by pakotel
quedo solucionado gracias MauroArevalo hasta pronto