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

末蓝、 2023-01-19 04:49 22阅读 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为输出参数

AS

-—变量声明

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;

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;

END;

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

总结

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

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

发表评论

表情:
评论列表 (有 0 条评论,22人围观)

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

相关阅读

    相关 oracle存储过程

    一、块 块是pl/sql组成的基本单元,本篇讲述存储过程,鉴于2者有很高的相似性,且是其中一种块,所以在此做一个简单的块讲述 1、块的结构 declar

    相关 Oracle 存储过程

    存储过程(Stored Procedure)是在大型[数据库系统][Link 1]中,一组为了完成特定功能的SQL 语句集,经编译后存储在数据库中,用户通过指定存储过程的名字并