amp;--------------------------------------------------------------------
amp; Report ZTEST_GETDOMVAL
amp;--------------------------------------------------------------------
his report is used to fetch the fixed values associated with domain
amp;--------------------------------------------------------------------
REPORT ztest_yh1148.
DATA:
fs_taba TYPE dd07v.
DATA:
it_taba TYPE STANDARD TABLE OF dd07v,
it_tabb TYPE STANDARD TABLE OF dd07v.
CALL FUNCTION 'DD_DOMA_GET'
EXPORTING
domain_name = 'XFELD'
langu = sy-langu
withtext = 'X'
TABLES
dd07v_tab_a = it_taba
dd07v_tab_n = it_tabb
EXCEPTIONS
illegal_value = 1
op_failure = 2
OTHERS = 3.
IF sy-subrc <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
WRITE: 'The fixed values for the domain','''XFELD''','are:-'.
LOOP AT it_taba INTO fs_taba.
WRITE:
/ sy-tabix,fs_taba-domvalue_l CENTERED ,fs_taba-ddtext CENTERED.
ENDLOOP.
ULINE.
---------------------END OF CODE-----------------------------------
Görüntüleme: 133
