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

DATA: dynpfields TYPE TABLE OF dynpread WITH HEADER LINE.

CLEAR: dynpfields, dynpfields[].
 dynpfields-fieldname = ‘NAME1‘. "填入需要读值的字段名
APPEND dynpfields.

CALL FUNCTION ‘DYNP_VALUES_READ‘
   EXPORTING
     dyname             = sy-repid
     dynumb             = sy-dynnr
     translate_to_upper = ‘X‘
   TABLES
     dynpfields         = dynpfields
   EXCEPTIONS
     OTHERS             = 9.
IF sy-subrc = 0.
   READ TABLE dynpfields WITH KEY fieldname = ‘NAME1‘.
   name1 = dynpfields-fieldvalue. "备注
ENDIF.