终于测试成功了,来张图先:
技术上我是用C# + VB.Net实现的,其中VB.NET负责后台与SAP建立连接并取得数据, 技术难点是如何向SAP的RFC传入Table参数,比如ABAP中的Select-options参数,关键代码如下:
Dim codes = bapi.Add("ZMMR014")
Dim itLifnr As Object
itLifnr = codes.tables("PI_S_LIFNR")
If piFrLifnr <> "" Then
itLifnr.AppendRow()
itLifnr.Value(1, "SIGN") = "I"
itLifnr.Value(1, "LOW") = piFrLifnr
If piToLifnr <> "" Then
itLifnr.Value(1, "OPTION") = "BT"
itLifnr.Value(1, "HIGH") = piToLifnr
Else
itLifnr.Value(1, "OPTION") = "EQ"
End If
End If
codes.call()
Dim table As Object
table = codes.Tables("PO_IT_RESULT")
Return table
前台C# 接收这个Table 输出就好了。