USE [ibcs_baotou_true] GO /****** Object: StoredProcedure [dbo].[P_RP_BaoTouRemissionCountMonthBB] Script Date: 04/15/2011 10:43:46 ******/ SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO /*《減免匯總月報(bào)表》中“本月減免”中的歷史數(shù)據(jù)及“本年累計(jì)減免”中的數(shù)據(jù)應(yīng)該分為本年數(shù)據(jù)和本年前數(shù)據(jù)。 《減免明細(xì)表》中“減免歷史欠費(fèi)”也應(yīng)分為本年數(shù)據(jù)和本年前數(shù)據(jù)，目前的報(bào)表無(wú)法進(jìn)行和財(cái)務(wù)的對(duì)賬， 分開(kāi)的目的就是為了和財(cái)務(wù)進(jìn)行數(shù)據(jù)的核對(duì)*/ -- ============================================= -- Author: zhengqiao@shanghai3h.com -- Create date: <2009-12-3> -- Description: <包頭市供水總公司XXXX年XX月減免匯總月報(bào)表(T26)> --------Sample:EXEC P_RP_BaoTouRemissionCountMonthBB '201002','','','',1ALTER procedure [dbo].[P_RP_BaoTouRemissionCountMonthBB]( @countDate varchar(20),--查詢年月 @waterType varchar(20)='',--用水類別 @S_ST varchar(20)='',--站點(diǎn)，可復(fù)選用逗號(hào)隔開(kāi) @S_CID char(16)='',--用戶代碼 @flag int=1--分質(zhì)用水標(biāo)志位；0：分質(zhì)；1：非分質(zhì) ) as declare @sql varchar(3000)--臨時(shí)sql變量,@NowMonth varchar(20)--當(dāng)前賬務(wù)年月,@JianMianTableName varchar(50)--ZW_JianMiann表,@JianMianZBTableName varchar(50)--ZW_JianMian_ZB表,@BiaoKaxxTableName VARCHAR(50) -- 表卡信息表名,@s_BeginDate varchar(100)--減免日期開(kāi)始日期,@s_EndDate varchar(100)--減免日期結(jié)束日期,@condition varchar(1000)--拼接查詢條件,@countYear varchar(50),@countMonth varchar(50),@exChange int--標(biāo)志位 set @exChange=0 ------------------------------------------------------------ set @countYear=substring(convert(char(8),@countDate,112),1,4) --2011 set @countMonth=substring(convert(char(8),@countDate,112),5,2) --04-------得到賬務(wù)年月范圍--------- select @s_BeginDate=convert(varchar(10),D_KaiShiRQ,112),@s_EndDate=convert(varchar(10),D_JieShuRQ,112) from SYS_JieZhuanRZ where I_ZhangWuNY=@countDate -- print @s_BeginDate if @s_BeginDate is nullset @exChange=1--return 0 --獲取表名print @countDate select @JianMianTableName='ZW_JianMian' select @JianMianZBTableName='ZW_JianMian_ZB' select @BiaoKaxxTableName=dbo.F_GetTableName(@countDate,'KG_BiaoKaXX') print @JianMianTableName------判斷要用到的表中是否有不存在的IF(@JianMianTableName IS NULL)BEGINset @exChange=1--RETURN 0END -----查詢居民類別的簡(jiǎn)號(hào) create table #TMPJMJH (I_JH INT ,I_TJH int)insert into #TMPJMJHselect * from F_BaotouGetFenLeiJH(0) -----查詢企業(yè)類別的簡(jiǎn)號(hào) create table #TMPQYJH (I_JH INT,I_TJH int )insert into #TMPQYJHselect * from F_BaotouGetFenLeiJH(1)CREATE TABLE #TMPJMJH1 (I_JH INT,S_FeiLeiMC varchar(50)) insert into #TMPJMJH1 select I_JH,S_FeiLeiMC from (select * from JG_YongShuiFL where i_tiaojiah=(select max(i_tiaojiah) from jg_tiaojia )) JG_YongShuiFL declare @S_JH varchar(1000)--存放簡(jiǎn)號(hào)，用逗號(hào)隔開(kāi) declare @JH varchar(20)--存放游標(biāo)輪循的簡(jiǎn)號(hào)值 set @S_JH='' if @waterType<>''begindelete from #TMPJMJH1--清空表set @sql='SELECT distinct I_JH,S_FeiLeiMC FROM (select * from JG_YongShuiFL where i_tiaojiah=(select max(i_tiaojiah) from jg_tiaojia )) [JG_YongShuiFL] where i_ancestor IN (SELECT ID FROM (select * from JG_YongShuiFL where i_tiaojiah=(select max(i_tiaojiah) from jg_tiaojia )) JG_YongShuiFL WHERE I_ANCESTOR =0) AND S_FEILEIMC LIKE ''%'+@waterType+'%'' 'print @sql INSERT INTO #TMPJMJH1EXEC(@sql)---使用游標(biāo)讀取#TMPJMJH表中字段值declare JHCursor cursor for --聲明游標(biāo)select I_JH from #TMPJMJH1 open JHCursor --打開(kāi)游標(biāo)fetch next from JHCursor into @JH--使游標(biāo)指向第一行-- print @JHwhile @@FETCH_STATUS=0beginset @S_JH=@S_JH+@JH+','fetch next from JHCursor into @JH endclose JHCursor--關(guān)閉游標(biāo)deallocate JHCursor--釋放游標(biāo)占用的空間-- print @S_JHif @S_JH<>''set @S_JH=substring(@S_JH,1,len(@S_JH)-1)end----拼接查詢條件print '11111'set @condition=' and a.S_CaoZuoY=''100233'''if @S_ST<>'' and @S_ST<>'00'set @condition=@condition+' and a.S_ST in('+@S_ST+')'if @S_CID<>''set @condition=@condition+' and a.S_CID='''+@S_CID+''''if @waterType<>'' and @S_JH<>''set @condition=@condition+' and a.I_JH in('+@S_JH+')'select * into #biaoka from kg_biaokaxx where 1=2 set @sql=' select * from '+@BiaokaxxTableName+' where I_JiHuiYSJJFS>=0 ' insert into #biaoka exec(@sql)--定義報(bào)表臨時(shí)表1 本月臨時(shí)報(bào)表create table #NowMonth(I_JH int,WaterType varchar(50),--用水分類CountDate varchar(50),BasicFee numeric(12, 2),--基本水費(fèi)SecondFee numeric(12,2),--二級(jí)水費(fèi)OverstepPlanFee numeric(12,2),--超計(jì)劃水費(fèi)LateFee numeric(12,2),--滯納金SewageDisposeFee numeric(12,2),--污水處理費(fèi)TotalAmount numeric(12,2),--合計(jì)本月總額------------------------BasicFee1 numeric(12, 2),--歷史基本水費(fèi)SecondFee1 numeric(12,2),--歷史二級(jí)水費(fèi)OverstepPlanFee1 numeric(12,2),--歷史超計(jì)劃水費(fèi)LateFee1 numeric(12,2),--滯納金SewageDisposeFee1 numeric(12,2),--污水處理費(fèi)TotalAmount1 numeric(12,2),--合計(jì)歷史總額TotalCount numeric(12,2),--合計(jì)總額)--定義報(bào)表臨時(shí)表2 本年臨時(shí)報(bào)表create table #ThisYear(I_JH int,WaterType varchar(50),--用水分類TotalBasicFee numeric(12, 2),--基本水費(fèi)TotalSecondFee numeric(12,2),--二級(jí)水費(fèi)TotalOverstepPlanFee numeric(12,2),--超計(jì)劃水費(fèi)TotalLateFee numeric(12,2),--滯納金TotalSewageDisposeFee numeric(12,2),--污水處理費(fèi)YearTotalAmount numeric(12,2),--合計(jì)總額CountDate varchar(50),) print '33333' ------------分質(zhì)、非分質(zhì) declare @con varchar(100)if @flag=0set @con=' and c.I_BiaoZhongL=3'elseset @con=' and c.I_BiaoZhongL<>3'select * into #tmpJianMian from zw_jianmian where 1=2set @sql='select a.*from '+@JianMianTableName+' as a left join '+@BiaoKaxxTableName+' as c on a.s_cid=c.s_cidwhere (a.DL_CaoZuoRQ>='+@s_BeginDate+' and a.DL_CaoZuoRQ<='+@s_EndDate+') and n_je>0and a.I_ChuLi in(4,16) '+@con+@conditionprint @sqlinsert into #tmpJianMian exec(@sql)if @exChange=0begin----------------本月統(tǒng)計(jì)臨時(shí)表----------------------基本水費(fèi) create table #tmpBasicFee(I_JH int,N_ZongJinE numeric(18,2))set @sql='select b.I_JH,sum(b.N_ZongJinE) ''N_ZongJinE'' from #tmpJianMian as a left join '+@JianMianZBTableName+' as b on a.i_jianmianbh=b.i_jianmianbh where a.I_JLZT=0 and b.I_JLZT=0 and b.I_JieTiJB=0 and b.i_leixing=1and b.I_FeiYongDLBH=580 and (a.i_y*100+a.i_m)='+@countDate+'group by b.I_JH'insert into #tmpBasicFee exec(@sql)--二級(jí)水費(fèi) create table #tmpSecondFee(I_JH int,N_ZongJinE numeric(18,2))set @sql='select b.I_JH,sum(b.N_ZongJinE) ''N_ZongJinE'' from #tmpJianMian as a left join '+@JianMianZBTableName+' as b on a.i_jianmianbh=b.i_jianmianbh where a.I_JLZT=0 and b.I_JLZT=0 and b.I_JieTiJB>0 and a.s_cid not in (select s_cid from #biaoka)and b.I_FeiYongDLBH=580 and b.i_leixing=1 and (a.i_y*100+a.i_m)='+@countDate+'group by b.I_JH'--print @sqlinsert into #tmpSecondFee exec(@sql)--超計(jì)劃水費(fèi)create table #tmpOverstepPlanFee(I_JH int,N_ZongJinE numeric(18,2))set @sql='select b.I_JH,sum(b.N_ZongJinE) ''N_ZongJinE'' from #tmpJianMian as a left join '+@JianMianZBTableName+' as b on a.i_jianmianbh=b.i_jianmianbh where a.I_JLZT=0 and b.I_JLZT=0 and b.I_JieTiJB>0 and a.s_cid in (select s_cid from #biaoka)and b.I_FeiYongDLBH=580 and b.i_leixing=1 and (a.i_y*100+a.i_m)='+@countDate+'group by b.I_JH'--print @sqlinsert into #tmpOverstepPlanFee exec(@sql)-----滯納金--set @sql='select a.I_JH,sum(b.N_ZongJinE) ''N_ZongJinE'' into ##tmpLateFee from --#tmpJianMian as a --left join '+@JianMianZBTableName+' as b on --a.i_jianmianbh=b.i_jianmianbh --where a.I_JLZT=0 --and b.I_JLZT=0'+@condition+' --and (a.DL_CaoZuoRQ>='+@s_BeginDate+' and a.DL_CaoZuoRQ<='+@s_EndDate+') --and a.I_ChuLi in(4,16) --group by a.I_JH'----print @sql--exec(@sql)--污水處理費(fèi)create table #tmpSewageDisposeFee(I_JH int,N_ZongJinE numeric(18,2))set @sql='select b.I_JH,sum(isnull(N_ZongJinE,0)) as ''N_ZongJinE'' from #tmpJianMian as a left join '+@JianMianZBTableName+' as b on a.i_jianmianbh=b.i_jianmianbh where a.I_JLZT=0 and b.I_JLZT=0 and b.I_JieTiJB=0 and b.i_leixing=1and b.I_FeiYongDLBH=581 and (a.i_y*100+a.i_m)='+@countDate+' group by b.I_JH' --print @sqlinsert into #tmpSewageDisposeFee exec(@sql)------------------------------------select I_JH into #tmp3 from #tmpBasicFee --本月基本水費(fèi)select I_JH into #tmp4 from #tmpSecondFee --二級(jí)水費(fèi)select I_JH into #tmp5 from #tmpOverstepPlanFee --超計(jì)劃水費(fèi)select I_JH into #tmp6 from #tmpSewageDisposeFee --污水處理費(fèi)--------------本月水費(fèi)所有表-------------------------------- create table #first(i_jh int,s_feileimc varchar(64),BasicCost numeric(18,2),SecondLevelCost numeric(18,2),OverPlanCost numeric(18,2),LateFeeCost numeric(18,2),SlopsCost numeric(18,2),AllCost numeric(18,2), YM varchar(16))--------------合并本月水費(fèi)所有表-----------------insert into #firstselect T.I_JH,F.S_FeiLeiMC,isnull(A.N_ZongJinE,0) as 'BasicFee',isnull(B.N_ZongJinE,0) as 'SecondFee',isnull(C.N_ZongJinE,0) as 'OverstepPlanFee',0 as 'LateFee',isnull(D.N_ZongJinE,0) as 'SewageDisposeFee',isnull(A.N_ZongJinE,0)+isnull(B.N_ZongJinE,0)+isnull(C.N_ZongJinE,0)+isnull(D.N_ZongJinE,0)as 'TotalAmount',@countYear+'年'+@countMonth+'月' as CountDatefrom (select I_JH from #tmp3 union select I_JH from #tmp4 union select I_JH from #tmp5 union select I_JH from #tmp6) Tleft join #tmpBasicFee A on T.I_JH=A.I_JHleft join #tmpSecondFee B on T.I_JH=B.I_JHleft join #tmpOverstepPlanFee C on T.I_JH=C.I_JHleft join #tmpSewageDisposeFee D on T.I_JH=D.I_JH --left join ##tmpLateFee E on T.I_JH=E.I_JH left join #TMPJMJH1 F on T.I_JH=F.I_JHend -----------------------------------------------------------------------------------------------------------------------------------------------------減免歷史基本水費(fèi)、減免污水處理費(fèi)--------- create table #lsBasicSlops(I_JH int,BasicCost numeric(18,2)) SET @SQL='SELECT t.* FROM( SELECT b.I_JH,SUM(b.N_ZongJinE) AS BasicCost FROM #tmpJianMian AS a LEFT JOIN '+@JianMianZBTableName+' AS b ON a.i_jianmianbh=b.i_jianmianbh WHERE a.I_JLZT=0 and b.I_JLZT=0 AND b.I_FeiYongDLBH=580 AND b.I_JIETIJB=0 and b.i_leixing=1and (a.i_y*100+a.i_m)<'+@countDate+' GROUP BY b.I_JH) t' print @sql insert into #lsBasicSlops EXEC(@SQL) --污水費(fèi) create table #lsSlops(I_JH int,SlopsCost numeric(18,2)) SET @SQL='SELECT t1.*FROM ( SELECT b.I_JH,SUM(b.N_ZongJinE) AS SlopsCost FROM #tmpJianMian AS a LEFT JOIN '+@JianMianZBTableName+' AS b ON a.i_jianmianbh=b.i_jianmianbh WHERE a.I_JLZT=0 and b.I_JLZT=0 AND b.I_FeiYongDLBH=581 AND b.I_JIETIJB=0 and b.i_leixing=1and (a.i_y*100+a.i_m)<'+@countDate+' GROUP BY b.I_JH ) t1' print @sql insert into #lsSlops EXEC(@SQL) ----------減免歷史二級(jí)水費(fèi)--------------------- create table #lsSecondLevel(I_JH int,SecondLevelCost numeric(18,2)) SET @SQL='SELECT b.I_JH,SUM(b.N_ZongJinE) AS SecondLevelCost FROM #tmpJianMian AS a LEFT JOIN '+@JianMianZBTableName+' AS b ON a.i_jianmianbh=b.i_jianmianbh WHERE a.I_JLZT=0 and b.I_JLZT=0 AND b.I_FeiYongDLBH=580 AND b.I_JIETIJB>0 and b.i_leixing=1and (a.i_y*100+a.i_m)<'+@countDate+' and a.s_cid not in (select s_cid from #biaoka)GROUP BY b.I_JH' insert into #lsSecondLevel EXEC(@SQL) ----------減免歷史超計(jì)劃水費(fèi)------------------- create table #lsOverPlan(I_JH int,OverPlanCost numeric(18,2)) SET @SQL='SELECT b.I_JH,SUM(b.N_ZongJinE) AS OverPlanCost FROM #tmpJianMian AS a LEFT JOIN '+@JianMianZBTableName+' AS b ON a.i_jianmianbh=b.i_jianmianbh WHERE a.I_JLZT=0 and b.I_JLZT=0 AND b.I_FeiYongDLBH=580 AND b.I_JIETIJB>0 and b.i_leixing=1and (a.i_y*100+a.i_m)<'+@countDate+' and a.s_cid in (select s_cid from #biaoka)GROUP BY b.I_JH' insert into #lsOverPlan EXEC(@SQL)--------------------創(chuàng)建歷史水費(fèi)所有表 create table #second(i_jh int,s_feileimc varchar(64),BasicCost numeric(18,2),SecondLevelCost numeric(18,2),OverPlanCost numeric(18,2),LateFeeCost numeric(18,2),SlopsCost numeric(18,2),AllCost numeric(18,2), YM varchar(16))-----------------合并歷史所有表------------------- select distinct i_jh into #lsjh from #lsBasicSlops union select i_jh from #lsSecondLevel union select i_jh from #lsOverPlan union select i_jh from #lsSlops insert into #second SELECT DISTINCT t.i_jh,S_FeiLeiMC ,isnull(a.BasicCost,0) as BasicCost ,isnull(b.SecondLevelCost,0) as SecondLevelCost ,isnull(c.OverPlanCost,0) as OverPlanCost ,0 AS LateFeeCost ,isnull(e.SlopsCost,0) as SlopsCost ,ISNULL(a.BasicCost,0)+ISNULL(e.SlopsCost,0)+ISNULL(b.SecondLevelCost,0)+ISNULL(c.OverPlanCost,0) AS AllCost , @countYear+'年'+@countMonth+'月' as CountDate FROM #lsjh AS t LEFT JOIN #lsBasicSlops AS a ON t.I_JH=a.I_JH LEFT JOIN #lsSecondLevel AS b ON t.I_JH=b.I_JH LEFT JOIN #lsOverPlan AS c ON t.I_JH=c.I_JH LEFT JOIN #lsSlops AS e ON t.I_JH=e.I_JH LEFT JOIN (select * from JG_YongShuiFL where i_tiaojiah=(select max(i_tiaojiah) from jg_tiaojia )) JG_YongShuiFL ON t.I_JH=JG_YongShuiFL.I_JH--#secon 歷史水費(fèi)所有表 #first本月水費(fèi)所有表 #NowMonth 本月臨時(shí)表（包含歷史和非歷史所有） #ThisYear 本年臨時(shí)表 不含歷史 ----------------------------------------------------------------------------------------------------------------------------------------------本月臨時(shí)統(tǒng)計(jì) select distinct i_jh,S_FeiLeiMC,YM into #he from #first union select i_jh,S_FeiLeiMC,YM from #secondinsert into #NowMonth select a.i_jh,a.S_FeiLeiMC,a.YM, isnull(b.BasicCost,0) as BasicCost , isnull(b.SecondLevelCost,0) as SecondLevelCost, isnull(b.OverPlanCost,0) as OverPlanCost, isnull(b.LateFeeCost,0) as LateFeeCost , isnull(b.SlopsCost,0) as SlopsCost, isnull(b.AllCost,0) as AllCost, --本月合計(jì)isnull(c.BasicCost,0) as BasicCost1, isnull(c.SecondLevelCost,0) as SecondLevelCost1,--歷史二級(jí)水費(fèi) isnull(c.OverPlanCost,0) as OverPlanCost1,--歷史超計(jì)劃水費(fèi) isnull(c.LateFeeCost,0) as LateFeeCost1, isnull(c.SlopsCost,0) as SlopsCost1, isnull(c.AllCost,0) as AllCost1, --本月歷史減免合計(jì)isnull(b.AllCost,0)+isnull(c.AllCost,0) as Allcount from #he as a left join #first as b on a.i_jh=b.i_jh left join #second as c on a.i_jh=c.i_jh---------------------本年統(tǒng)計(jì)臨時(shí)表------------------ declare @year varchar(10),--當(dāng)前時(shí)間的年份@m int,--月份循環(huán)變量@month int,--當(dāng)前時(shí)間的月份@tmpYearM varchar(50),--循環(huán)使用賬務(wù)年月@s_StartDate varchar(50),@I_EndDate varchar(50) set @year=convert(char(4),@countDate,112) set @month=cast(substring(convert(char(8),@countDate,112),5,2) as int) --獲取當(dāng)前輸入日期的月份 set @m=1 --print @month ------------------------------------------------- ---創(chuàng)建基本水費(fèi)臨時(shí)表 create table #tmpBasicFee1(I_JH int,N_ZongJinE numeric(12,2)) ---創(chuàng)建二級(jí)水費(fèi)臨時(shí)表 create table #tmpSecondFee1(I_JH int,N_ZongJinE numeric(12,2)) ---創(chuàng)建超計(jì)劃水費(fèi)臨時(shí)表 create table #tmpOverstepPlanFee1(I_JH int,N_ZongJinE numeric(12,2)) ---創(chuàng)建污水處理費(fèi)臨時(shí)表 create table #tmpSewageDisposeFee1(I_JH int,N_ZongJinE numeric(12,2)) ---創(chuàng)建滯納金臨時(shí)表 --create table #tmpLateFee1(I_JH int,N_ZongJinE numeric(12,2))----------減免歷史污水費(fèi) create table #ylsSlops(I_JH int,SlopsCost numeric(18,2)) ----------減免歷史基本水費(fèi) create table #ylsBasicSlops(I_JH int,BasicCost numeric(18,2)) ----------減免歷史二級(jí)水費(fèi) create table #ylsSecondLevel(I_JH int,SecondLevelCost numeric(18,2)) ----------減免歷史超計(jì)劃水費(fèi) create table #ylsOverPlan(I_JH int,OverPlanCost numeric(18,2))---while循環(huán)遍歷從1月到當(dāng)前月的各種費(fèi)用 while @m<=@month --Condition here must be int or some type inherits intbeginif len(@m)=1set @tmpYearM=@year+'0'+cast(@m as varchar(5))elseset @tmpYearM=@year+cast(@m as varchar(5))print @tmpYearM-------得到賬務(wù)年月范圍---------select @s_StartDate=convert(varchar(8),D_KaiShiRQ,112),@I_EndDate=convert(varchar(8),D_JieShuRQ,112)from SYS_JieZhuanRZ where I_ZhangWuNY=@tmpYearMprint @s_StartDate--if @s_StartDate is nullbeginset @m=@m+1print @mcontinue--重新開(kāi)始循環(huán)end--得到當(dāng)前賬務(wù)年月select @NowMonth=max(I_ZhangWuNY) from SYS_JieZhuanRZset @JianMianTableName='ZW_JianMian'set @JianMianZBTableName='ZW_JianMian_ZB' select @BiaoKaxxTableName=dbo.F_GetTableName(@tmpYearM,'KG_BiaoKaXX')delete from #tmpJianMianset @sql='select a.*from '+@JianMianTableName+' as a left join '+@BiaoKaxxTableName+' as c on a.s_cid=c.s_cidwhere (a.DL_CaoZuoRQ>='+@s_StartDate+' and a.DL_CaoZuoRQ<='+@I_EndDate+') and n_je>0and a.I_ChuLi in(4,16) and (a.i_y*100+a.i_m)<='+@tmpYearM+@con+@conditioninsert into #tmpJianMian exec(@sql)--delete from #biaokaset @sql='select * from '+@BiaokaxxTableName+' where I_JiHuiYSJJFS>=0 ' insert into #biaoka exec(@sql)---基本水費(fèi)set @sql='insert into #tmpBasicFee1 select b.I_JH,sum(b.N_ZongJinE) ''N_ZongJinE'' from #tmpJianMian as a left join '+@JianMianZBTableName+' as b on a.i_jianmianbh=b.i_jianmianbh where a.I_JLZT=0 and b.I_JLZT=0 and b.I_JieTiJB=0 and b.i_leixing=1 and b.I_FeiYongDLBH=580 group by b.I_JH'print @sqlexec(@sql) print @s_BeginDate--合計(jì)本年二級(jí)水費(fèi)set @sql='insert into #tmpSecondFee1 select b.I_JH,sum(b.N_ZongJinE) ''N_ZongJinE'' from #tmpJianMian as a left join '+@JianMianZBTableName+' as b on a.i_jianmianbh=b.i_jianmianbh where a.I_JLZT=0 and b.I_JLZT=0 and b.I_JieTiJB>0 and b.i_leixing=1 and a.s_cid not in (select s_cid from #biaoka)and b.I_FeiYongDLBH=580 group by b.I_JH' -- print @sqlexec(@sql)--合計(jì)超計(jì)劃水費(fèi)set @sql='insert into #tmpOverstepPlanFee1 select b.I_JH,sum(b.N_ZongJinE) ''N_ZongJinE'' from #tmpJianMian as a left join '+@JianMianZBTableName+' as b on a.i_jianmianbh=b.i_jianmianbh where a.I_JLZT=0 and b.I_JLZT=0 and b.I_JieTiJB>0 and b.i_leixing=1 and a.s_cid in (select s_cid from #biaoka)and b.I_FeiYongDLBH=580 group by b.I_JH' -- print @sqlexec(@sql) -- ---滯納金 -- set @sql='insert into #tmpLateFee1 -- select a.I_JH,sum(b.N_ZongJinE) ''N_ZongJinE'' from -- #tmpJianMian as a -- left join '+@JianMianZBTableName+' as b on -- a.i_jianmianbh=b.i_jianmianbh -- where a.I_JLZT=0 -- and b.I_JLZT=0'+@condition+' -- and (a.DL_CaoZuoRQ>='+@s_BeginDate+' and a.DL_CaoZuoRQ<='+@s_EndDate+') -- and a.I_ChuLi in(4,16) group by a.I_JH' ---- print @sql -- exec(@sql)--合計(jì)污水處理費(fèi)set @sql='insert into #tmpSewageDisposeFee1 select b.I_JH,sum(isnull(b.N_ZongJinE,0)) as ''N_ZongJinE'' from #tmpJianMian as a left join '+@JianMianZBTableName+' as b on a.i_jianmianbh=b.i_jianmianbh where a.I_JLZT=0 and b.I_JLZT=0 and b.I_JieTiJB=0 and b.i_leixing=1 and b.I_FeiYongDLBH=581 group by b.I_JH' -- print @sqlexec(@sql) ----------------------------------------------------------歷史減免--------------------------------------------------------SET @SQL='insert into #ylsBasicSlops SELECT t.* FROM( SELECT b.I_JH,SUM(b.N_ZongJinE) AS BasicCost FROM #tmpJianMian AS a LEFT JOIN '+@JianMianZBTableName+' AS b ON a.i_jianmianbh=b.i_jianmianbh WHERE a.I_JLZT=0 and b.I_JLZT=0 AND b.I_FeiYongDLBH=580 AND b.I_JIETIJB=0 and b.i_leixing=1 GROUP BY b.I_JH) t' EXEC(@SQL) print @sqlSET @SQL='insert into #ylsSlops SELECT t1.* FROM ( SELECT b.I_JH,SUM(b.N_ZongJinE) AS SlopsCost FROM #tmpJianMian AS a LEFT JOIN '+@JianMianZBTableName+' AS b ON a.i_jianmianbh=b.i_jianmianbh WHERE a.I_JLZT=0 and b.I_JLZT=0 AND b.I_FeiYongDLBH=581 AND b.I_JIETIJB=0 and b.i_leixing=1 GROUP BY b.I_JH ) t1' EXEC(@SQL) print @sqlSET @SQL='insert into #ylsSecondLevel SELECT b.I_JH,SUM(b.N_ZongJinE) AS SecondLevelCost FROM #tmpJianMian AS a LEFT JOIN '+@JianMianZBTableName+' AS b ON a.i_jianmianbh=b.i_jianmianbh WHERE a.I_JLZT=0 and b.I_JLZT=0 AND b.I_FeiYongDLBH=580 AND b.I_JIETIJB>0 and b.i_leixing=1 and a.s_cid not in (select s_cid from #biaoka)GROUP BY b.I_JH' EXEC(@SQL) print @sqlSET @SQL='insert into #ylsOverPlan SELECT b.I_JH,SUM(b.N_ZongJinE) AS OverPlanCost FROM #tmpJianMian AS a LEFT JOIN '+@JianMianZBTableName+' AS b ON a.i_jianmianbh=b.i_jianmianbh WHERE a.I_JLZT=0 and b.I_JLZT=0 AND b.I_FeiYongDLBH=580 AND b.I_JIETIJB>0 and b.i_leixing=1 and a.s_cid in (select s_cid from #biaoka) GROUP BY b.I_JH' EXEC(@SQL) print @sql --------------------------------------------------------結(jié)束歷史減免統(tǒng)計(jì)----------------------------------------------------------------------改變循環(huán)控制變量-----------set @m=@m+1 end --------------------創(chuàng)建歷史水費(fèi)所有表 create table #ysecond(i_jh int,--s_feileimc varchar(64),BasicCost numeric(18,2),SecondLevelCost numeric(18,2),OverPlanCost numeric(18,2),LateFeeCost numeric(18,2),SlopsCost numeric(18,2),AllCost numeric(18,2), YM varchar(16))-----------------合并歷史所有表------------------- select distinct i_jh into #ylsjh from #ylsBasicSlops union select i_jh from #ylsSecondLevel union select i_jh from #ylsOverPlan union select i_jh from #ylsSlops insert into #ysecond SELECT DISTINCT t.i_jh --,S_FeiLeiMC ,isnull(a.BasicCost,0) as BasicCost ,isnull(b.SecondLevelCost,0) as SecondLevelCost ,isnull(c.OverPlanCost,0) as OverPlanCost ,0 AS LateFeeCost ,isnull(e.SlopsCost,0) as SlopsCost ,ISNULL(a.BasicCost,0)+ISNULL(e.SlopsCost,0)+ISNULL(b.SecondLevelCost,0)+ISNULL(c.OverPlanCost,0) AS AllCost , @countYear+'年'+@countMonth+'月' as CountDate FROM #ylsjh AS t LEFT JOIN #ylsBasicSlops AS a ON t.I_JH=a.I_JH LEFT JOIN #ylsSecondLevel AS b ON t.I_JH=b.I_JH LEFT JOIN #ylsOverPlan AS c ON t.I_JH=c.I_JH LEFT JOIN #ylsSlops AS e ON t.I_JH=e.I_JH LEFT JOIN (select * from JG_YongShuiFL where i_tiaojiah=(select max(i_tiaojiah) from jg_tiaojia )) JG_YongShuiFL ON t.I_JH=JG_YongShuiFL.I_JH--創(chuàng)建臨時(shí)表 保存 #ysecond中部分內(nèi)容 create table #tmpsec( i_jh int,yBasicCost numeric(18,2),ySecondLevelCost numeric(18,2),yOverPlanCost numeric(18,2),yLateFeeCost numeric(18,2),ySlopsCost numeric(18,2))insert into #tmpsec select i_jh, sum(BasicCost),sum(SecondLevelCost),sum(OverPlanCost),sum(LateFeeCost),sum(SlopsCost) from #ysecond group by i_jh print 'ssssssss' ------------------------------------------------結(jié)束歷史所有表----------------------------------------------------------------select I_JH,sum(N_ZongJinE) 'N_ZongJinE' into #tmpBasic from #tmpBasicFee1 group by I_JHselect I_JH,sum(N_ZongJinE) 'N_ZongJinE' into #tmpSecond from #tmpSecondFee1 group by I_JHselect I_JH,sum(N_ZongJinE) 'N_ZongJinE' into #tmpOverstepPlan from #tmpOverstepPlanFee1 group by I_JHselect I_JH,sum(N_ZongJinE) 'N_ZongJinE' into #tmpSewageDispose from #tmpSewageDisposeFee1 group by I_JH-- select I_JH,sum(N_ZongJinE) 'N_ZongJinE' into #tmpLate -- from #tmpLateFee1 group by I_JHselect I_JH into #tmp31 from #tmpBasicselect I_JH into #tmp41 from #tmpSecondselect I_JH into #tmp51 from #tmpOverstepPlanselect I_JH into #tmp61 from #tmpSewageDispose -- select I_JH into #tmp71 from #tmpLate-----------------------年統(tǒng)計(jì)---------------------------insert into #ThisYearselect T.I_JH,F.S_FeiLeiMC,--用水分類isnull(A.N_ZongJinE,0) as 'TotalBasicFee', --基本水費(fèi)isnull(B.N_ZongJinE,0) as 'TotalSecondFee', --二級(jí)水費(fèi)isnull(C.N_ZongJinE,0) as 'TotalOverstepPlanFee',--超計(jì)劃水費(fèi)0 as 'TotalLateFee', ---滯納金isnull(D.N_ZongJinE,0) as 'TotalSewageDisposeFee',--污水處理費(fèi)isnull(A.N_ZongJinE,0)+isnull(B.N_ZongJinE,0)+isnull(C.N_ZongJinE,0)+isnull(D.N_ZongJinE,0) as 'YearTotalAmount', --本年合計(jì)減免@countYear+'年'+@countMonth+'月' as CountDatefrom (select I_JH from #tmp31 union select I_JH from #tmp41 union select I_JH from #tmp51 union select I_JH from #tmp61)Tleft join #tmpBasic A on T.I_JH=A.I_JHleft join #tmpSecond B on T.I_JH=B.I_JHleft join #tmpOverstepPlan C on T.I_JH=C.I_JHleft join #tmpSewageDispose D on T.I_JH=D.I_JH left join #TMPJMJH1 F on T.I_JH=F.I_JHleft join #ysecond G on T.I_JH=G.I_JH-- left join #tmpLate E on T.I_JH=E.I_JH----------------------------------------------select distinct i_jh,CountDate,WaterType into #jh from #NowMonth union select i_jh,CountDate,WaterType from #ThisYear--------------------------------------------------------------------------------------- if @exChange=0beginselect distinctf.s_feileimc as s_daleimc, --用戶類別t. CountDate, --統(tǒng)計(jì)年月t.WaterType, --用水類別isnull(a.BasicFee,0) 'BasicFee', --本月基本水費(fèi)isnull(a.SecondFee,0) 'SecondFee', --本月二級(jí)水費(fèi)isnull(a.OverstepPlanFee,0) 'OverstepPlanFee',--本月超計(jì)劃水費(fèi)isnull(a.LateFee,0) 'LateFee', --本月滯納金isnull(a.SewageDisposeFee,0) 'SewageDisposeFee', --本月污水處理費(fèi)isnull(a.TotalAmount,0) 'TotalAmount', --本月合計(jì)isnull(a.BasicFee1,0) 'BasicFee1', --歷史基本水費(fèi)isnull(a.SecondFee1,0) 'SecondFee1', --歷史二級(jí)水費(fèi)isnull(a.OverstepPlanFee1,0) 'OverstepPlanFee1',--歷史超計(jì)劃水費(fèi)isnull(a.LateFee1,0) 'LateFee1', --歷史滯納金isnull(a.SewageDisposeFee1,0) 'SewageDisposeFee1', --歷史污水處理費(fèi)isnull(a.TotalAmount1,0) 'TotalAmount1', --歷史合計(jì)isnull(a.TotalCount,0) as TotalCount, --減免合計(jì)b.TotalBasicFee, --基本水費(fèi)b.TotalSecondFee, --二級(jí)水費(fèi)b.TotalOverstepPlanFee, --超計(jì)劃水費(fèi)b.TotalLateFee, --滯納金b.TotalSewageDisposeFee, --污水處理費(fèi)------------c.yBasicCost, c.ySecondLevelCost,c.yOverPlanCost,c.yLateFeeCost,isnull(c.ySlopsCost,0) 'ySlopsCost',--0 as SlopsCost,--c.AllCost ,ISNULL(c.yBasicCost,0)+ISNULL(c.ySecondLevelCost,0)+ISNULL(c.yLateFeeCost,0)+ISNULL(c.yLateFeeCost,0)+ISNULL(c.ySlopsCost,0) AS AllCost,----------------------b.YearTotalAmount --合計(jì)from #jh as t left join #NowMonth as a on t.i_jh=a.i_jhleft join #ThisYear as b on t.I_JH=b.I_JHleft join #tmpsec as c on t.I_JH=c.I_JHleft JOIN (select * from JG_YongShuiFL where i_tiaojiah=(select max(i_tiaojiah) from jg_tiaojia )) JG_YongShuiFL ON t.I_JH= JG_YongShuiFL.I_JHleft join (select * from JG_YongShuiFL where i_tiaojiah=(select max(i_tiaojiah) from jg_tiaojia )) f on JG_YongShuiFL.I_ANCESTOR=f.IDend elsebeginselect distinct f.s_feileimc as s_daleimc ,b.WaterType,a.*,b.CountDate,b.TotalBasicFee,b.TotalSecondFee,b.TotalOverstepPlanFee,b.TotalLateFee,b.TotalSewageDisposeFee,----------------c.yBasicCost as 'yBasicCost',c.ySecondLevelCost as'ySecondLevelCost',c.yOverPlanCost as'yOverPlanCost',c.yLateFeeCost as 'yLateFeeCost',c.ySlopsCost as 'ySlopsCost',--0 as SlopsCost,--c.AllCost,ISNULL(c.yBasicCost,0)+ISNULL(c.ySecondLevelCost,0)+ISNULL(c.yLateFeeCost,0)+ISNULL(c.yLateFeeCost,0)+ISNULL(c.ySlopsCost,0) AS AllCost,b.YearTotalAmountfrom #NowMonth as a right join #ThisYear as b on a.I_JH=b.I_JH right join #tmpsec as c on b.I_JH=c.I_JHLEFT JOIN (select * from JG_YongShuiFL where i_tiaojiah=(select max(i_tiaojiah) from jg_tiaojia ))JG_YongShuiFL ON b.I_JH=JG_YongShuiFL.I_JHleft join (select * from JG_YongShuiFL where i_tiaojiah=(select max(i_tiaojiah) from jg_tiaojia )) f on JG_YongShuiFL.I_ANCESTOR=f.IDenddrop table #NowMonthdrop table #ThisYeardrop table #tmpJianMian

轉(zhuǎn)載于:https://www.cnblogs.com/zq281660880/archive/2011/04/15/2017272.html

總結(jié)

以上是生活随笔為你收集整理的做报表时用到的一个存储过程的全部?jī)?nèi)容，希望文章能夠幫你解決所遇到的問(wèn)題。

如果覺(jué)得生活随笔網(wǎng)站內(nèi)容還不錯(cuò)，歡迎將生活随笔推薦給好友。