CREATE PROCEDURE sp抄表 (@jsrq nvarchar(50)) AS
declare @dybh nvarchar(50),@bmc nvarchar(50),@scds money,@bcds money,@xd money,@cbzzrq nvarchar(50),@jfbz bit,@gq bit
declare @ycbbz bit,@bl float,@lc tinyint ,@bz nvarchar (50),@bh nvarchar (50),@fb nvarchar (50),@zdyl int,@zgyl int
declare mycunit cursor for select 单元编号,表名称,上次读数,本次读数,行度,抄表终止日期,计费标志,挂起,已抄表标志,倍率,量程,备注,编号,父表,最低用量,最高用量 from 单元表抄表 where 抄表终止日期='<当前抄表期间>'
declare mycpub cursor for select 表名称,上次读数,本次读数,行度,抄表终止日期,计费标志,挂起,已抄表标志,倍率,量程,备注 from 公用表抄表 where 抄表终止日期='<当前抄表期间>'
open mycunit
fetch next from mycunit into @dybh,@bmc,@scds,@bcds,@xd,@cbzzrq,@jfbz,@gq,@ycbbz,@bl,@lc,@bz,@bh,@fb,@zdyl,@zgyl
while @@fetch_status=0
begin
insert into 单元表抄表 (单元编号,表名称,上次读数,本次读数,行度,抄表终止日期,计费标志,挂起,已抄表标志,倍率,量程,备注,编号,父表,最低用量,最高用量)
values(@dybh,@bmc,@scds,@bcds,@xd,@jsrq,0,0,@ycbbz,@bl,@lc,@bz,@bh,@fb,@zdyl,@zgyl)
fetch next from mycunit into @dybh,@bmc,@scds,@bcds,@xd,@cbzzrq,@jfbz,@gq,@ycbbz,@bl,@lc,@bz,@bh,@fb,@zdyl,@zgyl
end
close mycunit
deallocate mycunit
open mycpub
fetch next from mycpub into @bmc,@scds,@bcds,@xd,@cbzzrq,@jfbz,@gq,@ycbbz,@bl,@lc,@bz
while @@fetch_status=0
begin
insert into 公用表抄表 (表名称,上次读数,本次读数,行度,抄表终止日期,计费标志,挂起,已抄表标志,倍率,量程,备注)
values(@bmc,@scds,@bcds,@xd,@jsrq,0,0,@ycbbz,@bl,@lc,@bz)
fetch next from mycpub into @bmc,@scds,@bcds,@xd,@cbzzrq,@jfbz,@gq,@ycbbz,@bl,@lc,@bz
end
close mycpub
deallocate mycpub
update 单元表抄表 set 上次读数=本次读数,行度=0 where 抄表终止日期='<当前抄表期间>'
update 公用表抄表 set 上次读数=本次读数,行度=0 where 抄表终止日期='<当前抄表期间>'
DB2
CREATE PROCEDURE sp抄表 (in jsrq nvarchar(50))
begin
declare dybh nvarchar(50);
declare bmc nvarchar(50);
declare scds money;
declare bcds money;
declare xd money;
declare cbzzrq nvarchar(50);
declare jfbz bit;
declare gq bit;
declare ycbbz bit;
declare bl float;
declare lc tinyint;
declare bz nvarchar(50);
declare bh nvarchar(50);
declare fb nvarchar(50);
declare zdyl int;
declare zgyl int;
declare rcount int;
declare i int;
declare mycunit cursor for select 单元编号,表名称,上次读数,本次读数,行度,抄表终止日期,计费标志,挂起,已抄表标志,倍率,量程,备注,编号,父表,最低用量,最高用量 from 单元表抄表 where 抄表终止日期='<当前抄表期间>';
declare mycpub cursor for select 表名称,上次读数,本次读数,行度,抄表终止日期,计费标志,挂起,已抄表标志,倍率,量程,备注 from 公用表抄表 where 抄表终止日期='<当前抄表期间>';
set i=1;
select count(*) into rcount from 单元表抄表 where 抄表终止日期='<当前抄表期间>';
open mycunit;
while i<=rcount do
insert into 单元表抄表 (单元编号,表名称,上次读数,本次读数,行度,抄表终止日期,计费标志,挂起,已抄表标志,倍率,量程,备注,编号,父表,最低用量,最高用量) values(dybh,bmc,scds,bcds,xd,jsrq,0,0,ycbbz,bl,lc,bz,bh,fb,zdyl,zgyl);
fetch mycunit into dybh,bmc,scds,bcds,xd,cbzzrq,jfbz,gq,ycbbz,bl,lc,bz,bh,fb,zdyl,zgyl;
set i=i+1;
end while;
close mycunit;
set i=1;
select count(*) into rcount from 公用表抄表 where 抄表终止日期='<当前抄表期间>';
open mycpub;
while i<=rcount do
insert into 公用表抄表 (表名称,上次读数,本次读数,行度,抄表终止日期,计费标志,挂起,已抄表标志,倍率,量程,备注) values(bmc,scds,bcds,xd,jsrq,0,0,ycbbz,bl,lc,bz);
fetch mycpub into bmc,scds,bcds,xd,cbzzrq,jfbz,gq,ycbbz,bl,lc,bz;
set i=i+1;
end while;
close mycpub;
update 单元表抄表 set 上次读数=本次读数,行度=0 where 抄表终止日期='<当前抄表期间>';
update 公用表抄表 set 上次读数=本次读数,行度=0 where 抄表终止日期='<当前抄表期间>';
end本文章为转载内容，我们尊重原作者对文章享有的著作权。如有内容错误或侵权问题，欢迎原作者联系我们进行内容更正或删除文章。
