borrar registros en 2 tablas

[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

[MauroArevalo]

Pakotel:

Aca va una:

Code: Select all  Expand view  RUN

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  RUN

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

[MauroArevalo]

Pakotel:

Aca va una:

Code: Select all  Expand view  RUN

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  RUN

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

[pakotel]

quedo solucionado gracias MauroArevalo hasta pronto