Hi All,
I have a table control with some fields like DOCNO, BUKRS,GJAHR,BILLNO etc. I have created the Search help for Field DOCNO using the below code.
I want when a user selects the entry from search help hitlist on DOCNO, correspoding values should get updated in BUKRS, GJAHR & BILLNO.
PROCESS ON VALUE-REQUEST.
FIELD GIT_WA-DOCNO MODULE ATTACH_SHELP.
*********************************************************************
TYPES: BEGIN OF T_TC_TEST,
BUKRS LIKE ZFI_PAYREQ-BUKRS,
DOCNO LIKE ZFI_PAYREQ-DOCNO,
GJAHR LIKE ZFI_PAYREQ-GJAHR,
DDFAV LIKE ZFI_PAYREQ-DDFAV,
PYMOD LIKE ZFI_PAYREQ-PYMOD,
BILNO LIKE ZFI_PAYREQ-BILNO,
EBELN LIKE ZFI_PAYREQ-EBELN,
END OF T_TC_TEST.
DATA: GIT_ITAB TYPE T_TC_TEST OCCURS 0,
GIT_WA TYPE T_TC_TEST. "work area
DATA : LIT_ITAB TYPE TABLE OF T_TC_TEST,
LWA_ITAB TYPE t_tc_test.
CONTROLS: TC_TEST TYPE TABLEVIEW USING SCREEN 0100.
DATA : RETURN_TAB TYPE TABLE OF DDSHRETVAL.
DATA: IT_MAP TYPE STANDARD TABLE OF DSELC,
WA_MAP TYPE DSELC.
DATA : L_PRG TYPE SY-REPID,
L_DYNNR TYPE SY-DYNNR.
CLEAR : LIT_ITAB[].
SELECT DOCNO BUKRS GJAHR BILNO FROM ZFI_PAYREQ INTO CORRESPONDING FIELDS OF TABLE LIT_ITAB.
WA_MAP-FLDNAME = 'DOCNO'. "Field for Position 1
WA_MAP-DYFLDNAME = 'GIT_WA-DOCNO'.
APPEND WA_MAP TO IT_MAP.
WA_MAP-FLDNAME = 'BUKRS'. "Field for Position 2
WA_MAP-DYFLDNAME = 'GIT_WA-BUKRS'.
APPEND WA_MAP TO IT_MAP.
WA_MAP-FLDNAME = 'GJAHR'. "Field for Position 2
WA_MAP-DYFLDNAME = 'GIT_WA-GJAHR'.
APPEND WA_MAP TO IT_MAP.
WA_MAP-FLDNAME = 'BILNO'. "Field for Position 2
WA_MAP-DYFLDNAME = 'GIT_WA-BILNO'.
APPEND WA_MAP TO IT_MAP.
L_PRG = SY-REPID.
L_DYNNR = SY-DYNNR.
CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'
EXPORTING
RETFIELD = 'DOCNO'
DYNPPROG = L_PRG"SY-REPID
DYNPNR = L_DYNNR"SY-DYNNR
DYNPROFIELD = 'GIT_WA-DOCNO'
VALUE_ORG = 'S'
TABLES
RETURN_TAB = RETURN_TAB
VALUE_TAB = LIT_ITAB
DYNPFLD_MAPPING = IT_MAP
EXCEPTIONS
PARAMETER_ERROR = 1
NO_VALUES_FOUND = 2
OTHERS = 3.
*************************************************************************************
In RETURN_TAB, I am only getting values for DOCNO.
Please Help.
Regards
Shruti
Bluesky
