abap中Tablecontrol隐藏列

在dialog程序开发中，有时候根据业务需求，需要隐藏某些列，下面是隐藏列的方法：

CONTROLS: tb12 TYPE TABLEVIEW USING SCREEN 2000.    "Table Control名称
DATA: lv_col LIKE LINE OF tb12-cols.                                               "定义Table Control 列
*在dialog的PBO中
PROCESS BEFORE OUTPUT.
   MODULE modify_screen. "隐藏列
*定义MODULE
MODULE modify_screen OUTPUT.
    LOOP AT tb12-cols INTO lv_col.
        IF lv_col-screen-name = 'SP1-MAKTX'. " SP1-MAKTX是需要隐藏的列名    
            lv_col-invisible = '1' .                                             
        MODIFY tb12-cols FROM lv_col.
      ENDIF.
    ENDLOOP.
ENDMODULE.