DYNPRO(dialog)画面联动更新

最新推荐文章于 2022-10-17 14:55:16 发布

随记随心

最新推荐文章于 2022-10-17 14:55:16 发布

阅读量2k

点赞数

CC 4.0 BY-SA版权

分类专栏： ABAP 文章标签： DYNPRO DIALOG ABAP

本文链接：https://blog.youkuaiyun.com/weixin_42396921/article/details/81216502

ABAP 专栏收录该内容

35 篇文章

订阅专栏

先上效果图,点击第四个检索帮助，点击数据后带出第二和第三个控件数据。

1. 2.

需要使用的函数：

1.DYNP_GET_STEPL "存在明细行时需要获取当前画面执行行

2.DYNP_VALUES_READ "获取当前屏幕值

3.F4IF_INT_TABLE_VALUE_REQUEST "F4检索帮助

4.将值更新到画面

*DIALOG 检索帮助
PROCESS ON VALUE-REQUEST.

  DATA:
    LT_DYN TYPE STANDARD TABLE OF DYNPREAD,
    LS_DYN TYPE DYNPREAD.

  LS_DYN-FIELDNAME = 'P_WERKS' .
  APPEND LS_DYN TO LT_DYN.

  CALL FUNCTION 'DYNP_VALUES_READ'
    EXPORTING
      dyname                               = SY-CPROG
      dynumb                               = SY-DYNNR
    TABLES
      dynpfields                           = LT_DYN
    EXCEPTIONS
      INVALID_ABAPWORKAREA                 = 1
      INVALID_DYNPROFIELD                  = 2
      INVALID_DYNPRONAME                   = 3
      INVALID_DYNPRONUMMER                 = 4
      INVALID_REQUEST                      = 5
      NO_FIELDDESCRIPTION                  = 6
      INVALID_PARAMETER                    = 7
      UNDEFIND_ERROR                       = 8
      DOUBLE_CONVERSION                    = 9
      STEPL_NOT_FOUND                      = 10
      OTHERS                               = 11

      CALL FUNCTION 'DYNP_VALUES_UPDATE'
        EXPORTING
          dyname                     = SY-CPROG
          dynumb                     = SY-DYNNR
        TABLES
          dynpfields                 = LT_DYN
        EXCEPTIONS
          INVALID_ABAPWORKAREA       = 1
          INVALID_DYNPROFIELD        = 2
          INVALID_DYNPRONAME         = 3
          INVALID_DYNPRONUMMER       = 4
          INVALID_REQUEST            = 5
          NO_FIELDDESCRIPTION        = 6
          UNDEFIND_ERROR             = 7
          OTHERS                     = 8