您好，尼古拉斯-我们已经解决了此问题，感谢您的反馈。

如果有人需要此帖子，请尝试此。

Dim oReconService作为SAPbobsCOM.InternalReconciliationsService = oCompany.GetCompanyService（）。GetBusinessService（SAPbobsCOM.ServiceTypes.InternalReconciliationsService）Dim openTrans作为SAPbobsCOM.InternalReconciliationOpenTrans = oReconService.GetDataInterface（SAPbobss。 GetDataInterface（SAPbobsCOM.InternalReconciliationsServiceDataInterfaces.irsInternalReconciliationParams）对于i作为整数= 0到gridRecon.DataTable.Rows.Count-1如果gridRecon.DataTable.GetValue（" Select"，gridRecon.GetDataTableRowIndex（i））=" Y"，则SBar_Application。 （"正在对帐中，请稍候..."，SAPbouiCOM.BoMessageTime.bmt_Short，False）使用openTrans'对于收款第一行，如果gridRecon.DataTable.GetValue（" Type"，gridRecon.GetDataTableRowIndex（i）=" RC"然后 .InternalReconciliationOpenTransRows.Add（）.InternalReconciliationOpen TransRows.Item（x）.Selected = SAPbobsCOM.BoYesNoEnum.tYES .InternalReconciliationOpenTransRows.Item（x）.TransId = gridRecon.DataTable.GetValue（" TransId"，gridRecon.GetDataTableRowIndex（i））'日记帐ID：OJDT中的TransId。 InternalReconciliationOpenTransRows.Item（x）.TransRowId = 1'日记帐分录行号：JDT1中的Line_ID oIncomPayment = Math.Abs​​（gridRecon.DataTable.GetValue（"实际金额"，gridRecon.GetDataTableRowIndex（i）））'MsgBox（oIncomPayment）' oTotal = oARPayment-oIncomPayment .InternalReconciliationOpenTransRows.Item（x）.ReconcileAmount = oARPayment'gridRecon.DataTable.GetValue（" Actual Amount"，gridRecon.GetDataTableRowIndex（i））'此值应始终为正值。 但其中一行应记入贷方，一行应记入借方。 oTransId = gridRecon.DataTable.GetValue（" TransId"，gridRecon.GetDataTableRowIndex（i））'ElseIf gridRecon.DataTable.GetValue（" Type"，gridRecon.GetDataTableRowIndex（i））=" JE"然后，否则openTrans.CardOrAccount = SAPbobsCOM。 CardOrAccountEnum.coaCard .InternalReconciliationOpenTransRows.Add（）.InternalReconciliationOpenTransRows.Item（x）.Selected = SAPbobsCOM.BoYesNoEnum.tYES .InternalReconciliationOpenTransRows.Item（x）.TransId = gridRecon.DataTable.GetValue（" DataId。"） ）.InternalReconciliationOpenTransRows.Item（x）.TransRowId = 0'日记帐录入行号：JDT1中的Line_ID。 i）））'这应该始终是正值。 但其中一行应记入贷方，一行应记入借方。 Console.WriteLine（Math.Abs​​（gridRecon.DataTable.GetValue（" Actual Amount"，gridRecon.GetDataTableRowIndex（i））））如果gridRecon.DataTable.GetValue（" Type"，gridRecon.GetDataTableRowIndex（i））=" JE" 然后oJeTranID = gridRecon.DataTable.GetValue（" TransId"，gridRecon.GetDataTableRowIndex（i））olistPostedJE.Add（oJeTranID）结束如果结束，则结束 " RC"然后oARPayment + = Math.Abs​​（gridRecon.DataTable.GetValue（" Actual Amount"，i））如果x = x + 1结束，则结束如果下一步尝试reconParams = oReconService.Add（openTrans）例外捕获 SAP_APP.SetMessage（ex.ToString，SAPbouiCOM.BoStatusBarMessageType.smt_Error）oWriteText（Now＆"-"＆" [Err]-"＆ex.ToString，True）oCompany.EndTransaction（SAPbobsCOM.BoWfTransOpt.wf_RollBack）返回False结束尝试 oCompany.EndTransaction（SAPbobsCOM.BoWfTransOpt.wf_Commit）作为异常结束捕获

Dim oParam作为SAPbobsCOM.InternalReconciliationParams Dim oReconService作为SAPbobsC OM.InternalReconciliationsService昏暗oOposting作为SAPbobsCOM.InternalReconciliationOpenTrans oReconService = oCompany.GetCompanyService.GetBusinessService（SAPbobsCOM.ServiceTypes.InternalReconciliationsService）oParam = oReconService.GetDataInterface（SAPbobsCOM.InternalReconciliationsServiceDataInterfaces.irsInternalReconciliationParams）oOposting = oReconService.GetDataInterface（SAPbobsCOM.InternalReconciliationsServiceDataInterfaces.irsInternalReconciliationOpenTrans）'oReconService。 带有oOposting的Add（oOposting）。 （0）.TransRowId = 1 .InternalReconciliationOpenTransRows.Item（0）.ReconcileAmount = 738.38'gridRecon.DataTable.GetValue（" Actual Amount"，gridRecon.GetDataTableRowIndex（i）.InternalReconciliationOpe nTransRows.Add（）.InternalReconciliationOpenTransRows.Item（1）.Selected = SAPbobsCOM.BoYesNoEnum.tYES .InternalReconciliationOpenTransRows.Item（1）.TransId = 4510 .InternalReconciliationOpenTransRows.Item（1）.TransRowId = 0 .InternalReconciliationOpen（1）。 ReconcileAmount = -738.38 Try oParam = oReconService.Add（oOposting）作为异常结束进行捕获

Hello Michael，

我遇到了完全相同的问题。 您有解决的线索吗？

最诚挚的问候，

任何人都可以帮助我

大家好，

我解决了我的问题。 实际上，我只是忘了在对帐方法中声明transrowID。 当我这样做时，我不再有此错误，但我必须在ReconcileAmount属性中仅声明正数。 B1 sdk根据转移ID自行管理贷方/借方。

希望可以为您提供帮助。

最诚挚的问候

感谢您的答复。

我已经声明了transrowID值，但仍然收到错误消息。

我正在尝试两种不同的情况，一种是将发票与付款对帐，另一种是将日记帐与付款对帐。

您还有其他事情要做吗？

另外，您正在运行什么版本的B1？ 我们使用的是9.3 PL04HF。

提前谢谢您。

你好，

我们正在使用9.3 PL04版本。

我只考虑它们之间的日记帐分录。 我没有付款或发票。

 dsa_posting.InternalReconciliationOpenTransRows.Add（）
    dsa_posting.InternalReconciliationOpenTransRows.Item（i）.Selected = SAPbobsCOM.BoYesNoEnum.tYES
    dsa_posting.InternalReconciliationOpenTransRows.Item（i）.TransId = dsa_recordset.Fields.Item（tbl_JournalEntries.fst_Code）.Value
    dsa_posting.InternalReconciliationOpenTransRows.Item（i）.TransRowId = dsa_recordset.Fields.Item（tbl_JournalEntries_Lines.fst_LineNum）.Value
    dsa_posting.InternalReconciliationOpenTransRows.Item（i）.ReconcileAmount = dsa_recordset.Fields.Item（tbl_JournalEntries_Lines.fst_Credit）.Value + dsa_recordset.Fields.Item（tbl_JournalEntries_Lines.fst_Debit）.Value