C# 调用SAP RFC

  • A+
所属分类:.NET技术
摘要

结构:   安装NuGet包:   

结构:

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>