zoukankan      html  css  js  c++  java
  • C#通过RFC连接sap系统

    先理解一下

    RFC(Romote Function Call)远程函数调用

    调用前提:

    1.要想通过C# 通过RFC调用SAP端,SAP端要存在RFC远程调用的函数才行(例如SAP端通过SE37创建),要不然是无法调用的。

    2.C#调用RFC要有NCO DLL支持(我们使用NCO3.0,VS2013,framework2.0才行否则会报错)

    注:好多人64位系统,开发的时候报错,到处找支持64位的NCO3.0,这里可以说一下,是木有的,报错是困为Framework的原因。NCO3.0只支持2.0,在开发环境中改一下就好。

    开发背景:

    因为要做SAP外围系统IPM接口测试,这个是个异步接口

    调用接口之后,返回结果要通过另外一支接口去获得,由于某些原因不好实现,所以采取别一种方法。

    直接通过RFC在sap端查接口调用日志表ZIMPSTXS00330(手工查询方法,sap端 se11事务,输入表名,找到MESSAGE字段S代表接口成功,E代码失败)

    ——————下面直接上代码,其实这个不难——————

    引用NCO3.0后

    using System;
    using System.Collections.Generic;
    using System.ComponentModel;
    using System.Data;
    using System.Drawing;
    //using System.Linq;
    using System.Text;
    using System.Windows.Forms;
    using SAP.Middleware.Connector;
    
    namespace WindowsFormsApplication7
    {
        public partial class Form2 : Form
        {
            public Form2()
            {
                InitializeComponent();
            }
    
            private void button1_Click(object sender, EventArgs e)
            {
                //rfc配置
                RfcConfigParameters argsP = new RfcConfigParameters();
                argsP.Add(RfcConfigParameters.Name, "QS7");
                argsP.Add(RfcConfigParameters.AppServerHost, "10.5.91.131");
                argsP.Add(RfcConfigParameters.SystemNumber, "00");
                // argsP.Add(RfcConfigParameters.SystemID, "QS7");
                argsP.Add(RfcConfigParameters.User, "ATPSUSER");
                argsP.Add(RfcConfigParameters.Password, "q123456");
                argsP.Add(RfcConfigParameters.Client, "800");
                argsP.Add(RfcConfigParameters.Language, "zh");
                argsP.Add(RfcConfigParameters.PoolSize, "5");
                argsP.Add(RfcConfigParameters.MaxPoolSize, "10");
                argsP.Add(RfcConfigParameters.IdleTimeout, "60");
    
                //获取rfc配置
                RfcDestination sapConfig = RfcDestinationManager.GetDestination(argsP); //NCO3.0如果framework不是2.0此处会报错,跟系统64还32无关
                RfcRepository rfcRepository = sapConfig.Repository;
               
                //调用
                IRfcFunction invoke = rfcRepository.CreateFunction("SE11_FUNC"); //调用函数名 ZRFC_MARA_INFO
                invoke.SetValue("PSPID", ""); //设置参数 项目编号
                invoke.Invoke(sapConfig); //执行函数
    
    
                IRfcTable rfcTable = invoke.GetTable("ZIMPSTXS00330"); //获取内表
                string message = rfcTable.GetValue("MESSAGE").ToString();
                MessageBox.Show(message);
            }
        }
    }

    一些传的参数,是结构,就不能用setValue来传参了,要先给结构值

    SetStructValue是我封装好的,给结构值的方法,参数结果名字,结构传真字符串,model
    fc_invoke.SetValue(0, BAPIACHE09IMPORT)   把结构赋值给,函数对象,索引根据,参数位置决定。
                        IRfcFunction rfc_invoke = configModel.rfcRepository.CreateFunction(configModel.IFUNC);
    
                        var BAPIACHE09IMPORT = SetStructValue("BAPIACHE09", BAPIACHE09Arr, configModel);
                        var BAPIACPA09IMPORT = SetStructValue("BAPIACPA09", BAPIACPA09Arr, configModel);
                        var BAPIACCAHDIMPORT = SetStructValue("BAPIACCAHD", BAPIACCAHDArr, configModel);
    
                        rfc_invoke.SetValue(0, BAPIACHE09IMPORT);
                        rfc_invoke.SetValue(1, BAPIACPA09IMPORT);
                        rfc_invoke.SetValue(1, BAPIACCAHDIMPORT);
    
    
                        IRfcTable rfcTable = rfc_invoke.GetTable("RETURN"); //获取内表
    
                        string message = rfcTable.GetValue("MESSAGE").ToString();
                        return message;

    封装好的baseClass.cs

    using System;
    using System.Collections.Generic;
    //using System.Linq;
    using System.Text;
    using System.Reflection;
    //using System.Threading.Tasks;
    ///**************************************************************///
    using SAP.Middleware.Connector;
    ///引用合名空间SAP.Middleware.Connector需要引用sapnco3.0 dll
    ///sapnco.dll
    ///sapnco_utils
    ///**************************************************************///
    
    
    namespace RC_RFC_LIB
    {
        /// <summary>
        /// RFC接口调用
        /// </summary>
        public  class BaseClass
        {
            
    
            /// <summary>
            /// 登录配置
            /// </summary>
            /// <returns>bool</returns>
            public bool rfc_config(Model.baseConfigModel configModel)
            {
                try
                {
                    //rfc配置
                    RfcConfigParameters argsP = new RfcConfigParameters();
                    argsP.Add(RfcConfigParameters.Name, configModel.Name);
                    argsP.Add(RfcConfigParameters.AppServerHost, configModel.AppServerHost);
                    argsP.Add(RfcConfigParameters.SystemNumber, configModel.SystemNumber);
                    argsP.Add(RfcConfigParameters.SystemID, configModel.SystemID);
                    argsP.Add(RfcConfigParameters.User, configModel.User);
                    argsP.Add(RfcConfigParameters.Password, configModel.Password);
                    argsP.Add(RfcConfigParameters.Client, configModel.Client);
                    argsP.Add(RfcConfigParameters.Language, configModel.Language);
                    argsP.Add(RfcConfigParameters.PoolSize, "5");
                    argsP.Add(RfcConfigParameters.MaxPoolSize, "10");
                    argsP.Add(RfcConfigParameters.IdleTimeout, "60");
                    //argsP.Add(RfcConfigParameters.AbapDebug, "DEBUG");
                    
                    //获取rfc配置
                    configModel.sapConfig = RfcDestinationManager.GetDestination(argsP);
                    configModel.rfcRepository = configModel.sapConfig.Repository;
                    
                }
                catch (RfcBaseException ex)
                {
                    configModel.resultConfig = ex.Message;
                    return false;
                }
                return true;
            }
    
    
    
            #region //item传参
            /// <summary>
            /// 循环设置函数参数,不包含结构
            /// </summary>
            /// <param name="rfc_invoke">函数对象</param>
            /// <param name="itemArr">参数数组“name@_@value”</param>
            public void SetItemParaValue(IRfcFunction rfc_invoke ,string[] itemArr)
            {
                for (var i = 0; i < itemArr.Length; i++)
                {
                    var tmpitVal = itemArr[i].Split(new string[] { "@_@" }, StringSplitOptions.RemoveEmptyEntries);
                    rfc_invoke.SetValue(tmpitVal[0], tmpitVal[1]); //设置参数 (参数名,参数值)
                }
    
            }
            #endregion
    
            #region Struct类型 字段赋值
            /// <summary>
            /// Struct类型 字段赋值
            /// </summary>
            /// <param name="structName">ZAPWZ035 结构字段名</param>
            /// <param name="structFieldArr">结构内字段</param>
            /// <param name="configModel">配置model</param>
            /// <returns>import结构,需要当参数用</returns>
            public IRfcStructure SetStructValue(string structName, string[] structFieldArr,Model.baseConfigModel configModel)
            {
                try
                {
                    IRfcStructure import = null;
                    //IRfcTable table = rfc_invoke.GetTable("IS_ZAPWZ035");
                    //ZAPWZ035
                    //rfc_invoke.SetValue(0,import);
                    import = configModel.rfcRepository.GetStructureMetadata(structName.Trim().ToUpper()).CreateStructure();
    
                    for (var i = 0; i < structFieldArr.Length; i++)
                    {
                        var tmptableVal = structFieldArr[i].Split(new string[] { "@_@" }, StringSplitOptions.None);
    
                        import.SetValue(tmptableVal[0], tmptableVal[1]); //设置参数 (参数名,参数值)
                    }
    
                    return import;
                }
                catch (Exception ex)
                {
                    return null;
                }
    
    
            }
            #endregion
    
            #region property赋值
    
            /// <summary>
            /// property赋值
            /// </summary>
            /// <param name="arrObj">array object</param>
            /// <param name="modelObj">model object instance</param>
            public void SetPropertyValue(string[] arrObj, object modelObj)
            {
    
                var modelInstance = modelObj.GetType();
                for (var i = 0; i < arrObj.Length; i++)
                {
                    var tmpArr = arrObj[i].Split(new string[] { "@_@" }, StringSplitOptions.None);
                    foreach (System.Reflection.PropertyInfo py in modelInstance.GetProperties())
                    {
                        if (py.Name.ToLower() == tmpArr[0].ToLower())
                        {
                            modelInstance.GetProperty(py.Name).SetValue(modelObj, tmpArr[1]);
                        }
                    }
                }
            }
            #endregion
    
    
        }
    }

    baseConfigmodel.cs

    using System;
    using System.Collections.Generic;
    //using System.Linq;
    using System.Text;
    //using System.Threading.Tasks;
    using SAP.Middleware.Connector;
    
    
    namespace RC_RFC_LIB.Model
    {
        public class baseConfigModel
        {
    
    
            public string Name { get; set; } //系统名字QH5
            public string AppServerHost { get; set; }//系统ip地址
            public string SystemNumber { get; set; } //系统实例
            public string SystemID { get; set; }//系统id
            public string User { get; set; }//用户ATPSUSER
            public string Password { get; set; }//密码
            public string Client { get; set; }//客户端号800
            public string Language { get; set; } //语言zh en
            public string IFUNC { get; set; } //接口函数名
            public RfcDestination sapConfig { get; set; } //sap登录配置
            public RfcRepository rfcRepository { get; set; } //Repository对象
            public string resultConfig { get; set; } //配置结果
        }
    }
  • 相关阅读:
    MAC SAP for JAVA配置
    工艺路线查询
    工单批量关闭
    BOM批量查询
    SE11/SE16N修改表数据
    PI/PO Token配置
    标准IDOC同步物料
    SAP采购订单入库后不允许修改单价增强
    Sap Hana 关于BP的一些理解
    Sap MM 定义物料号码范围
  • 原文地址:https://www.cnblogs.com/yhleng/p/6731820.html
Copyright © 2011-2022 走看看