Application Development Discussions
Join the discussions or start your own on all things application development, including tools and APIs, programming models, and keeping your skills sharp.
cancel
Turn on suggestions
Auto-suggest helps you quickly narrow down your search results by suggesting possible matches as you type.
Showing results for 
Search instead for 
Did you mean: 

MIRA bdc program

Former Member

‎09-18-2007 11:32 AM

0 Kudos

Hi guru's,

Can any one send me the bdc program for MIRA transaction plz.

Thanks in advance.

Thanks&regards,

Srinivas

1 REPLY 1

Former Member

‎09-20-2007 9:39 AM

0 Kudos

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.