ABAP Dynpro Table Control隐藏列

需求如下：

實作：

關鍵代碼：

CONTROLS: TCTRL_ZBR_PTAX_BPAS TYPE TABLEVIEW USING SCREEN '0001'.

DATA: gs_cols LIKE LINE OF tctrl_zbr_ptax_bpas-cols.
           

PBO代碼：

MODULE init_screen_0001 OUTPUT.
  LOOP AT tctrl_zbr_ptax_bpas-cols INTO gs_cols.
    IF gs_cols-screen-name = 'ZBR_PTAX_BPAS-DATAB' OR
       gs_cols-screen-name = 'ZBR_PTAX_BPAS-DATBI'.
      " 隐藏列
      gs_cols-invisible  = 1.
      MODIFY tctrl_zbr_ptax_bpas-cols FROM gs_cols TRANSPORTING invisible.
      CLEAR gs_cols.
    ENDIF.
  ENDLOOP.

ENDMODULE.
           

注：如有疏漏之處，還請不吝賜教！