匿名块declare

【功能】
匿名块就像没有名称的存储过程一样，SQL语句在开发工具上，可以直接执行，但PL/SQL语句是不可以的，必须将要执行的PL/SQL语句，放置在begin与end之间，如果不建成存储过程，就要建成匿名块(即没有名称的执行脚本)，匿名块实现的功能和存储过程是一样的，只是将代码建成存储过程，系统会自动保存起来，而将代码建成匿名块，就不会自动保存。

vgopdw.vdw_number_segment ：号段表

【格式】
declare
声明部分
begin

exception
异常部分
end;

【示例】
begin
for i in 0…10 loop
dbms_output.put_line(‘你好’);
end loop;
end;

declare
v_str varchar2(30);
begin
v_str:=‘你好’;
for i in 0…10
dbms_output.put_line(v_str);
end loop;
end;

【注意事项】
1.如果不涉及变量或游标等的定义，可以省略declare部分，如果不涉及异常报错信息，可以省略exception部分，但begin与end是必须有的；

–
insert all
when 字段A=条件1 then into 目标表1
when 字段A=条件2 then into 目标表2
…
select 字段A from 源表;
commit;

declare
begin
for i in 0…2 loop
insert all
when substr(imei_serv_number,-4,1)=0 then
into tb_A001_0000001(imei,serv_number,cdr_type,use_cnt,last_4_no)
when substr(imei_serv_number,-4,1)=1 then
into tb_A001_0000002(imei,serv_number,cdr_type,use_cnt,last_4_no)
when substr(imei_serv_number,-4,1)=2 then
into tb_A001_0000003(imei,serv_number,cdr_type,use_cnt,last_4_no)
when substr(imei_serv_number,-4,1)=3 then
into tb_A001_0000004(imei,serv_number,cdr_type,use_cnt,last_4_no)
when substr(imei_serv_number,-4,1)=4 then
into tb_A001_0000005(imei,serv_number,cdr_type,use_cnt,last_4_no)
when substr(imei_serv_number,-4,1)=5 then
into tb_A001_0000006(imei,serv_number,cdr_type,use_cnt,last_4_no)
when substr(imei_serv_number,-4,1)=6 then
into tb_A001_0000007(imei,serv_number,cdr_type,use_cnt,last_4_no)
when substr(imei_serv_number,-4,1)=7 then
into tb_A001_0000008(imei,serv_number,cdr_type,use_cnt,last_4_no)
when substr(imei_serv_number,-4,1)=8 then
into tb_A001_0000009(imei,serv_number,cdr_type,use_cnt,last_4_no)
when substr(imei_serv_number,-4,1)=9 then
into tb_A001_0000010(imei,serv_number,cdr_type,use_cnt,last_4_no)
select imei_serv_number,serv_num,2,use_cnt,substr(imei_serv_number,-4,1)
from vgopdw.tdw_bass1_imei_info_fig_m
where statis_month = 201501
and last_2_num=i;
commit;
end loop;
end;