using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Linq;
using System.Text;
using System.Threading.Tasks;
using System.Windows.Forms;
using SAP.Middleware.Connector;

namespace WindowsFormSAP_RFC1
{
    public partial class Form1 : Form
    {
     
        public Form1()
        {
            InitializeComponent();
        }

        public void nco()
        {
            RfcDestination prd = RfcDestinationManager.GetDestination("PRD_000");
            // RfcDestinationManager.UnregisterDestinationConfiguration(ID);  //返注册
            nco(prd);
        }
        public void nco(RfcDestination prd)
        {
            RfcRepository repo =  prd.Repository;
            IRfcFunction companyBapi = repo.CreateFunction("ZKAVEN_F001");   //调用函数名
            companyBapi.SetValue("L_MATNR", this.textBox1.Text.ToString());   //设置Import的参数
            companyBapi.Invoke(prd);   //执行函数
            IRfcTable table = companyBapi.GetTable("IT_MARA");  //获取相应的品号内表
            string MAKTX = companyBapi.GetValue("L_MAKTX").ToString();  //获取品名

            this.label1.Text = MAKTX;   //显示品名
            prd = null;
            repo = null;
        }
        //登陆SAP前的准备工作
        public class MyBackendConfig : IDestinationConfiguration
        {
            public RfcConfigParameters GetParameters(String destinationName)
            {
                if ("PRD_000".Equals(destinationName))
                {
                    RfcConfigParameters parms = new RfcConfigParameters();
                    parms.Add(RfcConfigParameters.Name, "PRD_000");
                    parms.Add(RfcConfigParameters.AppServerHost, "10.100.112.11");   //SAP主机IP
                    parms.Add(RfcConfigParameters.SystemNumber, "10");  //SAP实例


                    parms.Add(RfcConfigParameters.User, "xxx");  //用户名
                    parms.Add(RfcConfigParameters.Password, "xxxxx");  //密码
                    parms.Add(RfcConfigParameters.Client, "710");  // Client
                    parms.Add(RfcConfigParameters.Language, "ZH");  //登陆语言
                    parms.Add(RfcConfigParameters.PoolSize, "5");

                    return parms;
                }
                else return null;
            }
            public bool ChangeEventsSupported()
            {
                return false;
            }
            public event RfcDestinationManager.ConfigurationChangeHandler ConfigurationChanged;
        }

        private void button1_Click(object sender, EventArgs e)
        {
            IDestinationConfiguration ID = new MyBackendConfig();  //连接池
            RfcDestinationManager.RegisterDestinationConfiguration(ID);
            nco();
        }
    }
}