1.使用Oracle存儲過程查詢結果集：
網上寫的都是他媽的扯淡！其實一句話就行了，你只要返回一個游標就OK了。具體代碼如下:
CREATE OR REPLACE PROCEDURE PR_ORDER_LIST( ORDER_ID VARCHAR2, BEGINDATE VARCHAR2, ENDDATE VARCHAR2, CUSTOMER VARCHAR2, STATUS VARCHAR2, V_TEMP out sys_refcursor ) IS SQLTEXT VARCHAR2(4000); BEGIN SQLTEXT := 'select s.OrderId,c.CustomerName,s.SendAddress,p.TextValue as BussinessStatus, NVL(s.UpdateT,s.InsertT) as OrderDate from SaleOrder s LEFT JOIN CustomerInfo c on s.CustomerId = c.CustomerId and c.CustomerType = ''C'' LEFT JOIN DataParameter p on s.BussinessStatus = p.Code and p.ParameterType = ''BussinessStatus'' where to_char(NVL(s.UpdateT,s.InsertT),''yyyyMMdd'') between '''||BEGINDATE||''' and '''||ENDDATE||''' '; IF ORDER_ID <> '' THEN SQLTEXT := SQLTEXT || ' and s.OrderId like ''%'||ORDER_ID||'%'''; END IF; IF CUSTOMER <> '' THEN SQLTEXT := SQLTEXT || ' and s.CustomerId = '||to_number(CUSTOMER); END IF; IF STATUS <> '' and STATUS <> '0' THEN SQLTEXT := SQLTEXT || ' and s.BussinessStatus in ('||STATUS||')'; END IF; SQLTEXT := SQLTEXT || ' order by NVL(s.UpdateT,s.InsertT) desc'; dbms_output.put_line(SQLTEXT); --這個是打印 --execute immediate SQLTEXT; 這個是動態執行sql,寫游標可以不用這個，用下面那個 --如果要往變量里面注入值，需要使用上面這個 open V_TEMP FOR SQLTEXT; --彺游標里面注入值 ，這里是注入了一個sql字符串 END;
2.然后就是包的定義，包就相當於C#里面的類，可以封裝類型、方法等等。
3.C#程序段使用方法：
/// <summary> /// 訂單列表 /// </summary> /// <param name="begin"></param> /// <param name="end"></param> /// <param name="orderid"></param> /// <param name="customer"></param> /// <param name="status"></param> /// <returns></returns> public DataTable SaleOrderList(string begin, string end, string orderid, string customer, string status) { DBManager vDBManager = new DBManager(); vDBManager.ConnectionOpen(); vDBManager.AddParameter(":begin", begin); vDBManager.AddParameter(":end", end); vDBManager.AddParameter(":orderid", orderid); vDBManager.AddParameter(":customer", customer); vDBManager.AddParameter(":status", status); vDBManager.AddOutParameter("V_TEMP", null); //這里注意，一定要是out類型的參數 DataTable dt = vDBManager.RunProcedure("PR_ORDER_LIST", "table1"); vDBManager.ConnectionClose(); return dt; }
/// <summary> /// 添加輸出參數 /// </summary> /// <param name="key"></param> /// <param name="value"></param> public void AddOutParameter(string key, object value) { command.Parameters.Add(new OracleParameter(key, OracleType.Cursor)).Direction = ParameterDirection.Output; } /// <summary> /// 執行存儲過程 /// </summary> /// <param name="storedProcName">過程名</param> /// <param name="parameters">參數</param> /// <param name="tableName">表名</param> /// <returns></returns> public DataSet ExecuteProcName(string storedProcName, string tableName) { using (OracleDataAdapter adapter = new OracleDataAdapter()) { DataSet ds = new DataSet(); adapter.SelectCommand = BuildQueryCommand(storedProcName); adapter.Fill(ds, tableName); command.Parameters.Clear(); return ds; } }
另外，這個是游標的使用方法：
CREATE OR REPLACE PROCEDURE PR_MOD_BASE IS cursor c_base IS SELECT MIN(INVENTORY_DATE) IDATE,KUNNR,MATNR FROM STOCK_BASE_DATA GROUP BY TO_CHAR(INVENTORY_DATE,'yyyy-MM-dd'), KUNNR,MATNR HAVING count(*) > 1; c_row c_base%rowtype; BEGIN FOR c_row in c_base loop DELETE FROM STOCK_BASE_DATA WHERE INVENTORY_DATE = c_row.IDATE and KUNNR = c_row.KUNNR and MATNR = c_row.MATNR; end loop; COMMIT; END;
CREATE OR REPLACE PROCEDURE "KX_LIST_FROMSTORE_ADD_ITEM"(IN_ORDER_ID NVARCHAR2, OU_TEMP OUT SYS_REFCURSOR) IS /*訂單轉交貨的時候用來獲取訂單行項目帶到交貨單編輯界面的存儲過程*/ BEGIN OPEN OU_TEMP FOR SELECT DISTINCT A.DETAILID, A.ORDERID, A.PRODUCTID, PI2.BARCODE, PI1.PRODUCTNAME, PI1.PRODUCTCODE, PI1.SPEC, A.UNITID, UI.UNITNAME, SNUM(A.DETAILID, A.SEQ) AS QUANTITY, A.DISCOUNT, KX_GET_FORMATNUMBER(A.UNITPRICE) UNITPRICE, A.TAXRATE, CASE ORDERTYPE WHEN 'SH01' THEN DECODE(A.PRODUCTTYPE, 'TA01', KX_GET_FORMATNUMBER(A.PRODUCTMONEY), 0) ELSE KX_GET_FORMATNUMBER(A.PRODUCTMONEY) END AS PRODUCTMONEY, A.TAXMONEY, KX_GET_FORMATNUMBER(A.PAYABLEMONEY) PAYABLEMONEY, A.ISGIVEAWAY, A.DETAILID AS COLGUID, A.PARENTGUID, A.ORDERID AS VGBEL, A.SEQ AS VGPOS, A.ORDERID AS RELEVANCEORDER, A.MEMO, A.CHARG, O.STOREID, O.SERVICEP, O.MEMO AS ORDERMEMO, O.PAYTYPE, O.TOTALMONEY, KX_GET_FORMATNUMBER(PI2.SALEPRICE) AS INITUNITPRICE, A.SEQ, A.QUANTITY AS ORDERQUANTITY, (SELECT P.TEXTVALUE FROM DATAPARAMETER P WHERE P.CODE = A.PRODUCTTYPE AND P.PARAMETERTYPE = 'ProductType') AS PRODUCTTYPE, --KX_GET_DO_COUNT(a.PRODUCTID, a.UNITID, a.SURPLUSQUANTITY) as OutQuantity1, FUN_HASORDER(A.PRODUCTID, A.ORDERID, 'XXX', A.UNITID, A.SEQ) AS OUTQUANTITY FROM SALEORDERDETAIL A LEFT JOIN SALEORDER O ON A.ORDERID = O.ORDERID LEFT JOIN CUSTOMERINFO C ON C.CUSTOMERID = O.CUSTOMERID LEFT JOIN PRODUCTINFO PI1 ON A.PRODUCTID = PI1.PRODUCTID LEFT JOIN PRODUCTPRICE PI2 ON A.PRODUCTID = PI2.PRODUCTID AND PI2.UNITID = A.UNITID AND PI2.CUSTOMERTYPE2 = C.CUSTOMERTYPE2 LEFT JOIN UNITINFO UI ON A.UNITID = UI.UNITID WHERE A.ORDERID = IN_ORDER_ID AND A.CLOSEDESC = '00' AND A.STATUS <> 'C' ORDER BY A.SEQ ASC; KX_HISTORY_LOG(IN_ORDER_ID, '1', '訂單'||IN_ORDER_ID||'轉交貨', 'M'); END;