ABAP SEARCH HELP

ABAP SEARCH HELP

http://blog.csdn.net/lvzhqi/archive/2009/06/09/4254660.aspx

 

ABAP--一个实现Search Help Exits的完整样例

http://silverw0396.javaeye.com/blog/229411

https://wiki.sdn.sap.com/wiki/display/Snippets/Implementing%20Search%20Help%20Exits

 

关于search help Exit和样例

http://blog.csdn.net/CompassButton/archive/2007/01/24/1492229.aspx

 

 

example:

 

F4IF_FIELD_VALUE_REQUEST or F4IF_INT_TABLE_VALUE_REQUEST.

 

  perform obj_id_1010_pov
    using
      'CMS_STR_OTH_AST_IF_DATA_SCR-MOV_ID'.

form obj_id_1010_pov
using
value(u_name) type vrm_id
.

  data:
        l_srch_help type shlpname,
        l_srch_param type shlpfield,
        l_dynnr type sydynnr,
        l_dynpro_field type help_info-dynprofld,
        l_callback_form type sy-xform,
        l_tab_return type cms_tab_field_values.

*--- Call the VEH Search help and modify the
    l_srch_help = 'CMS_SRCH_OTH_FOR_CHG'.
    l_srch_param = 'MOV_ID'.
    l_dynnr = '1010'.
    l_dynpro_field = u_name.
    l_callback_form = 'F4CALLBACK_OBJ_ID'.

    perform field_value_request
      using
        l_srch_help
        l_srch_param
        l_dynnr
        l_dynpro_field
        l_callback_form
      changing
        l_tab_return
        .

endform.                    " obj_id_1010_pov

form field_value_request
  using
    value(u_srch_help) type shlpname
    value(u_srch_param) type shlpfield
    value(u_dynnr) type sydynnr
    value(u_dynpro_field) type help_info-dynprofld
    value(u_callback_form) type sy-xform
  changing
    c_tab_return type cms_tab_field_values
   .

    call function 'F4IF_FIELD_VALUE_REQUEST'
      exporting
        tabname                   = 'X'
        fieldname                 = 'Y'
        searchhelp                = u_srch_help
        shlpparam                 = u_srch_param
        dynpprog                  = 'SAPLCMS_OTH_IM_AST_DIALOG'
        dynpnr                    = u_dynnr
        dynprofield               = u_dynpro_field
*       STEPL                     = 0
*       VALUE                     = ' '
*       MULTIPLE_CHOICE           = ' '
*       DISPLAY                   = ' '
*       SUPPRESS_RECORDLIST       = ' '
        callback_program          = 'SAPLCMS_OTH_IM_AST_DIALOG'
        callback_form             = u_callback_form
*       SELECTION_SCREEN          = ' '
      tables
        return_tab                = c_tab_return
      exceptions
        field_not_found           = 1
        no_help_for_field         = 2
        inconsistent_help         = 3
        no_values_found           = 4
        others                    = 5
              .

      if sy-subrc ne 0.
        exit.
      endif.
endform.                    " field_value_request