搜索帮助demo：F4IF_INT_TABLE_VALUE_REQUEST返回多列值

货铺QQ群号：834508274
微信群不能扫码进了，可以加我微信SAPliumeng拉进群，申请时请提供您哪个模块顾问，否则是一律不通过的。
进群统一修改群名片，例如BJ_ABAP_森林木。群内禁止发广告及其他一切无关链接，小程序等，进群看公告，谢谢配合
不修改昵称会被不定期踢除，谢谢配合

最近偶然写个选择屏幕的帮助，太久不写这些了，忘了很多，然后网上查了一下。

这个demo是返回多值的。

效果：

就是选择工厂的时候把剩下的几个字段自动带过去。

另外，不允许手工输入，防止仨字段不配套嘛。

代码很简单：

TYPES: SHLP_DESCR_T TYPE SHLP_DESCR .DATA: BEGIN OF ITAB OCCURS 0 ,        WERKS LIKE  T001W-WERKS,        NAME1 LIKE  T001W-NAME1,        BWKEY LIKE T001W-BWKEY,      END OF ITAB.DATA: RETURN_TAB TYPE DDSHRETVAL OCCURS 0 .PARAMETERS: P_WERKS LIKE T001W-WERKS,            P_NAME1 LIKE T001W-NAME1,            P_BWKEY LIKE T001W-BWKEY.INITIALIZATION.  SELECT * FROM T001W INTO CORRESPONDING FIELDS OF TABLE ITAB[]    WHERE SPRAS = '1'.AT SELECTION-SCREEN OUTPUT .  PERFORM FRM_SCREEN.AT SELECTION-SCREEN ON VALUE-REQUEST FOR P_WERKS .  PERFORM F4.*&---------------------------------------------------------------------**&      Form  f4*&---------------------------------------------------------------------*FORM F4.  CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'    EXPORTING      RETFIELD         = 'WERKS'      DYNPPROG         = SY-REPID      DYNPNR           = SY-DYNNR      DYNPROFIELD      = 'P_WERKS'      VALUE_ORG        = 'S'      CALLBACK_PROGRAM = SY-REPID      CALLBACK_FORM    = 'CB_FORM'      DISPLAY          = 'F'   " <– Force    TABLES      VALUE_TAB        = ITAB      RETURN_TAB       = RETURN_TAB    EXCEPTIONS      PARAMETER_ERROR  = 1      NO_VALUES_FOUND  = 2      OTHERS           = 3.ENDFORM.                    "f4*&---------------------------------------------------------------------**&      Form  cb_form*&---------------------------------------------------------------------*FORM CB_FORM TABLES RECORD_TAB STRUCTURE SEAHLPRES              CHANGING SHLP TYPE SHLP_DESCR_T                       CALLCONTROL LIKE DDSHF4CTRL.  DATA: INTERFACE LIKE LINE OF SHLP-INTERFACE.  READ TABLE SHLP-INTERFACE INTO INTERFACE INDEX 1.  INTERFACE-SHLPFIELD+4(1) = '2'.  INTERFACE-VALFIELD = 'P_NAME1'.  APPEND INTERFACE TO SHLP-INTERFACE.  INTERFACE-SHLPFIELD+4(1) = '3'.  INTERFACE-VALFIELD = 'P_BWKEY'.  APPEND INTERFACE TO SHLP-INTERFACE.ENDFORM.                    "bo_callback_form*&---------------------------------------------------------------------**& Form FRM_SCREEN*&---------------------------------------------------------------------**& text*&---------------------------------------------------------------------**& -->  p1        text*& <--  p2        text*&---------------------------------------------------------------------*FORM FRM_SCREEN .  LOOP AT SCREEN.    SCREEN-INPUT = 0.    MODIFY SCREEN.  ENDLOOP.ENDFORM.

仅仅是个简单demo，仅供参考，项目上自己看着写吧。

我网上查资料的时候是参考的老白的文章

http://blog.chinaunix.net/uid-8527621-id-2029921.html

推荐阅读：

《动态批量修改任意表任意字段的值》

《动态获取查询条件的一个小Demo》

《使用cl_gui_docking_container 实现多ALV》

《VOFM 修改 组单开票时 会计凭拆分规则》

《DEMO SUBMIT 某程序并获取该程序ALV数据》

《DEMO：S/4 1809 FAGLL03H 增加字段增强》

《几个ABAP实用模板，体力活就别一行行敲了，复制粘贴得了》

《DEMO：BTE增强实现凭证创建检查》

《SAP Parallel Accounting（平行分类账业务）配置+操作手册+BAPI demo程序》

《CC02修改确认日期BAPI：Processing of change number  was canceled》

《我是怎样调试BAPI的，以F-02为例》

《女儿的部分书单》

《推荐几本小说吧，反正过年闲着也是闲着，看看呗》

《我是不是被代码给耽误了……不幸沦为一名程序员……》

《三亚自由行攻略（自己穷游总结）》

《苏州游记》

《杂谈：说走就走的旅行没那么难》

《溜达：无锡》

《记码农十周年（20110214--20210214）》

《不一样的SAP干货铺群：帅哥靓妹、红包、烤羊腿！》

《十年老码农搬砖习惯和技巧》

《我这个老码农是怎么debug标准程序的》

《我是怎样调试BAPI的，以F-02为例》

《杂谈：几种接口》

《干货来袭：2020年公众号内容汇总》

《Odata 增删改查详例》

《ODATA CREATE_DEEP_ENTITY 详例》

《RESTful DEMO 一：SAP 如何提供 RESTful Web 服务》

《RESTful DEMO 四 ：增删改查及调用》

《DEMO  search help 增强 ( vl03n KO03 等）》

《录BDC时  弹出的公司代码框问题》

《动态获取查询条件的一个小Demo》

《动态批量修改任意表任意字段的值》