oracle存储过程写法 并行_Oracle常用存储过程写法

写在前面

这段时间工作最长接触到的就是Oracle数据库,不论查数据,还是统计、运行job,都离不开PL/SQL 存储过程,下面就整理下经常用到的知识。

一、Function函数

函数是执行非查询语句的方法。

创建返回list的function

CREATE OR REPLACE FUNCTION FNTOPWEEKESLIST (

ininttype IN INTEGER,

outcurlist OUT pkgrefcursor.refcursor

)

RETURN INTEGER

IS

Begin

OPEN outcurlist FOR

SELECT t.all, a.bookname

FROM tbbookestimatestats t, tbbook a

WHERE t.intype = ininttype

and t.bookid = a.bookid

and a.freetype = 0;

RETURN 0;

END;

创建带分页的返回list的function

CREATE OR REPLACE FUNCTION fn_source_pay_getlist(indtbegin DATE,

indtend DATE,

invarsourcename VARCHAR2,

inintpagesize IN INTEGER,

inintpageindex IN INTEGER,

outintRowCount out integer,

outcurlist OUT pkg_refcursor.ref_cursor)

RETURN INTEGER

as

begin

select count(1)

into outintRowCount

from tbcl_resu_payuser

where source = case

when length(invarsourcename) > 0 then

invarsourcename

else

source

end

and trunc(datetime) >= indtbegin

and trunc(datetime) < indtend;

open outcurlist for

select *

from (select a.*, row_number() over(order by a.datetime) rn

from (select source,

datetime,

payusercnt1,

payusercnt2,

payusercnt3,

payusercnt4

from tbcl_resu_payuser

where source = case

when length(invarsourcename) > 0 then

invarsourcename

else

source

end

and trunc(datetime) >= indtbegin

and trunc(datetime) < indtend

order by datetime) a)

where rn between inintpagesize * (inintpageindex - 1) + 1 and

inintpagesize * inintpageindex;

return 0;

end;

返回普通值的function

CREATE OR REPLACE FUNCTION FNACTIVEDAYSUSECNTGET (inintactivetype INTEGER,

inintuserid integer,

outintgetcnt out integer,--总抽奖次数

outintusercnt out integer)--用户抽奖次数

RETURN INTEGER

IS

获取活动当天领取次数

vcnt INTEGER;

BEGIN

SELECT NVL (MAX (cnt), 0)

INTO outintgetcnt

FROM tbactivestats

WHERE logtime = TRUNC (SYSDATE) AND activetype = inintactivetype;

SELECT count(1)

INTO outintusercnt

FROM tbuseractivegiftlog

WHERE userid = inintuserid AND activetype = inintactivetype;

RETURN 0;

END;

或者这样:

CREATE OR REPLACE FUNCTION FNUSERCOSTGET(invarptid IN varchar2,

inintbookid in integer)

RETURN integer

IS

vamount integer;

BEGIN

select nvl(max(amount), 0)

into vamount

from tbuserbookcost

where ptid = lower(invarptid)

and bookid = inintbookid;

return(vamount);

EXCEPTION

WHEN others THEN

return(0);

END;

二、Procedure过程

更新update

CREATE OR REPLACE PROCEDURE "ADDUPDATEBOOKLOG" (inintbookid IN INTEGER,

inintfreetype IN INTEGER,

outintresult OUT INTEGER) AS

/*

功能:插入一条记录

传入参数:bookid,freetype

输出参数:是否插入成功

*/

BEGIN

如果存在就更新记录

UPDATE tbupdatebooklog

SET createtime = SYSDATE, freetype = inintfreetype

WHERE bookid = inintbookid;

--如果不存在就插入记录

IF SQL%ROWCOUNT = 0 THEN

INSERT INTO tbupdatebooklog(bookid, createtime, freetype)

VALUES(inintbookid, SYSDATE, inintfreetype);

END IF;

COMMIT;

outintresult := 0;

EXCEPTION

WHEN OTHERS THEN

outintresult := 1;

ROLLBACK;

END AddUPdateBookLog;

或者:

CREATE OR REPLACE PROCEDURE PRBOOKSIGNSTATUSSET(inintBookId integer,

invarSignStatus varchar2,

outintresult out integer) is

begin

update tbbook t

set t\.signstatus = invarSignStatus

where bookId = inintBookId;

commit;

outintresult := 0;

end prbookSignStatusset;

插入insert

CREATE OR REPLACE PROCEDURE "PRBOOKTYPEUPDLOGINS" (

inintbookid IN INTEGER,

ininttypeid IN INTEGER,

invatypename IN varchar2,

outintresult OUT INTEGER

)

IS

vcnt INTEGER;

BEGIN

insert into tbbooktypeupdlog(bookid,updatetime,typeid,typename)

values (inintbookid,sysdate,ininttypeid,invartypename);

commit;

outintresult:=0;

END;

三、Package包

包是有包头和包体组成的一组具有共性的函数或者过程。

声明包

CREATE OR REPLACE PACKAGE PKGTEST is

TYPE refcursor IS REF CURSOR;

procedure add();

procedure update();

procedure get();

end pkgTEST;

定义包体

CREATE OR REPLACE PACKAGE BODY PKGTEST is

TYPE refcursor IS REF CURSOR;

procedure add() IS

BEGIN

...

END;

procedure update() IS

BEGIN

...

END;

procedure get() IS

BEGIN

...

END;

end pkgTEST;

已标记关键词 清除标记
表情包
插入表情
评论将由博主筛选后显示,对所有人可见 | 还能输入1000个字符
相关推荐
程序员的必经之路! 【限时优惠】 现在下单,还享四重好礼: 1、教学课件免费下载 2、课程案例代码免费下载 3、专属VIP学员群免费答疑 4、下单还送800元编程大礼包 【超实用课程内容】  根据《2019-2020年中国开发者调查报告》显示,超83%的开发者都在使用MySQL数据库。使用量大同时,掌握MySQL早已是运维、DBA的必备技能,甚至部分IT开发岗位也要求对数据库使用和原理有深入的了解和掌握。 学习编程,你可能会犹豫选择 C++ 还是 Java;入门数据科学,你可能会纠结于选择 Python 还是 R;但无论如何, MySQL 都是 IT 从业人员不可或缺的技能!   套餐中一共包含2门MySQL数据库必学的核心课程(共98课时)   课程1:《MySQL数据库从入门到实战应用》   课程2:《高性能MySQL实战课》   【哪些人适合学习这门课程?】  1)平时只接触了语言基础,并未学习任何数据库知识的人;  2)对MySQL掌握程度薄弱的人,课程可以让你更好发挥MySQL最佳性能; 3)想修炼更好的MySQL内功,工作中遇到高并发场景可以游刃有余; 4)被面试官打破沙锅问到底的问题问到怀疑人生的应聘者。 【课程主要讲哪些内容?】 课程一:《MySQL数据库从入门到实战应用》 主要从基础篇,SQL语言篇、MySQL进阶篇三个角度展开讲解,帮助大家更加高效的管理MySQL数据库。 课程二:《高性能MySQL实战课》主要从高可用篇、MySQL8.0新特性篇,性能优化篇,面试篇四个角度展开讲解,帮助大家发挥MySQL的最佳性能的优化方法,掌握如何处理海量业务数据和高并发请求 【你能收获到什么?】  1.基础再提高,针对MySQL核心知识点学透,用对; 2.能力再提高,日常工作中的代码换新貌,不怕问题; 3.面试再加分,巴不得面试官打破沙锅问到底,竞争力MAX。 【课程如何观看?】  1、登录CSDN学院 APP 在我的课程中进行学习; 2、移动端:CSDN 学院APP(注意不是CSDN APP哦)  本课程为录播课,课程永久有效观看时长 【资料开放】 课件、课程案例代码完全开放给你,你可以根据所学知识,自行修改、优化。  下载方式:电脑登录课程观看页面,点击右侧课件,可进行课程资料的打包下载。
©️2020 CSDN 皮肤主题: 1024 设计师:白松林 返回首页