oracle存儲過程循環(huán)執(zhí)行SQL語句？CREATE OR REPLACE PACKAGE BODY PKG_A_TESTPACKAGE ISPROCEDURE PKG_A_TESTPROCEDURE

oracle存儲過程循環(huán)執(zhí)行SQL語句？

CREATE OR REPLACE PACKAGE BODY PKG_A_TESTPACKAGE IS

PROCEDURE PKG_A_TESTPROCEDURE(PRM_參數(shù) IN VARCHAR2，

PRM_返回值 OUT NUMBER，

PRM_錯誤信息 OUT VARCHAR2) IS

TYPE CURSOR_TYPE IS REF CURSOR

CUR_SQL CURSOR_TYPE

TYPE TYP_REC_INFO IS RECORD(

COLUMN VARCHAR2(1000))

LREC_INFO TYP_REC_INFO

BEGIN

PRM_返回值 := 0

-- 循環(huán)獲取查詢SQL

FOR REC_SQL IN (SELECT 查詢SQL FROM 存放SQL的表 WHERE 條件) LOOP

BEGIN

OPEN CUR_SQL FOR REC_SQL.查詢SQL

LOOP

-- 獲取查詢的信息

FETCH CUR_SQL

INTO LREC_INFO --存放查詢結(jié)果，這里只針對單列的查詢結(jié)果

-- 如果沒有取到退出

EXIT WHEN CUR_SQL%NOTFOUND

END LOOP

CLOSE CUR_SQL

END

END LOOP

EXCEPTION

WHEN OTHERS THEN

PRM_返回值 := -1

PRM_錯誤信息 := "執(zhí)行PKG_A_TESTPROCEDURE出錯"

END PKG_A_TESTPROCEDURE

END PKG_A_TESTPACKAGE

按照你的思路寫的，具體需要根據(jù)你自己實際需求修改擴充一下