乙個儲存過程

create or replace package abc_zys is

procedure daily_census;

end abc_zys;

--建乙個包，包中有儲存過程daily_census。不涉及任何引數。

create or replace package body abc_zys is

procedure daily_census as
type t_cursor is ref cursor;
r t_cursor; ——建立動態游標
v_tablename varchar2(30) := 'abc_check_';
v_tablename2 varchar2(30) := 'abcre_check_';
isp_id number;
sum_a number;
sum_b number;
send_cmpp number;
send_cmpp_success number;
send_sgip number;
send_sgip_success number;
send_smgp number;
send_smgp_success number;
send_cmpp_95599 number;
send_cmpp_su95 number;
send_sgip_95599 number;
send_sgip_su95 number;
send_smgp_95599 number;
send_smgp_su95 number;
v_sql varchar2(4000);
v_content varchar2(4000);
v_sql2 varchar2(4000);
begin
v_tablename := v_tablename || to_char(sysdate - 1,'mmdd');
v_tablename2 := v_tablename2 || to_char(sysdate - 1,'mmdd');
v_sql := 'select isp_id,sum(a),sum(b) from (
select isp_id,sum(msg_count) a,sum(case when send_status=''01'' then msg_count else 0 end) b from '||v_tablename||' t group by isp_id union all
select isp_id,sum(msg_count),sum(case when send_status=''01'' then msg_count else 0 end) from abcre_log.'||v_tablename2||' t group by isp_id)
group by isp_id';
open r for v_sql; ——用游標遍歷上述sql語句
loop
fetch r
into isp_id, sum_a, sum_b;
exit when r%notfound;
case 
when isp_id=0 then 
send_cmpp:=sum_a;
send_cmpp_success:=sum_b;
when isp_id=1 then
send_sgip:=sum_a;
send_sgip_success:=sum_b;
when isp_id=3 then
send_smgp:=sum_a;
send_smgp_success:=sum_b;
when isp_id=7 then
send_smgp_95599:=sum_a;
send_smgp_su95:=sum_b;
when isp_id=8 then
send_sgip_95599:=sum_a;
send_sgip_su95:=sum_b;
end case;
end loop;
close r;
v_sql2:= 'select sum(msg_count) ,sum(case when send_status=''01'' then msg_count else 0 end) from abcmas_log.'||v_tablename2||' t' ; 
execute immediate v_sql2 into send_cmpp_95599,send_cmpp_su95; 
v_content:='您好,'||to_char(sysdate - 1,'mmdd')||'日 1069移動 總數 '||send_cmpp||'； 成功數 '||send_cmpp_success
||'；1069電信 總數: '||send_smgp||'； 成功數:'|| send_smgp_success||'; 1069聯通 總數: '||send_sgip||'；成功數: '
||send_sgip_success||'; 95599聯通 總數: '||send_sgip_95599||'；成功數: '||send_sgip_su95||'；95599電信 總數: '||
send_smgp_95599||'；成功數: '||send_sgip_su95||'.'||'95599移動（mas）總數: '||send_cmpp_95599||'；成功數: '||send_cmpp_su95||'.';
abc_job.writewaitdatato216('13621193249',v_content,0); 
end daily_census;
end abc_zys;

乙個儲存過程

首先是建立儲存過程.drop procedure if exists externalcalltocomplete delimiter create procedure externalcalltocomplete begin drop table if exists temp1 create ta...

乙個分頁儲存過程

page language c import namespace system.data import namespace system.data.sqlclient 訂單號 服務專案 預訂日期 操作人員 分配狀態 databinder.eval container.dataitem,offerid...

乙個分頁儲存過程

louje 分頁儲存過程 create procedure usp page pagesize int,頁大小 pageno int,頁號 tablename nvarchar 500 表名 keyword nvarchar 20 主鍵 fieldname nvarchar 2000 要顯示的欄位名...