Hello Kunal,
Try below code, it works for me.
TABLES : MARA.
DATA: BEGINOF IT_MARA OCCURS 0,
MATNR LIKE MARA-MATNR,
ENDOF IT_MARA.
DATA : IT_RETURN TYPESTANDARDTABLEOF DDSHRETVAL WITHHEADERLINE.
PARAMETERS: p_matnr LIKE mara-matnr.
ATSELECTION-SCREENONVALUE-REQUESTFOR p_matnr.
SELECT MATNR FROM MARA UPTO10ROWSINTOTABLE IT_MARA.
SORT IT_MARA BY MATNR.
DELETEADJACENTDUPLICATESFROM IT_MARA COMPARING MATNR.
CALLFUNCTION'F4IF_INT_TABLE_VALUE_REQUEST'
EXPORTING
RETFIELD = 'MATNR'
DYNPPROG = SY-REPID
DYNPNR = '1000'
DYNPROFIELD = 'P_MATNR'
VALUE_ORG = 'S'
TABLES
VALUE_TAB = IT_MARA
RETURN_TAB = IT_RETURN
EXCEPTIONS
PARAMETER_ERROR = 1
NO_VALUES_FOUND = 2
OTHERS = 3.
IF SY-SUBRC <>0.
MESSAGEID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
LOOPATSCREEN.
IF SCREEN-NAME EQ'P_MATNR'.
SCREEN-INPUT = '0'.
MODIFYSCREEN.
ENDIF.
ENDLOOP.
Regards,
Thanga
