169 lines
5.2 KiB
SQL
169 lines
5.2 KiB
SQL
##############################
|
||
##@author:gong.chengbo ##
|
||
##@createdate:2023-08-10 ##
|
||
##@for:用于归档炉台开炉日志 ##
|
||
##############################
|
||
drop procedure if exists UpdateEqpOnStoveStatusLog;
|
||
create
|
||
definer = admin@`%` procedure UpdateEqpOnStoveStatusLog() comment '更新开炉记录日志表'
|
||
BEGIN
|
||
DROP TABLE IF EXISTS `eqponstovestatustmp`;
|
||
create table eqponstovestatustmp
|
||
(
|
||
area varchar(50),
|
||
area1 varchar(50),
|
||
eqpid varchar(50),
|
||
mesmoname varchar(50),
|
||
eqpmodel varchar(50),
|
||
eqpstatus varchar(50),
|
||
crusize varchar(50),
|
||
subprod varchar(50),
|
||
firststovetime datetime,
|
||
lastreporttime datetime,
|
||
laststovetime datetime,
|
||
lastopentime datetime,
|
||
lastouttime datetime,
|
||
finishtime datetime,
|
||
lastchaiqingtime datetime
|
||
);
|
||
replace into eqponstovestatustmp(area, area1, eqpid, eqpmodel)
|
||
select area, area1, eqpid, eqpmodel
|
||
from reportdata.equipment;
|
||
|
||
###更新最新有执行记录的工单
|
||
update eqponstovestatustmp es
|
||
left join
|
||
(select eql.eqpid, substring(eql.eventid, 1, 10) mesmoname, max(eql.eventtime)
|
||
from eqponstatuslogs eql
|
||
left join reportdata.mostatus mo on (eql.mesmoname = mo.MESmoname)
|
||
where mo.mostatus = '0'
|
||
group by eql.eqpid) b on (es.eqpid = b.eqpid)
|
||
set es.mesmoname = b.mesmoname;
|
||
|
||
##1 报料，2 加料，3 开副室，4 晶棒产出，5 拆清
|
||
update eqponstovestatustmp eqs
|
||
left join
|
||
(select mesmoname, min(eventtime) stovetime
|
||
from eqponstatuslogs
|
||
where eventtype = '加料'
|
||
group by mesmoname) eql on eqs.mesmoname = eql.mesmoname
|
||
set eqs.firststovetime = eql.stovetime;
|
||
|
||
update eqponstovestatustmp eqs
|
||
left join
|
||
(select es.eqpid,
|
||
epl.mesmoname,
|
||
max(case when eventtype = '报料' then eventtime end) lastreporttime,
|
||
max(case when eventtype = '加料' then eventtime end) laststovetime,
|
||
max(case when eventtype = '开副室' then eventtime end) lastopentime,
|
||
max(case when eventtype = '晶棒产出' then eventtime end) lastouttime,
|
||
max(case when eventtype = '拆清' then eventtime end) lastchaiqingtime,
|
||
case when substring(eventid,13,1) = 'W' then eventtime end finishtime
|
||
from eqponstatuslogs es
|
||
inner join eqponstovestatustmp epl on (substring(es.eventid, 1, 10) = epl.mesmoname)
|
||
group by es.eqpid) b on (eqs.eqpid = b.eqpid)
|
||
set eqs.lastreporttime = b.lastreporttime,
|
||
eqs.laststovetime = b.laststovetime,
|
||
eqs.lastopentime = b.lastopentime,
|
||
eqs.lastouttime = b.lastouttime,
|
||
eqs.lastchaiqingtime = b.lastchaiqingtime,
|
||
eqs.finishtime = b.finishtime;
|
||
|
||
###有工单、有投入、未产出
|
||
update eqponstovestatustmp
|
||
set eqpstatus = '投料后未产出'
|
||
where 1 = 1
|
||
and laststovetime is not null
|
||
and lastouttime is null
|
||
and mesmoname is not null
|
||
and laststovetime >= date_format(date_sub(now(), interval 20 day), '%Y-%m-%d');
|
||
|
||
###无工单、无投入、无产出、无报料
|
||
update eqponstovestatustmp
|
||
set eqpstatus = '完结后未报料'
|
||
where 1 = 1
|
||
and laststovetime is null
|
||
and lastouttime is null
|
||
and mesmoname is null;
|
||
|
||
###循环段产出中
|
||
update eqponstovestatustmp
|
||
set eqpstatus = '循环段产出中'
|
||
where 1 = 1
|
||
and laststovetime is not null
|
||
and lastouttime is not null
|
||
and mesmoname is not null
|
||
and lastouttime >= date_format(date_sub(now(), interval 4 day), '%Y-%m-%d');
|
||
|
||
###工单异常
|
||
update eqponstovestatustmp
|
||
set eqpstatus = '工单异常'
|
||
where 1 = 1
|
||
and lastouttime <= date_format(date_sub(now(), interval 25 day), '%Y-%m-%d');
|
||
|
||
###工单异常
|
||
update eqponstovestatustmp
|
||
set eqpstatus = '报料未投炉'
|
||
where 1 = 1
|
||
and lastreporttime is not null
|
||
and mesmoname is not null
|
||
and lastouttime is null
|
||
and laststovetime is null;
|
||
|
||
###报料异常
|
||
update eqponstovestatustmp
|
||
set eqpstatus = '报料异常'
|
||
where 1 = 1
|
||
and lastreporttime is not null
|
||
and laststovetime is null
|
||
and lastreporttime <= date_format(date_sub(now(), interval 3 day), '%Y-%m-%d');
|
||
|
||
###拆清异常
|
||
update eqponstovestatustmp
|
||
set eqpstatus = '拆清异常'
|
||
where 1 = 1
|
||
and lastouttime is not null
|
||
and lastchaiqingtime is null
|
||
and lastouttime <= date_format(date_sub(now(), interval 5 day), '%Y-%m-%d');
|
||
|
||
|
||
###运行异常
|
||
update eqponstovestatustmp
|
||
set eqpstatus = '拉棒时间超3天'
|
||
where 1 = 1
|
||
and laststovetime is not null
|
||
and laststovetime <= date_format(date_sub(now(), interval 3 day), '%Y-%m-%d');
|
||
|
||
update eqponstovestatustmp esp
|
||
inner join mes_sync.mes_crystal_order mco on (esp.mesmoname = mco.order_no)
|
||
inner join reportdata.mostatus mo on (esp.mesmoname = mo.MESmoname)
|
||
set esp.crusize = mco.thermal_field,esp.subprod = mo.subprod;
|
||
|
||
insert into eqponstovestatus(
|
||
area,
|
||
area1,
|
||
eqpid,
|
||
mesmoname,
|
||
eqpmodel,
|
||
eqpstatus,
|
||
crusize,
|
||
subprod,
|
||
firststovetime,
|
||
lastreporttime,
|
||
laststovetime,
|
||
lastopentime,
|
||
lastouttime,
|
||
finishtime,
|
||
lastchaiqingtime
|
||
)
|
||
select *
|
||
from eqponstovestatustmp;
|
||
|
||
|
||
update eqponstovestatus set savedate = now() where savedate is null;
|
||
update eqponstovestatus set mfgdate = date_format(now()-8.5/24,'%Y-%m-%d') where mfgdate is null;
|
||
drop table eqponstovestatustmp;
|
||
END;
|
||
|
||
|