【发布时间】:2014-05-21 13:08:37
【问题描述】:
我一直是 stackoverflow 的长期潜伏者,现在决定加入。我正在尝试使用 BAPI 从 SAP 中提取每个功能位置的列表。当我运行此代码时,它返回一个空表。我对 BAPI 没有太多经验,我正在尝试自学。有人可以帮助我完成这项工作。
谢谢,
见以下代码:
Dim sapFunc As New SAPFunctionsOCX.SAPFunctions
Dim objServer = sapFunc.Connection
objServer.Client = "101"
objServer.User = "MyUserName"
objServer.Ticket = "MyKey"
objServer.system = "PEC"
objServer.MessageServer = "MyMessagerServer"
objServer.GroupName = "PUBLIC"
If objServer.logon(0, True) <> True Then
MsgBox("Key Rejected")
Exit Sub
End If
Dim objRfcFunc As SAPFunctionsOCX.Function
objRfcFunc = sapFunc.Add("BAPI_FUNCLOC_GETLIST")
'System.Console.Write(objRfcFunc.Description)
If objRfcFunc.Call = False Then
MsgBox("Error occured - " & objRfcFunc.Exception)
Exit Sub
End If
Dim tab = objRfcFunc.Tables("FUNCLOC_LIST")
System.Console.WriteLine("Input start:")
For I = 1 To tab.RowCount
For j = 1 To tab.ColumnCount
System.Console.Write(tab.ColumnName(j) + ":")
System.Console.WriteLine(tab.Cell(I, j))
Next
Next
System.Console.WriteLine("Input end.")
【问题讨论】:
-
返回什么?
-
如果我做 "objRfcFunc.imports("Return")" 它是一个 0 执行后的控制台是这样的: "Input start:" '\n' "Input End."
-
参数
RETURN包含什么?请记住,它是一个导出参数,而不是一个导入参数... -
来自 SAP 网站的文档“IMPORTING return =” bapiret2 Return Parameter”。我不确定这个值是什么。由于缺少文档,我很难使用 SAP。当我测试该值时在这个脚本中它返回 '0'
-
我对 BAPI 也比较陌生。您将使用什么事务来查看 SAP 中的那些?
标签: visual-studio-2010 vba sap