스크린으로 되어 있는 것을 아래와 같이 SCREEN 으로 바꿔야 맞을 것 같습니다.

스크린으로 쓰니 syntax 에러가 납니다.

MODULE SCREEN_INIT OUTPUT.

LOOP AT SCREEN.<BR>  IF SCREEN-GROUP1 EQ 'DIS'.<BR>    SCREEN-INPUT = 0.<BR>    MODIFY SCREEN.<BR>  ENDIF.

ENDLOOP.

ENDMODULE.                 " SCREEN_INIT  OUTPUT