DATA: lr_zauth TYPE RANGE OF zesd_auth.
SELECT DISTINCT 'I', 'EQ', z_auth
FROM ztsdo_ret_cancel
UNION DISTINCT
SELECT 'I', 'EQ', z_auth
FROM ztsdo_ret_rej
INTO TABLE @lr_zauth.
IF lr_zauth[] IS NOT INITIAL.
DELETE gi_gr_items WHERE zsd_auth IN lr_zauth.
ENDIF.
Nessun commento:
Posta un commento