在SBO 9.2 PL06上使用SDK DI API添加新发票可以正常工作,但在SBO 9.2 PL08上则不能。

2020-09-21 23:45发布

点击此处---> 群内免费提供SAP练习系统(在群公告中)加入QQ群:457200227(SAP S4 HANA技术交流) 群内免费提供SAP练习系统(在群公告中)嗨, 以下代码在SBO 9.2...

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

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


嗨,

以下代码在SBO 9.2 PL06上可以正常工作,但是在SBO 9.2 PL08上我们会收到错误

"未找到匹配的记录(ODBC -2028)"。 所有字符串值都是任意的,只是为了填充代码示例,为了进行测试,请用实际值替换它们。 该代码基于SBO SDK帮助文件中的相关示例。

我们是否缺少与9.2 PL08的更改要求,必填字段或其他相关的内容?

任何有关此问题的帮助将不胜感激。

公共类表格1
    私人ErrCode只要
    私有ErrMsg作为字符串

    SBO公司的对象
    私人vCompany作为SAPbobsCOM.Company

    私有子Form1_Load(发送者作为对象,e作为EventArgs)处理MyBase.Load
       ErrMsg =""
       vCompany =新的SAPbobsCOM.Company

       '为Connect方法初始化Company对象
       vCompany.Server =" MyServerName"
       vCompany.DbServerType = SAPbobsCOM.BoDataServerTypes.dst_MSSQL2014
       vCompany.CompanyDB =" MyCompanyDatabaseNAme"
       vCompany.UserName ="经理"
       vCompany.Password ="我的密码"

       昏暗nResult一样长
       Dim strErrString作为字符串
       strErrString =""

       '连接数据库
       nResult = vCompany.Connect
       '显示结果
       MsgBox("结果为" + Str(nResult))
       呼叫vCompany.GetLastError(nResult,strErrString)
       MsgBox(" GetLastError(" + Str(nResult)+"," + strErrString +")")
    结束子

    Private Sub AddInvoice_Click(发送者作为对象,e作为EventArgs)处理AddInvoice.Click
       昏暗的RetVal一样长
       昏暗的ErrCode一样长
       Dim ErrMsg作为字符串
      
       '创建文档对象
       昏暗的vInvoice作为SAPbobsCOM.Documents
       vInvoice = vCompany.GetBusinessObject(SAPbobsCOM.BoObjectTypes.oInvoices)

       '将值设置为字段
       vInvoice.DocType = SAPbobsCOM.BoDocumentTypes.dDocument_Items
       vInvoice.CardCode =" MyCustomerCode"
       vInvoice.DocDate =" 2017/08/31"

       '发票行-将值设置为第一行
       vInvoice.Lines.ItemCode =" MyFirstItemCode"
       vInvoice.Lines.Quantity = 1

       '发票行-将值设置为第二行
       vInvoice.Lines.Add
       vInvoice.Lines.ItemCode =" MySecondItemCode"
       vInvoice.Lines.Quantity = 1

       '添加发票
       RetVal = vInvoice.Add

       '检查结果
       如果RetVal <> 0然后
          vCompany.GetLastError(ErrCode,ErrMsg)
          MsgBox(ErrCode&""&ErrMsg)
       万一
    结束子
 结束班级
2条回答
绿领巾童鞋
2020-09-22 00:33

您好尼古拉斯·萨格里提斯

SAP Note 2503650中提到的问题应该已经在SAP Business One 9.2 PL10版本中得到解决。

您是否能够在SAP Business One 9.2 PL10版本中检查此问题?

亲切的问候,

ANKIT CHAUHAN

SAP SME支持

一周热门 更多>