亲宝软件园·资讯

展开

C# 调用SAP RFC C# 怎样调用SAP RFC

哈哈哈嗝 人气:0

结构:

安装NuGet包:

using SAP.Middleware.Connector;
using System.Data;

namespace DFDN.SDK.ServiceInterface
{
  public class RfcDemo
  {
    public void Loading()
    {
      RfcDestination SapRfcDestination = RfcDestinationManager.GetDestination(GetParameters()); //连接字符串
      RfcDestination SapRfcDestinationForConfig = RfcDestinationManager.GetDestination("dad"); //连接字符串 从App.config配置
      RfcRepository SapRfcRepository = SapRfcDestination.Repository;

      DataTable dt = new DataTable(); //数据源
      dt.Columns.Add("DATA1", typeof(string));
      dt.Columns.Add("DATA2", typeof(string));
      dt.Columns.Add("DATA3", typeof(string));

      IRfcFunction func = SapRfcRepository.CreateFunction("Z_RFC_XXXX");
      IRfcTable tSAP = func.GetTable("INPUT_TABLE");

      for (int i = 0; i < dt.Rows.Count; i++)
      {
        string str1 = dt.Rows[i][0].ToString();
        string str2 = dt.Rows[i][1].ToString();
        string str3 = dt.Rows[i][2].ToString();
        IRfcStructure struSAP = tSAP.Metadata.LineType.CreateStructure();
        struSAP.SetValue("str1", str1);
        struSAP.SetValue("str2", str2);
        struSAP.SetValue("str3", str3);
        tSAP.Append(struSAP);
      }

      func.SetValue("INPUT_TABLE", tSAP); //table 参数
      func.SetValue("WERKS", "A");    //单个参数  
      func.SetValue("STATUS", "B");  //单个参数
      func.Invoke(SapRfcDestination); //调用

      IRfcTable SAPDataTable = func.GetTable("RETURN_TABLE"); //获取表格结果

      DataTable table = ToDataTable(SAPDataTable); //转换DataTable
      string result = func.GetValue("X").ToString(); //获取指定返回结果

    }

    /// <summary>
    /// RfcTable 转换为 DataTable
    /// </summary>
    /// <param name="myrfcTable"></param>
    /// <returns></returns>
    public DataTable ToDataTable(IRfcTable myrfcTable)
    {
      DataTable loTable = new DataTable();
      int liElement;
      for (liElement = 0; liElement <= myrfcTable.ElementCount - 1; liElement++)
      {
        RfcElementMetadata metadata = myrfcTable.GetElementMetadata(liElement);

        loTable.Columns.Add(metadata.Name);
      }

      foreach (IRfcStructure Row in myrfcTable)
      {
        DataRow ldr = loTable.NewRow();

        for (liElement = 0; liElement <= myrfcTable.ElementCount - 1; liElement++)
        {
          RfcElementMetadata metadata = myrfcTable.GetElementMetadata(liElement);
          ldr[metadata.Name] = Row.GetString(metadata.Name);
        }
        loTable.Rows.Add(ldr);
      }
      return loTable;
    }

    /// <summary>
    /// SAP RFC 连接信息设置
    /// </summary>
    /// <returns></returns>
    public RfcConfigParameters GetParameters()
    {
      RfcConfigParameters parms = new RfcConfigParameters();

      parms.Add(RfcConfigParameters.AppServerHost, "192.168.0.114");  //SAP主机IP

      parms.Add(RfcConfigParameters.SystemNumber, "01"); //SAP实例

      parms.Add(RfcConfigParameters.User, "RFC_EDI"); //用户名

      parms.Add(RfcConfigParameters.Password, "init1"); //密码

      parms.Add(RfcConfigParameters.Client, "300"); // Client 

      parms.Add(RfcConfigParameters.Language, "ZH"); //登陆语言

      parms.Add(RfcConfigParameters.PoolSize, "10");

      parms.Add(RfcConfigParameters.IdleTimeout, "600");

      parms.Add(RfcConfigParameters.Name, "DAP");

      return parms;
    } 
  }
}
<?xml version="1.0"?>
<configuration>
 <configSections>
  <sectionGroup name="SAP.Middleware.Connector">
   <sectionGroup name="ClientSettings">
    <section name="DestinationConfiguration" type="SAP.Middleware.Connector.RfcDestinationConfiguration,sapnco"/>
   </sectionGroup>
  </sectionGroup>
 </configSections>
 <SAP.Middleware.Connector>
  <ClientSettings>
   <DestinationConfiguration>
    <destinations>
     <add NAME="dad" USER="ddac" PASSWD="qwe" CLIENT="110" SYSNR="00" ASHOST="192.168.0.111" LANG="ZH" GROUP="PUBLIC" MAX_POOL_SIZE="10" IDLE_TIMEOUT="600"></add>
    </destinations>
   </DestinationConfiguration>
  </ClientSettings>
 </SAP.Middleware.Connector>
</configuration>

加载全部内容

相关教程
猜你喜欢
用户评论