Hi,
I want to create multiple list boxes in one custom screen. The following code only values of second list box are populating.
data : name TYPE vrm_id ,
lt_list type vrm_values,
lt_list1 type vrm_values,
lw_list like line of lt_list,
lw_list1 like line of lt_list.
MODULE STATUS_0900 OUTPUT
lw_list-key = '1'.
lw_list-text = 'Service'.
append lw_list to lt_list.
lw_list-key = '2'.
lw_list-text = 'Incident'.
append lw_list to lt_list.
CALL FUNCTION 'VRM_SET_VALUES'
EXPORTING
ID = 'ZMM_T_SITT_01-INC_RQS'
VALUES = lt_list
EXCEPTIONS
ID_ILLEGAL_NAME = 1
OTHERS = 2
.
lw_list1-key = '1'.
lw_list1-text = 'Yes'.
append lw_list1 to lt_list1.
lw_list1-key = '2'.
lw_list1-text = 'No'.
append lw_list1 to lt_list1.
CALL FUNCTION 'VRM_SET_VALUES'
EXPORTING
ID = 'ZMM_T_SITT_01-RE_OPN'
VALUES = lt_list1
EXCEPTIONS
ID_ILLEGAL_NAME = 1
OTHERS = 2
.
Bluesky
