status 的可用和不可用 types: begin of tab_type, fcode like rsmpe-func, end of tab_type.
data: tab type standard table of tab_type with non-unique default key initial size 10, wa_tab type tab_type.
clear tab.
if r1 = 'X'. move 'MODIFY01' to wa_tab-fcode. endif.
if r2 = 'X'. move 'CREATE01' to wa_tab-fcode. endif.
if r3 = 'X'. move 'MODIFY01' to wa_tab-fcode. append wa_tab to tab. move 'CREATE01' to wa_tab-fcode. append wa_tab to tab. move 'DELETE01' to wa_tab-fcode. append wa_tab to tab. endif.
append wa_tab to tab.
set pf-status 'ST01' excluding tab.