스크린 프로그램 리스트 박스 생성

** 선언부

DATA: NAME_01  TYPE VRM_ID,
      LIST_01  TYPE VRM_VALUES,
      VALUE_01 LIKE LINE OF LIST.

** 리스트박스용 값과 txt 입력

** 분기별 LIST BOX 생성
  VALUE_01-KEY =  '1'.
  VALUE_01-TEXT = C_1TERM.
  APPEND VALUE_01 TO LIST_01.

  VALUE_01-KEY =  '2'.
  VALUE_01-TEXT = C_2TERM.
  APPEND VALUE_01 TO LIST_01.

  VALUE_01-KEY =  '3'.
  VALUE_01-TEXT = C_3TERM.
  APPEND VALUE_01 TO LIST_01.

  VALUE_01-KEY =  '4'.
  VALUE_01-TEXT = C_4TERM.
  APPEND VALUE_01 TO LIST_01.

** 리스트박스에 사용할 필드명 입력
  NAME_01 = 'P_TERM'.
  CALL FUNCTION 'VRM_SET_VALUES'
    EXPORTING
      ID     = NAME_01
      VALUES = LIST_01.

** 결과 출력