ABAP : 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.