SAP Dynpro POV(F4帮助)

在screen界面增加POV时间PROCESS ON VALUE-REQUEST. FIELD ZTMM002-LEG MODULE F4_HELP_LEG.ZTMM002-LEG屏幕定义字段单个值赋值CALL FUNCTION F4IF_INT_TABLE_VALUE_REQUEST EXPORTING retfield LEG it_itaba中的使用字段 dynpprog sy-repid dynpnr sy-dynnr dynprofield ZTMM002-LEG屏幕字段 value_org S TABLES value_tab it_itaba 获取帮助的表 * dynpfld_mapping it_map EXCEPTIONS parameter_error 1 no_values_found 2 OTHERS 3. IF sy-subrc 0. ENDIF.多个值赋值*---------------------------------------------------------------------* * Module F4_HELP_LEG INPUT *---------------------------------------------------------------------* * text *----------------------------------------------------------------------* MODULE f4_help_leg INPUT. DATA it_re TYPE TABLE OF ddshretval. DATA it_itabb TYPE TABLE OF ztmm002b. IF it_itabb IS INITIAL. SELECT * FROM ztmm002b INTO CORRESPONDING FIELDS OF TABLE it_itabb. ENDIF. CALL FUNCTION F4IF_INT_TABLE_VALUE_REQUEST EXPORTING retfield LEG dynpprog sy-repid dynpnr sy-dynnr dynprofield ZTMM002-LEG value_org S callback_program sy-repid callback_form CB_FORM display F – Force TABLES value_tab it_itabb return_tab it_re EXCEPTIONS parameter_error 1 no_values_found 2 OTHERS 3. ENDMODULE. *---------------------------------------------------------------------* * 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-shlpfield4(1) 4. 增加赋值的表值取值来源ITABB的列数 interface-valfield ZTMM002-DICHTE.另外的屏幕赋值字段 APPEND interface TO shlp-interface. ENDFORM.