BDC

[Former Member]

Who will do recording ?

developers or Functional people will provide.

[Former Member]

Hi Swapna,

Recording will be done by developers only. But what fields that should be recorded will be provided by functional people.

Reward if useful.

Thanks

Aneesh.

[Former Member]

Hi

We will need BDC recording for uploading the Master data from legacy system to SAP

The required master data transactions in which the data has to be uploaded will be provided by fun people

say for example Customer master, Vendor master and material master

You have to prepare the Excel file in what way you want the fields data has to be provided (this you will come to know once you create a record for each transaction manually) and accordingly the file was given to users, who will provide the master data

and by doing recording or some other method you have to upload it into the system.

Reward points if useful

Regards

Anji

[Former Member]

this coding would be helpful.

.

types : begin of t_kna1,

• matnr type matnr,

mbrsh type mbrsh,

mtart type mtart,

meins type meins,

end of t_kna1,

tt_kna1 type standard table of t_kna1.

data : wa_kna1 type t_kna1,

i_kna1 type tt_kna1,

lw_bdcdata type bdcdata,

lt_bdcdata type standard table of bdcdata.

types : begin of t_out,

• matnr type matnr,

mbrsh type mbrsh,

mtart type mtart,

meins type meins,

end of t_out,

tt_out type standard table of t_out.

data : wa_out type t_out,

i_out type tt_out.

data : v_fname type string,

v_presen type string.

parameters : p_fname type rlgrap-filename.

*initialization.

*p_fname = 'C:\Documents and Settings\godessh\Desktop\cust.xls'.

at selection-screen on value-request for p_fname.

CALL FUNCTION 'F4_FILENAME'

EXPORTING

PROGRAM_NAME = SYST-CPROG

DYNPRO_NUMBER = SYST-DYNNR

FIELD_NAME = ' '

IMPORTING

FILE_NAME = p_fname.

v_fname = p_fname.

*select mbrsh mtart meins into table i_kna1 from mara up to 10 rows.

start-of-selection.

CALL FUNCTION 'GUI_UPLOAD'

EXPORTING

filename = v_fname

FILETYPE = 'ASC'

HAS_FIELD_SEPARATOR = 'X'

READ_BY_LINE = 'X'

tables

data_tab = i_kna1.

loop at i_kna1 into wa_kna1.

*perform open_group.

clear lw_bdcdata.

refresh lt_bdcdata[].

perform bdc_dynpro using 'SAPLMGMM' '0060'.

perform bdc_field using 'BDC_CURSOR'

'RMMG1-MATNR'.

perform bdc_field using 'BDC_OKCODE'

'ENTR'.

perform bdc_field using 'RMMG1-MATNR'

' '.

perform bdc_field using 'RMMG1-MBRSH'

wa_kna1-mbrsh.

perform bdc_field using 'RMMG1-MTART'

wa_kna1-mtart.

perform bdc_dynpro using 'SAPLMGMM' '0070'.

perform bdc_field using 'BDC_OKCODE'

'/EABBR'.

perform bdc_field using 'BDC_CURSOR'

'MSICHTAUSW-DYTXT(01)'.

perform bdc_dynpro using 'SAPLMGMM' '0060'.

perform bdc_field using 'BDC_CURSOR'

'RMMG1-MATNR'.

perform bdc_field using 'BDC_OKCODE'

'=ENTR'.

perform bdc_field using 'RMMG1-MBRSH'

'P'.

perform bdc_field using 'RMMG1-MTART'

'FGTR'.

perform bdc_dynpro using 'SAPLMGMM' '0070'.

perform bdc_field using 'BDC_CURSOR'

'MSICHTAUSW-DYTXT(01)'.

perform bdc_field using 'BDC_OKCODE'

'=ENTR'.

perform bdc_field using 'MSICHTAUSW-KZSEL(01)'

'X'.

perform bdc_dynpro using 'SAPLMGMM' '4004'.

perform bdc_field using 'BDC_OKCODE'

'=BU'.

perform bdc_field using 'BDC_CURSOR'

'MAKT-MAKTX'.

perform bdc_field using 'MAKT-MAKTX'

'hh'.

perform bdc_field using 'MARA-MEINS'

wa_kna1-meins.

perform bdc_field using 'MARA-MTPOS_MARA'

'NORM'.

*perform bdc_transaction using 'MM01'.

call transaction 'MM01' USING LT_BDCDATA mode 'A' UPDATE 'S'.

*perform close_group.

endloop.

&----

---

*& Form bdc_dynpro

&----

---

• text

----

---

• -->P_0099 text

• -->P_0100 text

----

---

form bdc_dynpro using PROGRAM

DYNPRO.

CLEAR LW_BDCDATA.

lw_bdcdata-program = program.

lw_bdcdata-dynpro = dynpro.

lw_bdcdata-dynbegin = 'X'.

append lw_bdcdata to lt_bdcdata.

endform. " bdc_dynpro

&----

---

*& Form bdc_field

&----

---

• text

----

---

• -->P_0115 text

• -->P_0116 text

----

---

form bdc_field using FNAM

FVAL.

if fval <> space.

clear lw_bdcdata.

lw_bdcdata-fnam = fnam.

lw_bdcdata-fval = fval.

append lw_bdcdata to lt_bdcdata.

endif.

endform. " bdc_field