on 09-05-2008 6:35 PM
Hi All,
Can anybody provide me BAPI's for transaction MIR7 with no PO data available.
Data available to post: Header data like -> Comapny Code, doc typ/date, post date, currency key & header text etc..
Item date like:
Item data-1->Debit Data-> comp code, post.key, vendor a/c, amount, item text, assignment, tax amount etc..
Item data-2->Credit Data-> comp code, posting key, account no, amount, cost center, material, partner, tax code, wbs element, assignment, item text
Can anybody give the BAPI's for the same functionality.
Note: The BAPI should Park Vendor Non-PO Invoice data trough MIR7 transaction and we are in SAP version ECC 6.0
Thanks in advance.
Thanks,
Deep.
Hi,
Any solution for above post!
Thanks,
Deep.
You must be a registered user to add a comment. If you've already registered, sign in. Otherwise, register and sign in.
Hi All,
I have tried using MRM_INVOICE_PARK F.M to Park Vendor Non_PO Invoice for MIR7 transaction.
But is giving message as 'Table T169: entry does not exist'
But when i checked data in T169 table for MIR7 the record is available as: TRTYP-H, VGART - RD, ACTI1 - RMRP, TCODE,TRART-MIR7, FUNCL-
Also please clarify whether the code i have written is valid (or) any changes required!
TYPE-POOLS:
mrm,
fmccl,
mmcr.
TYPES: mrm_tab_return TYPE bapiret2 OCCURS 1.
CONSTANTS:
c_delete LIKE drseg-xupda VALUE 'D', " Delete
c_rbstat_delete LIKE rbkp-rbstat VALUE '2', " gelöschte Rchg
c_rbstat_parked LIKE rbkp-rbstat VALUE 'A', " Vorerfasst
c_rbstat_comple LIKE rbkp-rbstat VALUE 'B', " Vorerfasst vollständig
c_rbstat_saved_pa LIKE rbkp-rbstat VALUE 'C', " Gemerkt vorerfasst
c_rbstat_saved_po LIKE rbkp-rbstat VALUE 'D', " Gemerkt erfasst
c_rbstat_rele_pa LIKE rbkp-rbstat VALUE 'E'. " Vorerfasst freigegeben
DATA: s_rbkpv TYPE mrm_rbkpv.
DATA: tab_drseg TYPE mmcr_tdrseg,
wa_drseg TYPE mmcr_drseg,
tab_selbest TYPE mrm_tab_selbest,
tab_selfrbr TYPE mrm_tab_selfrbr,
tab_sellifs TYPE mrm_tab_sellifs,
tab_selwerk TYPE mrm_tab_selwerk,
t_errprot TYPE mrm_tab_errprot,
te_return TYPE mrm_tab_return,
s_errprot TYPE mrm_errprot,
tab_selerfb TYPE mrm_tab_selerfb.
DATA: f_belnr TYPE re_belnr,
f_parked TYPE marke,
l_f_return TYPE bapiret2,
c_t_returns TYPE fmccl_t_return,
f_gjahr TYPE gjahr.
Header Data*
s_rbkpv-bukrs = 1103. " Comp Code
s_rbkpv-blart = 'IN'. " Doc Type
s_rbkpv-bldat = '28012008'. " Doc Date/Inv Date
s_rbkpv-budat = '01042008'. " Post date
s_rbkpv-waers = 'GBP'. " Curr Key
s_rbkpv-xblnr = '9016999395'. " Reference/Vend Inv No
s_rbkpv-bktxt = 'PE4 5BR'.
*s_rbkpv-KURSF = " Exchange Rate
s_rbkpv-lifnr = 100018. " Vendor Number
s_rbkpv-rmwwr = '3143.03'. " Gross Inv amt
*s_rbkpv-WMWST1 = " Tax amount
s_rbkpv-mwskz1 = 'ZV'. " Tax Code
*s_rbkpv-ZTERM = " Payment Terms
**s_rbkpv-ZBD1T = " Disc days *
**s_rbkpv-ZBD1P = " Disc % *
**s_rbkpv-ZBD2T = " Disc days *
*s_rbkpv-ZBD2P = " Disc %
Item Data - Debit*
wa_drseg-bukrs = 1103. " Comp Code
wa_drseg-shkzg = 'S'. " Debit/Credit Indicator based on posting key
wa_drseg-wrbtr = '3143.03'. " Amount
wa_drseg-mwskz = 'ZV'. " Tax Code
wa_drseg-sgtxt = '9016999395 28/1/08'. " Item Text
wa_drseg-saknr = 7600000. " G/L account no-27381002
wa_drseg-kostl = 510121. " Cost Center
*wa_drseg-PS_PSP_PNR = . " WBS element
*wa_drseg-ANLN1 = . " Asset
wa_drseg-zuonr = 'SC01444418331'. " Assignment no
APPEND wa_drseg TO tab_drseg.
Item Data - Crebit*
wa_drseg-bukrs = 1103. " Comp Code
wa_drseg-shkzg = 'H'. " Debit/Credit Indicator based on posting key
wa_drseg-wrbtr = '3143.03'. " Amount
wa_drseg-mwskz = 'ZV'. " Tax Code
wa_drseg-sgtxt = '9016999395 28/1/08'. " Item Text
wa_drseg-saknr = 7600000. " G/L account no
wa_drseg-kostl = 510121. " Cost Center
*wa_drseg-PS_PSP_PNR = . " WBS element
*wa_drseg-ANLN1 = . " Asset
wa_drseg-zuonr = 'SC01444418331'. " Assignment no
APPEND wa_drseg TO tab_drseg.
**----
Park invoice----
**
CALL FUNCTION 'MRM_INVOICE_PARK'
EXPORTING
i_rbkpv = s_rbkpv
i_xupda = 'I'
i_rbstat_new = c_rbstat_parked
ti_drseg = tab_drseg[]
IMPORTING
e_belnr = f_belnr
e_gjahr = f_gjahr
te_errprot = t_errprot
e_only_parked = f_parked
EXCEPTIONS
invalid_status = 1
update_impossible = 2
error_message = 3
OTHERS = 4.
IF sy-subrc EQ 0.
COMMIT WORK.
CALL FUNCTION 'BAPI_TRANSACTION_COMMIT'
EXPORTING
wait = 'X'.
ELSE.
CALL FUNCTION 'MRM_PROT_GET'*
IMPORTING*
te_errprot = t_errprot.*
LOOP AT t_errprot INTO s_errprot.*
PERFORM f_bapireturn_fill USING s_errprot-msgid*
s_errprot-msgty*
s_errprot-msgno*
s_errprot-msgv1*
s_errprot-msgv2*
s_errprot-msgv3*
s_errprot-msgv4*
CHANGING te_return.*
ENDLOOP.*
l_f_return-id = sy-msgid.
l_f_return-type = sy-msgty.
l_f_return-number = sy-msgno.
l_f_return-message_v1 = sy-msgv1.
l_f_return-message_v2 = sy-msgv2.
l_f_return-message_v3 = sy-msgv3.
l_f_return-message_v4 = sy-msgv4.
*----- write message into message text field
MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4
INTO l_f_return-message.
APPEND l_f_return TO c_t_returns.
ENDIF.
Can anybody clarify whether the data i am passing is in right way!
I am having 3 rows from flat file for every one invoice to be parked.
1. Header Data
2. Dr. Related Data
3. Cr. Related Data
Can anybody solve my issue!
Thanks in advance.
Thanks,
Deep.
Hi All,
I have tested BAPI_INCOMINGINVOICE_PARK without passing PO number and i was able to create Invoice Document No.
But i have 2 issues!
1. How can we know that that new Invoice Doc no created is Parked (or) not! What is the Parameter we need to pass to above BAPI to make it Parked.
2. As per my requirement i need to create Documents both in MM & FI when my data is Parked! How can know it whether it is created doc's in both MM & FI. Will this BAPI will create documents both in MM & FI when i do vendor no-po invoice parking!
Thanks in advance.
Thanks,
Deep.
The importing parameter in red will return you the parkdoc-invoicenumber, and parkdoc-fiscalyear.
CALL FUNCTION 'BAPI_INCOMINGINVOICE_PARK'
EXPORTING
HEADERDATA = HEADERDATA
* ADDRESSDATA =
IMPORTING
INVOICEDOCNUMBER = PARKDOC-INVOICEDOCNUMBER
FISCALYEAR = PARKDOC-FISCALYEAR
TABLES
ITEMDATA = IT_ITEMDATA
* ACCOUNTINGDATA = IT_ACCOUNTDATA
GLACCOUNTDATA = IT_GLACCOUNTDATA
** MATERIALDATA =
* TAXDATA = IT_TAXDATA
** WITHTAXDATA =
** VENDORITEMSPLITDATA =
RETURN = IT_RETURN
.
User | Count |
---|---|
97 | |
9 | |
8 | |
6 | |
3 | |
3 | |
3 | |
3 | |
3 | |
3 |
You must be a registered user to add a comment. If you've already registered, sign in. Otherwise, register and sign in.