hi srinivasa
I am replying you for transaction mm01
hope this might help you some how
first record using shdb then this
REPORT zsee_pg NO STANDARD PAGE HEADING.
types : begin of t_mat,
matnr(20),
desc(50),
uom(5),
end of t_mat.
data : i_mat type table of t_mat.
data : wa_mat type t_mat.
INCLUDE bdcrecxx.
START-OF-SELECTION.
CALL FUNCTION 'UPLOAD'
EXPORTING
FILETYPE = 'DAT'
TABLES
data_tab = i_mat.
PERFORM open_group.
LOOP AT i_mat INTO wa_mat.
PERFORM bdc_dynpro USING 'SAPLMGMM' '0060'.
PERFORM bdc_field USING 'BDC_OKCODE'
'/00'.
PERFORM bdc_field USING 'BDC_CURSOR'
'RMMG1-MTART'.
PERFORM bdc_field USING 'RMMG1-MATNR'
wa_mat-matnr. " 'zsm'.
PERFORM bdc_field USING 'RMMG1-MBRSH'
'M'.
PERFORM bdc_field USING 'RMMG1-MTART'
'ERSA'.
PERFORM bdc_dynpro USING 'SAPLMGMM' '0070'.
PERFORM bdc_field USING 'BDC_OKCODE'
'=ENTR'.
PERFORM bdc_field USING 'BDC_CURSOR'
'MSICHTAUSW-KZSEL(01)'.
PERFORM bdc_field USING 'MSICHTAUSW-KZSEL(01)'
'X'.
PERFORM bdc_dynpro USING 'SAPLMGMM' '4000'.
PERFORM bdc_field USING 'BDC_OKCODE'
'/00'.
PERFORM bdc_field USING 'BDC_SUBSCR'
'SAPLMGMM'
& ' 2000TABFRA1'.
PERFORM bdc_field USING 'BDC_SUBSCR'
'SAPLMGD1'
& ' 1002SUB1'.
PERFORM bdc_field USING 'MAKT-MAKTX'
wa_mat-desc. " 'zsm'.
PERFORM bdc_field USING 'BDC_SUBSCR'
'SAPLMGD1'
& ' 2001SUB2'.
PERFORM bdc_field USING 'BDC_CURSOR'
'MARA-MEINS'.
PERFORM bdc_field USING 'MARA-MEINS'
wa_mat-uom. " 'kg'.
PERFORM bdc_field USING 'BDC_SUBSCR'
'SAPLMGD1'
& ' 2561SUB3'.
PERFORM bdc_field USING 'BDC_SUBSCR'
'SAPLMGD1'
& ' 2007SUB4'.
PERFORM bdc_field USING 'BDC_SUBSCR'
'SAPLMGD1'
& ' 2005SUB5'.
PERFORM bdc_field USING 'BDC_SUBSCR'
'SAPLMGD1'
& ' 2011SUB6'.
PERFORM bdc_dynpro USING 'SAPLSPO1' '0300'.
PERFORM bdc_field USING 'BDC_OKCODE'
'=YES'.
PERFORM bdc_transaction USING 'MM01'.
REFRESH bdcdata.
ENDLOOP.
PERFORM close_group.
Bluesky
