ABAP--如何使用'F4IF_INT_TABLE_VALUE_REQUEST'填写屏幕的多个字段

ABAP--如何使用'F4IF_INT_TABLE_VALUE_REQUEST'填写屏幕的多个字段 样例屏幕 1定义输入帮助处理 PROCESS ON VALUE-REQUEST. FIELD ACTIVE_SZKART module YCURVE_VALUE_REQUEST. FIELD ACTIVE_WWAER MODULE YCURVE_VALUE_REQUEST. FIELD ACTIVE_DKOND MODULE YCURVE_VALUE_REQUEST. 2编写YCURVE_VALUE_REQUEST module代码 module ycurve_value_request input. * Dieses Modul wird bei F4 auf szkart, wwaer oder dkond ausgef黨rt und * liefert eine liste der selektierten Zinskurven. data: return_tab like ddshretval occurs 1 with header line, field_tab like dfies occurs 1 with header line, dynpfields like dynpread occurs 3 with header line. call function 'F4IF_INT_TABLE_VALUE_REQUEST' exporting ddic_structure = 'JBIZKARTLIST' retfield = 'ACTIVE_SZKART' dynpprog = 'SAPLJBYCDETAIL' dynpnr = '1000' dynprofield = 'X' "Felder aufs Dynpro zur點kstellen window_title = text-003 value_org = 'S' callback_program = 'SAPLJBYCDETAIL' callback_form = 'BO_CALLBACK_FORM' tables value_tab = selected_zkartlist field_tab = field_tab return_tab = return_tab exceptions parameter_error = 1 no_values_found = 2 others = 3. if sy-subrc eq 0. * read table selected_zkartlist with key szkart = active_szkart * wwaer = active_wwaer * dkond = active_dkond. * move sy-tabix to active_index. * Aktualisiere die Table Control-Daten f黵 das Tab Strip * perform bo_data_transfer_for_tab_strip. endif. endmodule. " YCURVE_VALUE_REQUEST INPUT 3.编写回调函数BO_CALLBACK_FORM代码 注意红色代码块，那里定义了返回三个字段并填写到操作屏幕 form bo_callback_form tables record_tab structure seahlpres changing shlp type shlp_descr_t callcontrol like ddshf4ctrl. data: interface like line of shlp-interface, fp like line of shlp-fieldprop. clear interface. clear fp. fp-shlpoutput = 'X'. modify shlp-fieldprop from fp transporting shlpoutput where shlpoutput = space. interface-shlpfield = 'SZKART'. interface-valfield = 'ACTIVE_SZKART'. append interface to shlp-interface. interface-shlpfield = 'WWAER'. interface-valfield = 'ACTIVE_WWAER'. append interface to shlp-interface. interface-shlpfield = 'DKOND'. interface-valfield = 'ACTIVE_DKOND'. append interface to shlp-interface. endform. " BO_CALLBACK_FORM 代码摘自sap的SAPLJBYCDETAIL 继续阅读