[SAPABAP]预制发票，相关屏幕增强及bapi 增强

SAP_太亿真仙

已于 2023-07-24 10:34:57 修改

阅读量3.4k

点赞数 1

CC 4.0 BY-SA版权

分类专栏： ABAP开发文章标签： BAPI ABAP

于 2020-11-12 11:02:17 首次发布

本文链接：https://blog.csdn.net/tsj19881202/article/details/109639048

本文详细介绍了在SAP ABAP中如何进行预制发票的屏幕增强和BAPI_INCOMINGINVOICE_CREATE的扩展。通过隐式增强在MIRO屏幕上添加XREF1和XREF2字段，并在后台调用BAPI时传递这些值到财务凭证。同时，提供了相关的代码示例和操作步骤。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

MIRO：需要对屏幕增强，实现可以输入 xref1，xref2.

如下图：

图中，参考代码1和参考代码2 都是通过隐式增强放出来的，具体操作过程请查看链接：

XREF1, XREF2, XREF3 in MIRO – the ultimate solution | SAP Blogs

在下列程序中，写隐式增强

相关表增强：

之所以在这么多表中增强，是为了后面过账的时候，能把参考码传递给财务凭证

2. 上面是前台，后台使用BAPI_INCOMINGINVOICE_CREATE 创建预制发票。

参考下列链接：BAPI_INCOMINGINVOICE_CREATE extension | SAP Community

1. Populate the structure:

DATA: I_EXTNSN TYPE STANDARD TABLE OF BAPIPAREX,

wl_ext TYPE bapiparex.

wl_ext-structure = 'MEPOHEAD'.
wl_ext-valuepart1 = field1
wl_ext-valuepart2 = field2
APPEND wl_ext TO i_extnsn.
CLEAR wl_ext.

2. Pass the table to extension parameter

CALL FUNCTION 'BAPI_INCOMINGINVOICE_PARK'
EXPORTING
headerdata = X_IN_HEADER
IMPORTING
INVOICEDOCNUMBER = L_DOCNO
tables
itemdata = I_IN_ITEM
TAXDATA = it_taxdata
WITHTAXDATA = I_WITHTAXDATA
return = I_RETURN
extensionin = I_EXTNSN

3. Do the following enhancement:

-In include LMRM_BAPIF32 (Form mapping_ivext_park), get the extension from BAPI parameter to your enhancement

it_extension[] = i_extensionin.

-In include LMRM_BAPITOP, declare your internal table/work area.

DATA: it_extension TYPE STANDARD TABLE OF bapiparex,
wa_ext TYPE bapiparex.

-In include LMRM_BAPIF12 (Form rbkpv_fill_from_headerdata) pass the new values to RBKP structure.

READ TABLE it_extension INTO wa_ext WITH KEY structure = 'MEPOHEAD'.
IF sy-subrc EQ 0.
MOVE: wa_ext-valuepart1 TO e_rbkpv-zfield1, "Field1
wa_ext-valuepart2 TO e_rbkpv-zfield2. "Field2
ENDIF.

具体操作如下图：