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.

 

注：如有疏漏之处，还请不吝赐教！