스크린의 PBO 에서 모듈을 생성하여 다음과 같이 사용하면 됩니다.

TYPE-pools vrm.  "vrm type group 선언

  DATA values1 TYPE vrm_values with HEADER LINE.

  FREE values1.

  values1-key = 'A'.
  values1-text = 'DISPLAY MODE'.
  APPEND VALUES1.
  values1-key = 'E'.
  values1-text = 'ERROR MODE'.
  APPEND VALUES1.
   values1-key = 'N'.
  values1-text = 'NO DISPLAY MODE'.
  APPEND VALUES1.

  clear values1.

  CALL FUNCTION 'VRM_SET_VALUES'
    EXPORTING
        id = 'G_DIMODE'
        values = values1[]
    EXCEPTIONS
        id_illegal_name = 1
        OTHERS = 2.

   IF sy-subrc <> 0.

   endif.