--对报表内容进行初始化
use scmis
go
if object_id("p_tj_new_report_create") is not null
drop proc p_tj_new_report_create
go
create procedure p_tj_new_report_create
@u_send_month smalldatetime,@u_table_code numeric(10),
@u_report_unit integer,@master_unit char(40),@u_filler char(10),
@u_run_status char(1),@u_lib_info char(1) output
--参数分别为统计月份、库表编号、报送单位、运行控制参数、库中数据情况
as
begin
/*************************定义变量********************/
declare
@u_rowcount numeric(5),--确定库中是否有数据
@u_report_type char(1),--对于同一数据库表而不同报表的区别
@u_year integer,--统计年度
@u_quarter int,--统计季度
@u_number numeric(5)--临时使用字段
begin
--确定库中情况
if @u_table_code = 102010 --线路情况统计
begin
if @u_run_status = 'a'
begin
select @u_rowcount = count(1) from TJ_CIRCUIT_TABLE
where YEAR_MONTH = @u_send_month
if @u_rowcount > 0
begin
select @u_lib_info = 'a'
return
end
end
else if @u_run_status = 'b'
begin
delete from TJ_CIRC_STAT_DETAIL where YEAR_MONTH = @u_send_month
delete from TJ_CIRCUIT_TABLE where YEAR_MONTH = @u_send_month
end
--创建主表内容
insert into TJ_CIRCUIT_TABLE(YEAR_MONTH,UNIT_CODE,FILLER,FILL_DATE)
values(@u_send_month,@u_report_unit,@u_filler,getdate())
select @u_rowcount = 1
while @u_rowcount < 7
begin
insert into TJ_CIRC_STAT_DETAIL(YEAR_MONTH,ROW_SEQU)
values(@u_send_month,@u_rowcount)
select @u_rowcount = @u_rowcount + 1
end
--对线路进行统计,与生计进行接口
-- exec p_tj_circuit_dev_sta
end
--确定库中情况
else if @u_table_code = 101040 --县局及供电站人员年报
begin
if @u_run_status = 'a'
begin
select @u_rowcount = count(1) from TJ_DEPT_LABOR_TABLE
where YEAR_MONTH = @u_send_month
if @u_rowcount > 0
begin
select @u_lib_info = 'a'
return
end
end
else if @u_run_status = 'b'
begin
delete from TJ_DEPT_LABOR_TABLE where YEAR_MONTH = @u_send_month
delete from TJ_DEPT_LABOR where YEAR_MONTH = @u_send_month
end
--创建主表内容
insert into TJ_DEPT_LABOR_TABLE(YEAR_MONTH,UNIT_CODE,FILLER,FILL_DATE)
values(@u_send_month,@u_report_unit,@u_filler,getdate())
select @u_rowcount = 1
while @u_rowcount < 18
begin
insert into TJ_DEPT_LABOR(YEAR_MONTH,UNIT_CODE,ROW_SEQU)
values(@u_send_month,1,@u_rowcount)
select @u_rowcount = @u_rowcount + 1
end
end
else if @u_table_code = 106010 --县局及供电站人员年报
begin
if @u_run_status = 'a'
begin
select @u_rowcount = count(1) from TJ_LINE_LOSS_TABLE
where YEAR_MONTH = @u_send_month
if @u_rowcount > 0
begin
select @u_lib_info = 'a'
return
end
end
else if @u_run_status = 'b'
begin
delete from TJ_LINE_LOSS_TABLE where YEAR_MONTH = @u_send_month
delete from TJ_LINE_LOSS where YEAR_MONTH = @u_send_month
end
--创建主表内容
insert into TJ_LINE_LOSS_TABLE(YEAR_MONTH,UNIT_CODE,FILLER,FILL_DATE)
values(@u_send_month,@u_report_unit,@u_filler,getdate())
select @u_rowcount = 1
while @u_rowcount < 18
begin
insert into TJ_LINE_LOSS(YEAR_MONTH,UNIT_CODE,ROW_SEQU)
values(@u_send_month,1,@u_rowcount)
select @u_rowcount = @u_rowcount + 1
end
end
else if @u_table_code = 111050 --县局及供电站人员年报
begin
if @u_run_status = 'a'
begin
select @u_rowcount = count(1) from TJ_LINE_LOSS_TABLE
where YEAR_MONTH = @u_send_month
if @u_rowcount > 0
begin
select @u_lib_info = 'a'
return
end
end
else if @u_run_status = 'b'
begin
delete from TJ_LINE_LOSS_TABLE where YEAR_MONTH = @u_send_month
delete from TJ_LINE_LOSS where YEAR_MONTH = @u_send_month
end
--创建主表内容
insert into TJ_LINE_LOSS_TABLE(YEAR_MONTH,UNIT_CODE,FILLER,FILL_DATE)
values(@u_send_month,@u_report_unit,@u_filler,getdate())
select @u_rowcount = 1
while @u_rowcount < 18
begin
insert into TJ_LINE_LOSS(YEAR_MONTH,UNIT_CODE,ROW_SEQU)
values(@u_send_month,1,@u_rowcount)
select @u_rowcount = @u_rowcount + 1
end
end
else if @u_table_code = 109020 --农村用电情况年报
begin
if @u_run_status = 'a'
begin
select @u_rowcount = count(1) from TJ_COUNTRY_USE_ELEC_TABLE
where YEAR_MONTH = @u_send_month
if @u_rowcount > 0
begin
select @u_lib_info = 'a'
return
end
end
else if @u_run_status = 'b'
begin
delete from TJ_COUNTRY_USE_ELEC_TABLE where YEAR_MONTH = @u_send_month
delete from TJ_COUNTRY_USE_ELEC where YEAR_MONTH = @u_send_month
end
--创建主表内容
insert into TJ_COUNTRY_USE_ELEC_TABLE(YEAR_MONTH,UNIT_CODE,FILLER,FILL_DATE)
values(@u_send_month,@u_report_unit,@u_filler,getdate())
select @u_rowcount = 1
while @u_rowcount < 18
begin
insert into TJ_COUNTRY_USE_ELEC(YEAR_MONTH,UNIT_CODE,ROW_SEQU)
values(@u_send_month,1,@u_rowcount)
select @u_rowcount = @u_rowcount + 1
end
end
else if @u_table_code = 109030 --农村经济效益年报
begin
if @u_run_status = 'a'
begin
select @u_rowcount = count(1) from TJ_COUNTRY_BENEFIT_TABLE
where YEAR_MONTH = @u_send_month
if @u_rowcount > 0
begin
select @u_lib_info = 'a'
return
end
end
else if @u_run_status = 'b'
begin
delete from TJ_COUNTRY_BENEFIT_TABLE where YEAR_MONTH = @u_send_month
delete from TJ_COUNTRY_BENEFIT where YEAR_MONTH = @u_send_month
end
--创建主表内容
insert into TJ_COUNTRY_BENEFIT_TABLE(YEAR_MONTH,UNIT_CODE,FILLER,FILL_DATE)
values(@u_send_month,@u_report_unit,@u_filler,getdate())
select @u_rowcount = 1
while @u_rowcount < 18
begin
insert into TJ_COUNTRY_BENEFIT(YEAR_MONTH,UNIT_CODE,ROW_SEQU)
values(@u_send_month,1,@u_rowcount)
select @u_rowcount = @u_rowcount + 1
end
end
else if @u_table_code = 109040 --农电技改情况年报
begin
if @u_run_status = 'a'
begin
select @u_rowcount = count(1) from TJ_COUNTRY_TECH_CHANGE_TABLE
where YEAR_MONTH = @u_send_month
if @u_rowcount > 0
begin
select @u_lib_info = 'a'
return
end
end
else if @u_run_status = 'b'
begin
delete from TJ_COUNTRY_TECH_CHANGE_TABLE where YEAR_MONTH = @u_send_month
delete from TJ_COUNTRY_TECH_CHANGE where YEAR_MONTH = @u_send_month
end
--创建主表内容
insert into TJ_COUNTRY_TECH_CHANGE_TABLE(YEAR_MONTH,UNIT_CODE,FILLER,FILL_DATE)
values(@u_send_month,@u_report_unit,@u_filler,getdate())
select @u_rowcount = 1
while @u_rowcount < 18
begin
insert into TJ_COUNTRY_TECH_CHANGE(YEAR_MONTH,UNIT_CODE,ROW_SEQU)
values(@u_send_month,1,@u_rowcount)
select @u_rowcount = @u_rowcount + 1
end
end
else if @u_table_code = 109050 --农电设备年报
begin
if @u_run_status = 'a'
begin
select @u_rowcount = count(1) from TJ_CO
没有合适的资源?快使用搜索试试~ 我知道了~
供电局MIS管理信息系统.rar
共1012个文件
dot:203个
sql:193个
txt:166个
1.该资源内容由用户上传,如若侵权请联系客服进行举报
2.虚拟产品一经售出概不退款(资源遇到问题,请及时私信上传者)
2.虚拟产品一经售出概不退款(资源遇到问题,请及时私信上传者)
版权申诉
0 下载量 70 浏览量
2022-04-18
10:21:03
上传
评论
收藏 48.67MB RAR 举报
温馨提示
PB源码
资源推荐
资源详情
资源评论
收起资源包目录
供电局MIS管理信息系统.rar (1012个子文件)
人事管理.apm 587KB
安全监察.apm 539KB
试验检修标准化库表.APM 262KB
生产技术标准化库表.APM 188KB
生技库表_非设备.APM 161KB
bonus.apm 76KB
Salary.apm 76KB
dp_other.APM 48KB
model1.apm 47KB
调度管理分系统需求分析.AVB 630KB
fengmian.bmp 1.37MB
page.bmp 1.37MB
GRGALLRY.BMP 48KB
LIGHTBLB.BMP 23KB
TESTDATA.BMP 6KB
ZOOMG.BMP 6KB
ZOOMB.BMP 6KB
VISORB.BMP 5KB
sy_detail.bmp 5KB
EXITB.BMP 4KB
SAVEB.BMP 4KB
NOG.BMP 4KB
INSERTG.BMP 4KB
YESG.BMP 4KB
YESB.BMP 4KB
NOB.BMP 4KB
EXITG.BMP 4KB
INSERTB.BMP 4KB
CANCEL.BMP 4KB
ODBC.BMP 3KB
YES.BMP 3KB
CLOCK.BMP 2KB
CREATEG.BMP 2KB
DELETEG.BMP 2KB
HELPG.BMP 2KB
MODIFYG.BMP 2KB
RETRUN2.BMP 2KB
ASKFORG.BMP 2KB
DELETEB.BMP 2KB
MODIFYB.BMP 2KB
STATIG.BMP 2KB
STATI2B.BMP 2KB
CLOSEB.BMP 2KB
HELPB.BMP 2KB
retrieveg.bmp 2KB
STATI2G.BMP 2KB
ASKFORB.BMP 2KB
ADDB.BMP 2KB
Printb.bmp 2KB
Printg.bmp 2KB
STATIB.BMP 2KB
ADDG.BMP 2KB
retrieveb.bmp 2KB
STATI.BMP 2KB
Excalmatory.bmp 1KB
east.bmp 1KB
PEAT16.BMP 1KB
WLD16.BMP 1KB
WLD8.BMP 1KB
WLD10.BMP 1KB
WLD5.BMP 1KB
WLD1.BMP 1KB
WLD13.BMP 1KB
WLD6.BMP 1KB
WLD3.BMP 1KB
WLD11.BMP 1KB
WLD4.BMP 1KB
WLD12.BMP 1KB
WLD9.BMP 1KB
WLD14.BMP 1KB
WLD15.BMP 1KB
WLD7.BMP 1KB
WLD2.BMP 1KB
QUEST.BMP 878B
STOP.BMP 878B
DELETE.BMP 630B
SAVE.BMP 630B
RETRIEVE.BMP 630B
FUNCKY.BMP 630B
EMP2.BMP 630B
NEW.BMP 630B
Carved Stone.bmp 582B
extfolder2.bmp 566B
extfolder4.bmp 566B
extfolder6.bmp 566B
extfolder0.bmp 566B
extfolder5.bmp 566B
extfolder3.bmp 502B
extfoldopen.BMP 502B
extfolder1.bmp 502B
PB_R_UP.BMP 358B
HELP.BMP 346B
DISKSAVE.BMP 346B
ARROWUP.BMP 346B
ARROWDN.BMP 346B
ARROWleft.BMP 346B
FOLDOPEN.BMP 334B
Printer.bmp 322B
PRINTMAN.BMP 322B
STATE1.BMP 246B
共 1012 条
- 1
- 2
- 3
- 4
- 5
- 6
- 11
资源评论
programyg
- 粉丝: 161
- 资源: 21万+
上传资源 快速赚钱
- 我的内容管理 展开
- 我的资源 快来上传第一个资源
- 我的收益 登录查看自己的收益
- 我的积分 登录查看自己的积分
- 我的C币 登录后查看C币余额
- 我的收藏
- 我的下载
- 下载帮助
安全验证
文档复制为VIP权益,开通VIP直接复制
信息提交成功