DEMO:F4帮助收藏夹功能

标签:
abapf4liumengsap屏幕 |
demo代码:
*&---------------------------------------------------------------------*
REPORT ZLM_F4_003.
PARAMETERS P_WERKS TYPE T001W-WERKS.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR P_WERKS.
PERFORM F4 USING P_WERKS.
*&---------------------------------------------------------------------*
*& Module VERID_F4 INPUT
*&---------------------------------------------------------------------*
* text
*----------------------------------------------------------------------*
FORM F4 USING P_WERKS.
TYPES:
BEGIN OF TYP_WERKS,
WERKS TYPE T001W-WERKS,
NAME1 TYPE T001W-NAME1,
BWKEY TYPE T001W-BWKEY,
END OF TYP_WERKS.
DATA: LI_WERKS TYPE STANDARD TABLE OF TYP_WERKS,
LW_WERKS TYPE TYP_WERKS.
*
DATA: LI_RETURN_TAB TYPE STANDARD TABLE OF DDSHRETVAL, "搜索帮助返回值内表
LW_RETURN TYPE DDSHRETVAL. "搜索帮助返回值工作区
* REFRESH:LI_RETURN_TAB,
* LI_EKORG.
SELECT *
INTO CORRESPONDING FIELDS OF TABLE LI_WERKS[]
FROM T001W.
CHECK LI_WERKS[] IS NOT INITIAL.
CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'
EXPORTING
* DDIC_STRUCTURE = 'T001W'
PVALKEY = 'YDEMO008'
RETFIELD = 'WERKS' "参考字段
VALUE_ORG = 'S'
DYNPPROG = SY-REPID
DYNPNR = SY-DYNNR
DYNPROFIELD = 'P_WERKS' "屏幕字段
TABLES
VALUE_TAB = LI_WERKS[]
RETURN_TAB = LI_RETURN_TAB[]
EXCEPTIONS
PARAMETER_ERROR = 1
NO_VALUES_FOUND = 2
OTHERS = 3.
ENDFORM.
copy后修改的。仅供参考。
If the help is only valid for a certain screen, you should define the key from the program and screen number.
If the
F4 help is valid for more than one screen, you can also assign
如果想不互相影响,可以使用
用户名 程序名 字段名
的拼接结果作为
推荐阅读:
《使用cl_gui_docking_container
《DEMO:S/4
《几个ABAP实用模板,体力活就别一行行敲了,复制粘贴得了》
《SAP
《CC02修改确认日期BAPI:Processing
《女儿的部分书单》
《苏州游记》
《溜达:无锡》
《杂谈:几种接口》
《RESTful