DATA: it_val TYPE vrm_values. PARAMETERS: p_type TYPE char1 OBLIGATORY AS LISTBOX VISIBLE LENGTH 20. INITIALIZATION. CLEAR: it_val. * Domänenwerte holen cl_reca_ddic_doma=>get_values( EXPORTING id_name = 'CCCATEGORY' IMPORTING et_values = DATA(it_dval) ). IF lines( it_dval ) > 0. * wenn Werte vorhanden, dann Auswahlliste erstellen it_val = VALUE vrm_values( FOR v IN it_dval ( key = v-domvalue_l text = v-ddtext ) ). * Auswahlliste setzen CALL FUNCTION 'VRM_SET_VALUES' EXPORTING id = 'P_TYPE' values = it_val EXCEPTIONS id_illegal_name = 1 OTHERS = 2. IF sy-subrc = 0. * Vorselektion 'Punkt eins' p_type = it_val[ 1 ]-key. ENDIF. ENDIF. START-OF-SELECTION. * akt. Selektion der ComboBox heraussuchen TRY. DATA(s) = it_val[ key = p_type ]. WRITE: / s-key, s-text. CATCH cx_root. ENDTRY.
Links
- https://codezentrale.de/abap-infos-zu-datenelementen-und-domaenen-lesen/
- https://codezentrale.de/abap-datenelement-und-zugehoerige-domaene-auslesen/
- https://codezentrale.de/abap-wertebereich-einer-domaene-auslesen/
- https://codezentrale.de/abap-pruefen-ob-ein-bestimmer-festwert-in-einer-domaene-vorhanden-ist/