Application Development and Automation Discussions
Join the discussions or start your own on all things application development, including tools and APIs, programming models, and keeping your skills sharp.
cancel
Showing results for 
Search instead for 
Did you mean: 
Read only

description beside value selection

abdulazeez12
Active Contributor
0 Likes
272

I have a listbox with certain values. my requirement is that when i select a particular value from the listbox, the corresponding text should come beside the field, how is it possible?

1 REPLY 1
Read only

Former Member
0 Likes
255

check this sample code for selection-screen...


TABLES : MARA.
TYPE-POOLS : VRM.
DATA : BEGIN OF ITAB OCCURS 0,
         MATNR LIKE MARA-MATNR,
       END OF ITAB.

DATA : IVALUE TYPE VRM_VALUES,
       WVALUE TYPE VRM_VALUE,
       IID TYPE VRM_ID.
DATA : CKEY(2).

SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS : P_MATNR LIKE MARA-MATNR AS LISTBOX VISIBLE LENGTH 20 USER-COMMAND LIST.
SELECTION-SCREEN COMMENT 25(10) TEXT.
SELECTION-SCREEN END OF LINE.

INITIALIZATION.
SELECT MATNR INTO TABLE ITAB FROM MARA UP TO 15 ROWS.
IID = 'P_MATNR'.

LOOP AT ITAB.
CKEY = SY-TABIX.
WVALUE-KEY = ITAB-MATNR.
WVALUE-TEXT = ITAB-MATNR.
APPEND WVALUE TO IVALUE.
ENDLOOP.
CALL FUNCTION 'VRM_SET_VALUES'
  EXPORTING
    ID                    = IID
    VALUES                = IVALUE
 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.



AT SELECTION-SCREEN.
SELECT SINGLE MAKTX INTO TEXT FROM MAKT WHERE MATNR = P_MATNR.

reagrds

shiba dutta