Oracle存储过程使用总结

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;

/// <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;