下面我们开始介绍.NET调用WEB SERVICE的实现方法:
1. 在R3中创建remote enable的RFC
在R/3中创建一个通过参数CARRID获取FLIGHTS数据的RFC:
定义属性为Remote-Enabled
在IMPORT中定义过滤参数
在TABLES中定义返回数据的表类型
在SOURCE CODE中,写入取数逻辑:
2. 将RFC扩展成为WEBSERVICE
Sap提供给我们根据RFC扩展为WEBSERVICE的方式,简化定义webservice的过程:
修改RFC,路径:Utlities->More Utlities->Create Web Service
定义webservice的名称:
下一屏幕,采用默认值:
下一屏幕,Profil属性选择MEDIUN
下一屏幕,选择package,我们这里选择LOCAL,然后点击“继续”,直到完成。
3. 维护webservice并获得WSDL
执行TCODE:SOAMANAGER,系统为我们打开一个WEB页面:
选择“Application and scenario Communition”下的Single Service Administration链接:
在“Search Pattern”中,输入我们的WEBSERVICE,选中查询到的结果,并点击“APPLY Selection”按钮,页面下面的内容就是WEBSERVICE的定义,可以根据需要进行修改。
选择上图中的“Open WSDL document for selected binding”链接,弹出WSDL的界面,保存地址栏中的地址:
4. 在VS2005中,调用webservice
在VS2005中,创建WEB项目:
在WEB项目中添加WEB引用:
输入刚才创建的SAP webservice的WSDL地址,点击“前往”:
按要求输入验证用户名及密码:
链接成功后,系统提示找到了WEBSERVICE,点击“添加引用”按钮,完成web引用的添加。
我们可以在类视图中查看到系统自动添加的代理类:
接下来,我们通过代理类,来调用WEBSERVICE提供的数据:
在DEFAULT.ASPX中添加GRIDVIEW:
在Page_Load方法中添加以下代码:
using System;
using System.Data;
using System.Configuration;
using System.Web;
using System.Web.Security;
using System.Web.UI;
using System.Web.UI.WebControls;
using System.Web.UI.WebControls.WebParts;
using System.Web.UI.HtmlControls;
using System.Net;
public partial class _Default : System.Web.UI.Page
{
protected void Page_Load(object sender, EventArgs e)
{
//authority
NetworkCredential credentials = new NetworkCredential("ZHAOCG", "password");
com.XXXXX.sap.bjbidev.ZFLIGHTService serv = new com.XXXXX.sap.bjbidev.ZFLIGHTService();
serv.Credentials = credentials;
com.XXXXX.sap.bjbidev.Sflight[] data;
data = new com.XXXXX.sap.bjbidev.Sflight[0];
//call function module for sflight
serv.Zflights("LH", ref data);
//define a table for keey data got
DataTable dt = new DataTable();
//define columns for table
dt.Columns.Add("Carrid");
dt.Columns.Add("Connid");
dt.Columns.Add("FLDATE");
dt.Columns.Add("Price");
dt.Columns.Add("CURRENCY");
dt.Columns.Add("PLANETYPE");
dt.Columns.Add("SEATSMAX");
dt.Columns.Add("SEATSOCC");
dt.Columns.Add("PAYMENTSUM");
dt.Columns.Add("SEATSMAX_B");
foreach (com.XXXXX.sap.bjbidev.Sflight flights in data)
{
DataRow dr = dt.NewRow();
dr[0] = flights.Carrid;
dr[1] = flights.Connid;
dr[2] = flights.Fldate;
dr[3] = flights.Price;
dr[4] = flights.Currency;
dr[5] = flights.Planetype;
dr[6] = flights.Seatsmax;
dr[7] = flights.Seatsocc;
dr[8] = flights.Paymentsum;
dr[9] = flights.SeatsmaxB;
dt.Rows.Add(dr);
}
GridView1.DataSource = dt.DefaultView;
GridView1.DataBind();
} }