CREATE  proc pCubeWorkDeptByDr
--declare
  @Dept varchar(10)=''  ,  --科室编号，默认为全部科室
 @sDate smallDatetime,
 @eDate smalldatetime,
 @Comp int=null , --检查单位
 @dr varchar(30)=''--收费类别
--set @dept=''
--set @sDate='2005-10-01'
--set @eDate='2006-02-01'
--set @Comp=null
as
 /*

   统计科室工作量

 */
set nocount on
 declare @v smalldatetime,
  @Sql varchar(1000),
  @ym varchar(50)
 create table #Tmp(
  CombId varchar(10) null,
  Total int null ,
  ToTalMoney numeric(18,2),
  ToTalMPercent numeric(5,2),
  CombPrice numeric(8,2),
  combuserid varchar(50))
 set @sql = ''
-- set @eDate=dateadd(m,3,@eDate)
 set  @v = @sDate
 while convert(varchar(6), @v, 112) <= convert(varchar(6), @eDate, 112)
 begin  
  set @ym = convert(varchar(4), @v, 12)
  if not Exists(select top 1 * from Sysobjects where type='U' and name='tregister'+@ym)
  begin
   set @v = dateadd(m, 1, @v)
   continue
  end
  set @sql = ' insert into #tmp(combId,total,ToTalMoney,combPrice,combuserid)
    select a.CombId,Count(*),sum(a.combPrice),a.combPrice,c.combuserid
   from tRegisterCombination'+@ym+' a
   left join tRegister'+@ym+' b on regid=CombRegId
   left join tCombinationMain C on a.combid=c.combid
   where a.CombCheckDate between '''+convert(varchar(10), @sDate, 120)+ '''  
    and '''+ convert(varchar(10), @edate, 120) + ''' '
  if @Comp is not null
   set @sql=@sql+' and isNull(RegCompId,0)='+cast(@Comp as varchar)
  if @dr<>''
   set @sql=@sql+' and c.combuserid='''+@dr+''''
  set @sql=@sql+' group by a.CombId ,combPrice,c.combuserid '
--print @SQL
  exec(@Sql)
  set @v = dateadd(m, 1, @v)
  end

 set @sql = ' insert into #tmp(combId,Total,ToTalMoney,combPrice,combuserid)
   select a.CombId,count(*),sum(a.combprice),a.combPrice,c.combuserid
  from tRegisterCombination a
  left join tRegister b on b.regid=a.CombRegId
  left join tCombinationMain C on a.combid=c.combid
  where a.CombCheckDate between '''+convert(varchar(10), @sDate, 120)+ '''  
   and '''+ convert(varchar(10), @edate, 120) + ''' '
  if @Comp is not null
   set @sql=@sql+' and isNull(RegCompId,0)='+cast(@Comp as varchar)
  if @dr<>''
   set @sql=@sql+' and c.combuserid='''+@dr+''''
  set @sql=@sql+' group by a.CombId ,combPrice,c.combuserid '
 exec(@sql) 
--print @SQL
declare @Total numeric(18,2)
select @Total=sum(ToTalMoney) from #tmp
update #tmp set ToTalMPercent=100*ToTalMoney/@Total
set @sql='
select DeptName, a.combid,CombName, total,ToTalMoney,ToTalMPercent,a.combuserid
from
 (select combuserid,combid,Sum(total) as total,sum(ToTalMoney) as ToTalMoney,sum(ToTalMPercent) as ToTalMPercent from #tmp a group by combuserid,combid)a
left join tcombinationMain b on a.combid=b.combid
left join tDepartment c on Combdeptid=deptid '
if isnull(@Dept,'')>'' set @sql=@sql+' where DeptId='''+@dept+''' '

set @sql=@sql+' order by c.DeptName,a.combuserid, b.CombName '
--print 'ddddd'
--print @sql
exec(@sql)
set noCount off
drop table #tmp

GO

 alTEr  proc pCubeWorkDeptByDfb
--declare
  @Dept varchar(10)=''  ,  --科室编号，默认为全部科室
 @sDate smallDatetime,
 @eDate smalldatetime,
 @Comp int=null , --检查单位
 @dfb varchar(30)='',--收费类别
 @flg tinyint=0,--查询所有登记人员还是已检查人员还是全部人员
 @RegTimes tinyint=0--批次

--set @dept=''
--set @sDate='2005-10-01'
--set @eDate='2006-02-01'
--set @Comp=null

as
 /*

   统计科室工作量

 */
set nocount on
 declare @v smalldatetime,
  @Sql varchar(1000),
  @ym varchar(50)
 create table #Tmp(
  CombId varchar(10) null,
  Total int null ,
  ToTalMoney numeric(18,2),
  ToTalMPercent numeric(5,2),
  CombPrice numeric(8,2),
  dfb varchar(50))
 set @sql = ''
-- set @eDate=dateadd(m,3,@eDate)
 set  @v = @sDate
 while convert(varchar(6), @v, 112) <= convert(varchar(6), @eDate, 112)
 begin  
  set @ym = convert(varchar(4), @v, 12)
  if not Exists(select top 1 * from Sysobjects where type='U' and name='tregister'+@ym)
  begin
   set @v = dateadd(m, 1, @v)
   continue
  end
  set @sql = ' insert into #tmp(combId,total,ToTalMoney,combPrice,dfb)
    select a.CombId,Count(*),sum(a.combPrice),a.combPrice,c.dfb
   from tRegisterCombination'+@ym+' a
   left join tRegister'+@ym+' b on regid=CombRegId
   left join tCombinationMain C on a.combid=c.combid
   where 1=1 '
    if @sDate<>null set @sql= @sql +' and a.CombCheckDate between '''+convert(varchar(10), @sDate, 120)+ '''  
    and '''+ convert(varchar(10), @edate, 120) + ''' '
  if @Comp is not null
   set @sql=@sql+' and isNull(RegCompId,0)='+cast(@Comp as varchar)
  if @dfb<>''
   set @sql=@sql+' and c.dfb='''+@dfb+''''

  set @sql=@sql+' group by a.CombId ,combPrice,c.dfb '
--print @SQL
  exec(@Sql)
  set @v = dateadd(m, 1, @v)
  end
  if @flg= 0
  begin
 set @sql = ' insert into #tmp(combId,Total,ToTalMoney,combPrice,dfb)
   select a.CombId,count(*),sum(a.combprice),a.combPrice,c.dfb
  from tRegisterCombination a
  left join tRegister b on b.regid=a.CombRegId
  left join tCombinationMain C on a.combid=c.combid
  where a.CombCheckDate between '''+convert(varchar(10), @sDate, 120)+ '''  
   and '''+ convert(varchar(10), @edate, 120) + ''' '
  if @Comp is not null
   set @sql=@sql+' and isNull(RegCompId,0)='+cast(@Comp as varchar)
  if @dfb<>''
   set @sql=@sql+' and c.dfb='''+@dfb+''''
  set @sql=@sql+' group by a.CombId ,combPrice,c.dfb '
  end else
  begin
 set @sql = ' insert into #tmp(combId,Total,ToTalMoney,combPrice,dfb)
   select a.CombId,count(*),sum(a.combprice),a.combPrice,c.dfb
  from tRegisterCombination a
  left join tRegister b on b.regid=a.CombRegId
  left join tCombinationMain C on a.combid=c.combid
  where a.CombCheckDate between '''+convert(varchar(10), @sDate, 120)+ '''  
   and '''+ convert(varchar(10), @edate, 120) + ''' '
  if @Comp is not null
   set @sql=@sql+' and isNull(RegCompId,0)='+cast(@Comp as varchar)
  if @dfb<>''
   set @sql=@sql+' and c.dfb='''+@dfb+''''
  set @sql=@sql+' group by a.CombId ,combPrice,c.dfb '
  end
 exec(@sql) 
--print @SQL
declare @Total numeric(18,2)
select @Total=sum(ToTalMoney) from #tmp
update #tmp set ToTalMPercent=100*ToTalMoney/@Total
set @sql='
select DeptName, a.combid,CombName, total,ToTalMoney,ToTalMPercent,a.dfb
from
 (select dfb,combid,Sum(total) as total,sum(ToTalMoney) as ToTalMoney,sum(ToTalMPercent) as ToTalMPercent from #tmp a group by dfb,combid)a
left join tcombinationMain b on a.combid=b.combid
left join tDepartment c on Combdeptid=deptid '
if isnull(@Dept,'')>'' set @sql=@sql+' where DeptId='''+@dept+''' '

set @sql=@sql+' order by c.DeptName,a.dfb, b.CombName '
--print 'ddddd'
--print @sql
exec(@sql)
set noCount off
drop table #tmp

GO

因为想放手的
还在心里拉扯
记忆像坐火车
轰然回到离别那一刻
没有心如刀割
不再依依不舍
只有沉默相隔
有种说不出来的快乐
都懂了
但谁也不爱了
都有了
却已不愿再付出了
都散了
还留恋什么呢
笑了哭了怨了爱了
我想应该可以了
从前你是怎么了
过去我又怎么了

因为爱是好的
所以恨是会的
当时亲爱的人
没想到会变得没什么
曾经我是你的
以为你是我的
爱的那么深刻
留下来的不够我写情歌
都懂了
但是也不爱了
都有了
却已不愿再付出了
都散了
还留恋什么呢
笑了哭了怨了爱了
我想应该可以了
从前你是怎么了
过去我又怎么了

那天的云是否都已料到

所以脚步才轻巧

以免打扰到

我们的时光

因为注定那么少

风吹着白云飘

你到哪里去了

想你的时候

哦

抬头微笑

知道不知道

我想没有人不寂寞
尤其夜深后
我听说爱情好温柔
它最能解渴
想伸出手

触摸一点什么
迷离扑朔

美丽灯火
好奇的眼眸

相互邂逅
探索

撩拨
我的梦

着了火
宿命的相逢
必然的结果
不许躲

不想躲

躲不过
你像一团火
狂妄地扑向我

毫无保留

任你这样不动声色
闯入我的梦
曾经很安分的念头
都蠢蠢欲动

无路退守
不如就爱个够
不计后果

一场大火
灵魂变赤裸
新的触动

渴求

寂寞
我的梦

着了火
忐忑又如何

憧憬又如何
无法说

无人说
说不透

我是一只蛾
注定要扑向火

毫无保留

……

   .....

   后来相处的日子总是很短，你常常因为工作不能陪在我身边。在你面前，我很少哭，很少流泪，我总是固执地以为，把我所有的快乐展现给你，就不会成为你工作的负担，你拥有的将是一份幸福完美的爱情。就算分别，就算流泪，我却常常拉着你的手，轻抚着你的脸，告诉你“不许哭”，你总是强忍着眼里的泪，不让它掉下来。

    这样的分别有过很多次，每次都是我送你离开。直到后来，你眼里再没有泪，我以为你终于长大了，学会了坚强，再不会流泪，再不会让我难过，然而我错了。

    直到那次最后的分别，你的眼睛里已是一片茫然。望着满脸泪水的我，你绝情地扭转身，匆匆地走了，站台上留下我一个人面对着凄冷的夜，感觉自己的泪水结了冰。

    后来我打过电话，也哭过，你说：“你哪来的那么多眼泪，别以为眼泪能证明什么，如果爱我，早该在每一次分别时留下我。把你最后的一滴泪给我吧，省得以后再去骗别人！”

    那一刻，我的世界终于塌陷了，白天我像机器一样地工作、生活，晚上，我彻夜地哭泣、失眠，想着过去你种种的好，想着过去对你种种的好。直到分手，我没有挽留你，我总是相信：爱你，就要给你自由，不能让你因为有爱，而失去什么，也不能因为自己的爱，把你留在身边，让你感觉不到幸福。

    现在，分手一年多了，想起你，我还是会哭，或许你还是以为我是在为爱情表演。而我自己清楚，在没有你的孤独岁月里，只有流过的泪证明我曾经爱过，也只有流过的泪，才懂得那种欲爱不能的痛楚，更只有流过的泪，让我始终相信爱情，有勇气在每一个太阳升起的日子努力地生活、努力地工作。

    常常在深夜，想你到哭肿了眼睛，却再没有打过一个电话给你。好想对你说声：“对不起！”眼泪是我唯一给你最多却不能全部给你的东西，最后一滴泪，我更是不能给你。因为我可以把全部的幸福给你，却不能失去爱和感动的能力；我可以把全部的快乐给你，却不能被你剥夺快乐的回忆；我可以把全部的痛楚留给自己，却不能失去想你的方式。

    对不起，最后一滴泪，我不能给你！