oracle过程书写规范
ORACLE存储过程编码规范
1.1 变量规范
Ø 变量名全部采用小写，局部变量名使用“v_”开头，输入参数以“i_开头，输出参数以“o_”开头，输入输出参数用io_开头。所有输入参数必须显示声明
Ø 游标的命名：游标统一用后缀 “_cur” 命名
Ø 使用命名的常量以避免硬编码，使用常量包,常量统一用 cn_ 的前缀命名
Ø 当变量代表列时，使用%TYPE属性，当变量实际上表示数据库表的某列数据时，为避免数据库结构修改对变量的影响，应统一使用%TYPE属性对变量命名
Ø 使用%TYPE以标准化非数据库变量的声明
Ø 按照项目制定的文件组织划分包内容
Ø 包内的存储过程及函数的命名必须遵循CPIC制订的相关规范
Ø 外部查询的多行数据返回使用游标进行处理，通过传递游标变量的形式返回数据到外部接口,由外部程序自行FETCH数据。
Ø 打开游标前，必须显式检查游标的%ISOPEN属性。
Ø 使用FETCH语句后，要立即检查%NOTFOUND属性，以便正常终止游标FETCH循环。
Ø 无论PL/SQL程序是正常终止还是出错退出，都要关闭所有已打开的游标。在出错退出时，应该在其异常处理部分管理所有游标，这可以释放一部分的系统资源
Ø 尽可能使用显示游标，避免使用隐式游标。
Ø 在需要分割事务以使主事务的提交或者回滚独立于子事务的提交及回滚时，应使用自治事务
Ø 所有的存储过程均统一在结束处统一COMMIT或者ROLLBACK
Ø 按照业务逻辑实现功能模块的封装，将业务规则逻辑集中在更少量的、良好设计的、易于维护的函数或者过程中，不必在每条SQL语句或者每天PL/SQL程序中重复这些逻辑
Ø 基于单一数据表的增、删、改、查采用标准SP进行封装，不允许相同逻辑的处理出现在多个SP中
Ø 后台数据按照逻辑划分成多个SCHEMA，不同SCHEMA的数据不可互相访问
Ø 需要相互访问的表均存放在 ***的SCHEMA中，通过访问***中的接口表实现跨SCHEMA的数据访问
Ø 采用公共的API包完成后台日志数据记录。（API完成输出错误信息提示、记录错误信息内容到数据库表、系统级的错误代码及错误信息等）
Ø 后台日志的信息记录级别包括INFO、WARN、ERROR，其定义以及不同级别日志的采集标准如下：
n INFO－提示信息，供开发人员调试使用，由开发人员自行确定，主要是调试信息，程序运行中普通信息提示。
n WARN－警告信息，可能导致严重错误的警告信息
n ERROR－错误信息，导致系统运行错误的信息。
Ø 所有表操作的错误处理部分均应记录日志信息
Ø 凡是涉及到表操作(insert,update,select,delete)的sql语句,都必须进行错误捕捉,不能将错误带到后面的语句
Ø 从表中select数据的语句,应严格区分NO_DATA_FOUND 和 TOO_MANY_ROWS的错误,并将相应错误信息填入错误信息
Ø NO_DATA_FOUND 多数为查询条件问题导致无数据返回（用户级错误）
Ø TOO_MANY_ROWS 应该是数据表内数据异常导致（系统级错误）
Ø 所有存储过程(函数)的统一出口一律在存储过程的结束部分,不允许中间返回
Ø 在每一个异常处理部分，都要定义WHEN OTHER 子程序，以便捕获所有没有显示处理或其他类型的异常
Ø 所有程序中捕获到的错误,均转换成对应的errcode,errmsg,通过输出参数返回给调用者,所有存储过程（函数）结束前应统一捕获系统异常
Ø 在每个存储过程(函数)的入口处统一先将返回错误代码(errCode)设置为42,功能处理成功结束后再将错误代码(errCode)设置为0(成功),避免程序过程中因错误未能正确捕获,导致功能未能完成,而程序却成功返回的情况出现
Ø 所有的模块都有错误编码区间,原则上错误编码全局唯一
Ø 错误信息描述应准确，业务相关的错误应将输入数据拼接到错误信息中。
Ø 错误代码具体规范见《建行ODS项目ETL-2.1开发规范(公共).doc》
Ø PL/SQL语句的所有表名、字段名遵照数据字典的定义，系统保留字、内置函数名、PL/SQL保留字、关键字大写，用户声明的标识符小写。
Ø 对于子程序、触发器、包等带名的程序块，使用结束标识。
Ø 变量名小写，局部变量名使用“v_”开头，输入参数以“i_”开头，输出参数以“o_”开头，输入输出参数用io_开头。所有输入参数必须显示声明。
Ø 连接符OR、IN、AND、以及＝、<=、>=等前后加上一个空格。
Ø 对较为复杂的SQL语句加上注释，说明算法、功能。
Ø 注释风格：注释单独成行、放在语句前面。
n 应对不易理解的分支条件表达式加注释；
n 对重要的计算应说明其功能；
n 过长的函数实现，应将其语句按实现的功能分段加以概括性说明；
n 常量及变量注释时，应注释被保存值的含义(必须)，合法取值的范围
n 可采用单行/多行注释。（-- 或 方式）
Ø SQL语句的缩进风格
n 一行有多列，超过80个字符时，基于列对齐原则，采用下行缩进
n WHERE子句书写时，每个条件占一行，语句另起一行时，以保留字或者连接符开始，连接符右对齐。例如：
where f1 = 1
and f2 = 2
or f3 = 3
n INSERT语句，必须书写字段，字段可5个或6个一组。中间用TAB分开
Ø 多表连接时，使用表的别名来引用列。
Ø 供别的文件或函数调用的函数，绝不应使用全局变量交换数据；
Ø TAB 统一定义为4个空格，建议使用Ultraedit作为SQL书写工具
Ø 避免嵌套连接。例如：A = B AND B = C AND C = D
Ø WHERE条件中尽量减少使用常量比较，改用主机变量
Ø 系统可能选择基于规则的优化器，所以将结果集返回数据量小的表作为驱动表（FROM后边最后一个表）。
Ø 大量的排序操作影响系统性能，所以尽量减少ORDER BY和GROUP BY排序操作。 如必须使用排序操作，请遵循如下规则
n 排序尽量建立在有索引的列上。
n 如结果集不需唯一，使用UNION ALL代替UNION。
Ø 索引的使用
n 尽量避免对索引列进行计算。
n 尽量注意比较值与索引列数据类型的一致性。
n 对于复合索引，SQL语句必须使用主索引列
n 索引中，尽量避免使用NULL。
n 对于索引的比较，尽量避免使用!= 查询列和排序列与索引列次序保持一致
Ø 尽量避免相同语句由于书写格式的不同，而导致多次语法分析。
Ø 尽量使用共享的SQL语句。
Ø 查询的WHERE过滤原则，应使过滤记录数最多的条件放在最前面。
Ø 任何对列的操作都将导致表扫描，它包括数据库函数、计算表达式等等，查询时要尽可能将操作移至等号右边。
Ø IN、OR子句常会使用工作表，使索引失效；如果不产生大量重复值，可以考虑把子句拆开；拆开的子句中应该包含索引。
Ø 尽量少用嵌套查询。如必须，请用not exist代替not in子句。
|
错误 |
SELECT ...... FROM emp WHERE dept_no NOT IN ( SELECT dept_no FROM dept WHERE dept_cat='A'); |
|
正确 |
SELECT ...... FROM emp e WHERE NOT EXISTS ( SELECT 'X' FROM dept WHERE dept_no=e.dept_no AND dept_cat='A'); |
Ø 用多表连接代替EXISTS子句。
|
错误 |
SELECT ...... FROM emp WHERE EXISTS ( SELECT 'X' FROM dept WHERE dept_no=e.dept_no AND dept_cat='A'); |
|
正确 |
SELECT ...... FROM emp e,dept d WHERE e.dept_no=d.dept_no AND dept_cat='A'; |
Ø 少用DISTINCT，用EXISTS代替
|
错误 |
SELECT DISTINCT d.dept_code,d.dept_name FROM dept d ,emp e WHERE e.dept_code=d.dept_code; |
|
正确 |
SELECT dept_code,dept_name FROM dept d WHERE EXISTS ( SELECT 'X' FROM emp e WHERE e.dept_code=d.dept_code); |
Ø 使用UNION ALL、MINUS、INTERSECT提高性能
Ø 使用ROWID提高检索速度。对SELECT得到的单行记录，需进行DELETE、UPDATE操作时，使用ROWID将会使效率大大提高。
Ø 使用优化线索机制进行访问路径控制。
Ø 使用cursor时，显示光标优于隐式光标 。
一：
CREATE OR REPLACE PROCEDURE proc_batch
IS
interactionhour varchar(100);
upcdrname varchar(100);
part_hour varchar(100);
calendar date;
interactionday1 varchar(100);
interactionday varchar(100);
part_day varchar(100);
errmsg varchar(300);
BEGIN
calendar := sysdate-1/24;
part_hour :=to_char(sysdate-1/24,'hh24');
part_day :=to_char(sysdate-1,'dd');
interactionhour := 'interactionhour'||to_char(calendar,'yyyymm');
interactionday := 'interactionday'||to_char(calendar,'yyyymm');
interactionday1 := 'interactionday1'||to_char(calendar,'yyyymm');
upcdrname := 'upcdr'||to_char(calendar,'yymmdd');
proc_interactionhour (interactionhour,upcdrname ,part_hour ,calendar);
if to_char(sysdate,'hh24')='03' then
proc_interactionday (interactionhour ,interactionday ,interactionday1 ,part_day );
end if;
if to_char(sysdate,'hh24')='04' then
proc_interactiondayshow (interactionday1 ,interactionday );
end if;
insert into appmsg
values('成功执行proc_batch','proc_batch',sysdate);
commit;
EXCEPTION
WHEN OTHERS THEN
rollback;
errmsg:= substr(sqlerrm,1,300);
insert into appmsg
values ('没有成功执行proc_batch','proc_batch',sysdate);
commit;
END proc_batch;
/
二：CREATE OR REPLACE PROCEDURE proc_interactionday (interactionhour varchar,interactionday varchar,interactionday1 varchar,part_day varchar)
IS
sqltxt1 varchar(2000);
sqltxt2 varchar(2000);
cur_no number;
cur_val number;
errmsg varchar(300);
BEGIN
sqltxt1 :=' insert into '
|| interactionday
||' (rival_no,area_no,calendar) '
||' select distinct rival_no,area_no,substr(calendar,1,8) '
||' calendar from '
|| interactionhour
||' partition (part_'
|| part_day
||' ) '
||' where 1=1 '
||' and substr(rival_no,1,2)=''04'' ';
cur_no:=dbms_sql.open_cursor;
dbms_sql.parse(cur_no,sqltxt1,dbms_sql.native);
cur_val:=dbms_sql.execute(cur_no);
dbms_sql.close_cursor(cur_no);
sqltxt2 :=' insert into '
|| interactionday1
||' (rival_no,area_no,calendar) '
||' select distinct rival_no,area_no,substr(calendar,1,8) '
||' calendar from '
|| interactionhour
||' partition (part_'
|| part_day
||' ) '
||' where 1=1 '
||' and substr(rival_no,1,3) in (''130'',''131'',''132'',''133'',''134'' ) ';
cur_no:=dbms_sql.open_cursor;
dbms_sql.parse(cur_no,sqltxt2,dbms_sql.native);
cur_val:=dbms_sql.execute(cur_no);
dbms_sql.close_cursor(cur_no);
insert into appmsg
values('成功执行proc_interactionday','proc_interactionday',sysdate);
commit;
EXCEPTION
WHEN OTHERS THEN
rollback;
errmsg := substr(sqlerrm,1,300);
insert into appmsg
values('没有成功执行proc_interactionday,原因是:'||errmsg,'proc_interactionday',sysdate) ;
commit;
END proc_interactionday;
/
三：CREATE OR REPLACE PROCEDURE proc_interactiondayshow (interactionday1 varchar,interactionday varchar)
IS
sqltxt1 varchar(2000);
sqltxt2 varchar(2000);
sqltxt3 varchar(2000);
sqltxt4 varchar(2000);
cur_no number;
cur_val number;
errmsg varchar(300);
BEGIN
sqltxt1 :=' insert into '
||' interactioncodedayshow(supplier,code,tos,area_name,part_name,total,calendar) '
||' select b.supplier, b.code,b.tos,b.area_name,b.part_name,count(*) total,a.calendar '
||' from '
|| interactionday1
||' a, '
||'static_interactionno1 b '
||' where 1=1 '
||' and to_number(substr(a.rival_no,1,7))=b.code '
||' group by b.code,b.supplier,b.tos,b.area_name,b.part_name,a.calendar ';
cur_no:=dbms_sql.open_cursor;
dbms_sql.parse(cur_no,sqltxt1,dbms_sql.native);
cur_val:=dbms_sql.execute(cur_no);
dbms_sql.close_cursor(cur_no);
sqltxt2 :=' insert into '
||'interactioncodedayshow(supplier,area_name,part_name,tos,code,total,calendar)'
||' select c.supplier,c.area_name,c.part_name,c.tos,c.code,d.total,d.calendar '
||' from static_interactionno c, '
||' (select substr(rival_no,1,6) code,count(*) total,calendar '
||' from '
|| interactionday
||' group by substr(rival_no,1,6),calendar '
||' union all '
||' select substr(rival_no,1,7) code,count(*) total,calendar '
||' from '
|| interactionday
||' group by substr(rival_no,1,7),calendar '
||' union all '
||' select substr(rival_no,1,8) code,count(*) total,calendar '
||' from '
|| interactionday
||' group by substr(rival_no,1,8),calendar) d '
||' where c.area_no||c.code=d.code '
||' order by c.area_no ';
cur_no:=dbms_sql.open_cursor;
dbms_sql.parse(cur_no,sqltxt2,dbms_sql.native);
cur_val:=dbms_sql.execute(cur_no);
dbms_sql.close_cursor(cur_no);
sqltxt3 :='insert into'
||' interactionpartdayshow (supplier,area_name,part_name,tos, total,calendar )'
||' select supplier,area_name,part_name,tos,sum(total) total,calendar '
||'from'
||' interactioncodedayshow '
||' group by part_name,supplier,tos,calendar,area_name ';
cur_no:=dbms_sql.open_cursor;
dbms_sql.parse(cur_no,sqltxt3,dbms_sql.native);
cur_val:=dbms_sql.execute(cur_no);
dbms_sql.close_cursor(cur_no);
sqltxt4 :=' insert into'
||' interactionareadayshow (supplier,area_name,tos, total,calendar) '
||' select supplier,area_name,tos,sum(total) total,calendar '
||' from interactioncodedayshow '
||' group by supplier,tos,calendar,area_name ';
cur_no:=dbms_sql.open_cursor;
dbms_sql.parse(cur_no,sqltxt4,dbms_sql.native);
cur_val:=dbms_sql.execute(cur_no);
dbms_sql.close_cursor(cur_no);
insert into appmsg
values('成功执行proc_interactiondayshow','proc_interactiondayshow',sysdate);
commit;
EXCEPTION
WHEN OTHERS THEN
rollback;
errmsg := substr(sqlerrm,1,300);
insert into appmsg
values('没有成功执行proc_interactionday,原因是:'||errmsg,'proc_interactionday',sysdate) ;
commit;
END proc_interactiondayshow;
/
四：CREATE OR REPLACE PROCEDURE proc_interactionhour (interactionhour varchar,upcdrname varchar,part_hour varchar,calendar date)
IS
sqltxt varchar(20000);
cur_no number;
cur_val number;
errmsg varchar(300);
BEGIN
sqltxt :=' insert into '
||interactionhour
||' (rival_no,area_no,calendar) '
||' with '
||' ls1 as '
||' (select case '
||' when substr(trim(truncatedcaller),1,2)=''13'' and length(trim(truncatedcaller))=11 then trim(truncatedcaller) '
||' when substr(trim(truncatedcaller),1,3)=''153'' and length(trim(truncatedcaller))=11 then trim(truncatedcaller) '
||' when substr(trim(truncatedcaller),1,1) between 2 and 8 and length(trim(truncatedcaller))=7 then trim(truncatedcaller) '
||' else ''110'''
||' end rival_no,'
||' case '
||' when substr(trim(applix_no),1,2)=''13'' and length(trim(applix_no))=11 then trim(applix_no) '
||' when substr(trim(applix_no),1,3)=''153'' and length(trim(applix_no))=11 then trim(applix_no) '
||' when substr(trim(applix_no),1,1)=''0'' and length(trim(applix_no))=11 then trim(applix_no) '
||' when substr(trim(applix_no),1,2) between 2 and 8 and length(trim(applix_no))=7 then trim(applix_no) '
||' else ''110'''
||' end applix_no,sarea,darea,'
|| to_char(calendar,'yyyymmddhh24')
||' calendar from '
||upcdrname
||' partition (part_'
||part_hour
||') cdr '
||' where 1=1'
||' and exists (select ''x'' from static_interactionname s where cdr.opc=s.xpc and netname<>''移动'')'
||' and exists (select ''x'' from static_interactionname s where cdr.dpc=s.xpc and netname=''移动'')'
||' and cf between 132 and 139 '
||' ), '
||' ls2 as '
||' (select case '
||' when substr(trim(truncatedcalled),1,2)=''13'' and length(trim(truncatedcalled))=11 then trim(truncatedcalled) '
||' when substr(trim(truncatedcalled),1,3)=''153'' and length(trim(truncatedcalled))=11 then trim(truncatedcalled) '
||' when substr(trim(truncatedcalled),1,1) between 2 and 8 and length(trim(truncatedcalled))=7 then trim(truncatedcalled) '
||' else ''110'''
||' end rival_no,'
||' case '
||' when substr(trim(applix_no),1,2)=''13'' and length(trim(applix_no))=11 then trim(applix_no) '
||' when substr(trim(applix_no),1,3)=''153'' and length(trim(applix_no))=11 then trim(applix_no) '
||' when substr(trim(applix_no),1,1)=''0'' and length(trim(applix_no))=11 then trim(applix_no) '
||' when substr(trim(applix_no),1,2) between 2 and 8 and length(trim(applix_no))=7 then trim(applix_no) '
||' else ''110'''
||' end applix_no,sarea,darea,'
|| to_char(calendar,'yyyymmddhh24')
||' calendar from '
||upcdrname
||' partition (part_'
||part_hour
||' ) cdr '
||' where 1=1 '
||' and exists (select ''xpc'' from static_interactionname s where cdr.dpc=s.xpc and netname<>''移动'') '
||' and exists (select ''xpc'' from static_interactionname s where cdr.opc=s.xpc and netname=''移动'')'
||' and cf between 132 and 139 '
||' ) '
||' select rival_no,sarea,calendar '
||' from ls1 '
||' where sarea between 431 and 439 '
||' union '
||' select applix_no,darea,calendar '
||' from ls1 '
||' where darea between 431 and 439 '
||' union '
||' select rival_no,darea,calendar '
||' from ls2 '
||' where darea between 431 and 439 '
||' union '
||' select applix_no,darea,calendar '
||' from ls2 '
||' where darea between 431 and 439 ';
cur_no:=dbms_sql.open_cursor;
dbms_sql.parse(cur_no,sqltxt,dbms_sql.native);
cur_val:=dbms_sql.execute(cur_no);
dbms_sql.close_cursor(cur_no);
commit;
insert into appmsg
values('成功执行proc_interactionhour','proc_interactionhour',sysdate);
commit;
EXCEPTION
WHEN OTHERS THEN
rollback;
errmsg := substr(sqlerrm,1,300);
insert into appmsg
values('没有成功执行proc_interactionhour,原因是:'||errmsg,'proc_interactionhour',sysdate) ;
commit;
END proc_interactionhour;
/
五：
CREATE OR REPLACE PROCEDURE proc_interactionhouryzg (interactionhour varchar,upcdrname varchar,part_hour varchar,calendar date)
IS
sqltxt varchar(20000);
cur_no number;
cur_val number;
errmsg varchar(300);
BEGIN
sqltxt :=' insert into '
||interactionhour
||' (rival_no,area_no,calendar) '
||' with '
||' ls1 as '
||' (select case '
||' when substr(trim(truncatedcaller),1,2)=''13'' and length(trim(truncatedcaller))=11 then trim(truncatedcaller) '
||' when substr(trim(truncatedcaller),1,3)=''153'' and length(trim(truncatedcaller))=11 then trim(truncatedcaller) '
||' when substr(trim(truncatedcaller),1,1) between 2 and 8 and length(trim(truncatedcaller))=7 then ''0''||sarea||trim(truncatedcaller) '
||' else ''110'''
||' end rival_no,'
||' case '
||' when substr(trim(applix_no),1,2)=''13'' and length(trim(applix_no))=11 then trim(applix_no) '
||' when substr(trim(applix_no),1,3)=''153'' and length(trim(applix_no))=11 then trim(applix_no) '
||' when substr(trim(applix_no),1,1)=''0'' and length(trim(applix_no))=11 then trim(applix_no) '
||' when substr(trim(applix_no),1,2) between 2 and 8 and length(trim(applix_no))=7 then ''0''||darea||trim(applix_no) '
||' else ''110'''
||' end applix_no,sarea,darea,'
|| to_char(calendar,'yyyymmddhh24')
||' calendar from '
||upcdrname
||' partition (part_'
||part_hour
||') cdr '
||' where 1=1'
||' and exists (select ''x'' from static_interactionname s where cdr.opc=s.xpc and netname<>''移动'')'
||' and exists (select ''x'' from static_interactionname s where cdr.dpc=s.xpc and netname=''移动'')'
||' and cf between 132 and 139 '
||' ), '
||' ls2 as '
||' (select case '
||' when substr(trim(truncatedcalled),1,2)=''13'' and length(trim(truncatedcalled))=11 then trim(truncatedcalled) '
||' when substr(trim(truncatedcalled),1,3)=''153'' and length(trim(truncatedcalled))=11 then trim(truncatedcalled) '
||' when substr(trim(truncatedcalled),1,1) between 2 and 8 and length(trim(truncatedcalled))=7 then ''0''||darea||trim(truncatedcalled) '
||' else ''110'''
||' end rival_no,'
||' case '
||' when substr(trim(applix_no),1,2)=''13'' and length(trim(applix_no))=11 then trim(applix_no) '
||' when substr(trim(applix_no),1,3)=''153'' and length(trim(applix_no))=11 then trim(applix_no) '
||' when substr(trim(applix_no),1,1)=''0'' and length(trim(applix_no))=11 then trim(applix_no) '
||' when substr(trim(applix_no),1,2) between 2 and 8 and length(trim(applix_no))=7 then ''0''||darea||trim(applix_no) '
||' else ''110'''
||' end applix_no,sarea,darea,'
|| to_char(calendar,'yyyymmddhh24')
||' calendar from '
||upcdrname
||' partition (part_'
||part_hour
||' ) cdr '
||' where 1=1 '
||' and exists (select ''xpc'' from static_interactionname s where cdr.dpc=s.xpc and netname<>''移动'') '
||' and exists (select ''xpc'' from static_interactionname s where cdr.opc=s.xpc and netname=''移动'')'
||' and cf between 132 and 139 '
||' ) '
||' select rival_no,sarea,calendar '
||' from ls1 '
||' where sarea between 431 and 439 '
||' union '
||' select applix_no,darea,calendar '
||' from ls1 '
||' where darea between 431 and 439 '
||' union '
||' select rival_no,darea,calendar '
||' from ls2 '
||' where darea between 431 and 439 '
||' union '
||' select applix_no,darea,calendar '
||' from ls2 '
||' where darea between 431 and 439 ';
cur_no:=dbms_sql.open_cursor;
dbms_sql.parse(cur_no,sqltxt,dbms_sql.native);
cur_val:=dbms_sql.execute(cur_no);
dbms_sql.close_cursor(cur_no);
commit;
insert into appmsg
values('成功执行proc_interactionhour','proc_interactionhour',sysdate);
commit;
EXCEPTION
WHEN OTHERS THEN
rollback;
errmsg := substr(sqlerrm,1,300);
insert into appmsg
values('没有成功执行proc_interactionhour,原因是:'||errmsg,'proc_interactionhour',sysdate) ;
commit;
END proc_interactionhouryzg;
/
六：
CREATE OR REPLACE PROCEDURE proc_text(interactionhour varchar,upcdrname varchar,part_hour varchar,calendar date)
IS
sqltxt varchar(2000);
cur_no number;
cur_val number;
errmsg varchar(300);
BEGIN
sqltxt :=' insert into '
|| interactionhour
||' (rival_no,area_no,calendar) '
||' with '
||' ls1 as '
||' ('
||' select '
||' case '
||' when substr(trim(truncatedcaller),1,2)=''13'' and length(trim(truncatedcaller))=11 then trim(truncatedcaller) '
||' when substr(trim(truncatedcaller),1,3)=''153'' and length(trim(truncatedcaller))=11 then trim(truncatedcaller) '
||' when substr(trim(truncatedcaller),1,1) between 2 and 8 and length(trim(truncatedcaller))=7 then trim(truncatedcaller) '
||' else ''8688888'' '
||' end rival_no, '
||' case '
||' when substr(trim(applix_no),1,2)=''13'' and length(trim(applix_no))=11 then trim(applix_no) '
||' when substr(trim(applix_no),1,3)=''153'' and length(trim(applix_no))=11 then trim(applix_no) '
||' when substr(trim(applix_no),1,2) between 2 and 8 and length(trim(applix_no))=7 then trim(applix_no) '
||' when substr(trim(applix_no),1,1)=''0'' and length(trim(applix_no))=11 then trim(applix_no) '
||' else ''8688888'' '
||' end applix_no,sarea,darea,''20060902'' '
|| to_char(calendar,'yyyymmddhh24')
||' calendar from '
|| upcdrname
||' partition (part_ '
|| part_hour
||' ) '
||' cdr '
||' where 1=1 '
||' and exists (select ''x'' from static_interactionname e where cdr.opc=e.xpc and netname<>''移动'') '
||' and exists (select ''x'' from static_interactionname e where cdr.dpc=e.xpc and netname=''移动'') '
||' and cf between 132 and 139), '
||' ls2 as '
||' (select case '
||' when substr(trim(truncatedcalled),1,2)=''13'' and length(trim(truncatedcalled))=11 then trim(truncatedcalled) '
||' when substr(trim(truncatedcalled),1,3)=''153'' and length(trim(truncatedcalled))=11 then trim(truncatedcalled) '
||' when substr(trim(truncatedcalled),1,1) between 2 and 8 and length(trim(truncatedcalled))=7 then trim(truncatedcalled) '
||' else ''8688888'' '
||' end rival_no, '
||' case '
||' when substr(trim(applix_no),1,2)=''13'' and length(trim(applix_no))=11 then trim(applix_no) '
||' when substr(trim(applix_no),1,3)=''153'' and length(trim(applix_no))=11 then trim(applix_no) '
||' when substr(trim(applix_no),1,2) between 2 and 8 and length(trim(applix_no))=7 then trim(applix_no) '
||' when substr(trim(applix_no),1,1)=''0'' and length(trim(applix_no))=11 then trim(applix_no) '
||' else ''8688888'' '
||' end applix_no,darea,''20060902'' '
|| to_char(calendar,'yyyymmddhh24')
||' calendar from '
|| upcdrname
||' partition (part_ '
|| part_hour
||' ) '
||' cdr '
||' where 1=1 '
||' and exists (select ''xpc'' from static_interactionname e where cdr.opc=e.xpc and netname=''移动'') '
||' and exists (select ''xpc'' from static_interactionname e where cdr.dpc=e.xpc and netname<>''移动'') '
||' and cf between 132 and 139) '
||' select rival_no,sarea,calendar '
||' from ls1 '
||' where 1=1 '
||' and sarea between 431 and 439 '
||' union '
||' select applix_no,darea,calendar '
||' from ls1 '
||' where 1=1 '
||' and darea between 431 and 439 '
||' union '
||' select rival_no,darea,calendar '
||' from ls2 '
||' where 1=1 '
||' and darea between 431 and 439 '
||' union '
||' select applix_no,darea,calendar '
||' from ls2 '
||' where 1=1 '
||' and darea between 431 and 439 ';
cur_no:=dbms_sql.open_cursor;
dbms_sql.parse(cur_no,sqltxt,dbms_sql.native);
cur_val:=dbms_sql.execute(cur_no);
dbms_sql.close_cursor(cur_no);
insert into appmsg
values('成功执行proc_test','proc_test',sysdate);
commit;
EXCEPTION
WHEN OTHERS THEN
rollback;
errmsg := substr(sqlerrm,1,300);
insert into appmsg
values('没有成功执行proc_test 原因是：'||errmsg,'proc_test',sysdate) ;
END proc_text;
/
oracle过程书写规范的更多相关文章
- 数据库DDL语句书写规范
数据库DDL语句书写规范 1.SQL语句编写说明编写SQL语句应遵循统一的规范,包括大小写.空格.换行.缩进等等,只有完全一样的SQL才能在数据库中共享,从而减少硬解析. 字段类型.长度:根据数据情况 ...
- 24、jQuery常用AJAX-API/Java调用MySQL / Oracle过程与函数
1)掌握jQuery常用AJAX-API 2)掌握Java调用MySQL / Oracle过程与函数 一)jQuery常用AJAX-API 目的:简化客户端与服务端进行局部刷新的异步通讯 (1)取 ...
- 孤荷凌寒自学python第十四天python代码的书写规范与条件语句及判断条件式
孤荷凌寒自学python第十四天python代码的书写规范与条件语句及判断条件式 (完整学习过程屏幕记录视频地址在文末,手写笔记在文末) 在我学习过的所有语言中,对VB系的语言比较喜欢,而对C系和J系 ...
- Shell脚本书写规范
在日常的运维工作中,Shell脚本肯定是必不可少的工作内容.为方便问题排查.脚本执行历史问题追踪.方便大家共同维护,从网上搜罗结合以往的经验教训拟定以下Bash脚本书写规范.欢迎各位同学指正或补充. ...
- CSS书写规范、命名规范、网易CSS框架NEC
网易CSS框架NEC:http://nec.netease.com/ NEC框架的CSS规范: CSS规范 - 分类方法 CSS规范 - 命名规则 CSS规范 - 代码格式 CSS规范 - 优化方案 ...
- html和css书写规范
HTML 规范 分离的标记.样式和脚本 结构.表现.行为分离 在可能情况下验证你的标记 使用编辑器验证你的标记是否正确,一般编辑器都自带有这个功能. 技术不支持的时候使用备胎,如canvas 编码格式 ...
- CSS书写规范
一.CSS书写顺序 1.位置属性(position,top,right,z-index,display,float等) 2.大小(width,height,padding,margin) 3.文字系列 ...
- 64位 SQL Server2008链接访问Oracle 过程汇总解决方法记录
64位 SQL Server2008链接访问Oracle 过程汇总解决方法记录 经过几天不停的网上找资料,实验,终于联通了. 环境:系统:win 2008 ,SqlServer2008 R2, 连接O ...
- 推荐大家使用的CSS书写规范、顺序
写了这么久的CSS,但大部分前端er都没有按照良好的CSS书写规范来写CSS代码,这样会影响代码的阅读体验,这里总结一个CSS书写规范.CSS书写顺序供大家参考,这些是参考了国外一些文章以及我的个人经 ...
随机推荐
- Ubuntu执行su后输入密码结果认证失败--解决办法:sudo passwd修改命令
- poj_2823 线段树
题目大意 给定一行数,共N个.有一个长度为K的窗口从左向右滑动,窗口中始终有K个数字,窗口每次滑动一个数字.求各个时刻窗口中的最大值和最小值. 题目分析 直接搜索,复杂度为O(n^2).本题可以看做是 ...
- 【BZOJ3416】Poi2013 Take-out 栈
[BZOJ3416]Poi2013 Take-out Description 小F喜欢玩一个消除游戏——take-out 保证k+1|n,保证输入数据有解这是一个单人游戏 游戏者的目标是消除初始时给定 ...
- 查看嵌入式设备的CPU频率
对于有多个核心的CPU,查看CPU 频率的方法是: cat /sys/devices/system/cpu/cpu0/cpufreq/cpuinfo_max_freq 上面的这个是查看核心0的cpu的 ...
- 解决Cell重绘导致 重复的问题
IOS在Cell上的优化令人觉得底层框架的成熟,可是有些情形却会造成不必要的麻烦, 当使用了 UITableViewCell *cell = [tableView dequeueReusableCel ...
- cmake The C compiler identification is unknown
本地安装有Visual Studio 2015 ,同时更新了update 3 执行上述报错 本地还安装Visual Studio 2017 使用cmake 没问题 分析: 在CMakeFiles/CM ...
- FW:主流RPC框架
主流RPC框架 2015年10月27日 zman RPC 介绍目前在互联网公司比较流行的开源的RPC框架. RPC框架比较 语言 协议 服务治理 社区 机构 Hessian 多语言 he ...
- 【推荐】CentOS安装Subversion-1.8.17+HTTP协议支持配置
注:以下所有操作均在CentOS 6.5 x86_64位系统下完成. 我们需要搭建一个自己的SVN服务器. 此外,搭建好的SVN服务器除了需要支持svn协议外,最好还需要支持HTTP协议和HTTPS协 ...
- android开发笔记（二）导入项目到eclipse和另一个项目
NND,eclipse里导入工程出现问题了,整了半天,来个这问题,无效工程描述,找了半天看.projec文件是否工程名对应,看androidManifest.XML换里面的代码版本号,我擦都无济于事. ...
- Java8 新特性之Lambda表达式
1. Lambda 表达式概述 Lambda 是一个匿名函数,我们可以把 Lambda 表达式理解为是一段可以传递的代码(将代码像数据一样进行传递); Lambda 表达式可以写出更简洁,更灵活的代码 ...