ABAP DIALOG POV F4搜索帮助

在tablecontrol中根据输入的MATNR，得到VBELN和POSNR的搜索帮助，选择后，同时填入vbeln和posnr

1、获取matnr的值

https://www.cnblogs.com/CtrlS/p/10755592.html

2、获取数据

定义STRUCTURE(SE11)

DATA: LT_STRU TYPE TABLE OF <STRUCTURE> WITH HEADER LINE.

SELECT ....

如果取不到数，请注意字段的前导零是否正确（CONVERSION_EXIT_ALPHA_OUTPUT）

3、调用 F4IF_INT_TABLE_VALUE_REQUEST 获取F4选择的订单号和行项目

L_DSELC-FLDNAME = 'VBELN'.
L_DSELC-DYFLDNAME = 'VBELN'.
APPEND L_DSELC.
L_DSELC-FLDNAME = 'POSNR'.
L_DSELC-DYFLDNAME = 'POSNR'.
APPEND L_DSELC.CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'EXPORTINGDDIC_STRUCTURE         = 'Z51_STCT'"structure名称RETFIELD               = 'VBELN'
*   PVALKEY                = ' 'DYNPPROG               = SY-REPIDDYNPNR                 = SY-DYNNRDYNPROFIELD            = 'GW_TAB-VBELN'
*   STEPL                  = 0WINDOW_TITLE           = '订单号选择'
*   VALUE                  = ' 'VALUE_ORG              = 'S'"Structure
*   MULTIPLE_CHOICE        = ' '
*   DISPLAY                = ' '
*   CALLBACK_PROGRAM       = ' '
*   CALLBACK_FORM          = ' '
*   MARK_TAB               =
* IMPORTING
*   USER_RESET             =TABLESVALUE_TAB              = LT_VBELN[]FIELD_TAB              = L_DFIES[]RETURN_TAB             = L_DDSHRETVAL[]DYNPFLD_MAPPING        = L_DSELC[]EXCEPTIONSPARAMETER_ERROR        = 1NO_VALUES_FOUND        = 2OTHERS                 = 3.
IF SY-SUBRC <> 0.
* MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
*         WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ELSE.READ TABLE L_DDSHRETVAL WITH KEY FIELDNAME = 'VBELN'.L_VBELN = L_DDSHRETVAL-FIELDVAL.READ TABLE L_DDSHRETVAL WITH KEY FIELDNAME = 'POSNR'.L_POSNR = L_DDSHRETVAL-FIELDVAL.
ENDIF.

4、DYNP_VALUES_READ返回订单号和行项目到屏幕

CLEAR:dynpfields[],L_LINES_VB.GET CURSOR LINE L_LINES_VB."获取当前操作行数

DYNPFIELDS-FIELDNAME   = 'GW_TAB-VBELN'.
DYNPFIELDS-STEPL       = L_LINES_VB."当前操作行数
DYNPFIELDS-FIELDVALUE  = L_VBELN.
DYNPFIELDS-FIELDINP    = 'X'.
APPEND DYNPFIELDS.
DYNPFIELDS-FIELDNAME   = 'GW_TAB-POSNR'.
DYNPFIELDS-STEPL       = L_LINES_VB."当前操作行数
DYNPFIELDS-FIELDVALUE  = L_POSNR.
DYNPFIELDS-FIELDINP    = 'X'.
APPEND DYNPFIELDS.CALL FUNCTION 'DYNP_VALUES_UPDATE'EXPORTINGDYNAME                     = SY-REPIDDYNUMB                     = SY-DYNNRTABLESDYNPFIELDS                 = DYNPFIELDS[].

转载于:https://www.cnblogs.com/CtrlS/p/10757431.html

ABAP DIALOG POV F4搜索帮助相关推荐

SAP ABAP SEARCH HELP F4搜索帮助常用函数
F4IF_INT_TABLE_VALUE_REQUEST :F4 help also returning the value to be displayed in internal table 自定 ...
ABAP ALV(LVC)下拉框或者F4搜索帮助
先上结果图: 代码: REPORT ZDCH_09_TEST2. ******************************************************************* ...
ABAP中的F4帮助怎么用？
ABAP中的F4帮助怎么用? 当我们在sap的界面上,焦点放到一个字段上的时候,按F4,会出现选择或者搜索的界面,这就是abap中的f4帮助. 有多种实现f4帮助的方法,现在就把我指导的一点点说出来: ...
ABAP中的F4帮助怎么用
ABAP中的F4帮助怎么用? 当我们在sap的界面上,焦点放到一个字段上的时候,按F4,会出现选择或者搜索的界面,这就是abap中的f4帮助. 有多种实现f4帮助的方法,现在就把我指导的一点点 ...
ABAP开发中常用的两个F4搜索帮助函数的区别
F4IF_FIELD_VALUE_REQUEST 和 F4IF_INT_TABLE_VALUE_REQUEST的区别: F4IF_FIELD_VALUE_REQUEST 主要功能是将表里的字段对应的s ...
SAP ABAP SEARCH HELP F4 自定义搜索帮助出口
利用搜索帮助出口创建自定义搜索帮助 . 1.拷贝标准搜索帮助出库DEMO函数 F4IF_SHLP_EXIT_EXAMPLE 实现FORM STEP_SELECT FORM FRM_STEP_SELEC ...
ABAP F4搜索帮助（详细步骤） SAP
本次搜索帮助类型为字段的外部搜索帮助附件.在之前文章(屏幕字段功能)中写了怎么通过代码实现搜索帮助和下拉框. 在SE11先创建搜索帮助标黄的是数据来源表,标绿的是帮助窗口样式,标蓝的就是输入参数IM ...
BU_DATE_CHAR abap screen 日期字段搜索帮助
ABAP开发过程中,经常遇到画得屏幕中出现日期字段(DATS), 为了便于操作,最好有搜索帮助. 其中可用的->搜索帮助:BU_DATE_CHAR
ABAP 用户选择屏幕搜索帮助实现代码
代码实现如下: 屏幕字段: 为一区间对前后的两个区间字段分别开发搜索帮助:因是同一数据,可共用一个搜索帮助: 第一步: 字义一内表,注:包含的若干字段为搜索帮助显示的内容: 第二步:在INITIAL ...

ABAP DIALOG POV F4搜索帮助

ABAP DIALOG POV F4搜索帮助相关推荐

最新文章

热门文章