mysql 存储过程 获取统计结果

CREATE  DEFINER  =   ' root ' @ ' % '   PROCEDURE  `proc_GetPatientCondition`(
         IN  iPatientId  INTEGER ( 11 ),
         IN  dStartDate DATE,
         IN  dEndDate DATE
    )
     NOT  DETERMINISTIC
     CONTAINS  SQL
    SQL SECURITY DEFINER
    COMMENT  ''
BEGIN
Declare  tempDate date;
Declare  tempDayBegin  varchar ( 9 );
Declare  tempNightBegin  varchar ( 9 );
Declare  tempDayTimes  int ;
Declare  tempNightTimes  int ;
Declare  tempFiledBRate  int ;
Declare  tempResultLevel  int ; /*  1,2,3,4 ,when 0 means no result  */
Declare  tempResultByFlag  int ;  /*  1-by day times per week , 2- by night times per month , 3- by FiledBrate  */
Declare  tempIsFinish  int ;
Declare  vSQL  varchar ( 2000 );
Declare  stmt  varchar ( 2100 );
Declare  tempStartDateWeekday  int ;
Declare  tempWeekIndex  int  ;

set  tempDayTimes  =   0 ;
set  tempNightTimes  =   0 ;
set  tempFiledBRate  =   0 ;
set  tempResultLevel  =   0 ;
set  tempResultByFlag  =   0 ;
set  tempIsFinish  =   0 ;

/*  get the day time begin  */
select  concat( '   ' ,ifnull(ParaValue, ' 07:00 ' ), ' :00 ' )  into  tempDayBegin  from  DBparameter
         where  ParaKey = ' DayTime ' ;

select  concat( '   ' ,ifnull(ParaValue, ' 20:00 ' ), ' :00 ' )  into  tempNightBegin  from  DBparameter
         where  ParaKey = ' NightTime ' ;

/*  define temp table to contains all report dates   */
Drop   TEMPORARY   TABLE   if   exists  temp_tb_dates;
Create   TEMPORARY   TABLE  temp_tb_dates
(reportDate date
,theWeek  varchar ( 7 )
,theMonth  varchar ( 7 ) 
);

Drop   TEMPORARY   TABLE   if   exists  temp_tb_diarySumm;
Create   TEMPORARY   TABLE  temp_tb_diarySumm
(reportDate date
,theWeek  varchar ( 7 )
,theMonth  varchar ( 7 ) 
,dayTimes  int
,nightTimes  int
,FiledBRate  int
);

set  tempDate  =  dStartDate;
set  tempStartDateWeekday  =  WEEKDAY(dStartDate);  /*  0-Monday  */
set  tempWeekIndex  =   1 ;
while  tempDate  <=  dEndDate do

     insert   into  temp_tb_dates(reportDate,theWeek,theMonth)
    VALUE(tempDate, tempWeekIndex ,date_format(tempDate, ' %Y-%m ' ) );
    
     if  tempStartDateWeekday  =   6   then
         set  tempStartDateWeekday  =   0 ;
         set  tempWeekIndex  =  tempWeekIndex  +   1 ;
     else
         set  tempStartDateWeekday  =  tempStartDateWeekday  +   1 ;
     end   if ;
    
     set  tempDate  =  date_add(tempDate, interval  1   day );
end   while ;

set  vSQL  =   '   ' ;
set  vSQL = CONCAT(vSQL, '  insert into temp_tb_diarySumm ' );
set  vSQL = CONCAT(vSQL, '  select * from   ' );
set  vSQL = CONCAT(vSQL, '  (  ' );

set  vSQL = CONCAT(vSQL, '  select t0.reportDate ,theWeek , theMonth  ' );
set  vSQL = CONCAT(vSQL, '  , ifnull(dayTimes,0) as dayTimes   ' );
set  vSQL = CONCAT(vSQL, '  , ifnull(FiledBRate,0) as FiledBRate  ' );
set  vSQL = CONCAT(vSQL, '  from   ' );
set  vSQL = CONCAT(vSQL, '  (  ' );
set  vSQL = CONCAT(vSQL, '  select reportDate ,theWeek , theMonth  ' );
set  vSQL = CONCAT(vSQL, '  from temp_tb_dates  ' );
set  vSQL = CONCAT(vSQL, '  ) t0  ' );
set  vSQL = CONCAT(vSQL, '  left join  ' );
set  vSQL = CONCAT(vSQL, '  (  ' );
set  vSQL = CONCAT(vSQL, '  select count(recordid) as dayTimes   ' );
set  vSQL = CONCAT(vSQL, '   ,date_format(FiledATime, '' %Y-%m-%d '' ) as reportDate  ' );
set  vSQL = CONCAT(vSQL, '  from DBdiaryFiledA  ' );
set  vSQL = CONCAT(vSQL, '  where patientid= ' , iPatientId);
set  vSQL = CONCAT(vSQL, '   and FiledATime >= ' , '' ,  ' concat(date_format(FiledATime, '' %Y-%m-%d '' ), ''' ,tempDayBegin, ''' ) ' );
set  vSQL = CONCAT(vSQL, '   and FiledATime <  ' , '' ,  ' concat(date_format(FiledATime, '' %Y-%m-%d '' ), ''' ,tempNightBegin , ''' ) ' );
set  vSQL = CONCAT(vSQL, '  group by reportDate  ) t1  ' );
set  vSQL = CONCAT(vSQL, '  on t1.reportDate = t0.reportDate  ' );
set  vSQL = CONCAT(vSQL, '  left join  ' );
set  vSQL = CONCAT(vSQL, '  (  ' );
set  vSQL = CONCAT(vSQL, '  select ((ifnull(max(FiledB),1) - ifnull(min(FiledB),1)) * 200 ) /( ifnull(max(FiledB),1) + ifnull(min(FiledB),1) ) as FiledBRate  ' );
set  vSQL = CONCAT(vSQL, '  ,date_format(gathertime, '' %Y-%m-%d '' )  as reportDate  ' );
set  vSQL = CONCAT(vSQL, '  from DBdiaryFiledBb  ' );
set  vSQL = CONCAT(vSQL, '  where patientid= ' , iPatientId);
set  vSQL = CONCAT(vSQL, '  and FAvailFlag > 0  ' );
set  vSQL = CONCAT(vSQL, '   and gathertime >=  ' , '' , ' concat(date_format(gathertime, '' %Y-%m-%d '' ), ''' , '  00:00:00 ' , ''' ) ' );
set  vSQL = CONCAT(vSQL, '   and gathertime <  ' , '' , ' concat(date_format(date_add(gathertime, interval 1 day), '' %Y-%m-%d '' ), ''' , '  00:00:00 ' , ''' ) ' );
set  vSQL = CONCAT(vSQL, '  group by reportDate ) t3   ' );
set  vSQL = CONCAT(vSQL, '  on t3.reportDate = t0.reportDate  ' );

set  vSQL = CONCAT(vSQL, '  ) t  ' );

set   @sqltext : = vSQL;
prepare  stmt  from   @sqltext ;
execute  stmt;



select   MAX (dayTimesWeek)  into  tempDayTimes 
from
(
select   sum (dayTimes)  as  dayTimesWeek  
from  temp_tb_diarySumm
group   by  theWeek 
) tDay;

select   MAX (nightTimesMonth)  into  tempNightTimes 
from
(
select   sum (nightTimes)  as  nightTimesMonth 
from  temp_tb_diarySumm
group   by  theMonth
) tNight;

select   max (FiledBRate)  into  tempFiledBRate  
from  temp_tb_diarySumm;

if  tempIsFinish = 0   and  tempFiledBRate  >   30   THEN
    set  tempIsFinish  =   1 ;   
    set  tempResultByFlag  = 3 ;
    set  tempResultLevel  =   3 ;
end   if ;

if  tempIsFinish = 0   and  tempFiledBRate  <=   30   and  tempFiledBRate  >=   20   THEN
    set  tempIsFinish  =   1 ;   
    set  tempResultByFlag  = 3 ;
    set  tempResultLevel  =   2 ;
end   if ;

if  tempIsFinish = 0   and  tempFiledBRate  <   20   and  tempFiledBRate  >   0   THEN
    set  tempIsFinish  =   1 ;   
    set  tempResultByFlag  = 3 ;
    set  tempResultLevel  =   1 ;
end   if ;


select  tempResultLevel , tempResultByFlag , tempDayTimes, tempNightTimes ,tempFiledBRate;

   
Drop   TEMPORARY   TABLE   if   exists  temp_tb_dates;
Drop   TEMPORARY   TABLE   if   exists  temp_tb_diarySumm;

END ;