深圳全飞鸿

标题: C#处理SAP的RFC总结 [打印本页]
作者: zhgc    时间: 2021-6-6 18:33
标题: C#处理SAP的RFC总结
C#处理SAP的RFC总结

using SAP.Middleware.Connector;



  1.        public class SapConnection : IDestinationConfiguration
  2.         {
  3.             public RfcConfigParameters GetParameters(string destinationName)
  4.             {
  5.                 RfcConfigParameters conf = new RfcConfigParameters();
  6.                 if (destinationName == "PRD")
  7.                 {
  8.                     conf.Add(RfcConfigParameters.AppServerHost, objMESClient.SAPIP);
  9.                     conf.Add(RfcConfigParameters.SystemNumber, objMESClient.SAPSYSNumber);
  10.                     conf.Add(RfcConfigParameters.User, "MES");
  11.                     conf.Add(RfcConfigParameters.Password, "1qa");
  12.                     conf.Add(RfcConfigParameters.Client, "800");
  13.                 }

  15.                 if (destinationName == "DEV")
  16.                 {
  17.                     conf.Add(RfcConfigParameters.AppServerHost, "192.168.99.1");
  18.                     conf.Add(RfcConfigParameters.SystemNumber, "00");
  19.                     conf.Add(RfcConfigParameters.User, "ABAP");
  20.                     conf.Add(RfcConfigParameters.Password, "123");
  21.                     conf.Add(RfcConfigParameters.Client, "600");
  22.                 }
  23.                 return conf;
  24.             }

  26.             public bool ChangeEventsSupported()
  27.             {
  28.                 return true;
  29.             }

  31.             public event RfcDestinationManager.ConfigurationChangeHandler ConfigurationChanged;
  32.         }

  34.         private string GetSAPInfor(string StrWO)
  35.         {
  36.             string StrResult = "";
  37.             SapConnection con = new SapConnection();

  39.             RfcDestinationManager.RegisterDestinationConfiguration(con);

  41.             RfcDestination dest = RfcDestinationManager.GetDestination("PRD");// 测试用DEV
  42.             RfcRepository rfcrep = dest.Repository;
  43.             IRfcFunction myfun = null;
  44.             myfun = rfcrep.CreateFunction("ZMES_WO");
  45.             //myfun.SetValue("WO", "11000058");//SAP里面的传入参数
  46.             myfun.SetValue("ZVBELN", StrWO);//SAP里面的传入参数
  47.             myfun.Invoke(dest);
  48.             IRfcTable IrfTable = myfun.GetTable("ZMES_BILL");
  49.             if (IrfTable.Count != 1)
  50.             {
  51.                 StrResult = "NO;";
  52.             }
  53.             else
  54.             {
  55.                 for (int i = 0; i < IrfTable.Count; i++)
  56.                 {
  57.                     IrfTable.CurrentIndex = i;
  58.                     StrResult = IrfTable.GetString("Z_PRNUM") + ";" + IrfTable.GetString("BSTKD") + ";" + IrfTable.GetString("WADAT_IST") + ";" + IrfTable.GetString("KUNNR") + ";" + IrfTable.GetString("AUBEL") + ";" + IrfTable.GetString("AUPOS") + ";" + IrfTable.GetString("BLNUMBER") + ";";
  59.                 }
  60.                 StrResult = "OK;" + StrResult;
  61.             }
  62.             RfcDestinationManager.UnregisterDestinationConfiguration(con);
  63.             return StrResult;
  64.         }
复制代码






欢迎光临 深圳全飞鸿 (http://www.nagomes.com/disc/) Powered by Discuz! X3.2