C#处理SAP的RFC总结

zhgc

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.                 }
    
14. 
    
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.             }
    
25. 
    
26.             public bool ChangeEventsSupported()
    
27.             {
    
28.                 return true;
    
29.             }
    
30. 
    
31.             public event RfcDestinationManager.ConfigurationChangeHandler ConfigurationChanged;
    
32.         }
    
33. 
    
34.         private string GetSAPInfor(string StrWO)
    
35.         {
    
36.             string StrResult = "";
    
37.             SapConnection con = new SapConnection();
    
38. 
    
39.             RfcDestinationManager.RegisterDestinationConfiguration(con);
    
40. 
    
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.         }

复制代码