SAP MIRO创建发票bapi

SAP MIRO创建发票bapi
参考如下
根据采购订单，在migo收货，收货后在根据采购订单取miro收货
根据采购订单获取响应的行项目数据，
REPORT zfi001.

DATA: lv_mess TYPE string.
DATA: lv_belnr TYPE belnr_d.
DATA: lt_return TYPE STANDARD TABLE OF bapiret2.
DATA: ls_return TYPE bapiret2.
DATA: ls_t169v TYPE t169v.
DATA: ls_headerdata TYPE bapi_incinv_create_header.
DATA: lt_itemdata TYPE STANDARD TABLE OF bapi_incinv_create_item.
DATA: ls_itemdata TYPE bapi_incinv_create_item.
DATA lt_acctdata TYPE STANDARD TABLE OF bapi_incinv_create_account.
DATA:lv_belnr_ TYPE belnr_d.

*根据采购订单获取行项目数据和抬头数据以备使用
*CALL FUNCTION ‘BAPI_PO_GETITEMS’

• EXPORTING
• purchaseorder = lv_bapi_po_order
• TABLES
• po_headers = lt_po_header
• po_items = lt_po_items
• return = lt_return2.
  *LOOP AT lt_po_items INTO ls_po_item WHERE po_item = wa_po_data-item.
• EXIT.
  *ENDLOOP.

ls_headerdata-invoice_ind = abap_true.
ls_headerdata-calc_tax_ind = abap_true.
ls_headerdata-doc_date = sy-datum.
ls_headerdata-pstng_date = sy-datum.
ls_headerdata-comp_code = ‘1000’.
"ls_headerdata-gross_amount =
"ls_headerdata-ref_doc_no =
"ls_headerdata-doc_date =
ls_headerdata-currency = ‘CNY’.
ls_headerdata-header_txt = ‘’.

*ls_itemdata-invoice_doc_item = lv_append_counter.
ls_itemdata-po_number = ‘4700000002’.
ls_itemdata-po_item = ‘00010’.
ls_itemdata-ref_doc = ‘5000002190’.
ls_itemdata-ref_doc_year = ‘2019’.
ls_itemdata-ref_doc_it = ‘0002’.
ls_itemdata-item_amount = ‘’."金额
ls_itemdata-quantity = ‘’."数量
ls_itemdata-po_unit = ‘EA’.
ls_itemdata-po_unit_iso = ‘EA’.
ls_itemdata-item_text = ‘’.
APPEND ls_itemdata TO lt_itemdata.

CALL FUNCTION ‘BAPI_INCOMINGINVOICE_CREATE’
EXPORTING
headerdata = ls_headerdata
IMPORTING
invoicedocnumber = lv_belnr
TABLES
itemdata = lt_itemdata
accountingdata = lt_acctdata
return = lt_return.

IF lv_belnr IS INITIAL OR
lt_return IS NOT INITIAL.
LOOP AT lt_return INTO ls_return.
MESSAGE ID ls_return-id
TYPE ls_return-type
NUMBER ls_return-number
INTO lv_mess
WITH sy-msgv1 sy-msgv2 sy-msgv3.

ENDLOOP.

ELSE.

"lv_belnr.
CALL FUNCTION ‘BAPI_TRANSACTION_COMMIT’
EXPORTING
wait = ‘X’.

ENDIF.

本文来自互联网用户投稿，文章观点仅代表作者本人，不代表本站立场，不承担相关法律责任。如若转载，请注明出处。 如若内容造成侵权/违法违规/事实不符，请点击【内容举报】进行投诉反馈！