Table control中列隐藏实现方法

来源:互联网 发布:linux系统启动流程简述 编辑:程序博客网 时间:2024/06/06 07:36
在屏幕的PBO事件,下添加如下代码:
  1. *&---------------------------------------------------------------------*
  2. *&      Module  STATUS_0400  OUTPUT
  3. *&---------------------------------------------------------------------*
  4. *       text
  5. *----------------------------------------------------------------------*
  6. MODULE status_0400 OUTPUT.
  7.   DATA: ls_col LIKE LINE OF tc_400-cols.

  8.   IF p_sp8 EQ 'X' OR p_sp9 EQ 'X'.
  9.     LOOP AT tc_400-cols INTO ls_col.
  10.       IF ls_col-screen-name EQ 'GS_LIST-LIFNR' OR ls_col-screen-name EQ 'GS_LIST-NAME1'.
  11.         ls_col-invisible = '1'.
  12.         MODIFY tc_400-cols FROM ls_col INDEX sy-tabix.
  13.       ENDIF.
  14.     ENDLOOP.
  15.   ENDIF.
  16. ENDMODULE.                 " STATUS_0400  OUTPUT
复制代码
这里的tc_400,是指你新建Table control的名称
其中又嵌套screen结构,详细可参考:MODIFY SCREEN:修改屏幕,实现隐藏、禁止输入字段
原创粉丝点击