Table control de herhangi bir sutunu görünmez yapmak isterseniz kullanılacak olan kod aşağıdaki gibidir..
itab : veri internal table
cntrl : table control oldugu container
Dikkat edilmesi gereken husus:
with control yanında yazan cntrl ekrandaki tablecontrolün adıdır..Çift tıkladığınızda tanımlamasına gider.
wa_cols değişkenini bu tanımın altında bir yere tanımlamanız gerekmektedir..
"OUTPUT SCREEN
loop at itab with control cntrl cursor cntrl-current_line.
module modify_screen.
endloop.
module modify_screen.
endloop.
MODULE modify_screen OUTPUT.
DATA : wa_cols LIKE LINE OF cntrl-cols.
LOOP AT SCREEN.
LOOP AT cntrl-cols INTO wa_cols.
IF wa_cols-screen-group1 = 'DIS'.
wa_cols-screen-output = 0.
wa_cols-screen-active = 0.
wa_cols-invisible = 'X'.
ENDIF.
MODIFY cntrl-cols FROM wa_cols.
ENDLOOP.
ENDLOOP.
LOOP AT cntrl-cols INTO wa_cols.
IF wa_cols-screen-group1 = 'DIS'.
wa_cols-screen-output = 0.
wa_cols-screen-active = 0.
wa_cols-invisible = 'X'.
ENDIF.
MODIFY cntrl-cols FROM wa_cols.
ENDLOOP.
ENDLOOP.
ENDMODULE.
Hiç yorum yok:
Yorum Gönder