动态控制TABLE CONTROL列的输入输出状态

TC里的数据是一行一行写入的，LOOP AT SCREEN实际的SCREEN-NAME是TC当前行的字段名，所以要控制TC列的输入输出状态，实际在PBO里面来个嵌套循环就可以了。第一层为内表，第二层为SCREEN。

CONTROLS:ZPLM TYPE TABLEVIEW USING SCREEN '0100'.

DATA:BEGIN OF ITAB OCCURS 0,

          COL1(10),

          COL2(10),

          COL3(10),

     END OF ITAB.

DATA:STR LIKE ITAB.

 

PROCESS BEFORE OUTPUT.

***COL2可以输入，其它列只可输出  

   LOOP AT ITAB INTO STR WITH CONTROL ZPLM.

      LOOP AT SCREEN.

         IF SCREEN-NAME = 'STR-COL2'.

            SCREEN-INPUT = 1.

            MODIFY SCREEN.

         ENDIF.

      ENDLOOP.

   ENDLOOP.