Hi Gurus,
I have a problem here.
I have a Field Symbol that I need to delete one of these lines, but one of these lines is a "sub internal table".
I got in the FS the table gs_0001 and I need to delete only the field gs_0001-tab_c0200, but if I try this code below, it gives me a short dump.
I tried to do delete <fs_gs_0001>-tab_0200 index sy-tabix but it gives me a short dump too.
data: t_c170 type standard table of j_1befds_c_3_c170.
data: wa_0200 type j_1befds_0_2_0200,
wa_h010 type line of j_1befdt_h_3_h010,
wa_c170 type j_1befds_c_3_c170.
field-symbols:
<fs_gt_h010> type j_1befdt_h_3_h010,
<gs_c170> type j_1befds_c_3_c170,
<fs_gs_0001> type j_1befds_0_1_0001.
data: l_tabix type sy-tabix.
assign ('(J_1BEFD_MAIN)gt_h010[]') to <fs_gt_h010>.
assign ('(J_1BEFD_MAIN)gs_0001') to <fs_gs_0001>.
import tab_c170 to t_c170 from memory id 'C170'.
if <fs_gs_0001> is assigned.
loop at <fs_gs_0001>-tab_0200 into wa_0200.
read table <fs_gt_h010> with key cod_item = wa_0200-cod_item
transporting no fields.
if not sy-subrc ne 0.
-> delete <fs_gs_0001>-tab_0200 from wa_0200.*
endif.
read table t_c170 with key cod_item = wa_0200-cod_item
transporting no fields.
if not sy-subrc eq 0.
-> delete <fs_gs_0001>-tab_0200 from wa_0200.*
endif.
endloop.
endif.
Best Regards,
Ricardo