[易飞]二、邮件预警-检查工时底数和暂收明细

--检查电子-工时底数为1 请及时维护

--条件为在工单一个月内有生产过的产品 

SQL:

SELECT  MB001 品号,MB002 品名,MB003 规格,MB096 工时底数 
FROM ZE.dbo.INVMB left join ZE.dbo.INVML on MB001=ML001  inner join (select distinct TA006 FROM ZE.dbo.MOCTA WHERE LEFT(TA003,6)=CONVERT(CHAR(6),GETDATE(),112)) MOCTA ON MB001=TA006 WHERE MB025='M' AND MB096=1 and MB002<>'' and left(MB001,1) not in('4','2') and MB017='03' AND ML009<>'' AND ZE.dbo.Producttype(MB001)=1  and MB001 in (select TA006 from MOCTA 
WHERE DATEDIFF(day,ZE.dbo.Date10(TA003),getdate())<30) 

SQL:

SELECT DATEDIFF(DAY,SUBSTRING(T.CREATE_DATE,1,8),GETDATE()) 进货日距今天数 ,ZE.dbo.Date10(SUBSTRING(T.CREATE_DATE,1,8)) 进货日期,
CASE WHEN TH028='0' THEN '免检'
     WHEN TH028='1' THEN '待检'
     WHEN TH028='2' THEN '合格'
     WHEN TH028='3' THEN '不良'
     ELSE '特采' END 检验状态,
T.TH001+'-'+rtrim(T.TH002)+'-'+T.TH003 进货单,T.TH004 品号,T.TH005 品名,T.TH006 规格,Convert(decimal(18,2),T.TH007) 进货数量,T.TH008 单位,T.TH011+'-'+T.TH012 采购单
FROM ZE.dbo.PURTH T  WHERE T.TH030='N'
暂收明细表

select  datediff(d,TG003,CONVERT(CHAR(8),GETDATE(),112)) as  开单日期距今天,
case when TH028='1' then '待检'
     when TH028='0' THEN '免检'
     when TH028='2' THEN '合格'
     when TH028='3' then '不良'
     when TH028='4' THEN '特采'
end as 检验状态,
TH001+'-'+rtrim(TH002)+'-'+TH003 as 进货单,ZE.dbo.Date10(TG003) AS 单据日期,MA002 供应商,TH004 品号,TH005 品名,TH006 规格,Convert(decimal(18,2),TH007) 进货数量,TH008 单位,TH010 批号,TH011+'-'+rtrim(TH012)+'-'+TH013 采购单
from ZE.dbo.PURTH  
           LEFT JOIN ZE.dbo.PURTG ON TG001=TH001 AND TG002=TH002
	  LEFT JOIN ZE.dbo.PURMA On MA001=TG005
           LEFT JOIN ZE.dbo.QMSTA ON TA001=TH001 AND TA002=TH002 AND TA003=TH003
WHERE   datediff(d,TG003,CONVERT(CHAR(8),GETDATE(),112))>2  and TG013='N' and TH028='1'  and (TA015 is  null or TA015='')