.Net 调用SAP RFC接口来读取数据实战纪实

8870188

分类：我的KM

　　这几天研究.Net 如何调用SAP RFC接口来读取数据，搞得我重装了三次系统，找资料找到吐血,看了德文、日文、英文、中文几乎所有可以参考的资料，师傅亲自出马，并请教了一堆高手还包括IBM的帅锅，还割舍了阳光明媚的周日来研究，终于功夫不负有心人，最终还是解决了，汗啊~~
　　下面把我调试的全过程都记录一下，以后有人遇到相同问题就可以参考了。
　　1.【关键前提】:
　　  (1) 你安装了VS2003 （注意：一定要VS2003，原因在下面）
　　  (2）安装SAP.Net Connector 2.0 (这东东目前只支持.net framework 1.X, 即IDE 7.5版本，所以只能用VS2003)
　　  (3) 有Java runtime environment （后面导入SAP的Function时有用）
　　   (4) 安装SAP Logon
　　   原理图如下：
　　
　　
　　2.【开始编程】
　　   (1)首先是在SAP里面创建RFC
　　
　　
　　
　　   
　　(2) VS里面编程
　　先以Winform程序为例吧
　　a.新建winform项目，因为装了SAP.Net Connector,所以可以添加对SAP.Connector.dll和SAP.Connector .Rfc.dll的引用。在项目中新建类，你会发现多了一个SAP Connector Proxy的类，新建一个，就是下面图中的SAPProxy1.sapwsdl文件啦。
　　b.在Form1.cs中添加控件
　　 （比较简陋，凑合看了）
　　c.在SAP Test的Button事件里面加入以下代码
　　private void button1_Click(object sender, System.EventArgs e)
  {
   SAP.Connector.SAPLogonDestination myDest;
   SAP.Connector.SAPConnection myConn;
   SAPProxy1 myProx;
   BRFCKNA1Table xMara;
   System.Data.DataTable dMara;
   try
   {
    myDest = new SAP.Connector.SAPLogonDestination();
    myDest.DestinationName = "这里输入SAP服务器上的系统名称";
    myDest.Client = 这里输入SAP服务器的客户端号;
    myDest.Username = "这里输入SAP服务器访问的用户名";
    myDest.Password = "这里输入SAP服务器访问的密码";
    myConn = new SAP.Connector.SAPConnection(myDest);
    myConn.Open();
    xMara = new BRFCKNA1Table();//注意，这个BRFCKNA1Table可不是随便写的哈，看到下面就明白了
    myProx = new SAPProxy1();
    myProx.Connection = myConn;
    myProx.Rfc_Customer_Get("", this.textBox1.Text, ref xMara);
    // 注意，这个Rfc_Customer_Get就是你要call的RFC的function名称
    dMara = new System.Data.DataTable();
    dMara = xMara.ToADODataTable();
    dataGrid1.DataSource = dMara;
    dataGrid1.Refresh();
    myConn.Close();
   }
   catch(Exception ex)
   {
    textBox1.Text = ex.ToString();
   }
  }
　　d.从SAP服务器上导入RFC Function
　　
　　不要小看这一步哦
　　 【支线任务1】在C:\WINDOWS找到saplogon.ini，打开后把SysName和SrvPort下面的内容清空，不清空的话他会引导你去找SAP 服务器上的Messaging server，总是告诉你无法打开或者无法找到sapmsg.ini的文件，非常麻烦。
　　[MSSysName]
Item1=
　　[MSSrvPort]
Item1=
　　
　　(如果机器上没有Java runtime environment 就会一直停留在Loading的画面=.= )
　　  e. 启动项目，在textbox里面输入检索关键字，就可以看到这样的画面，调用成功^0^
　　
　　
　　上面是以Winform为例，下面简单说一下Web App和Web Service,还是有点差别的哟
　　【Web App】
　　Web app的不同之处在于
　　(1)在default.aspx中加入button,datagrid以及textbox后，在后台程序中加入如下代码：
　　private void Button1_Click(object sender, System.EventArgs e)
  {
   // Declare parameters here
   SAPProxy1 proxy = new SAPProxy1();
   SAPRFCIF.BRFCKNA1Table brfcknA1Table1 = new BRFCKNA1Table();
   try
   {
    proxy.Connection = SAP.Connector.SAPLoginProvider.GetSAPConnection(this);
    // Call methods here
    proxy.Rfc_Customer_Get("", this.TextBox1.Text, ref brfcknA1Table1);
    // Now update Data Bindings. On WinForms this will be automatic, on  // WebForms call the following line
    this.DataBind();
   }
   catch(Exception ex)
   {
    // If SAPLoginProvider.GetSAPConnection(this) cannot get a connection, // we might get an error.
    // Normally this can be ignored as it will automatically will force a // relogon.
   }
　　 }
　　(2)需要新建一个SAPLogin1.aspx,这个也是装了SAP.net Connector以后，在新增项目的时候可以看到的一个aspx模板,然后在SAPLogin1.aspx.cs中添加如下代码
　　string systemNumber = "00";//这个也是要看SAP服务器设置的
　　    private void Login_Click(object sender, System.EventArgs e)
    {
      // Bind data back
      this.destination1.Username = this.user.Text;
      this.destination1.Password = this.password.Text;
  //设置sap服务器 start
   this.destination1.AppServerHost="这个自己填哈";
   this.destination1.SystemNumber= short.Parse(systemNumber);
  ;
  //设置sap服务器 end
      try
      {
        this.destination1.Client = short.Parse(this.client.Text);
      }
      catch(Exception)
      {
        this.destination1.Client = 0;
      }
      if (this.language.Text.Length > 0)
      {
        this.destination1.Language = this.language.Text;
      }
　　      try
      {
        SAP.Connector.SAPLoginProvider.OpenSAPConnection(this, destination1.ConnectionString, this.persist.Checked);
      }
      catch (System.Exception exception)
      {
        this.message.Text = exception.ToString();
      }
    }
　　
　　
　　【Web Service】
　　(1) 在Service1.asmx中添加SAP的Destination控件
　　
　　
　　右键，打开代码
　　
　　
　　
　　(2) 在Service1.asmx.cs中加入以下代码
　　 private void InitializeComponent()
  {
   //以下是定義Destination的內容      
   this.components = new System.ComponentModel.Container();
   this.destination1 = new SAP.Connector.Destination(this.components);
   //  
   //   destination1
   //  
   this.destination1.AppServerHost = "XXXXXXX";
   this.destination1.Client = ((short)(XXX));
   this.destination1.Language = "EN";
   this.destination1.Password = "XXXX";
   this.destination1.SystemNumber = ((short)(00));
   this.destination1.Username = "XXXX";
   //----------------------------------------
  }
　　
　　[WebMethod]
  public DataSet Exploding_BOM(string Language)
  {
   try
   {
    SAPProxy1 mProxy=new SAPProxy1();           //實例一個SAPProxy
    mProxy.Connection=SAP.Connector.Connection.GetConnectionFromPool(this.destination1.ConnectionString);       //鏈接
　　    RFCHOSTSTable mStpoxtable = new RFCHOSTSTable();           //實例一個輸出資料的Table         
　　    DateTime mNow = DateTime.Now;            
    string str_now = mNow.ToString();           //把取到的當前日期轉為字串型
    mProxy.Rfc_Get_Local_Destinations(Language, ref mStpoxtable);
    mProxy.Connection.Close();
    mProxy.Connection=null;
　　    DataSet mReturn = new DataSet(); //實例一個DataSet﹐存放RFC回傳的Table
    mReturn.Tables.Add(mStpoxtable.ToADODataTable ());
　　    return mReturn;
   }
　　   catch (Exception   ex)
   {
    return DataError(ex);
   }
　　  }
　　  public DataSet DataError(Exception ex)
  {
   DataSet errDS = new DataSet( "Errors");
   DataTable errTable = errDS.Tables.Add( "Error ");
   errTable.Columns.Add( "Message ");
   errTable.Rows.Add(new Object[] {ex.Message});
   return errDS;
  }