一般在Dialog中用下面一個函數(shù)，顯示下拉列表，本例以f4函數(shù)來實(shí)現(xiàn)的

CALL FUNCTION 'VRM_SET_VALUES'EXPORTINGID = 'P_LGORT' "對應(yīng)屏幕的input框名稱VALUES = I_VALUES[]EXCEPTIONSID_ILLEGAL_NAME = 1OTHERS = 2.
PS：繪制屏幕時(shí)，設(shè)置下拉參數(shù)有兩種：listbox；listbox with key
listbox with key 表示即使你的gui狀態(tài)中不設(shè)置在下拉列表中顯示key關(guān)鍵字，但他任然顯示key
參數(shù) VALUES，是一個內(nèi)表結(jié)構(gòu)，含2個字段（key，value），選擇 listbox with key 時(shí)，感覺好像 key，value都進(jìn)入input框了，但實(shí)際只有key傳入了，可以debug驗(yàn)證

程序執(zhí)行效果：

1.主程序代碼

DATA: OK_CODE TYPE SY-UCOMM. DATA: BEGIN OF ITAB OCCURS 0,CARRNAME LIKE SCARR-CARRNAME,END OF ITAB. CALL SCREEN 100. *&---------------------------------------------------------------------* *& Module CREATE_DROPDOWN_LIST INPUT *&---------------------------------------------------------------------* * text *----------------------------------------------------------------------* MODULE CREATE_DROPDOWN_LIST INPUT.REFRESH ITAB.CLEAR ITAB.ITAB-CARRNAME = '合格'.APPEND ITAB.ITAB-CARRNAME = '不合格'.APPEND ITAB.CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'EXPORTING * DDIC_STRUCTURE = ' 'RETFIELD = 'CARRNAME' * PVALKEY = ' ' * DYNPPROG = ' ' * DYNPNR = ' ' * DYNPROFIELD = ' ' * STEPL = 0 * WINDOW_TITLE = * VALUE = ' 'VALUE_ORG = 'S' * MULTIPLE_CHOICE = ' ' * DISPLAY = ' ' * CALLBACK_PROGRAM = ' ' * CALLBACK_FORM = ' ' * CALLBACK_METHOD = * MARK_TAB = * IMPORTING * USER_RESET =TABLESVALUE_TAB = ITAB * FIELD_TAB = * RETURN_TAB = * DYNPFLD_MAPPING = * EXCEPTIONS * PARAMETER_ERROR = 1 * NO_VALUES_FOUND = 2 * OTHERS = 3.IF SY-SUBRC <> 0. * Implement suitable error handling hereENDIF.ENDMODULE. " CREATE_DROPDOWN_LIST INPUT
2.自定義屏幕100
screen 100中的work flow：

PROCESS BEFORE OUTPUT. * MODULE STATUS_0100. * PROCESS AFTER INPUT. * MODULE USER_COMMAND_0100. PROCESS ON VALUE-REQUEST.FIELD LISTID MODULE CREATE_DROPDOWN_LIST.
layout：

PS：下拉框?yàn)槭裁春锌罩?#xff1f;

因?yàn)榉潜剌?#xff0c;必輸就沒有了。

總結(jié)

以上是生活随笔為你收集整理的在Dialog中实现下拉框效果并对下拉框赋自定义的值的全部內(nèi)容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網(wǎng)站內(nèi)容還不錯，歡迎將生活随笔推薦給好友。