软件编程
位置:首页>> 软件编程>> C#编程>> C# 如何调用SAP RFC

C# 如何调用SAP RFC

作者:哈哈哈嗝  发布时间:2023-07-02 18:11:42 

标签:c#,sap,rfc

结构:

C# 如何调用SAP RFC

安装NuGet包:

C# 如何调用SAP RFC


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>

来源:https://www.cnblogs.com/Liyuting/p/14132187.html

0
投稿

猜你喜欢

手机版 软件编程 asp之家 www.aspxhome.com