topic Re: source code needs for simple BDC session in Application Development and Automation Discussions

source code needs for simple BDC session

Former Member — Fri, 26 Sep 2008 11:22:29 GMT

Hi experts,

I have a Z table with 4 fields. i want to insert the records using bdc.

I am verymuch familier with Recording method. bt i am nt aware of the nxt method.

Can any one help this? how to make tht session method?

Plz paste a sample code for that....

Mohana

Re: source code needs for simple BDC session

Former Member — Fri, 26 Sep 2008 11:24:32 GMT

Mohana

Refer to the function modules BDC_OPEN_GROUP, BDC_INSERT and BDC_CLOSE_GROUP.

Thanks

Amol Lohade

Re: source code needs for simple BDC session

Former Member — Fri, 26 Sep 2008 11:25:22 GMT

Hi,

Once you completed the recording in SHDB. select that recording and press Shift+f5 or goto Edit->Create Program.

This will create the program itself. You can do modification if necessary

Cheers,

Kothand

Re: source code needs for simple BDC session

Former Member — Fri, 26 Sep 2008 11:25:57 GMT

Once u do the recording in SHDB, select the recording and generate a program... save the program.

Now, bring the values of the 4 fields into an internal table.

Then Loop the internal table to the subroutines.

Loop at itab.

Perform bdc_field using xxx-xxxx itab-xxxx.(next to the field u have to give the itab-xxx which the field which holds ur values.

endloop.

Regards,

Vishwa.

Re: source code needs for simple BDC session

Former Member — Fri, 26 Sep 2008 11:29:42 GMT

Hai,

I Dont want SHDB method...i need call session method.

Can any one please paste there code if available?........:-)

Mohana

Re: source code needs for simple BDC session

Former Member — Fri, 26 Sep 2008 11:30:01 GMT

If your requirement is to update

Z table with 4 fields

It will be more easy to directly update

using

INSERT / MODIFY / UPDATE statements instead of BDC

Regards

Re: source code needs for simple BDC session

Former Member — Fri, 26 Sep 2008 11:30:05 GMT

hi mohana....

plz go through this link

https://www.sdn.sap.com/irj/sdn/go/portal/prtroot/docs/library/uuid/d4c5e890-0201-0010-bd9a-c3fd8683fc97

thanks

nikita

Edited by: nikita mishra on Sep 26, 2008 1:30 PM

Re: source code needs for simple BDC session

Former Member — Fri, 26 Sep 2008 11:30:46 GMT

Ok. Just search in SDN with the term Session Method, you will get lot of results..

Regards,

Vishwa.

Re: source code needs for simple BDC session

Former Member — Fri, 26 Sep 2008 11:31:46 GMT

Hi Mohana,

Conform me whether you are updateing the records with Notepad or EXCEL sheet.

Based on that i will try to send you code.

Cheers!!

Re: source code needs for simple BDC session

Former Member — Fri, 26 Sep 2008 11:33:57 GMT

Hi Bala,

Thnx for your info... Basically i have notepad records with TAB delimiter.

I dont want the recording method & direct insert from internal table to z table.

Plz do the needfull.

Mohana

Re: source code needs for simple BDC session

BH2408 — Fri, 26 Sep 2008 11:38:40 GMT

Hi,

1. First upload data into internal table from flat file.(Use Gui_upload FM)

2. do the recording method and write te program .

Regards,

Bharani

Re: source code needs for simple BDC session

Former Member — Fri, 26 Sep 2008 13:37:27 GMT

WS_UPLOAD

Regards

Re: source code needs for simple BDC session

Former Member — Fri, 26 Sep 2008 14:03:02 GMT

You have to do a direct insert into the Z-table. there is no other way.

like MD said, just put the data into a internal table like your Z-table and insert the internal table to the z-table.

You don't have a transaction to fill the z-table so you can't use BDC. and if you make a transaction to use BDC then you are wasting your time. direct update program is 2 hours work.

Best Regards,

Guido

Re: source code needs for simple BDC session

Former Member — Fri, 26 Sep 2008 18:48:07 GMT

Hi Mohana this is Balu not bala,

Anyways,

I have coded for MM01 for notepad records uploading, i dont think there might be much difference with cutomized ztable .

If your screen that is designed is making the data save into the table means what ever that u record through SHDB taking the record code to program will reach your task.

sample which i have done for MM01.

*REPORT ZRY_BDCDIRECT_PROGRAM

no standard page heading line-size 255.

TYPES: BEGIN OF STU,

MATNR LIKE RMMG1-MATNR, "Material Number"

MBRSH LIKE RMMG1-MBRSH, "Industry Sector"

MTART LIKE RMMG1-MTART, "Material Type"

MAKTX LIKE MAKT-MAKTX, "Material Description"

MEINS LIKE MARA-MEINS, "Basic Unit of Measure"

END OF STU.

DATA WA_ITAB TYPE STU.

DATA ITAB TYPE TABLE OF STU.

CALL FUNCTION 'GUI_UPLOAD'

EXPORTING

FILENAME = 'C:\Documents and Settings
Desktop\BALU\ABC.TXT'

TABLES

DATA_TAB = ITAB.

IF SY-SUBRC <> 0.

ENDIF.

DATA WA_BDC TYPE BDCDATA.

DATA: BDCDATA TYPE BDCDATA.

DATA BDCITAB TYPE TABLE OF BDCDATA.

LOOP AT ITAB INTO WA_ITAB.

perform bdc_dynpro using 'SAPLMGMM' '0060'.

perform bdc_field using 'BDC_CURSOR'

'RMMG1-MTART'.

perform bdc_field using 'BDC_OKCODE'

'/00'.

perform bdc_field using 'RMMG1-MATNR'

WA_ITAB-MATNR. "'S1'.

perform bdc_field using 'RMMG1-MBRSH'

WA_ITAB-MBRSH. "'M'.

perform bdc_field using 'RMMG1-MTART'

WA_ITAB-MTART. "'VKHM'

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 'MAKT-MAKTX'

WA_ITAB-MAKTX. " material

perform bdc_field using 'BDC_CURSOR'

'MARA-MEINS'.

perform bdc_field using 'MARA-MEINS'

WA_ITAB-MEINS. "'KG'

perform bdc_field using 'MARA-MTPOS_MARA'

'NORM'.

*WA_BDC-PROGRAM = 'SAPLMGMM'.

*WA_BDC-DYNPRO = '0060'.

*WA_BDC-DYNBEGIN = 'X'.

*WA_BDC-FNAM = 'BDC_CURSOR'.

*WA_BDC-FVAL = 'RMMG1-MTART'.

*PERFORM APPEND.

*WA_BDC-FNAM = 'BDC_OKCODE'.

*WA_BDC-FVAL = '/00'.

*PERFORM APPEND.

*WA_BDC-FNAM = 'RMMG1-MATNR'.

*WA_BDC-FVAL = WA_ITAB-MATNR.

*PERFORM APPEND.

*WA_BDC-FNAM = 'RMMG1-MBRSH'.

*WA_BDC-FVAL = WA_ITAB-MBRSH.

*PERFORM APPEND.

*WA_BDC-FNAM = 'RMMG1-MTART'.

*WA_BDC-FVAL = WA_ITAB-MTART.

*PERFORM APPEND.

*WA_BDC-PROGRAM = 'SAPLMGMM'.

*WA_BDC-DYNPRO = '0070'.

*WA_BDC-DYNBEGIN = 'X'.

*WA_BDC-FNAM = 'BDC_CURSOR'.

*WA_BDC-FVAL = 'MSICHTAUSW-DYTXT(01)'.

*PERFORM APPEND.

*WA_BDC-FNAM = 'BDC_OKCODE'.

*WA_BDC-FVAL = '=ENTR'.

*PERFORM APPEND.

*WA_BDC-FNAM = 'MSICHTAUSW-KZSEL(01)'.

*WA_BDC-FVAL = 'X'.

*PERFORM APPEND.

*WA_BDC-PROGRAM = 'SAPLMGMM'.

*WA_BDC-DYNPRO = '4004'.

*WA_BDC-DYNBEGIN = 'X'.

*WA_BDC-FNAM = 'BDC_OKCODE'.

*WA_BDC-FVAL = '/00'.

*PERFORM APPEND.

*WA_BDC-FNAM = 'MAKT-MAKTX'.

*WA_BDC-FVAL = 'WA_ITAB-MAKTX'.

*PERFORM APPEND.

*WA_BDC-FNAM = 'MARA-MEINS'.

*WA_BDC-FVAL = 'WA_ITAB-MEINS'.

*PERFORM APPEND.

CALL TRANSACTION 'MM01' USING BDCITAB MODE 'A'.

REFRESH BDCITAB.

ENDLOOP.

*----

Start new screen

*----

FORM BDC_DYNPRO USING PROGRAM DYNPRO.

CLEAR BDCDATA.

BDCDATA-PROGRAM = PROGRAM.

BDCDATA-DYNPRO = DYNPRO.

BDCDATA-DYNBEGIN = 'X'.

APPEND BDCDATA TO BDCITAB.

CLEAR BDCDATA.

ENDFORM.

*----

Insert field

*----

FORM BDC_FIELD USING FNAM FVAL.

IF FVAL <> NODATA.

CLEAR BDCDATA.

BDCDATA-FNAM = FNAM.

BDCDATA-FVAL = FVAL.

APPEND BDCDATA TO BDCITAB.

CLEAR BDCDATA.

ENDIF.

ENDFORM.

*FORM APPEND.

*APPEND WA_BDC TO BDCITAB.

*CLEAR WA_BDC.

*ENDFORM.

If still not solved let me know the problem exactly.

Hope my answer helps you.

Cheers!!