POH和POV事件获得屏幕字段的值

诸秋白

已于 2022-06-21 16:07:55 修改

阅读量360

点赞数

分类专栏： abap 文章标签： abap

于 2022-06-21 16:05:53 首次发布

本文链接：https://blog.csdn.net/weixin_36910300/article/details/125392819

版权

abap 专栏收录该内容

13 篇文章 1 订阅

订阅专栏

一、概念

PROCESS ON HELP-REQUEST.
"当用户查看帮助信息时（或按下F1键）被触发、事件结束后将处理当前
	FIELD FIELD_NAME MODULE HELP_MODULE.	屏幕
PROCESS ON VALUE-REQUEST.
"当用户按下查询帮助按键时（或按下F4键）被触发，事件结束后将继续处
	FIELD FIELD_NAME MODULE F4_MODULE.	理当前屏幕

在SCREEN显示之前，系统会自动将程序变量值存放到屏幕字段中：在PAI事件中，系统会自动将屏幕字段的值更新到相应的程序变量中。
在SCREEN LOGIC中我们还有POH和POV事件，所以需要调用DYNP_VALUES_READ函数来读取屏幕字段值。

二、业务场景

屏幕上有FIELD_1和FIELD_2两个字段，必须根据FIELD_1的值后台查询对应搜索帮助的数据。由于PAI尚未被执行，屏幕字段FIELD_1的值尚未更新到程序变量FIELD_1。
此时我们可以调用DYNP_VALUES_READ 来实现，读取FIELD_1字段值

三、实现

  DATA:DYNPFIELDS  TYPE TABLE OF DYNPREAD WITH HEADER LINE.
  DYNPFIELDS-FIELDNAME = 'FIELD_1'.
  APPEND  DYNPFIELDS.
  CALL FUNCTION 'DYNP_VALUES_READ'
    EXPORTING
      DYNAME     = SY-REPID
      DYNUMB     = SY-DYNNR
    TABLES
      DYNPFIELDS = DYNPFIELDS.
  IF SY-SUBRC =  0.
    READ TABLE DYNPFIELDS WITH   KEY  FIELDNAME   = 'FIELD_1'.
    IF SY-SUBRC = 0.
      ZMMT001-WERKS =   DYNPFIELDS-FIELDVALUE.
    ENDIF.
  ENDIF.