FORM LFILE_SFILE_DISPLAY.

  LOOP AT SCREEN.

    IF SCREEN-NAME = ‘P_LFILE‘ .
      IF P_KUBUN = CNS_KEY_L.
        SCREEN-INPUT = 1.  "可輸入
      ELSE.
        SCREEN-INPUT = 0.  "不可輸入
      ENDIF.
    ENDIF.
    IF SCREEN-NAME = ‘P_SFILE‘ .
      IF P_KUBUN = CNS_KEY_S.
        SCREEN-INPUT = 1.  "
 
可輸入
      ELSE.
        SCREEN-INPUT = 0.  "不可輸入
      ENDIF.
    ENDIF.
    MODIFY SCREEN.

  ENDLOOP.

ENDFORM.                    "LFILE_SFILE_DISPLAY

ABAP 如何實現屏幕字段不可輸入