Secim Ekraninda DropDownList kullanimi

PROGRAM z_drop.
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.
*Key: Seçildikten sonra yakalayacağımız anahtar alan.
*Text: Seçim ekranında listbox içinde ki text değer.

CALL FUNCTION 'VRM_SET_VALUES'
EXPORTING
id = name
values = list.

Start-Of-Selection.
...
...
End-Of-Selection.