oracle for循環(huán)查詢語(yǔ)句 oracle存儲(chǔ)過(guò)程循環(huán)執(zhí)行SQL語(yǔ)句？
oracle存儲(chǔ)過(guò)程循環(huán)執(zhí)行SQL語(yǔ)句？CREATE OR REPLACE PACKAGE BODY PKG_A_TESTPACKAGE ISPROCEDURE PKG_A_TESTPROCEDURE
oracle存儲(chǔ)過(guò)程循環(huán)執(zhí)行SQL語(yǔ)句？
CREATE OR REPLACE PACKAGE BODY PKG_A_TESTPACKAGE IS
PROCEDURE PKG_A_TESTPROCEDURE(PRM_參數(shù) IN VARCHAR2，
PRM_返回值 OUT NUMBER，
PRM_錯(cuò)誤信息 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é)果，這里只針對(duì)單列的查詢結(jié)果
-- 如果沒(méi)有取到退出
EXIT WHEN CUR_SQL%NOTFOUND
END LOOP
CLOSE CUR_SQL
END
END LOOP
EXCEPTION
WHEN OTHERS THEN
PRM_返回值 := -1
PRM_錯(cuò)誤信息 := "執(zhí)行PKG_A_TESTPROCEDURE出錯(cuò)"
END PKG_A_TESTPROCEDURE
END PKG_A_TESTPACKAGE
按照你的思路寫的，具體需要根據(jù)你自己實(shí)際需求修改擴(kuò)充一下