首页 >> 知识 >> PB调用SAP的Web Service结构体数组参数方法详解(使用C#调用Web Service生成dll)

PB调用SAP的Web Service结构体数组参数方法详解(使用C#调用Web Service生成dll)

最近接口项目需要用PB调用SAP的Web Service,研究了PB的Webservice Proxy很久。

第1个问题是SAP的Web Service有身份验证,主程序是PB9开发的,pbsoapclient90.pbd里没有对应函数,说是需要PB10以上,PB11.5经验证可以解决。或者安装微软SOAP工具控件,PB9通过它调用Web Service也是可以的。

但核心问题来了:SAP的Web Service函数中参数实际传输的是Table,也就是结构体数组参数。测试证明,即使PB12.5都对结构体参数的Web Service支持不完善,就不要说结构体数组了!

肿么办?研究发现,草莓视频在线观看APP可以使用C#调用结构体数组参数的Web Service,然后拆解为单结构体,转换为字符串数组参数,封装为DLL函数,供PB调用。这种方式理论上,应该适用于PB的任何版本。

——by nocry115/泥草鞋

 

这里,草莓视频在线观看APP以VS2010 C#与PB9进行说明;将对方Web Service的WSDL文件拷贝到本地,这个Web Service定义了1个函数,其参数为结构体数组,返回一个含2字符串的结构体。

1)首先,新建Visual C#的“类库”项目,草莓视频在线观看APP可以命名为:sapws1(注意:C#区别大小写)。

 

双击改项目的属性Properties,在“应用程序”页面点击【程序集信息】。

在“为COM互操作注册”处打钩。

并在“生成”页面在“使程序COM可见”处打钩。

以上是为生成供调用的Dll做准备,保存后草莓视频在线观看APP可以在属性下的AssemblyInfo.cs处查看ComVisible是否为true。

 

2)这一步即引用SAP的Web service。草莓视频在线观看APP在解决方案的【引用】项处右键点击“添加服务引用”。

注意,这一步很关键,不能在这个界面直接引用,而应该点击【高级】按钮。

在接下来的服务引用设置界面,再点击【添加Web引用】(SAP的Web service基于简单SOAP协议)。

在“添加Web引用”界面,“URL”输入本地wsdl文件并点击右侧箭头;在身份验证弹出框输入账号口令,即可看到对方的Web service服务名是SI_03AA6_SNZYXT2ERP_JHDGBService,其函数/方法为SI_03AA6_SNZYXT2ERP_JHDGB()。这里,草莓视频在线观看APP把该服务命名为“ws1”。然后点击【添加引用】。

在“解决方案资源管理器”中草莓视频在线观看APP可以看到ws1已经加入,双击ws1草莓视频在线观看APP可以在“对象浏览器”中查看其函数具体的格式定义。参数其中有结构体数组ZSSD_JHDGB[];结构体ZSSD_JHDGB的构成也可在“对象浏览器”中查看。

 

3)双击“Class1.cs”进行代码编写:

这里,草莓视频在线观看APP需要在using引用区加1行,并替换到中间的Class1类;代码如下:

 

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 using System; using System.Collections.Generic; using System.Linq; using System.Text; using System.Runtime.InteropServices; //该引用必须   namespace sapws1 //命名空间 { [Guid("5690DF0B-0DF9-49CC-AF63-22DF5D0A5F04")] //利用工具->创建GUID->生成器5随机生成 public interface CallParamers { [DispId(1)] //接口方法的绑定号 string PBSAP(string uname, string upass, string[] arrs, ref string rets);// }   [Guid("CF41B4E8-C463-40CB-B7F0-8D1F1999E83B")] //利用工具->创建GUID->生成器5随机生成 [ClassInterface(ClassInterfaceType.None)] public class Class1 : CallParamers { public string PBSAP(string uname, string upass, string[] arrs, ref string rets) { ws1.ZSSD_JHDGB[] sz1; sz1 = new ws1.ZSSD_JHDGB[1]; //结构体数组参数定义 ws1.ZSSD_JHDGB sj; sj = new ws1.ZSSD_JHDGB(); //分解为单一结构 //对结构数据赋值 sj.VBELN = arrs[0]; sj.POSNR = arrs[1]; sj.LFIMG = Convert.ToDecimal(arrs[2]); sj.LFIMGSpecified = true; //decimal类型   sj.WADAT = arrs[3]; //提货日期 sj.WADAT_IST = arrs[4]; //发货日期 sj.DATA01 = arrs[5]; //预留字段1 sj.DATA02 = arrs[6]; // sj.DATA03 = arrs[7]; // sj.DATA04 = arrs[8]; // sj.DATA05 = arrs[9]; // sj.DATA06 = arrs[10]; // sj.DATA07 = arrs[11]; // sj.DATA08 = arrs[12]; // sj.DATA09 = arrs[13]; // sj.DATA10 = arrs[14]; //   sz1[0] = sj; //对结构数组赋值   //调用SAP Web Service ws1.SI_03AA6_SNZYXT2ERP_JHDGBService s = new ws1.SI_03AA6_SNZYXT2ERP_JHDGBService(); //Web Service身份验证 System.Net.NetworkCredential c = new System.Net.NetworkCredential(uname, upass); s.Credentials = c; // string rs2; string rs1 = s.SI_03AA6_SNZYXT2ERP_JHDGB(ref sz1, out rs2); //调用Web Service函数 rets = rs1; return rs2; } } } 来自CODE的代码片 snippet_file_0.txt 说明:全球唯一码GUID可用VS2010菜单【工具】-【创建GUID】来生成;选择第5种方式,复制替换即可。

说明:“[DispId(1)]”项定义dll函数序数,如果有第2个函数,同法定义“[DispId(2)]”,函数说明与主函数相同。

说明:结构体成员数必须与数组成员数对等;注意C#数组标从0开始。

说明:webService结构体中的数值型成员,引入到C#中将多出bool形私有成员,请设为true,并将字符串转换为对应数值。

最后,生成该项目即可。

 

建立PB调用目录c:wssap;将生成的dll与tlb文件拷贝出来,默认在项目的binDebug目录下。

 

并找到.Net 4.0下的RegAsm.exe文件,也拷贝到该目录。然后在操作系统运行cmd,输入:

regasm sapws1.dll  /tlb:sapws1.tlb

回车显示成功注册信息。

 

 

在PB中调用该C#DLL,代码如下:

 

 

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 string ls_ret, ls_msg, ls_uname, ls_upass string sz[] //用数组代替结构 int i, ii   OleObject OleSAP OleSAP = Create OLEObject //sapws1为C#中命名空间(namespace) ,Class1为C#中类名 i = OleSAP.ConnectToNewObject("sapws1.Class1") if i 0 then MessageBox("提示","PB调用C#COM组件(SAP.WebService)失败!") return end if   //初始化 ii = 15 //数组成员与结构体成员相同 for i = 1 to ii sz[i] = "" Next //数据测试 sz[1] = "1000066666" sz[2] = "000010" sz[3] = "88" //SAP Webservice账号口令 ls_uname = "zzsoap" ls_upass = "shenhua"   ls_ret =OleSAP.PBSAP(ls_uname, ls_upass, sz, ref ls_msg)   MessageBox(ls_ret, ls_msg) 来自CODE的代码片 snippet_file_0.txt

 

看看运行结果:

网站地图