Skip to Content
0
Former Member
Jan 15, 2008 at 06:57 AM

BDC Problem

146 Views

Hi Gurus!

writing RFC in which there is BDC for creating order with following fields.while running when its enter in Item screen , it stops there only.

SDTYPE

SDORG

DISTCHANNEL

DIVISION

SALESOFF

PO_NO

PO_DATE

SOLDTOPARTY

SHPTOPARTY

PAYTERM

INCOTERMS

INCOTERMS1

UNIT

PLANT

SLOC

MATNO

QTY

DELDATE

PRICEDATE

erform bdc_dynpro using 'SAPMV45A' '0101'.

perform bdc_field using 'BDC_CURSOR'

'VBAK-VKGRP'.

perform bdc_field using 'BDC_OKCODE'

'/00'.

perform bdc_field using 'VBAK-AUART'

SDTYPE. " 'ZFDS'.

perform bdc_field using 'VBAK-VKORG'

SDORG. " 'FR00'.

perform bdc_field using 'VBAK-VTWEG'

DISTCHANNEL. " 'DE'.

perform bdc_field using 'VBAK-SPART'

DIVISION. " 'CD'.

perform bdc_field using 'VBAK-VKBUR'

SALESOFF. " 'PU01'.

*perform bdc_field using 'VBAK-VKGRP'

  • '101'.

perform bdc_dynpro using 'SAPMV45A' '4001'.

perform bdc_field using 'BDC_OKCODE'

'/00'.

perform bdc_field using 'VBKD-BSTKD'

PO_NO. " 'XYZ'.

perform bdc_field using 'VBKD-BSTDK'

PO_DATE. " '09.01.2008'.

perform bdc_field using 'KUAGV-KUNNR'

SOLDTOPARTY. " '700209'.

perform bdc_field using 'KUWEV-KUNNR'

SHPTOPARTY. " '702037'.

perform bdc_field using 'RV45A-KETDAT'

DELDATE. " '10.01.2008'.

*perform bdc_field using 'RV45A-KPRGBZ'

  • 'D'.

perform bdc_field using 'VBKD-PRSDT'

PRICEDATE. " '31.12.2007'.

perform bdc_field using 'VBKD-ZTERM'

PAYTERM. " 'X009'.

perform bdc_field using 'VBKD-INCO1'

INCOTERMS. " 'FOL'.

perform bdc_field using 'VBKD-INCO2'

INCOTERMS1. " 'ASURLE PORLE'.

perform bdc_field using 'RV45A-MABNR(01)'

MATNO. " '31104'.

perform bdc_field using 'RV45A-KWMENG(01)'

QTY. " 10'.

perform bdc_field using 'VBAP-VRKME(01)'

UNIT. " 'MT'.

perform bdc_dynpro using 'SAPMV45A' '4001'.

perform bdc_field using 'BDC_OKCODE'

'=ITEM'.

perform bdc_field using 'VBKD-BSTKD'

PO_NO. " 'XYZ'.

perform bdc_field using 'VBKD-BSTDK'

PO_DATE. " 09.01.2008'.

perform bdc_field using 'KUAGV-KUNNR'

SOLDTOPARTY. " '700209'.

perform bdc_field using 'KUWEV-KUNNR'

SHPTOPARTY. " '702037'.

perform bdc_field using 'RV45A-KETDAT'

DELDATE. " '10.01.2008'.

*perform bdc_field using 'RV45A-KPRGBZ'

  • 'D'.

perform bdc_field using 'VBKD-PRSDT'

PRICEDATE. " '31.12.2007'.

perform bdc_field using 'VBKD-ZTERM'

PAYTERM. " 'X009'.

perform bdc_field using 'VBKD-INCO1'

INCOTERMS. " 'FOL'.

perform bdc_field using 'VBKD-INCO2'

INCOTERMS1. " 'ASURLE PORLE'.

perform bdc_field using 'BDC_CURSOR'

MATNO. " 'RV45A-MABNR(01)'.

perform bdc_dynpro using 'SAPMV45A' '4003'.

perform bdc_field using 'BDC_OKCODE'

'=T\03'.

perform bdc_field using 'BDC_CURSOR'

'RV45A-KWMENG'.

perform bdc_field using 'RV45A-KWMENG'

QTY. " 10'.

perform bdc_field using 'VBAP-VRKME'

UNIT. " 'MT'.

perform bdc_field using 'RV45A-ETDAT'

DELDATE. " '10.01.2008'.

*perform bdc_field using 'RV45A-PRGBZ'

  • 'D'.

perform bdc_field using 'VBKD-PRSDT'

PRICEDATE. " '31.12.2007'.

perform bdc_dynpro using 'SAPMV45A' '4003'.

perform bdc_field using 'BDC_OKCODE'

'/00'.

perform bdc_field using 'BDC_CURSOR'

'VBAP-LGORT'.

perform bdc_field using 'VBAP-WERKS'

PLANT. " 'DFTP'.

perform bdc_field using 'VBAP-LGORT'

SLOC. " 'NPGD'.

*

perform bdc_field using 'VBAP-ANTLF'

'9'.

perform bdc_field using 'VBKD-KZAZU'

'X'.

perform bdc_field using 'VBAP-NTGEW'

' 10'.

perform bdc_field using 'VBAP-GEWEI'

'MT'.

perform bdc_field using 'VBAP-BRGEW'

' 10'.

*

perform bdc_dynpro using 'SAPMV45A' '4003'.

perform bdc_field using 'BDC_OKCODE'

'=SICH'.

perform bdc_field using 'BDC_CURSOR'

'KUWEV-ABLAD'.

perform bdc_field using 'VBAP-WERKS'

PLANT. " 'DFTP'.

perform bdc_field using 'VBAP-LGORT'

SLOC . " 'NPGD'.

perform bdc_field using 'VBAP-VSTEL'

'FR01'.

perform bdc_field using 'VBAP-ROUTE'

'008149'.

perform bdc_field using 'VBAP-ANTLF'

'9'.

perform bdc_field using 'VBKD-KZAZU'

'X'.

perform bdc_field using 'VBAP-NTGEW'

' 10'.

perform bdc_field using 'VBAP-GEWEI'

'MT'.

perform bdc_field using 'VBAP-BRGEW'

' 10'.

perform bdc_dynpro using 'SAPLSPO2' '0101'.

perform bdc_field using 'BDC_OKCODE'

'=OPT2'.

perform bdc_dynpro using 'SAPMSSY0' '0120'.

perform bdc_field using 'BDC_CURSOR'

'07/02'.

perform bdc_field using 'BDC_OKCODE'

'=BAFE'.

perform bdc_dynpro using 'SAPMV45A' '4003'.

perform bdc_field using 'BDC_OKCODE'

'=SICH'.

perform bdc_field using 'BDC_CURSOR'

'KUWEV-ABLAD'.

perform bdc_field using 'VBAP-WERKS'

PLANT. " 'DFTP'.

perform bdc_field using 'VBAP-LGORT'

SLOC. " 'NPGD'.

perform bdc_field using 'VBAP-VSTEL'

'FR01'.

perform bdc_field using 'VBAP-ROUTE'

'008149'.

perform bdc_field using 'VBAP-ANTLF'

'9'.

perform bdc_field using 'VBKD-KZAZU'

'X'.

perform bdc_field using 'VBAP-NTGEW'

' 10'.

perform bdc_field using 'VBAP-GEWEI'

'MT'.

perform bdc_field using 'VBAP-BRGEW'

' 10'.

perform bdc_dynpro using 'SAPLSPO2' '0101'.

perform bdc_field using 'BDC_OKCODE'

'=OPT1'.

perform bdc_dynpro using 'SAPLRHRD' '0100'.

perform bdc_field using 'BDC_OKCODE'

'/00'.

perform bdc_field using 'BDC_CURSOR'

'SPOP-TEXTLINE1'.

*********************************************

call transaction 'VA01' using bdcdata mode 'A'

update 'A'

messages into it_bdcmsg.