oracle存储过程loop循环 oracle存储过程循环执行SQL语句？

oracle存储过程循环执行SQL语句？

CREATE OR REPLACE PACKAGE BODY PKG_A_TESTPACKAGE IS

PROCEDURE PKG_A_TESTPROCEDURE(PRM_参数 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

-- 循环获取查询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 --存放查询结果，这里只针对单列的查询结果

-- 如果没有取到退出

EXIT WHEN CUR_SQL%NOTFOUND

END LOOP

CLOSE CUR_SQL

END

END LOOP

EXCEPTION

WHEN OTHERS THEN

PRM_返回值 := -1

PRM_错误信息 := "执行PKG_A_TESTPROCEDURE出错"

END PKG_A_TESTPROCEDURE

END PKG_A_TESTPACKAGE

按照你的思路写的，具体需要根据你自己实际需求修改扩充一下

如何在存储过程中使用Loop？

ascursor应该是ascursorw_namevarchar2这点应该声明数据类型的大小，如：varchar2(50)同时变量名最好不要和字段名同名。begindbms_output.put_line(w_name)end这儿可以不用写beginend直接写dbms_output.put_line(w_name)如：CREATEORREPLACEPROCEDURETEST_FORINLOOP()ASCURSORTEST_CURSORISSELECTW_NAMEFROMWORK_ORACLE_TESTV_NAMEWORK_ORACLE_TEST%RowtypeBEGINFORV_NAMEINTEST_CURSORLOOPDBMS_OUTPUT.PUT_LINE(V_NAME)ENDLOOPENDTESTFORINLOOP也可以：CREATEORREPLACEPROCEDURETEST_FORINLOOP()ASCURSORTEST_CURSORISSELECTW_NAMEFROMWORK_ORACLE_TESTV_NAMEVARCHAR2(50)BEGINFORV_NAMEINTEST_CURSORLOOPDBMS_OUTPUT.PUT_LINE(V_NAME)ENDLOOPENDTESTFORINLOOP

oracle存储过程loop字符串遍历？

declare x varchar2(20)v_length inty intv_str varchar2(1)begin x:="wqr3331412rr" select length(x) into v_length from dual y:=1 while y<=v_length loop select substr(x，y，1) into v_str from dual dbms_output.put_line(v_str) y:=y 1 end loopend

oracle存储过程loop循环 oracle存储过程while循环 oracle字符分割函数

版权声明：本文内容由互联网用户自发贡献，本站不承担相关法律责任.如有侵权/违法内容,本站将立刻删除。