abap 弹出对话框函数POPUP_GET_VALUES的使用方法
生活随笔
收集整理的這篇文章主要介紹了
abap 弹出对话框函数POPUP_GET_VALUES的使用方法
小編覺得挺不錯的,現在分享給大家,幫大家做個參考.
項目中,經常用到,點擊按鈕時彈出一個對話框,選擇一些值,然后返回選擇的值,進一步操作,下面是使用彈窗對話框函數POPUP_GET_VALUES返回日期的例子,當然后也可以時其他類型的,定義數據元素時,根據需要定義成相應的類型就行了,效果如下圖:
代碼如下:
??DATA:?it_value?TYPE?TABLE?OF?sval,
??????? wa_value?TYPE?sval,
??CLEAR:it_value,wa_value,lv_rtn_cd.
??IF?lv_cmd?=?'1'?OR?lv_cmd?=?'2'.
????wa_value-tabname?=?'ZMMDATE'.
????wa_value-fieldname?=?'BDATE'.
????wa_value-value?=?sy-datum.
????APPEND?wa_value?TO?it_value.
????wa_value-tabname?=?'ZMMDATE'.
????wa_value-fieldname?=?'EDATE'.
????wa_value-value?=?sy-datum.
????APPEND?wa_value?TO?it_value.
??ELSE.
????wa_value-tabname?=?'ZMMDATE'.
????wa_value-fieldname?=?'JDATE'.
????wa_value-value?=?sy-datum.
????APPEND?wa_value?TO?it_value.
??ENDIF.
??CALL?FUNCTION?'POPUP_GET_VALUES'
????EXPORTING
??????popup_title?=?'日期選擇'
????IMPORTING
??????returncode??=?lv_rtn_cd
????TABLES
??????fields??????=?it_value.
??DATA:gt_itab?TYPE?TABLE?OF?zputwbsrq_s?WITH?HEADER?LINE.
??DATA:msg?TYPE?TABLE?OF??zbapimessage?WITH?HEADER?LINE.
??DATA:gt_in?TYPE?TABLE?OF?zputprrq_s?WITH?HEADER?LINE.
??DATA:gt_in1??TYPE?TABLE?OF?zputporq_s?WITH?HEADER?LINE.
??DATA:msg1?TYPE?TABLE?OF?zbapiret?WITH?HEADER?LINE.
??DATA:gt_in2?TYPE?TABLE?OF?zputplrq_s?WITH?HEADER?LINE.
??IF?lv_rtn_cd?IS?INITIAL.
????????READ?TABLE?it_value?INTO?wa_value?WITH?KEY?fieldname?=?'BDATE'.
????????IF?sy-subrc?=?0.
??????????gt_itab-p_day?=?wa_value-value.
??????????gt_itab-b_day?=?wa_value-value.
????????ENDIF.
????ENDIF.
總結
以上是生活随笔為你收集整理的abap 弹出对话框函数POPUP_GET_VALUES的使用方法的全部內容,希望文章能夠幫你解決所遇到的問題。
- 上一篇: SAP FI FAGLFLEXT/FAG
- 下一篇: ABAP--如何快速从BSEG读取数据