GateDge2023_ljy/SAL_OUTSTOCK/SQLServer/月度生产计划表-预测单.sql

DECLARE @DATE DATE,@STARTDATE DATETIME ,@ENDDATE DATETIME
SET @DATE = '2023-12-15'
SELECT 
	@STARTDATE = DATEADD(MONTH, DATEDIFF(MONTH, 0, @DATE), 0)
	,@ENDDATE = DATEADD(MS,-3, DATEADD(MONTH, DATEDIFF(MONTH, 0, DATEADD(MONTH, 1, @DATE)), 0))

DECLARE @LCID INT 
SET @LCID = 2052
SELECT
	A.FBILLNO
	,AE.FMATERIALID
	,AE.FENTRYID
	,C_L.FNAME AS '<EFBFBD><EFBFBD>Ʒ<EFBFBD><EFBFBD><EFBFBD><EFBFBD>'
	,C_L.FSPECIFICATION AS '<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>ͺ<EFBFBD>'
	--,(CASE
	--		CS.FEXPUNIT 
	--		WHEN 'Y' THEN
	--		CONVERT ( VARCHAR, CAST(CS.FEXPPERIOD AS INT) ) + '<27><>' 
	--		WHEN 'M' THEN
	--		CONVERT ( VARCHAR, CAST(CS.FEXPPERIOD AS INT) /12 ) + '<27><>' 
	--		WHEN 'D' THEN
	--		CONVERT ( VARCHAR, CAST(CS.FEXPPERIOD AS INT) /365) + '<27><>' ELSE '' 
	--END) AS '<EFBFBD><EFBFBD>Ч<EFBFBD><EFBFBD>'
	,(CASE
			CS.FEXPUNIT 
			WHEN 'Y' THEN
			CONVERT ( VARCHAR, CAST(CS.FEXPPERIOD AS INT) * 12 ) + '<EFBFBD><EFBFBD><EFBFBD><EFBFBD>' 
			WHEN 'M' THEN
			CONVERT ( VARCHAR, CAST(CS.FEXPPERIOD AS INT)  ) + '<EFBFBD><EFBFBD><EFBFBD><EFBFBD>' 
			WHEN 'D' THEN
			CONVERT ( VARCHAR, CAST(CS.FEXPPERIOD AS INT) / 365 * 12) + '<EFBFBD><EFBFBD><EFBFBD><EFBFBD>' ELSE '' 
	END) AS '<EFBFBD><EFBFBD>Ч<EFBFBD><EFBFBD>'
	--,'' AS '<EFBFBD><EFBFBD>׼<EFBFBD><EFBFBD><EFBFBD><EFBFBD>'
	--,CP.FLOTYIELD AS 'ÿ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>'
	--,CP.FPACKUNITCONVERRATIO AS '<EFBFBD><EFBFBD>װ<EFBFBD><EFBFBD><EFBFBD><EFBFBD>'
	--,CP.FPACKUNITCONVERRATIO AS '<EFBFBD><EFBFBD>װ<EFBFBD><EFBFBD><EFBFBD><EFBFBD>-<2D><><EFBFBD><EFBFBD>'
	--,CP.FPACKUNITID AS '<EFBFBD><EFBFBD>λ'
	,CS.FSTOREUNITID AS '<EFBFBD><EFBFBD>λ'
	,'' AS '<EFBFBD><EFBFBD>ȫ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>'
	,CAST(CS.FSAFESTOCK AS INT) AS '<EFBFBD><EFBFBD>ȫ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>'
	,AE.FSEQ
	--,AE.M01 AS '<EFBFBD><EFBFBD><EFBFBD><EFBFBD>Ԥ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>'
	--,AE.S01 AS 'ǰ<EFBFBD><EFBFBD><EFBFBD>·<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>'
	--,AE.S02 AS 'ǰ<EFBFBD><EFBFBD><EFBFBD>·<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>'
	--,AE.S03 AS 'ǰһ<EFBFBD>·<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>'
	,'' AS 'ǰ<EFBFBD><EFBFBD><EFBFBD>·<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>'
	,'' AS 'ǰ<EFBFBD><EFBFBD><EFBFBD>·<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>'
	,'' AS 'ǰһ<EFBFBD>·<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>'
	--,DE.FSRCBILLNO
	--,EE_A.FSTOCKINQUAAUXQTY AS '<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>'
	--,'' AS '<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>'
	--,(EE_A.FSTOCKINQUAAUXQTY + 0) AS '<EFBFBD>ϼƿ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>'
	--,'' AS '<EFBFBD>ƻ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>'
	--,(B.PlanQty / CP.FPACKUNITCONVERRATIO)AS 'ϵͳ<EFBFBD>ƻ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>'
	--,(B.VerifyQty / CP.FPACKUNITCONVERRATIO) AS 'ȷ<EFBFBD>ϼƻ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>'
	,B.VerifyQty AS 'ȷ<EFBFBD>ϼƻ<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>'
	--,DE.FREMARK AS '<EFBFBD><EFBFBD>ע'	
FROM
	T_PLN_FORECAST A --Ԥ<EFBFBD>ⵥ
	LEFT JOIN T_PLN_FORECASTENTRY AE ON A.FID = AE.FID
	LEFT JOIN (
	SELECT 
		A.FMATERIALID
		,A_B.FSALEORDERENTRYID
		,SUM(case  when A.FRELEASESTATUS = 1 then A.FDemandQty else 0 end) as 'PlanQty'
		,SUM(case  when A.FRELEASESTATUS = 2 then A.FDemandQty else 0 end) as 'VerifyQty'
	FROM 
		T_PLN_PLANORDER A 
		LEFT JOIN T_PLN_PLANORDER_B A_B ON A.FID = A_B.FID 
	WHERE 
		A.FRELEASETYPE = 1 AND (A.FRELEASESTATUS = 1 OR A.FRELEASESTATUS = 2 )
	group By 
		A.FRELEASETYPE
		,A.FMATERIALID
		,A_B.FSALEORDERENTRYID
	) B ON B.FSALEORDERENTRYID = AE.FENTRYID
	LEFT JOIN T_BD_MATERIAL C ON C.FMATERIALID = AE.FMATERIALID
	LEFT JOIN T_BD_MATERIAL_L C_L ON  C_L.FMATERIALID = AE.FMATERIALID
	LEFT JOIN T_BD_MATERIALSTOCK CS ON CS.FMATERIALID = AE.FMATERIALID
	LEFT JOIN T_BD_MATERIALPRODUCE CP ON CP.FMATERIALID = C.FMATERIALID
	--LEFT JOIN T_PRD_MOENTRY_LK DE_LK ON DE_LK.FSID = B.FID
	--LEFT JOIN T_PRD_MOENTRY DE ON DE.FENTRYID = DE_LK.FENTRYID
	--LEFT JOIN T_PRD_MOENTRY EE ON  EE.FMATERIALID = B.FMATERIALID --<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
	--LEFT JOIN T_PRD_MOENTRY_A EE_A ON  EE_A.FENTRYID = EE.FENTRYID AND EE.FID =EE_A.FID --<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
WHERE 
	A.FDATE BETWEEN @STARTDATE AND @ENDDATE