功能模块ISU_S_MANUBILL_CREATE

2020-09-17 06:06发布

点击此处---> 群内免费提供SAP练习系统(在群公告中)加入QQ群:457200227(SAP S4 HANA技术交流) 群内免费提供SAP练习系统(在群公告中)你好, 我知道这个...

         点击此处--->   EasySAP.com群内免费提供SAP练习系统(在群公告中)

加入QQ群:457200227(SAP S4 HANA技术交流) 群内免费提供SAP练习系统(在群公告中)


你好,

我知道这个问题已经被问过几次了,但是现有的帖子都没有一个能正确回答这个问题。 我正在尝试创建并发布ISU(EA16)中的人工帐单。 我正在使用Fm ISU_S_MANUBILL_CREATE发布帐单,但是帐单未创建。

我正确传递了x_auto-bill_doc-erch和x_auto-bill_doc-erchz条目(至少我认为是这样)。

任何指针?

这是伪代码:

xs_auto-bill_doc_use = abap_true。
xs_auto-bill_doc_done = abap_true。
xs_auto-bill_doc_okcode ='SAVE'。


xs_auto-bill_doc_ok-bukrs = ls_ever-bukrs。 xs_auto-bill_doc-erch-sparte = ls_ever-sparte。
xs_auto-bill_doc-erch-gpartner = p_gpart。
xs_auto-bill_doc-erch-vkont = ls_ever-vkonto。
xs_auto-bill_doc-erch-vert = ls_ever-vertrag。
xs_auto-bill_doc-erch-begabrpe = p_date。
xs_auto-bill_doc-erch-endabrpe = p_date。
xs_auto-bill_doc-erch-belegdat = sy-datum。
xs_auto -bill_doc-erch-abrvorg ='06'。
xs_auto-bill_doc-erch-hvorg ='0300'。
xs_auto-bill_doc-erch-mandt = sy-mandt。
xs_auto-bill_doc-erch- kofiz = ls_ever-kofiz。
xs_auto-bill_doc-erch-portion ='QJ03'。
xs_auto-bill_doc-erch-belegart ='MB'。
xs_auto-bill_doc-erch-bergrund ='2'
xs_auto-bill_doc-erch-eroetim = sy-uzeit。
xs_auto-bill_doc-erch-erchz_v = abap_true。
xs_auto-bill_doc-erch-erdat = sy-datum。
xs_auto-bill_doc -erch-ernam = sy-uname。
xs_ auto-bill_doc-erch-zuorddaa = xs_auto-bill_doc-erch-endabrpe。
xs_auto-bill_doc-erch-billing_period ='2018/01'。
xs_auto-bill_doc-erch-billing_period ='0001'。
xs_auto-bill_doc-erch-manbillrel = abap_true。----

--------------------------------------------------

ls_erchz-stattart = p_tarif。
ls_erchz-tarifnr = ls_ertfnd-tarifnr。
ls_erchz-belzeile ='0001'。
ls_erchz-csno = ls_eschs-sno。
ls_lerzz = l_ -aklasse。 = abap_true。
ls_erchz-printrel = abap_true。
ls_erchz-linesort = ls_eschs-linesort1。
ls_erchz-ab = xs_auto-bill_doc-erch-begabrpe。
ls_erchz-bis = xs_auto- -endabrpe。
ls_erchz-i_abrmenge ='50'。
* ls_erchz-massbill =
ls_erchz-nettobtr ='111'。
ls_erchz-kostl = ls_ever-kostl。
ls_erchz-zeant ='30'。
ls_erchz-mwskz =空间。

ls_erchz-mwskz ='Z0'。
ls_erchz-ermwskz ='Z0'。
>
ls_erchz-timtypza ='2'。
ls_erchz-mengestrel = ls_eschs-betrstrel。
ls_erchz-betrstrel = ls_eschs-betrstrel。
ls_erchz-stgramt = ls_schs-stgramt。 chz-stgrqnt = ls_eschs-stgrqnt。
ls_erchz-sno = ls_eschs-sno。
ls_erchz-programm = ls_etrfv-programm。
ls_erchz-pertyp ='NO'。
ls_erchz-t br>
************************************************* *********


将ls_erchz附加到lt_erchz。

xs_auto-rea16-tariftyp = XXXX
xs_auto-bill_doc-ierchz [] = lt_erchz [] 。
************************************************** ********
ls_obj-bill_doc-erch-vertrag = p_vertrg。
ls_obj-bill_doc-erch-belegart = XX

呼叫功能'ISU_S_MANUBILL_CREATE'
导出
x_vertrag = p_vertrg
x_stichtag = sy-datum
x_bukrs = ls_ever-bukrs
x_sparte = ls_ever-sparte
= X_PR > * X_VBELNR =
* X_N_INVSEP =
* X_CANCEL =
* X_TRANSFER =
* X_UPD_ONLINE =
X_OBJ = ls_obj
* X_DATA =
* X_NO_DIALOG =
x_auto = xs_auto
导入
y_db_update = lv_update
* Y_EXIT_TYPE =
* Y_NEW_BILL_DOC =
* Y_MSGID =
* Y_MSGNO =
例外情况
foreign_lock = 1
输入错误 = 2
general_fault = 3
bill_lock = 4
其他=5。
如果sy-subrc EQ0。
提交工作。
ENDIF。

谢谢!

AM