Oracle存储过程、包、方法使用总结(推荐)
Oracle存储过程、包、方法使用总结，具体代码如示：
/**
*@author：zhengwei
*@date:2017-04-28
*@desc:存储过程用法总结
*/
CREATEORREPLACEPROCEDUREMYPROCEDURE(P_IDINVARCHAR,
P_STATUSOUTVARCHAR)--P_ID为输入参数,P_STATUS为输出参数
AS
---变量声明
T_STATUSVARCHAR2(20);
T_IDNUMBER;
V_POSTYPEVARCHAR2(20);
V_DESCRIPTIONVARCHAR2(20);
---对象变量定义和声明
TYPEXRECORDISRECORD(
FUNDVARCHAR2(50),
BATCH_NOVARCHAR2(50),
TRAN_AMTNUMBER,
END_BALNUMBER,
TRAN_DATEVARCHAR2(50),
TRAN_TIMEVARCHAR2(50),
SUB_WATERNUMBER);
XWATERXRECORD;
---游标声明，并填充数据
CURSORMY_CURIS
SELECTPOS_TYPE,DESCRIPTIONFROMVOTEMASTER;
BEGIN
---变量赋值(注意:in类型的参数不能直接赋值)
T_STATUS:='1';
P_STATUS:=T_STATUS;
DBMS_OUTPUT.put_line('P_STATUS:'||P_STATUS);
BEGIN
---循环游标，使用游标
FORV_ROWINMY_CURLOOP
BEGIN
V_POSTYPE:=V_ROW.POS_TYPE;
V_DESCRIPTION:=V_ROW.DESCRIPTION;
DBMS_OUTPUT.put_line('POSTYPE:'||V_POSTYPE||',description:'||
V_DESCRIPTION);
END;
ENDLOOP;
END;
---WHILE循环用法
BEGIN
WHILEi<10LOOP
BEGIN
i:=i+1;
END;
ENDLOOP;
END;
--将select查询的结果存入到变量中，可以同时将多个列存储多个变量中，必须有一条记录，否则抛出异常(如果没有记录抛出NO_DATA_FOUND)
BEGIN
SELECTcol1,col2INTO变量1,变量2FROMtypestructWHERExxx;
EXCEPTION
WHENNO_DATA_FOUNDTHEN
xxxx;
END;
---IF判断语句用法
BEGIN
SELECTVOTETITLE,VATESUM
INTOT_NAME,T_COUNT
FROMVOTEMASTER
WHEREID=P_ID;
IFT_COUNT<=0THEN
P_STATUS:=T_NAME||':差';
ELSIFT_COUNT>0ANDT_COUNT<3THEN
P_STATUS:=T_NAME||':良好';
ELSE
P_STATUS:=T_NAME||':优秀';
ENDIF;
END;
---对象变量赋值
BEGIN
SELECTFUND,
BATCH_NO,
TRAN_AMT,
END_BAL,
TRAN_DATE,
TRAN_TIME,
SUB_WATER
INTOXRECORD
FROMACCT_WATER
WHEREFUND=P_ID;
--对象变量的使用
DBMS_OUTPUT.put_line(XRECORD.BATCH_NO||XRECORD.FUND);
END;
---索引表
---我们在使用存储过程的时候经常需要处理记录集，也就是多条数据记录。分为单列多行和多列多行，这些类型都可以称为集合类型。索引表就是集合类型中的一种。
---索引表,也称为pl/sql表，不能存储于数据库中，元素的个数没有限制,下标可以为负值。
---使用场景：如果仅仅是在存储过程中当作集合变量使用，索引表是最好的选择。(也可以通过创建临时表替代，但就不那么科学了，而且后期还得维护临时表)
---索引表对象使用方案1:
BEGIN
---索引表对象声明、定义、使用
DECLARE
TYPEacct_table_typeISTABLEOFACCT%ROWTYPEINDEXBYBINARY_INTEGER;
---定义了一个索引表v_acct_table，其表中的每行记录是ACCT表中的一行记录
v_acct_tableacct_table_type;
BEGIN
SELECT*BULKCOLLECT---BULKCOLLECTINTO指是一个成批聚合类型,简单的来说,它可以存储一个多行多列存储类型
INTOv_acct_table
FROMACCT
WHEREacct_type='570'
ANDROWNUM<5;
FORiIN1..v_acct_table.COUNTLOOP
DBMS_OUTPUT.put_line('ACCT:'||v_acct_table(i).fund||','||v_acct_table(i).bal||','||v_acct_table(i)
.real_nmbr);
ENDLOOP;
END;
END;
---索引表对象使用方案2:
BEGIN
--例子：利用记录RECORD可用整体赋值的特性来填充PL/SQL表
DECLARE
TYPERECTYPEISRECORD(
FUNDACCT.FUND%TYPE,,---表示定义的变量的类型为表Acct的fund字段的同样数据类型
BALACCT.BAL%TYPE,
OWNERACCT.OWNER%TYPE,
REAL_NMBRVARCHAR(30));
---定义了一个索引表MYTAB，其表中的每行记录是RECORD
TYPETABTYPEISTABLEOFRECTYPEINDEXBYBINARY_INTEGER;
MYTABTABTYPE;
VNNUMBER;
BEGIN
--填充
VN:=1;
FORVARRIN(SELECTFUND,BAL,OWNER,REAL_NMBR
FROMACCT
WHEREROWNUM<=15
ORDERBYFUNDASC)LOOP
MYTAB(VN):=VARR;--记录整体赋值
VN:=VN+1;
ENDLOOP;
--访问
VN:=MYTAB.FIRST;
FORVARRINVN..MYTAB.COUNTLOOP
DBMS_OUTPUT.PUT_LINE(VN||''||MYTAB(VN).FUND||''||MYTAB(VN).BAL||
''||MYTAB(VN).OWNER||''||MYTAB(VN)
.REAL_NMBR);
VN:=MYTAB.NEXT(VN);
ENDLOOP;
END;
END;
以上所述是小编给大家介绍的Oracle存储过程、包、方法使用总结(推荐)，希望对大家有所帮助，如果大家有所疑问欢迎给我留言，小编会及时回复大家的！