GET_DOMAIN_VALUES

DATA: ls_posar TYPE dd07v,
      lt_posar LIKE TABLE OF ls_posar.

CALL FUNCTION 'GET_DOMAIN_VALUES'
    EXPORTING
      domname         = 'POSAR'
      text            = 'X'
    TABLES
      values_tab      = lt_posar
    EXCEPTIONS
      no_values_found = 1
      others          = 2
    .
  IF SY-SUBRC <> 0.
    "MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO"
     "WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4."
  ENDIF.