SAP TableControl 控制单个单元格输入

*屏幕中

PROCESS BEFORE OUTPUT.
*&SPWIZARD: PBO FLOW LOGIC FOR TABLECONTROL 'TBL'
  MODULE TBL_CHANGE_TC_ATTR.
*&SPWIZARD: MODULE TBL_CHANGE_COL_ATTR.
  LOOP AT   I_TAB
       INTO WA_TAB
       WITH CONTROL TBL
       CURSOR TBL-CURRENT_LINE.
    MODULE TBL_GET_LINES.
*&SPWIZARD:   MODULE TBL_CHANGE_FIELD_ATTR
  ENDLOOP.

  MODULE STATUS_9000.

*程序中

*&SPWIZARD: OUTPUT MODULE FOR TC 'TBL'. DO NOT CHANGE THIS LINE!
*&SPWIZARD: GET LINES OF TABLECONTROL
MODULE TBL_GET_LINES OUTPUT.
  G_TBL_LINES = SY-LOOPC.
  WA_TAB-NUM = TBL-CURRENT_LINE.
  DATA:L_LINE TYPE I.
  L_LINE = TBL-CURRENT_LINE.
*  L_LINE = L_LINE MOD 2.
  LOOP AT SCREEN.
    CHECK SCREEN-NAME EQ 'WA_TAB-CHE'." 对应屏幕字段
*    CASE L_LINE.
*      WHEN 0.
        SCREEN-INPUT = 1.
*    ENDCASE.
    MODIFY SCREEN.
  ENDLOOP.
ENDMODULE.                    "TBL_GET_LINES OUTPUT