DATA : lt_dd07v TYPE STANDARD TABLE OF dd07v,
ls_dd07v TYPE dd07v.
CALL FUNCTION 'GET_DOMAIN_VALUES'
EXPORTING
domname = ''
text = 'X'
TABLES
values_tab = lt_dd07v
EXCEPTIONS
value_not_found = 1
OTHERS = 2.
IF lt_ct_table[] IS INITIAL.
* IF i_passmsg IS INITIAL .
"해당 조건을 만족하는 데이터가 없습니다.
MESSAGE e001(zmps01) INTO wd_this->mv_msg.
wd_this->pop_msg( 'I' ).
* EXIT.
* ENDIF.
ELSE.
LOOP AT lt_ct_table INTO ls_ct_table .
READ TABLE lt_dd07v WITH KEY domvalue_l = ls_ct_table-button_div
INTO ls_dd07v.
ls_ct_table-button_div_t = ls_dd07v-ddtext.
MODIFY lt_ct_table FROM ls_ct_table TRANSPORTING button_div_t.
ENDLOOP .
ENDIF.
카테고리 없음