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

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

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）作为异常结束捕获

您好，尼古拉斯，谢谢-确实 SAP注释2586911-DI API_New服务提供内部对帐功能是此处的必读内容。

您好，

当前有相同的问题。

弄清楚，我们必须添加InternalReconciliationOpenTransParams来附加CardCode或Account，以便进行对帐，但仍然会发生相同的错误。

 _IR_OT_Params.ReconDate = DateTime.Now;
 _IR_OT_Params.CardOrAccount = SAPbobsCOM.CardOrAccountEnum.coaAccount;

//_IR_OT_Params.CardOrAccount = SAPbobsCOM.CardOrAccountEnum.coaCard;
 _IR_OT_Params.AccountNo = AcountNum;

//_ IR_OT_Params.InternalReconciliationBPs.Add（）;
//_IR_OT_Params.InternalReconciliationBPs.Item(0).BPCode = BPCode;
                           
 _IRservice.GetOpenTransactions（_IR_OT_Params）;
 _IRservice.Add（_IRopenTrans）; 

仍在尝试解决此问题，但认为这会有所帮助。

亲爱的塞巴斯蒂安，

感谢您的所有帮助，我终于成功完成对帐，没有错误。

对于仍然想知道还有SAP注释2586911的人，还有一些有用的信息。

谢谢。