‎2008 Jul 11 9:05 AM
Hi Friends,
How to get the drop down list in the selection screen.
Kindly guide me.
TIA.
Regards,
Mark K
‎2008 Jul 11 9:20 AM
Hi,
VRM_SET_VALUES is used to display list of values for drop down field.
Please go thru the following code for better understanding.
REPORT ZLIST.
TYPE-POOLS: VRM.
DATA: NAME TYPE VRM_ID,
LIST TYPE VRM_VALUES,
VALUE LIKE LINE OF LIST.
PARAMETERS: PS_PARM(10) AS LISTBOX VISIBLE LENGTH 10.
AT SELECTION-SCREEN OUTPUT.
NAME = 'PS_PARM'.
VALUE-KEY = '1'.
VALUE-TEXT = 'LINE 1'.
APPEND VALUE TO LIST. VALUE-KEY = '2'.
VALUE-TEXT = 'LINE 2'.
APPEND VALUE TO LIST.
CALL FUNCTION 'VRM_SET_VALUES' EXPORTING ID = NAME VALUES = LIST.
START-OF-SELECTION.
WRITE: / 'PARAMETER:', PS_PARM.
Thanks and regards
‎2008 Jul 11 9:08 AM
‎2008 Jul 11 9:14 AM
‎2008 Jul 11 9:15 AM
‎2008 Jul 11 9:18 AM
‎2008 Jul 11 9:18 AM
hi check this..
report .
TYPE-POOLS: VRM.
DATA: NAME TYPE VRM_ID,
LIST TYPE VRM_VALUES,
VALUE LIKE LINE OF LIST.
PARAMETERS: PS_PARM(10) AS LISTBOX VISIBLE LENGTH 10.
AT SELECTION-SCREEN OUTPUT.
NAME = 'PS_PARM'.
VALUE-KEY = '1'.
VALUE-TEXT = 'LINE 1'.
APPEND VALUE TO LIST. VALUE-KEY = '2'.
VALUE-TEXT = 'LINE 2'.
APPEND VALUE TO LIST.
CALL FUNCTION 'VRM_SET_VALUES'
EXPORTING
ID = NAME
VALUES = LIST.
‎2008 Jul 11 9:20 AM
Hi,
VRM_SET_VALUES is used to display list of values for drop down field.
Please go thru the following code for better understanding.
REPORT ZLIST.
TYPE-POOLS: VRM.
DATA: NAME TYPE VRM_ID,
LIST TYPE VRM_VALUES,
VALUE LIKE LINE OF LIST.
PARAMETERS: PS_PARM(10) AS LISTBOX VISIBLE LENGTH 10.
AT SELECTION-SCREEN OUTPUT.
NAME = 'PS_PARM'.
VALUE-KEY = '1'.
VALUE-TEXT = 'LINE 1'.
APPEND VALUE TO LIST. VALUE-KEY = '2'.
VALUE-TEXT = 'LINE 2'.
APPEND VALUE TO LIST.
CALL FUNCTION 'VRM_SET_VALUES' EXPORTING ID = NAME VALUES = LIST.
START-OF-SELECTION.
WRITE: / 'PARAMETER:', PS_PARM.
Thanks and regards
‎2008 Jul 11 9:40 AM
PARAMETERS p TYPE spfli-carrid AS LISTBOX VISIBLE LENGTH 20.
Indu.
‎2008 Jul 11 10:06 AM
Hi,
When you want to display the values from table as listbox... then this code should be useful.....
or else... if you want to populate your own values you can go with Venkat's suggestion...
TYPE-POOLS vrm.
DATA: values TYPE vrm_values WITH HEADER LINE.
IF lf_init IS INITIAL.
* Fetching data from LFA1 table and populating List Box
SELECT * INTO lw_lfa1 FROM lfa1.
values-text = lw_lfa1-name1.
values-key = lw_lfa1-lifnr.
APPEND values.
ENDSELECT.
* Populate List Box
CALL FUNCTION 'VRM_SET_VALUES'
EXPORTING
id = 'NAME1'
values = values[]
EXCEPTIONS
id_illegal_name = 1
OTHERS = 2.
IF sy-subrc <> 0.
MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ENDIF.regards
padma