Application Development and Automation 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
Showing results for 
Search instead for 
Did you mean: 
Read only

BDC for tabstrip

Former Member
0 Likes
1,998

Hello frnds,

i want to go for BDC in va01. can anyone just tell me how to write code for tabstrips. i m getting doubt that how to wtite code for tabstrips.

plzz help.

regards,

satya

1 ACCEPTED SOLUTION
Read only

Former Member
0 Likes
1,284

Hi Satya,

If I am not wrong , I think you are writng the code but not designing the screens for the transaction.

I hope you have recorded the transaction, so there is no need for you to worry abt the tab strip coding bcoz the coding can be done depending upon the changes required in the specific areas.

If not clear with the answer, try recording and then u can understand.

Reward well all the helpful answers.

Regards

6 REPLIES 6
Read only

Former Member
0 Likes
1,284

Hi,

why don't use Transaction SHDB.

Actually it will be like this.

clear BDCDATA.

refresh BDCDATA.

IDX = 1.

perform BDC_DYNPRO using 'SAPMV45A' '0101'.

perform BDC_FIELD using 'BDC_CURSOR'

'VBAK-AUART'.

perform BDC_FIELD using 'BDC_OKCODE'

'/00'.

perform BDC_FIELD using 'VBAK-AUART'

'OR05'.

perform BDC_FIELD using 'VBAK-VKORG'

IT_PO_ITEM-VKORG. "8031'.

perform BDC_FIELD using 'VBAK-VTWEG'

IT_PO_ITEM-VTWEG. "02'.

perform BDC_DYNPRO using 'SAPMV45A' '4001'.

perform BDC_FIELD using 'BDC_OKCODE'

'=HEAD'. "'/00'.

perform BDC_FIELD using 'VBKD-BSTKD'

IT_PO_ITEM-ES_PO_NO."'3000008511'.

perform BDC_FIELD using 'KUAGV-KUNNR'

IT_PO_ITEM-Z_SOLD_TP. "'400003'.

perform BDC_FIELD using 'KUWEV-KUNNR'

IT_PO_ITEM-Z_SHIP_TP. "'400003'.

perform BDC_DYNPRO using 'SAPMV45A' '4002'.

perform BDC_FIELD using 'BDC_OKCODE'

'=T\03'.

perform BDC_DYNPRO using 'SAPMV45A' '4002'.

perform BDC_FIELD using 'BDC_OKCODE'

'/EBACK'.

clear DATE.

concatenate G_BILL_DATE6(2) '.' G_BILL_DATE4(2) '.' G_BILL_DATE+0(4) into DATE.

perform BDC_FIELD using 'VBKD-FKDAT'

DATE."'29.03.2007'.

perform BDC_DYNPRO using 'SAPMV45A' '4001'.

perform BDC_FIELD using 'BDC_OKCODE'

'/00'.

loop at IT_PO_ITEM into IS_PO_ITEM.

concatenate 'RV45A-KWMENG(' IDX ')' into FNAM.

perform BDC_FIELD using 'BDC_CURSOR'

FNAM. "'RV45A-KWMENG(01)'.

concatenate 'RV45A-MABNR(' IDX ')' into FNAM.

perform BDC_FIELD using FNAM "'RV45A-MABNR(01)'

IS_PO_ITEM-ST_MAT_CODE."'sd-mgmtfees'.

concatenate 'VBAP-POSNR(' IDX ')' into FNAM.

perform BDC_FIELD using FNAM "'VBAP-POSNR(01)'

IS_PO_ITEM-ES_PO_LN. "' 10'.

concatenate 'RV45A-KWMENG(' IDX ')' into FNAM.

perform BDC_FIELD using FNAM "'RV45A-KWMENG(01)'

' 1'.

perform BDC_DYNPRO using 'SAPMV45A' '4001'.

if IDX eq 1.

perform BDC_FIELD using 'BDC_OKCODE'

'=ITEM'.

else.

perform BDC_FIELD using 'BDC_OKCODE'

'/00'.

endif.

concatenate 'VBAP-POSNR(' IDX ')' into FNAM.

perform BDC_FIELD using 'BDC_CURSOR'

FNAM . "'VBAP-POSNR(01)'.

concatenate 'RV45A-VBAP_SELKZ(' IDX ')' into FNAM.

perform BDC_FIELD using FNAM "'RV45A-VBAP_SELKZ(01)'

'X'.

if IDX eq 1.

perform BDC_DYNPRO using 'SAPMV45A' '4003'.

perform BDC_FIELD using 'BDC_OKCODE'

'=T\05'.

  • perform BDC_FIELD using 'BDC_CURSOR'

  • 'RV45A-KWMENG'.

  • perform BDC_FIELD using 'RV45A-KWMENG'

  • ' 12'.

else.

perform BDC_DYNPRO using 'SAPMV45A' '4001'.

perform BDC_FIELD using 'BDC_OKCODE'

'=ITEM'.

endif.

perform BDC_DYNPRO using 'SAPMV45A' '5003'.

perform BDC_FIELD using 'BDC_OKCODE'

'/00'.

perform BDC_FIELD using 'BDC_CURSOR'

'KOMV-KBETR(09)'.

perform BDC_FIELD using 'KOMV-KSCHL(09)'

'PR00'.

  • data NETWR(13) type C.

if G_M_FEE eq YES or OANDA eq YES.

NETWR = IS_PO_ITEM-NETWR.

endif.

perform BDC_FIELD using 'KOMV-KBETR(09)'

NETWR."IS_PO_ITEM-NETWR."' 123.45'.

perform BDC_DYNPRO using 'SAPMV45A' '5003'.

perform BDC_FIELD using 'BDC_OKCODE'

'/EBACK'.

  • perform BDC_FIELD using 'BDC_CURSOR'

  • 'KOMV-KSCHL(01)'.

perform BDC_DYNPRO using 'SAPMV45A' '4001'.

  • perform BDC_FIELD using 'BDC_OKCODE'

  • '/00'.

perform BDC_DYNPRO using 'SAPMV45A' '4001'.

perform BDC_FIELD using 'BDC_OKCODE'

'=SICH'.

endloop.

perform BDC_TRANSACTION using 'VA01'.

Regds,

Vinsa.R

Read only

andreas_mann3
Active Contributor
0 Likes
1,284

Hi,

pls use tcode <b>SHDB</b> to record your BDC.

Finally save your works and create a program of your recording.

A.

Read only

Former Member
0 Likes
1,284

use the ok code of each tab an write the bdc

Read only

Former Member
0 Likes
1,285

Hi Satya,

If I am not wrong , I think you are writng the code but not designing the screens for the transaction.

I hope you have recorded the transaction, so there is no need for you to worry abt the tab strip coding bcoz the coding can be done depending upon the changes required in the specific areas.

If not clear with the answer, try recording and then u can understand.

Reward well all the helpful answers.

Regards

Read only

0 Likes
1,284

Hi Satya,

Raj is absolutely correct.

In addition if you have a flat file with you , with a lot of items with one header, then you have to do it in a way that the bdc will be running for header first and then for line items you will have to do looping for one sales document number, till the time you have items related to it.

That will be in a seperate bdc.

Regards,

Suruchi

Read only

Former Member
0 Likes
1,284

Hi

First u record the transaction...

While recording u use <b>Control+F11</b> to change the tab strip....

or use the function code <b>'=UMAT'</b> in bdc_okcode field and press enter then it goes to the next tabstrip....

hope this solves ur problem...

reward if it helps u...

sai ramesh