asp.Net 调用 SAP RFC, 取得SAP数据

最新推荐文章于 2023-08-24 16:40:41 发布
最新推荐文章于 2023-08-24 16:40:41 发布
阅读量1.8k 收藏 3
点赞数
文章标签： sap asp.net string textbox list delete
版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。
本文链接：https://blog.csdn.net/linmf/article/details/5363780
版权

读取SAP数据, 从两方面来做

1) 做一个C# app 在服务器上"任务计划"每天读取. 必须在服务器上执行, 否则可能从SAP读的汉字是乱码. (设置Connection的codepage = "8400"可以解决乱码问题.)

2) 对于要实时读取的, 做成页面或web Service放OA上.

 

下面是页面实现的部分代码.

 

 

 

 

using System.Data.SqlClient;  //连接SQL SERVER
using System.Data.OleDb;     //把页面GridView的数据导出EXCEL中用到

using SAPFunctionsOCX;    //以下三项安装SAP客户端后引用
using SAPLogonCtrl;
using SAPTableFactoryCtrl;

 

 

//页面上调用事件

 

    protected void Button2_Click(object sender, EventArgs e) 
    {
        stdate = System.DateTime.Now;
        DataTable dt = this.GetGridData();
        foreach (DataRow row in dt.Rows)
        {
            tOrder = row["生产订单"].ToString();
            if (string.IsNullOrEmpty(tOrder) == true)
            {               
                break;
            }
            else
            {
                ExecSQL("INSERT INTO 重读订单(生产订单) VALUES ('" + tOrder + "')");
            }
        }
        dt.Dispose();

        GridView2.DataSource = GetDataSet("select * from 重读订单 where 状态 is null", "重读订单");
        GridView2.DataBind();
        int dgv = GridView2.Rows.Count;

        if (dgv >= 1)
        {

            System.Threading.Thread s = new System.Threading.Thread(new System.Threading.ThreadStart(GETTBL));
            s.SetApartmentState(System.Threading.ApartmentState.STA);
            s.Start();
            s.Join();

            GridView1.DataSource = GetDataSet("select * from 重读订单", "重读订单");
            GridView1.DataBind();
          
            endate = System.DateTime.Now;

            int st_hours = stdate.Hour;
            int st_minute = stdate.Minute;
            int st_second = stdate.Second;

            int en_hours = endate.Hour;
            int en_minute = endate.Minute;
            int en_second = endate.Second;


            string timeConsume = Convert.ToString(en_hours - st_hours) + "时 " + Convert.ToString(en_minute - st_minute) + "分 " + Convert.ToString(en_second - st_second) + "秒";

            ExecSQL("Delete from 重读订单 where 状态 is not null");
            
            insertEvent(stdate.ToString(), endate.ToString(), timeConsume, "重读订单", recAufk);
        }
        else
        {
            Response.Write(MessageBox("请输入生产订单!"));
        }

    }


    protected void Button4_Click(object sender, EventArgs e)
    {
        DataTable dt = this.GetGridData();
        DataRow newRow = dt.NewRow();
        newRow[0] = "";
        newRow[1] = null;       
        dt.Rows.Add(newRow);
        GridView1.DataSource = dt;
        GridView1.DataBind();
        dt.Dispose();
    }

    protected DataTable GetGridData()
    {
        DataTable dt1 = new DataTable("Table1");
        dt1.Columns.Add("生产订单");
        dt1.Columns.Add("状态");
       
        for (int i = 0; i < GridView1.Rows.Count; i++)
        {
            GridViewRow gRow = GridView1.Rows[i];
            DataRow newRow = dt1.NewRow();

            newRow[0] = ((TextBox)gRow.FindControl("TextBox1")).Text;
            newRow[1] = ((TextBox)gRow.FindControl("TextBox2")).Text;           
            dt1.Rows.Add(newRow);
        }
        dt1.AcceptChanges();
        return dt1;
    }

 

 

 

//连接SAP, 调用RFC 

 

    protected void GETTBL()
    {
        SAPLogonCtrl.SAPLogonControlClass sapLogin = new SAPLogonCtrl.SAPLogonControlClass();
        sapLogin.ApplicationServer = "ip address";
        sapLogin.Client = "300";
        sapLogin.Language = "ZH";
        sapLogin.User = "myName";
        sapLogin.Password = "myPw";
        sapLogin.SystemNumber = 00;

        SAPLogonCtrl.Connection sapConn = (SAPLogonCtrl.Connection)sapLogin.NewConnection();

        if (sapConn.Logon(0, true))  //login successful
        {
            SAPFunctionsOCX.SAPFunctionsClass func = new SAPFunctionsOCX.SAPFunctionsClass();
            func.Connection = sapConn;
            SAPFunctionsOCX.IFunction ifunc = (SAPFunctionsOCX.IFunction)func.Add("ZRFC_AUFK");


            GridView2.DataSource = GetDataSet("select * from 重读订单 where 状态 is null", "重读订单");
            GridView2.DataBind();
            int dgv = GridView2.Rows.Count;
            recAufk = dgv;
            string T_aufnr;
            string o_aufnr;


            if (dgv >= 1)
            {
                for (int i = 0; i < dgv; i++)
                {
                    T_aufnr = GridView2.Rows[i].Cells[0].Text.ToString();
                    o_aufnr = T_aufnr;

                    if (T_aufnr.Length < 12) //补零
                    {
                        string str_zero = "0";

                        for (int j = 2; j <= 12 - T_aufnr.Length; j++)
                        {
                            str_zero = str_zero + j.ToString();
                            str_zero = str_zero.Replace(j.ToString(), "0");
                        }
                        T_aufnr = str_zero + T_aufnr;
                    }

                    SAPFunctionsOCX.IParameter zaufnr = (SAPFunctionsOCX.IParameter)ifunc.get_Exports("ZAUFNR");
                    zaufnr.Value = T_aufnr;

                    SAPFunctionsOCX.IParameter zstyle = (SAPFunctionsOCX.IParameter)ifunc.get_Exports("ZSTYLE");
                    zstyle.Value = "2";

                    ifunc.Call();
                    //  SAPFunctionsOCX.IParameter NUMBER =(SAPFunctionsOCX.IParameter)ifunc.get_Imports("SUBRC");
                    SAPTableFactoryCtrl.Tables ORDERs = (SAPTableFactoryCtrl.Tables)ifunc.Tables;             //get all the tables
                    SAPTableFactoryCtrl.Table tbAufk = (SAPTableFactoryCtrl.Table)ORDERs.get_Item("ORDER_LIST");
                    SAPTableFactoryCtrl.Table tbAFVC = (SAPTableFactoryCtrl.Table)ORDERs.get_Item("AFVC_LIST");
                    SAPTableFactoryCtrl.Table tbVBAK = (SAPTableFactoryCtrl.Table)ORDERs.get_Item("VBAK_LIST");
                    SAPTableFactoryCtrl.Table tbVBAP = (SAPTableFactoryCtrl.Table)ORDERs.get_Item("VBAP_LIST");
                    SAPTableFactoryCtrl.Table tbAFFL = (SAPTableFactoryCtrl.Table)ORDERs.get_Item("AFFL_LIST");
                   

                    if (tbAufk.RowCount >= 1)
                    {
                        for (int i1 = 1; i1 <= tbAufk.RowCount; i1++)
                        {
                            insertAUFK(
                                tbAufk.get_Cell(i1, "AUFNR").ToString(),
                                tbAufk.get_Cell(i1, "AUART").ToString(),
                                Convert.ToInt32(tbAufk.get_Cell(i1, "AUTYP")),
                                Convert.ToDateTime(tbAufk.get_Cell(i1, "ERDAT")),
                                tbAufk.get_Cell(i1, "BUKRS").ToString(),
                                tbAufk.get_Cell(i1, "WERKS").ToString(),
                                tbAufk.get_Cell(i1, "OBJNR").ToString(),
                                tbAufk.get_Cell(i1, "LOEKZ").ToString(),
                                Convert.ToDateTime(tbAufk.get_Cell(i1, "GLTRP")),
                                Convert.ToDateTime(tbAufk.get_Cell(i1, "GSTRP")),
                                Convert.ToInt32(tbAufk.get_Cell(i1, "RSNUM")),
                                tbAufk.get_Cell(i1, "DISPO").ToString(),
                                Convert.ToInt32(tbAufk.get_Cell(i1, "AUFPL")),
                                tbAufk.get_Cell(i1, "FEVOR").ToString(),
                                tbAufk.get_Cell(i1, "APRIO").ToString(),
                                tbAufk.get_Cell(i1, "CY_SEQNR").ToString(),
                                Convert.ToDecimal(tbAufk.get_Cell(i1, "IGMNG")),
                                tbAufk.get_Cell(i1, "POSNR").ToString(),
                                tbAufk.get_Cell(i1, "KDAUF").ToString(),
                                Convert.ToInt32(tbAufk.get_Cell(i1, "KDPOS")),
                                Convert.ToDecimal(tbAufk.get_Cell(i1, "PSMNG")),
                                Convert.ToDecimal(tbAufk.get_Cell(i1, "WEMNG")),
                                tbAufk.get_Cell(i1, "MEINS").ToString(),
                                tbAufk.get_Cell(i1, "MATNR").ToString(),
                                tbAufk.get_Cell(i1, "LTRMI").ToString(),
                                tbAufk.get_Cell(i1, "ELIKZ").ToString(),
                                tbAufk.get_Cell(i1, "DFREI").ToString(),
                                tbAufk.get_Cell(i1, "DNREL").ToString(),
                                tbAufk.get_Cell(i1, "BEZEI").ToString(),
                                tbAufk.get_Cell(i1, "TXT").ToString());
                        }


                        if (tbAFVC.RowCount >= 1)
                        {
                            for (int k = 1; k <= tbAFVC.RowCount; k++)
                            {
                                insertAFVC(
                                     Convert.ToInt32(tbAFVC.get_Cell(k, "AUFPL")),
                                     Convert.ToInt32(tbAFVC.get_Cell(k, "APLZL")),
                                     tbAFVC.get_Cell(k, "OBJNR").ToString(),
                                     tbAFVC.get_Cell(k, "PLNFL").ToString(),
                                     Convert.ToInt32(tbAFVC.get_Cell(k, "PLNKN")),
                                     tbAFVC.get_Cell(k, "PLNNR").ToString(),
                                     Convert.ToInt32(tbAFVC.get_Cell(k, "ZAEHL")),
                                     tbAFVC.get_Cell(k, "VORNR").ToString(),
                                     tbAFVC.get_Cell(k, "STEUS").ToString(),
                                     Convert.ToInt32(tbAFVC.get_Cell(k, "ARBID")),
                                     tbAFVC.get_Cell(k, "WERKS").ToString(),
                                     tbAFVC.get_Cell(k, "KTSCH").ToString(),
                                     tbAFVC.get_Cell(k, "LTXA1").ToString(),
                                     tbAFVC.get_Cell(k, "VGWTS").ToString(),
                                     Convert.ToInt32(tbAFVC.get_Cell(k, "SUMNR")),
                                     tbAFVC.get_Cell(k, "VGE01").ToString(),
                                     Convert.ToDecimal(tbAFVC.get_Cell(k, "VGW01")),
                                     tbAFVC.get_Cell(k, "VGE02").ToString(),
                                     Convert.ToDecimal(tbAFVC.get_Cell(k, "VGW02")),
                                     tbAFVC.get_Cell(k, "VGE03").ToString(),
                                     Convert.ToDecimal(tbAFVC.get_Cell(k, "VGW03")),
                                     tbAFVC.get_Cell(k, "VGE04").ToString(),
                                     Convert.ToDecimal(tbAFVC.get_Cell(k, "VGW04")),
                                     tbAFVC.get_Cell(k, "VGE05").ToString(),
                                     Convert.ToDecimal(tbAFVC.get_Cell(k, "VGW05")),
                                     tbAFVC.get_Cell(k, "VGE06").ToString(),
                                     Convert.ToDecimal(tbAFVC.get_Cell(k, "VGW06")),
                                     Convert.ToDecimal(tbAFVC.get_Cell(k, "MGVRG")),
                                     Convert.ToDecimal(tbAFVC.get_Cell(k, "LMNGA")),
                                     Convert.ToDecimal(tbAFVC.get_Cell(k, "ISM01")),
                                     Convert.ToDecimal(tbAFVC.get_Cell(k, "ISM02")),
                                     Convert.ToDecimal(tbAFVC.get_Cell(k, "ISM03")),
                                     Convert.ToDecimal(tbAFVC.get_Cell(k, "ISM04")),
                                     Convert.ToDecimal(tbAFVC.get_Cell(k, "ISM05")),
                                     Convert.ToDecimal(tbAFVC.get_Cell(k, "ISM06")),
                                     Convert.ToDecimal(tbAFVC.get_Cell(k, "RMNGA")));
                            }
                        }

                        if (tbVBAK.RowCount >= 1)
                        {
                            for (int L = 1; L <= tbVBAK.RowCount; L++)
                            {

                                insertVBAK(
                                     tbVBAK.get_Cell(L, "VBELN").ToString(),
                                     Convert.ToDateTime(tbVBAK.get_Cell(L, "ERDAT")),
                                     tbVBAK.get_Cell(L, "VBTYP").ToString(),
                                     tbVBAK.get_Cell(L, "VKORG").ToString(),
                                     tbVBAK.get_Cell(L, "BSTNK").ToString(),
                                     tbVBAK.get_Cell(L, "KUNNR").ToString(),
                                     Convert.ToInt32(tbVBAK.get_Cell(L, "PERNR")),
                                     tbVBAK.get_Cell(L, "SNAME").ToString(),
                                     tbVBAK.get_Cell(L, "UNCONF").ToString());
                            }
                        }

                        if (tbVBAP.RowCount >= 1)
                        {
                            for (int M = 1; M <= tbVBAP.RowCount; M++)
                            {
                                insertVBAP(
                                     tbVBAP.get_Cell(M, "VBELN").ToString(),
                                     Convert.ToInt32(tbVBAP.get_Cell(M, "POSNR")),
                                     tbVBAP.get_Cell(M, "KDMAT").ToString(),
                                     Convert.ToDateTime(tbVBAP.get_Cell(M, "EDATU")),
                                     tbVBAP.get_Cell(M, "UNCONF").ToString());
                            }
                        }

                        /*
                        if (tbAFFL.RowCount >= 1)
                        {
                            for (int P = 1; P <= tbAFFL.RowCount; P++)
                            {
                                if (IAUFPL == Convert.ToInt32(tbAFFL.get_Cell(P, "AUFPL")))
                                { IAL = 0; }
                                else { IAL = 1; }

                                insertAFFL(
                                        Convert.ToInt32(tbAFFL.get_Cell(P, "AUFPL")),
                                        Convert.ToInt32(tbAFFL.get_Cell(P, "APLZL")),
                                        tbAFFL.get_Cell(P, "PLNFL").ToString(),
                                        Convert.ToInt32(tbAFFL.get_Cell(P, "ZAEHL")),
                                        tbAFFL.get_Cell(P, "AENNR").ToString(),
                                        tbAFFL.get_Cell(P, "FLGAT").ToString(),
                                        tbAFFL.get_Cell(P, "BEZFL").ToString(),
                                        Convert.ToInt32(tbAFFL.get_Cell(P, "BKNT1")),
                                        Convert.ToInt32(tbAFFL.get_Cell(P, "BKNT2")),
                                        tbAFFL.get_Cell(P, "LTXA1").ToString(),
                                        tbAFFL.get_Cell(P, "BSCHL1").ToString(),
                                        tbAFFL.get_Cell(P, "BSCHL2").ToString(),
                                        tbAFFL.get_Cell(P, "OBJNR").ToString(),
                                        tbAFFL.get_Cell(P, "OBJTYPE").ToString(),
                                        IAL);
                                IAUFPL = Convert.ToInt32(tbAFFL.get_Cell(P, "AUFPL"));
                            }
                        }*/

                        ExecSQL("UPDATE 重读订单 SET 状态 = '已更新' where 生产订单 ='" + o_aufnr + "'");
                    }
                    else
                    {
                        ExecSQL("UPDATE 重读订单 SET 状态 = '订单号码错误' where 生产订单 ='" + o_aufnr + "'");
                        ExecSQL("Delete from 出货计划进度表 WHERE 生产订单 ='" + o_aufnr + "'");
                        ExecSQL("Delete from 出货计划表_明细 WHERE 生产订单 ='" + o_aufnr + "'");
                        //ExecSQL("Delete from AUFK WHERE AUFNR ='" + o_aufnr + "'");
                    }
                }
            }
            else
            {

                ifunc.Call();
                //  SAPFunctionsOCX.IParameter NUMBER =(SAPFunctionsOCX.IParameter)ifunc.get_Imports("SUBRC");
                SAPTableFactoryCtrl.Tables ORDERa = (SAPTableFactoryCtrl.Tables)ifunc.Tables;             //get all the tables
                SAPTableFactoryCtrl.Table tbAufk = (SAPTableFactoryCtrl.Table)ORDERa.get_Item("ORDER_LIST");
                SAPTableFactoryCtrl.Table tbAFVC = (SAPTableFactoryCtrl.Table)ORDERa.get_Item("AFVC_LIST");
                SAPTableFactoryCtrl.Table tbVBAK = (SAPTableFactoryCtrl.Table)ORDERa.get_Item("VBAK_LIST");
                SAPTableFactoryCtrl.Table tbVBAP = (SAPTableFactoryCtrl.Table)ORDERa.get_Item("VBAP_LIST");
                SAPTableFactoryCtrl.Table tbAFFL = (SAPTableFactoryCtrl.Table)ORDERa.get_Item("AFFL_LIST");


                if (tbAufk.RowCount >= 1)
                {
                    for (int i = 1; i <= tbAufk.RowCount; i++)
                    {

                        insertAUFK(tbAufk.get_Cell(i, "AUFNR").ToString(),
                        tbAufk.get_Cell(i, "AUART").ToString(),
                        Convert.ToInt32(tbAufk.get_Cell(i, "AUTYP")),
                        Convert.ToDateTime(tbAufk.get_Cell(i, "ERDAT")),
                        tbAufk.get_Cell(i, "BUKRS").ToString(),
                        tbAufk.get_Cell(i, "WERKS").ToString(),
                        tbAufk.get_Cell(i, "OBJNR").ToString(),
                        tbAufk.get_Cell(i, "LOEKZ").ToString(),
                        Convert.ToDateTime(tbAufk.get_Cell(i, "GLTRP")),
                        Convert.ToDateTime(tbAufk.get_Cell(i, "GSTRP")),
                        Convert.ToInt32(tbAufk.get_Cell(i, "RSNUM")),
                        tbAufk.get_Cell(i, "DISPO").ToString(),
                        Convert.ToInt32(tbAufk.get_Cell(i, "AUFPL")),
                        tbAufk.get_Cell(i, "FEVOR").ToString(),
                        tbAufk.get_Cell(i, "APRIO").ToString(),
                        tbAufk.get_Cell(i, "CY_SEQNR").ToString(),
                        Convert.ToDecimal(tbAufk.get_Cell(i, "IGMNG")),
                        tbAufk.get_Cell(i, "POSNR").ToString(),
                        tbAufk.get_Cell(i, "KDAUF").ToString(),
                        Convert.ToInt32(tbAufk.get_Cell(i, "KDPOS")),
                        Convert.ToDecimal(tbAufk.get_Cell(i, "PSMNG")),
                        Convert.ToDecimal(tbAufk.get_Cell(i, "WEMNG")),
                        tbAufk.get_Cell(i, "MEINS").ToString(),
                        tbAufk.get_Cell(i, "MATNR").ToString(),
                        tbAufk.get_Cell(i, "LTRMI").ToString(),
                        tbAufk.get_Cell(i, "ELIKZ").ToString(),
                        tbAufk.get_Cell(i, "DFREI").ToString(),
                        tbAufk.get_Cell(i, "DNREL").ToString(),
                        tbAufk.get_Cell(i, "BEZEI").ToString(),
                        tbAufk.get_Cell(i, "TXT").ToString());
                    }


                    if (tbAFVC.RowCount >= 1)
                    {
                        for (int i = 1; i <= tbAFVC.RowCount; i++)
                        {
                            insertAFVC(
                                    Convert.ToInt32(tbAFVC.get_Cell(i, "AUFPL")),
                                    Convert.ToInt32(tbAFVC.get_Cell(i, "APLZL")),
                                    tbAFVC.get_Cell(i, "OBJNR").ToString(),
                                    tbAFVC.get_Cell(i, "PLNFL").ToString(),
                                    Convert.ToInt32(tbAFVC.get_Cell(i, "PLNKN")),
                                    tbAFVC.get_Cell(i, "PLNNR").ToString(),
                                    Convert.ToInt32(tbAFVC.get_Cell(i, "ZAEHL")),
                                    tbAFVC.get_Cell(i, "VORNR").ToString(),
                                    tbAFVC.get_Cell(i, "STEUS").ToString(),
                                    Convert.ToInt32(tbAFVC.get_Cell(i, "ARBID")),
                                    tbAFVC.get_Cell(i, "WERKS").ToString(),
                                    tbAFVC.get_Cell(i, "KTSCH").ToString(),
                                    tbAFVC.get_Cell(i, "LTXA1").ToString(),
                                    tbAFVC.get_Cell(i, "VGWTS").ToString(),
                                    Convert.ToInt32(tbAFVC.get_Cell(i, "SUMNR")),
                                    tbAFVC.get_Cell(i, "VGE01").ToString(),
                                    Convert.ToDecimal(tbAFVC.get_Cell(i, "VGW01")),
                                    tbAFVC.get_Cell(i, "VGE02").ToString(),
                                    Convert.ToDecimal(tbAFVC.get_Cell(i, "VGW02")),
                                    tbAFVC.get_Cell(i, "VGE03").ToString(),
                                    Convert.ToDecimal(tbAFVC.get_Cell(i, "VGW03")),
                                    tbAFVC.get_Cell(i, "VGE04").ToString(),
                                    Convert.ToDecimal(tbAFVC.get_Cell(i, "VGW04")),
                                    tbAFVC.get_Cell(i, "VGE05").ToString(),
                                    Convert.ToDecimal(tbAFVC.get_Cell(i, "VGW05")),
                                    tbAFVC.get_Cell(i, "VGE06").ToString(),
                                    Convert.ToDecimal(tbAFVC.get_Cell(i, "VGW06")),
                                    Convert.ToDecimal(tbAFVC.get_Cell(i, "MGVRG")),
                                    Convert.ToDecimal(tbAFVC.get_Cell(i, "LMNGA")),
                                    Convert.ToDecimal(tbAFVC.get_Cell(i, "ISM01")),
                                    Convert.ToDecimal(tbAFVC.get_Cell(i, "ISM02")),
                                    Convert.ToDecimal(tbAFVC.get_Cell(i, "ISM03")),
                                    Convert.ToDecimal(tbAFVC.get_Cell(i, "ISM04")),
                                    Convert.ToDecimal(tbAFVC.get_Cell(i, "ISM05")),
                                    Convert.ToDecimal(tbAFVC.get_Cell(i, "ISM06")),
                                    Convert.ToDecimal(tbAFVC.get_Cell(i, "RMNGA")));
                        }
                    }

                    if (tbVBAK.RowCount >= 1)
                    {
                        for (int i = 1; i <= tbVBAK.RowCount; i++)
                        {
                            insertVBAK(
                                    tbVBAK.get_Cell(i, "VBELN").ToString(),
                                    Convert.ToDateTime(tbVBAK.get_Cell(i, "ERDAT")),
                                    tbVBAK.get_Cell(i, "VBTYP").ToString(),
                                    tbVBAK.get_Cell(i, "VKORG").ToString(),
                                    tbVBAK.get_Cell(i, "BSTNK").ToString(),
                                    tbVBAK.get_Cell(i, "KUNNR").ToString(),
                                    Convert.ToInt32(tbVBAK.get_Cell(i, "PERNR")),
                                    tbVBAK.get_Cell(i, "SNAME").ToString(),
                                    tbVBAK.get_Cell(i, "UNCONF").ToString());
                        }
                    }

                    if (tbVBAP.RowCount >= 1)
                    {
                        for (int i = 1; i <= tbVBAP.RowCount; i++)
                        {
                            insertVBAP(
                                    tbVBAP.get_Cell(i, "VBELN").ToString(),
                                    Convert.ToInt32(tbVBAP.get_Cell(i, "POSNR")),
                                    tbVBAP.get_Cell(i, "KDMAT").ToString(),
                                    Convert.ToDateTime(tbVBAP.get_Cell(i, "EDATU")),
                                    tbVBAP.get_Cell(i, "UNCONF").ToString());
                        }
                    }

                    /* Modified by Lin on 2009-10-28
                    if (tbAFFL.RowCount >= 1)
                    {
                        for (int P = 1; P <= tbAFFL.RowCount; P++)
                        {

                            if (IAUFPL == Convert.ToInt32(tbAFFL.get_Cell(P, "AUFPL")))
                            { IAL = 0; }
                            else { IAL = 1; }

                            insertAFFL(
                                    Convert.ToInt32(tbAFFL.get_Cell(P, "AUFPL")),
                                    Convert.ToInt32(tbAFFL.get_Cell(P, "APLZL")),
                                    tbAFFL.get_Cell(P, "PLNFL").ToString(),
                                    Convert.ToInt32(tbAFFL.get_Cell(P, "ZAEHL")),
                                    tbAFFL.get_Cell(P, "AENNR").ToString(),
                                    tbAFFL.get_Cell(P, "FLGAT").ToString(),
                                    tbAFFL.get_Cell(P, "BEZFL").ToString(),
                                    Convert.ToInt32(tbAFFL.get_Cell(P, "BKNT1")),
                                    Convert.ToInt32(tbAFFL.get_Cell(P, "BKNT2")),
                                    tbAFFL.get_Cell(P, "LTXA1").ToString(),
                                    tbAFFL.get_Cell(P, "BSCHL1").ToString(),
                                    tbAFFL.get_Cell(P, "BSCHL2").ToString(),
                                    tbAFFL.get_Cell(P, "OBJNR").ToString(),
                                    tbAFFL.get_Cell(P, "OBJTYPE").ToString(),
                                    IAL);
                            IAUFPL = Convert.ToInt32(tbAFFL.get_Cell(P, "AUFPL"));

                        }
                    } */

                }


                SAPFunctionsOCX.SAPFunctionsClass func1 = new SAPFunctionsOCX.SAPFunctionsClass();
                func1.Connection = sapConn;
                SAPFunctionsOCX.IFunction ifunc1 = (SAPFunctionsOCX.IFunction)func.Add("ZRFC_OTHER");

                ifunc1.Call();
                SAPTableFactoryCtrl.Tables otENQs = (SAPTableFactoryCtrl.Tables)ifunc1.Tables;
                SAPTableFactoryCtrl.Table tbAUFK1 = (SAPTableFactoryCtrl.Table)otENQs.get_Item("ORDER_LIST");
                SAPTableFactoryCtrl.Table tbVBAK1 = (SAPTableFactoryCtrl.Table)otENQs.get_Item("VBAK_LIST");
                SAPTableFactoryCtrl.Table tbVBAP1 = (SAPTableFactoryCtrl.Table)otENQs.get_Item("VBAP_LIST");


                if (tbAUFK1.RowCount >= 1)
                {
                    for (int i7 = 1; i7 <= tbAUFK1.RowCount; i7++)
                    {
                        updAUFK(tbAUFK1.get_Cell(i7, "AUFNR").ToString(),
                                tbAUFK1.get_Cell(i7, "DNREL").ToString());
                    }

 

                    if (tbVBAK1.RowCount >= 1)
                    {
                        for (int i8 = 1; i8 <= tbVBAK1.RowCount; i8++)
                        {
                            updVBAK(
                                    tbVBAK1.get_Cell(i8, "VBELN").ToString(),
                                    tbVBAK1.get_Cell(i8, "UNCONF").ToString());
                        }
                    }


                    if (tbVBAP1.RowCount >= 1)
                    {
                        for (int i9 = 1; i9 <= tbVBAP1.RowCount; i9++)
                        {
                            updVBAP(
                                    tbVBAP1.get_Cell(i9, "VBELN").ToString(),
                                    Convert.ToInt32(tbVBAP1.get_Cell(i9, "POSNR")),
                                    tbVBAP1.get_Cell(i9, "UNCONF").ToString());
                        }
                    }
                }
            }
            runProcMain();
        }
        else
        {
           // NOTconn = "FAILTOCONNECTSAP";
        }
    }

 

//存储过程调用

 

    public void insertAUFK(string AUFNR, string AUART, Int32 AUTYP, DateTime ERDAT, string BUKRS, string WERKS,
                            string OBJNR, string LOEKZ, DateTime GLTRP, DateTime GSTRP, Int32 RSNUM, string DISPO, Int32 AUFPL, string FEVOR,
                            string APRIO, string CY_SEQNR, decimal IGMNG, string POSNR, string KDAUF, Int32 KDPOS, decimal PSMNG,
                            decimal WEMNG, string MEINS, string MATNR, string LTRMI, string ELIKZ, string DFREI, string DNREL, string BEZEI, string txt)
    {


        SqlConnection conn = new SqlConnection(ConfigurationManager.AppSettings["connectES"]);
        SqlCommand cmd = conn.CreateCommand();
        cmd.CommandTimeout = 600;
        cmd.CommandType = CommandType.StoredProcedure;
        cmd.CommandText = "sp_AUFK";
        cmd.Parameters.Add(new SqlParameter("@AUFNR", AUFNR));
        cmd.Parameters.Add(new SqlParameter("@AUART", AUART));
        cmd.Parameters.Add(new SqlParameter("@AUTYP", AUTYP));
        cmd.Parameters.Add(new SqlParameter("@ERDAT", ERDAT));
        cmd.Parameters.Add(new SqlParameter("@BUKRS", BUKRS));
        cmd.Parameters.Add(new SqlParameter("@WERKS", WERKS));
        cmd.Parameters.Add(new SqlParameter("@OBJNR", OBJNR));
        cmd.Parameters.Add(new SqlParameter("@LOEKZ", LOEKZ));
        cmd.Parameters.Add(new SqlParameter("@GLTRP", GLTRP));
        cmd.Parameters.Add(new SqlParameter("@GSTRP", GSTRP));
        cmd.Parameters.Add(new SqlParameter("@RSNUM", RSNUM));
        cmd.Parameters.Add(new SqlParameter("@DISPO", DISPO));
        cmd.Parameters.Add(new SqlParameter("@AUFPL", AUFPL));
        cmd.Parameters.Add(new SqlParameter("@FEVOR", FEVOR));
        cmd.Parameters.Add(new SqlParameter("@APRIO", APRIO));
        cmd.Parameters.Add(new SqlParameter("@CY_SEQNR", CY_SEQNR));
        cmd.Parameters.Add(new SqlParameter("@IGMNG", IGMNG));
        cmd.Parameters.Add(new SqlParameter("@POSNR", POSNR));
        cmd.Parameters.Add(new SqlParameter("@KDAUF", KDAUF));
        cmd.Parameters.Add(new SqlParameter("@KDPOS", KDPOS));
        cmd.Parameters.Add(new SqlParameter("@PSMNG", PSMNG));
        cmd.Parameters.Add(new SqlParameter("@WEMNG", WEMNG));
        cmd.Parameters.Add(new SqlParameter("@MEINS", MEINS));
        cmd.Parameters.Add(new SqlParameter("@MATNR", MATNR));
        cmd.Parameters.Add(new SqlParameter("@LTRMI", LTRMI));
        cmd.Parameters.Add(new SqlParameter("@ELIKZ", ELIKZ));
        cmd.Parameters.Add(new SqlParameter("@DFREI", DFREI));
        cmd.Parameters.Add(new SqlParameter("@DNREL", DNREL));
        cmd.Parameters.Add(new SqlParameter("@BEZEI", BEZEI));
        cmd.Parameters.Add(new SqlParameter("@TXT", txt));
        conn.Open();
        cmd.ExecuteNonQuery();
        conn.Close();
    }

linmf
关注
asp.net 调用SAP RFC(基于sap.connector.dll和sap.connector.rfc.dll)
记录那些曾今的迷茫
10-23 3335
SAP.Connector.SAPConnection myConn; SAP.Connector.SAPLogonDestination myDest; myDest = new SAP.Connector.SAPLogonDestination(); myDest.Client = 100; myDest.AppServe
.net平台调用SAP RFC的几种方案
abc4626的博客
10-06 1148
第一种方式采用SAP.net Connector: 最新版本是3.01，不开源，不知道有没有官方的技术支持。从3.0版本开始，使用方法上开始跟2.0相差很大，不再需要生成代理类，好处是一旦SAP RFC接口做了更改，不需要重新生成代理类。凡是都有两面性，这个好处也可以看做一个缺点：如果对RFC信息比较少，你不能用代理类的方式取得参数和者返回值的数据结构。 ...
ASP.NET连接SAP 调用RFC
07-27
ASP.NET连接SAP 调用RFCASP.NET连接SAP 调用RFC
asp.net 链接SAP.RFC
yaotianen的博客
12-06 698
一开始博客使用NC3.0，结果报错SAP.Middleware.Connector.RfcDestinationManager”的类型初始值设定项引发异常 后来使用新的办法已经测试成功 操作步骤： 1.安装SAP客户端 2..net引入DLL 3.在新的进程中运行，否则报错   进程类型为STA   thread.SetApartmentState(System.Threadin
asp.net c#语言RFC连接SAP
yaotianen的博客
03-01 1662
最近公司导入PDA项目，要求使用浏览器来进行扫描，那么只能做网站服务器了。 由于要连接SAP那么PDA客户端就不能安装SAP客户端了。只是利用服务器连接SAP然后传出资料到客户端页面了 本人在网上上搜索了大量的资料，这个项目终于完成了，以下为源代码，仅供参考。 1.下载SAP的dll:http://files.cnblogs.com/mengxin523/SAP_DotNetConnecto
asp调用rfc的例子
网络空间安全与企业信息化
06-09 999
一直找不到asp调用rfc的例子，网上更多的是asp.net调用rfc的，本来对asp代码是一窍不通的，不过这边涉及的代码还是比较简单的。DIM oLogonControlDIM oBapiControlDIM oConnDIM oCompanyCodeDim otabCompanyCodesDim oReturnDim oColDim oRow
.Net调用SAPRFC接口来读取数据实战纪实[汇编].pdf
10-10
.Net 调用 SAP RFC 接口来读取数据实战纪实 在软件开发中，.Net 调用 SAP RFC 接口来读取数据是一种常见的应用场景。本文将详细介绍如何使用 .Net 框架调用 SAP RFC 接口来读取数据，并记录了调试的全过程。 关键...
RFC_WS.zip_C# sap_SAP_rfc_rfc sap_web service
09-23
通过以上知识点的学习和实践，开发者可以构建一个能够利用C# Web服务调用SAP RFC的应用，从而实现跨系统数据交换和业务流程自动化。在实际项目中，还需要遵循最佳实践，确保代码的可维护性和扩展性。
ASP.Net 连接SAP通用类
03-02 2062
智遥工作流软件中自带有一个连接SAP RFC的类，调用起来非常方便，以下是源代码： 注：.Net 要连接SAP，需要网上下载一个 NCO3.0 然后引用命名空间 using SAP.Middleware.Connector;   public class SapRFCHelper     {         ///         /// 获取登录SAP参数         //
.net调用SAP RFC组件及Demo
10-10
.net调用SAP RFC Demo SAP CONNECTOR FOR MICROSOFT .NET Demo(vs2005 x86) .net调用SAP RFC组件 Compiled with .NET Framework 2.0: sapnco30P_8-20007347.zip:SAP Connector for Microsoft .NET 3.0.8.0 for Windows 32bit (x86) sapnco30P_8-20007348.zip:SAP Connector for Microsoft .NET 3.0.8.0 for Windows 64bit (x64) Compiled with .NET Framework 4.0 sapnco30dotnet40P_8-20007347.zip：SAP Connector for Microsoft .NET 3.0.8.0 for Windows 32bit (x86) sapnco30dotnet40P_8-20007348.zip: SAP Connector for Microsoft .NET 3.0.8.0 for Windows 64bit (x64)
Asp.net连接SAP
yingying0708的专栏
07-28 1145
RfcConfigParameters rfcPar = new RfcConfigParameters();              rfcPar.Add(RfcConfigParameters.Name, "DEV");              rfcPar.Add(RfcConfigParameters.AppServerHost, "192.168.10.25");       
.Net 调用SAP RFC接口来读取数据实战纪实
aitanwu4387的博客
12-02 418
分类：我的KM 这几天研究.Net 如何调用SAP RFC接口来读取数据，搞得我重装了三次系统，找资料找到吐血,看了德文、日文、英文、中文几乎所有可以参考的资料，师傅亲自出马，并请教了一堆高手还包括IBM的帅锅，还割舍了阳光明媚的周日来研究，终于功夫不负有心人，最终还是解决了，汗啊~~ 下面把我调试的全过程都记录一下，以后有人遇到相同问题就可...
.NET通过RFC读取SAP数据
weixin_30340819的博客
05-22 133
　　本篇文章中我主要讲的是.NET如何通过RFC从SAP中读取数据。为了功能的可复用性，我将调用RFC的代码从业务层中分离出来单独建立在一个namespace中。 　　当然除了需要我们自己编写代码以外，还需要引用SAP提供的程序集文件（sapnco.dll、sapnco_utils.dll），在代码文件需要引用相应的命名空间（using SAP.Middleware.Connector;）。 ...
在 .NET 中调用SAP RFC 接口
weixin_30527143的博客
05-15 241
因为图太多了，一个个上传太麻烦了，所以这里只列出其中的文字提纲，图片什么的作为附件提供吧！ /Files/xiadongzq/CreateRfc.doc 一．创建RFC 1.SE11 新建表 2.激活表 3.创建函数模块 注意：函数组是在 “转到(G) ”菜单下面创建 4．定义函数组属性 注意：Processing Type 要选成Remote-enable...
.NET连接SAP系统专题：C#调用RFC代码（三）
weixin_34278190的博客
08-11 420
    本文就说明在C#中如何编写代码来调用SAP中的RFC函数获取数据。（Winform32）     首先需要引用两个NCO3.0的DLL，下载地址在文后。     然后在程序代码页面引用：     using SAP.Middleware.Connector;     然后所有的代码如下： namespace SAP_RFC {     public partial class...
Net 调用SAP RFC接口来读取数据实战纪实
Welcome to Garywang's IT BLOG.
02-02 1901
原文地址：http://blog.163.com/wang_1980_ww/blog/static/1111410520081026103928786/ 未做测试，因为没有03环境，仅供参考。 1.【关键前提】:   (1) 你安装了VS2003 （注意：一定要VS2003，原因在下面）   (2）安装SAP.Net Connector 2.0 (这东东目前只支持.net
ASP.NET 实现SAP数据的读取
Welcome to Garywang's IT BLOG.
02-02 1230
终于测试成功了，来张图先:   技术上我是用C# + VB.Net实现的，其中VB.NET负责后台与SAP建立连接并取得数据, 技术难点是如何向SAP的RFC传入Table参数，比如ABAP中的Select-options参数,关键代码如下：             Dim codes = bapi.Add("ZMMR014")            Dim itLifnr
.Net 连接SAP RFC
最新发布
m0_59995620的博客
08-24 440
主要内容是调用SAP RFC流程
Sap中的RFC接口
beyond911的专栏
11-30 1768
SAP RFC
.NET访问SAP数据教程：使用SAP RFC接口
接着，调用特定的SAP函数模块（如`BRFCKNA1_READ_TABLE`），并将返回的数据转换为.NET的`DataTable`，便于进一步处理和展示。 请注意，实际操作中，你需要根据实际的SAP系统设置和需要调用的RFC函数进行相应的调整...
评论 1
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值