Skip to Content
0
Former Member
Mar 25, 2009 at 12:04 PM

ListBoxes in custom screen

82 Views

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

.