SAP STUDY

CX_SY_READ_SRC_LINE_TOO_LONG

위 이유로 에러가 난다면..

소스의 LINE SIZE 가 72 자를 넘었기 때문이다.

SE38-Menu-> Utility -> setting 에서 72자로 맞추어 주면 됨.

DATA: BEGIN OF itab OCCURS 0,

             f1  type i,

             f2  type i,

           END OF itab.

DATA : BEGIN OF ITAB2 OCCURS 0,

          F3 type i.     ---->  ‘마침표’ 임을 주목.

        INCLUDE STRUCTURE itab1.    ---->

여기도 마침표.

DATA : END OF ITAB.

********   On-line

MODULE INIT_SCREEN_100 OUTPUT.

  txtplant = p_werks.

  txtdate  = sy-datum.

  txttime  = sy-uzeit.

  txtbigo  = 'N'.

PERFORM LISTBOX_P_MODE_SET.        "실행모드

FORM LISTBOX_P_MODE_SET .

  TYPES: BEGIN OF TY_VRM_VALUE,

            KEY(40) TYPE C,

            TEXT(80) TYPE C,

          END OF TY_VRM_VALUE.

  DATA: LT_VRM_VALUE     TYPE TABLE OF TY_VRM_VALUE,

        LS_VRM_VALUE     TYPE TY_VRM_VALUE,

        L_FNAME          TYPE TY_VRM_VALUE-TEXT.

*-set listbox

  L_FNAME = 'TXTBIGO'.

  LS_VRM_VALUE-KEY  = 'N'.

  LS_VRM_VALUE-TEXT = '주 1회 신규 FSCT 갱신에 의한 변경'.

  APPEND LS_VRM_VALUE TO LT_VRM_VALUE.

  LS_VRM_VALUE-KEY  = 'F'.

  LS_VRM_VALUE-TEXT = 'FCST 추가 변경에 의한 계획 수정'.

  APPEND LS_VRM_VALUE TO LT_VRM_VALUE.

  LS_VRM_VALUE-KEY  = 'T'.

  LS_VRM_VALUE-TEXT = 'Trouble 등에 의한 계획 변경'.

  APPEND LS_VRM_VALUE TO LT_VRM_VALUE.

  SORT LT_VRM_VALUE DESCENDING.

  CALL FUNCTION 'VRM_SET_VALUES'

    EXPORTING

      ID     = L_FNAME

      VALUES = LT_VRM_VALUE.

ENDFORM.                    " LISTBOX_P_MODE_SET

******   Report

PARAMETERS: P_MODE TYPE CHAR1  DEFAULT 'A'  AS LISTBOX

                                            VISIBLE LENGTH 20.