oracle存储过程推荐,Oracle存储过程、包、方法使用总结(推荐)

末蓝、 2023-01-19 04:49 1阅读 0赞

Oracle存储过程、包、方法使用总结，具体代码如示：

sql;">

/\*\*

\*@author：zhengwei

\*@date:2017-04-28

\*@desc:存储过程用法总结

\*/

CREATE OR REPLACE PROCEDURE MYPROCEDURE(P\_ID IN VARCHAR,P\_STATUS OUT VARCHAR) --P\_ID为输入参数,P\_STATUS为输出参数

\---变量声明

T\_STATUS VARCHAR2(20);

T\_ID NUMBER;

V\_POSTYPE VARCHAR2(20);

V\_DESCRIPTION VARCHAR2(20);

\---对象变量定义和声明

TYPE XRECORD IS RECORD(

FUND VARCHAR2(50),BATCH\_NO VARCHAR2(50),TRAN\_AMT NUMBER,END\_BAL NUMBER,TRAN\_DATE VARCHAR2(50),TRAN\_TIME VARCHAR2(50),SUB\_WATER NUMBER);

XWATER XRECORD;

\---游标声明，并填充数据

CURSOR MY\_CUR IS

SELECT POS\_TYPE,DESCRIPTION FROM VOTEMASTER;

BEGIN

\---变量赋值(注意:in类型的参数不能直接赋值)

T\_STATUS := '1';

P\_STATUS := T\_STATUS;

DBMS\_OUTPUT.put\_line('P\_STATUS:' || P\_STATUS);

BEGIN

\---循环游标，使用游标

FOR V\_ROW IN MY\_CUR LOOP

BEGIN

V\_POSTYPE := V\_ROW.POS\_TYPE;

V\_DESCRIPTION := V\_ROW.DESCRIPTION;

DBMS\_OUTPUT.put\_line('POSTYPE:' || V\_POSTYPE || ',description:' ||

V\_DESCRIPTION);

END;

END LOOP;

END;

\---WHILE循环用法

BEGIN

WHILE i < 10 LOOP

BEGIN

i := i + 1;

END;

END LOOP;

END;

\--将select查询的结果存入到变量中，可以同时将多个列存储多个变量中，必须有一条记录，否则抛出异常(如果没有记录抛出NO\_DATA\_FOUND)

BEGIN

SELECT col1,col2 INTO 变量1,变量2 FROM typestruct WHERE xxx;

EXCEPTION

WHEN NO\_DATA\_FOUND THEN

xxxx;

END;

\---IF判断语句用法

BEGIN

SELECT VOTETITLE,VATESUM

INTO T\_NAME,T\_COUNT

FROM VOTEMASTER

WHERE ID = P\_ID;

IF T\_COUNT <= 0 THEN

P\_STATUS := T\_NAME || ':差';

ELSIF T\_COUNT > 0 AND T\_COUNT < 3 THEN

P\_STATUS := T\_NAME || ':良好';

ELSE

P\_STATUS := T\_NAME || ':优秀';

END IF;

END;

\---对象变量赋值

BEGIN

SELECT FUND,BATCH\_NO,TRAN\_AMT,END\_BAL,TRAN\_DATE,TRAN\_TIME,SUB\_WATER

INTO XRECORD

FROM ACCT\_WATER

WHERE FUND = P\_ID;

\--对象变量的使用

DBMS\_OUTPUT.put\_line(XRECORD.BATCH\_NO || XRECORD.FUND);

END;

\---索引表

\---我们在使用存储过程的时候经常需要处理记录集，也就是多条数据记录。分为单列多行和多列多行，这些类型都可以称为集合类型。索引表就是集合类型中的一种。

\---索引表,也称为pl/sql表，不能存储于数据库中，元素的个数没有限制,下标可以为负值。

\---使用场景：如果仅仅是在存储过程中当作集合变量使用，索引表是最好的选择。(也可以通过创建临时表替代，但就不那么科学了，而且后期还得维护临时表)

\---索引表对象使用方案1:

BEGIN

\---索引表对象声明、定义、使用

DECLARE

TYPE acct\_table\_type IS TABLE OF ACCT%ROWTYPE INDEX BY BINARY\_INTEGER;

\---定义了一个索引表v\_acct\_table，其表中的每行记录是ACCT表中的一行记录

v\_acct\_table acct\_table\_type;

BEGIN

SELECT \* BULK COLLECT ---BULK COLLECT INTO指是一个成批聚合类型,简单的来说,它可以存储一个多行多列存储类型

INTO v\_acct\_table

FROM ACCT

WHERE acct\_type = '570'

AND ROWNUM < 5;

FOR i IN 1 .. v\_acct\_table.COUNT LOOP

DBMS\_OUTPUT.put\_line('ACCT:' || v\_acct\_table(i).fund || ',' || v\_acct\_table(i).bal || ',' || v\_acct\_table(i)

.real\_nmbr);

END LOOP;

END;

\---索引表对象使用方案2:

BEGIN

\--例子：利用记录RECORD可用整体赋值的特性来填充PL/sql表

DECLARE

TYPE RECTYPE IS RECORD(

FUND ACCT.FUND%TYPE,---表示定义的变量的类型为表Acct的fund字段的同样数据类型

BAL ACCT.BAL%TYPE,OWNER ACCT.OWNER%TYPE,REAL\_NMBR VARCHAR(30));

\---定义了一个索引表MYTAB，其表中的每行记录是RECORD

TYPE TABTYPE IS TABLE OF RECTYPE INDEX BY BINARY\_INTEGER;

MYTAB TABTYPE;

VN NUMBER;

BEGIN

\--填充

VN := 1;

FOR VARR IN (SELECT FUND,BAL,OWNER,REAL\_NMBR

FROM ACCT

WHERE ROWNUM <= 15

ORDER BY FUND ASC) LOOP

MYTAB(VN) := VARR; --记录整体赋值

VN := VN + 1;

END LOOP;

\--访问

VN := MYTAB.FIRST;

FOR VARR IN VN .. MYTAB.COUNT LOOP

DBMS\_OUTPUT.PUT\_LINE(VN || ' ' || MYTAB(VN).FUND || ' ' || MYTAB(VN).BAL ||

' ' || MYTAB(VN).OWNER || ' ' || MYTAB(VN)

.REAL\_NMBR);

VN := MYTAB.NEXT(VN);

END LOOP;

END;

以上所述是小编给大家介绍的Oracle存储过程、包、方法使用总结(推荐)，希望对大家有所帮助，如果大家有所疑问欢迎给我留言，小编会及时回复大家的！

总结

如果觉得编程之家网站内容还不错，欢迎将编程之家网站推荐给程序员好友。

本图文内容来源于网友网络收集整理提供，作为学习参考使用，版权属于原作者。

oracle存储过程推荐,Oracle存储过程、包、方法使用总结(推荐)

发表评论取消回复

还没有评论，来说两句吧...

相关阅读

相关 oracle存储过程----入门存储过程

相关为什么不推荐使用存储过程

相关 oracle存储过程推荐,Oracle存储过程、包、方法使用总结(推荐)

相关 Oracle存储过程

相关 oracle存储过程

相关 oracle 存储过程

相关 Oracle 存储过程

相关 oracle存储过程--包package

相关为什么不推荐使用存储过程？

相关 Oracle存储过程