您好 steve andre ，

您可以将应收发票数据导入SAP Business 一个公司架构，使用以下示例代码：

这是物料类型应收帐款发票的示例：

子AddInvoice_Click（）

     昏暗的RetVal一样长
     昏暗的ErrCode一样长
     Dim ErrMsg作为字符串
     '创建文档对象
     昏暗的vInvoice作为SAPbobsCOM.Documents
     设置vInvoice = vCmp.GetBusinessObject（oInvoices）
     '将值设置为字段
     vInvoice.Series = 0
     vInvoice.CardCode =" BP234"
     vInvoice.HandWritten = tNO
     vInvoice.PaymentGroupCode =" -1"
     vInvoice.DocDate =" 21/8/2003"
     vInvoice.DocTotal = 264.6

     '发票行-将值设置为第一行
     vInvoice.Lines.ItemCode =" A00023"
     vInvoice.Lines.ItemDescription ="香蕉"
     vInvoice.Lines.PriceAfterVAT = 2.36
     vInvoice.Lines.Quantity = 50
     vInvoice.Lines.Currency ="欧元"

     '发票行-将值设置为第二行
     vInvoice.Lines.Add
     vInvoice.Lines.ItemCode =" A00033"
     vInvoice.Lines.ItemDescription ="橙色"
     vInvoice.Lines.PriceAfterVAT = 118
     vInvoice.Lines.Quantity = 1
     vInvoice.Lines.Currency ="欧元"

     '添加发票
     RetVal = vInvoice.Add


    '检查结果
     如果RetVal <> 0然后
         vCmp.GetLastError ErrCode，ErrMsg
         MsgBox ErrCode＆""和ErrMsg
     万一


  结束子
 

这是服务类型A/R发票的示例：

作为SAPbobsCOM.Documents的公共发票。
 oInvoice = oCompany.GetBusinessObject（SAPbobsCOM.BoObjectTypes.oInvoices）
 oInvoice.DocType = SAPbobsCOM.BoDocumentTypes.dDocument_Service
 oInvoice.CardCode =" C20000"
 oInvoice.Lines.ItemDescription ="样品发票"
 oInvoice.Lines.AccountCode =" 102020"
 oInvoice.Lines.LineTotal = 100
 oInvoice.Lines.VatGroup =" X0"
 lRetCode = oInvoice.Add（）
 

关于另一个问题：（我什至计划直接从mysql导入，然后将数据导入到schema1）

我不确定您打算如何做 可以使用DI API，B1if，DTW，服务层等将数据导入SAP Business One公司架构。您不应在SAP Business One中使用直接SQL更新查询（插入，更新，删除等） 公司数据库。 请参阅此博客文章以获取有关 修改SAP Business One数据。

希望有帮助！

问候，

ANKIT CHAUHAN

SAP Business One支持

非常感谢您的回答，先生。 我已使用您的样本作为参考来解决我的问题。