表格相关技巧（双击启动事件、取得行号、定义表格的读写属性）

1、双击启动事件：定义状态挑中F2功能键，在程序中处理返回的功能码

2、取得行号：

程序：

get cursor line linea  “取得当前表控制的行号   赋值给linea 注意：这个当前表控制的行号指的是表中看见的行号，不算下拉到多少行的行只是当前的。

check sy-subrc = 0.

linea = tbla-top_line + linea - 1.   ”当前首行序号 + 当前屏行号

read table  sp1 index linea.   “用取得当前行号读取内表

message s005（YMES） with linea.  "在状态条显示   或者 如果没有定义消息类的话不可以写 message linea type 'S'.因为这里的‘linea’一定是字符串而不是变量

 

3、定义表格的读写属性

程序：when ‘READWR’.

*当单击按钮时，第一列是只读，其他列读写切换

      LOOP AT tabl2-cols INTO acol WHERE index GT 0.
        IF  sy-tabix = 1.
          acol-screen-input = '0'.
        ELSE.
          IF acol-screen-input = '0'.
            acol-screen-input = '1'.
          ELSEIF acol-screen-input = '1'.
            acol-screen-input = '0'.

          ENDIF.

        ENDLOOP.

 

转载于:https://www.cnblogs.com/caizjian/p/3334455.html