FM：DYNP_VALUES_READ读取屏幕字段值

在Screen显示之前，系统会自动将程序变量值放到屏幕字段中；在PAI事件中，系统会自动将屏幕字段的值更新到相应的程序变量。在Screen Logic中我们还有POH和POV事件，所以有时需要调用函数DYNP_VALUES_READ来读取屏幕字段值。
比如屏幕上有两个字段，NAME1 和 NAME2。当字段NAME2触发搜索帮助的时候，必须参照用户在NAME1中的录入值。由于PAI尚未被执行，屏幕字段NAME1的字符串值尚未更新到程序变量NAME1。此时我们可以调用DYNP_VALUES_READ来实现。
DYNP_VALUES_READ中首要的接口是DYNPFIELDS，它主要含2个字段，字段名和字段值。由于它读取的是屏幕字段，所以字段值自然是未经转换的字符串输入值。

1.   DATA:lt_dynpfields TYPE TABLE OF dynpread WITH HEADER LINE.
   
2. 
   
3.   CLEAR:lt_dynpfields,lt_dynpfields[].
   
4.   lt_dynpfields-fieldname = 'P_KAIPJ0'. "填入需要读值的字段名
   
5.   APPEND lt_dynpfields.
   
6.   CALL FUNCTION 'DYNP_VALUES_READ'
   
7.     EXPORTING
   
8.       dyname               = sy-repid
   
9.       dynumb               = sy-dynnr
   
10.       translate_to_upper   = 'X'
    
11. *     REQUEST              = ' '
    
12. *     PERFORM_CONVERSION_EXITS             = ' '
    
13. *     PERFORM_INPUT_CONVERSION             = ' '
    
14. *     DETERMINE_LOOP_INDEX = ' '
    
15. *     START_SEARCH_IN_CURRENT_SCREEN       = ' '
    
16. *     START_SEARCH_IN_MAIN_SCREEN          = ' '
    
17. *     START_SEARCH_IN_STACKED_SCREEN       = ' '
    
18. *     START_SEARCH_ON_SCR_STACKPOS         = ' '
    
19. *     SEARCH_OWN_SUBSCREENS_FIRST          = ' '
    
20. *     SEARCHPATH_OF_SUBSCREEN_AREAS        = ' '
    
21.     TABLES
    
22.       dynpfields           = lt_dynpfields[]
    
23.     EXCEPTIONS
    
24.       invalid_abapworkarea = 1
    
25.       invalid_dynprofield  = 2
    
26.       invalid_dynproname   = 3
    
27.       invalid_dynpronummer = 4
    
28.       invalid_request      = 5
    
29.       no_fielddescription  = 6
    
30.       invalid_parameter    = 7
    
31.       undefind_error       = 8
    
32.       double_conversion    = 9
    
33.       stepl_not_found      = 10
    
34.       OTHERS               = 11.
    
35.   IF sy-subrc = 0.
    
36.     READ TABLE lt_dynpfields WITH KEY fieldname = 'P_KAIPJ0'.
    
37.     name1 = lt_dynpfields-fieldvalue.
    
38.   ENDIF.

复制代码

备注：
如果必要，这里要进行输入转换(Input Conversion)，将用户录入的字符串转换成SAP的内部变量值。可以调用CONVERSION_EXIT_XXXXX_INPUT此类函数。
可参考系统程序：se38：DEMO_DYNPRO_F4_HELP_MODULE