zoukankan      html  css  js  c++  java
  • 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 ausgefrt 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 zurkstellen
                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
    代码摘自sapSAPLJBYCDETAIL



  • 相关阅读:
    梦断代码阅读笔记02
    第三周
    第二周
    《大道至简》阅读笔记
    暑假第一周
    hdu-1237简单计算器(栈的运用)
    玩骰子(概率,暴力)
    hdu-5568SUM (dp)
    codeforce-600C. Make Palindrome(贪心)
    codeforce-601A. The Two Routes(最短路)
  • 原文地址:https://www.cnblogs.com/xiaomaohai/p/6157183.html
Copyright © 2011-2022 走看看