CREATE OR REPLACE PROCEDURE p_test(
i_f001 IN VARCHAR2,
i_f002 IN VARCHAR2,
o_refcursor OUT SYS_REFCURSOR
)
AS
v_date VARCHAR2(8);
v_sql VARCHAR2(4000);
BEGIN
v_sql := 'INSERT INTO test1(f001,f002)VALUES(:i_f001,:i_f002)';
EXECUTE IMMEDIATE v_sql USING i_f001,i_f002;
COMMIT;
OPEN o_refcursor FOR
SELECT * FROM test1 t1 WHERE t1.f001 = i_f001;
END;
i_f001 IN VARCHAR2,
i_f002 IN VARCHAR2,
o_refcursor OUT SYS_REFCURSOR
)
AS
v_date VARCHAR2(8);
v_sql VARCHAR2(4000);
BEGIN
v_sql := 'INSERT INTO test1(f001,f002)VALUES(:i_f001,:i_f002)';
EXECUTE IMMEDIATE v_sql USING i_f001,i_f002;
COMMIT;
OPEN o_refcursor FOR
SELECT * FROM test1 t1 WHERE t1.f001 = i_f001;
END;
来自 “ ITPUB博客 ” ,链接:http://blog.itpub.net/24805255/viewspace-721219/,如需转载,请注明出处,否则将追究法律责任。
转载于:http://blog.itpub.net/24805255/viewspace-721219/