search help返回所选字段

来源：互联网发布：国外网友评价中国淘宝编辑：程序博客网时间：2024/05/20 11:47

TYPES SHLP_DESCR_T TYPE SHLP_DESCR.
*&---------------------------------------------------------------------*
*&      Form ALRT_HLP
*&---------------------------------------------------------------------*
FORM F4CALLBACK    TABLES P_RECORD_TAB STRUCTURE SEAHLPRES
                 CHANGING P_SHLP        TYPE SHLP_DESCR_T
                          P_CALLCONTROL LIKE DDSHF4CTRL.
P_CALLCONTROL-RETALLFLDS = 'X'.
ENDFORM.                                                    "F4CALLBACK
*&---------------------------------------------------------------------*
*&      Form ALRT_HLP
*&---------------------------------------------------------------------*
FORM ALRT_HELP
DATA: IT_HELP       TYPE STANDARD TABLE OF T_HELP.
DATA: IT_RET        TYPE STANDARD TABLE OF DDSHRETVAL.

CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'
    EXPORTING
      RETFIELD         = 'ALRT'
      DYNPPROG         = SY-REPID
      DYNPNR           = SY-DYNNR
      DYNPROFIELD      = 'Plant'
      VALUE_ORG        = 'S'
      CALLBACK_PROGRAM = SY-CPROG
      CALLBACK_FORM    = 'F4CALLBACK'
    TABLES
      VALUE_TAB        = IT_HELP
      RETURN_TAB       = IT_RET
    EXCEPTIONS
      PARAMETER_ERROR = 1
      NO_VALUES_FOUND = 2
      OTHERS           = 3.
ENDFORM.