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存储过程、包、方法使用总结(推荐),希望对大家有所帮助,如果大家有所疑问欢迎给我留言,小编会及时回复大家的!