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;