--WO2405090020
declare @Level int
;WITH #TopMo AS (
	SELECT t0.FBILLNO,t0e.FID,t0e.FENTRYID,t0e.FMATERIALID AS TopMaterialId,t0e.FMATERIALID
		,0 FLOT,CAST('' AS nvarchar(255)) FLOT_TEXT,CONVERT(decimal(23,10), 0) FAMOUNT
		,CONVERT(varchar(1000),ROW_NUMBER() OVER (ORDER BY t0.FID,t0e.FSEQ)) AS 'aPATH' 
		,0 lv
		,t0e_a.FSTOCKINQUASELAUXQTY AS '入库数量'
		,t0e_a.FSTATUS
		,CHARINDEX(t0.FBILLNO,'SUB') AS 'oType'
	FROM T_PRD_MO t0
		INNER JOIN T_PRD_MOENTRY t0e on t0.FID = t0e.FID
		INNER JOIN T_PRD_MOENTRY_A t0e_a on t0e.FENTRYID = t0e_a.FENTRYID
	WHERE 1=1 
		--AND t0.FBILLNO = 'RO2405090020'
		--AND t0.FBILLNO = 'TO2405210015'
		--AND t0.FBILLNO = 'WO2405160002'
		--AND t0.FBILLNO = 'WO2405080005'
		--AND t0.FBILLNO = 'TO2404290033'
		--AND t0.FBILLNO = 'TO2403250007'
)
,#生产领料单 AS (
	SELECT t1e.FLOT,t1e.FLOT_TEXT,t1e.FMATERIALID,0 AS 'oType'
		,SUM(t1e.FAMOUNT) AS 'FAMOUNT',t1e.FMOENTRYID,t1e.FMOBILLNO
	FROM T_PRD_PICKMTRL t1
		INNER JOIN T_PRD_PICKMTRLDATA t1e on t1.FID = t1e.FID
	WHERE t1.FDOCUMENTSTATUS = 'C'
	GROUP BY t1e.FLOT,t1e.FLOT_TEXT,t1e.FMATERIALID,t1e.FMOENTRYID,t1e.FMOBILLNO
)
, #生产补料单 AS (
	SELECT t0e.FMOENTRYID,t0e.FMATERIALID,t0e.FLOT,SUM(t0e.FAMOUNT) AS 'FAMOUNT',0 AS 'oType'
	FROM T_PRD_FEEDMTRL t0
		INNER JOIN T_PRD_FEEDMTRLDATA t0e on t0.FID = t0e.FID
	WHERE t0.FDOCUMENTSTATUS = 'C'
	GROUP BY t0e.FMOID,t0e.FMOENTRYID,t0e.FMATERIALID,t0e.FLOT
)
, #生产退料单 AS (
	SELECT t0e.FMOENTRYID,t0e.FMATERIALID,t0e.FLOT,SUM(t0e.FAMOUNT) AS 'FAMOUNT',0 AS 'oType'
	FROM T_PRD_RETURNMTRL t0
		INNER JOIN T_PRD_RETURNMTRLENTRY t0e on t0.FID = t0e.FID
	WHERE t0.FDOCUMENTSTATUS = 'C'
	GROUP BY t0e.FMOID,t0e.FMOENTRYID,t0e.FMATERIALID,t0e.FLOT
)
,#委外领料单 AS (
	SELECT t1e.FLOT,t1e.FLOT_TEXT,t1e.FMATERIALID,1 AS 'oType'
		,SUM(ISNULL(t1e_a.FAMOUNT,0)) FAMOUNT,t1e.FSUBREQENTRYID AS FMOENTRYID
	FROM T_SUB_PICKMTRL t1
		INNER JOIN T_SUB_PICKMTRLDATA t1e on t1.FID = t1e.FID
		INNER JOIN T_SUB_PICKMTRLDATA_A t1e_a on t1e.FENTRYID = t1e_a.FENTRYID
	WHERE t1.FDOCUMENTSTATUS = 'C'
	GROUP BY t1e.FLOT,t1e.FLOT_TEXT,t1e.FMATERIALID,t1e.FSUBREQENTRYID
)
, #委外补料单 AS (
	SELECT t0e.FSUBREQENTRYID AS FMOENTRYID,t0e.FMATERIALID,t0e.FLOT,SUM(t0e.FAMOUNT) AS 'FAMOUNT',1 AS 'oType'
	FROM T_SUB_FEEDMTRL t0
		INNER JOIN T_SUB_FEEDMTRLENTRY t0e on t0.FID = t0e.FID
		--INNER JOIN T_SUB_FEEDMTRLENTRY_A t0e_a on t0e.FENTRYID = t0e_a.FENTRYID
	WHERE t0.FDOCUMENTSTATUS = 'C'
	GROUP BY t0e.FLOT,t0e.FMATERIALID,t0e.FSUBREQENTRYID
)
, #委外退料单 AS (
	SELECT t0e_a.FSUBREQENTRYID AS FMOENTRYID,t0e.FMATERIALID,t0e.FLOT,SUM(t0e.FAMOUNT) AS 'FAMOUNT',1 AS 'oType'
	FROM T_SUB_RETURNMTRL t0
		INNER JOIN T_SUB_RETURNMTRLENTRY t0e on t0.FID = t0e.FID
		INNER JOIN T_SUB_RETURNMTRLENTRY_A t0e_a on t0e.FENTRYID = t0e_a.FENTRYID
	WHERE t0.FDOCUMENTSTATUS = 'C'
	GROUP BY t0e.FLOT,t0e.FMATERIALID,t0e_a.FSUBREQENTRYID
)
, #TABLE1 AS (
	SELECT t0.FMATERIALID AS 'TopMaterialId'
		,t0.FMATERIALID AS 'MoMaterialId'
		,t1e.FMATERIALID
		,t1e.FLOT
		,t1e.FLOT_TEXT
		,t1e.FAMOUNT
		,CONVERT(decimal(23,10),0) AS '入库数量'
		,0 AS 'FSTATUS'
		,CONVERT(varchar(1000),CONCAT(t0.aPATH,'.',ROW_NUMBER() OVER (PARTITION BY t0.FID,t0.FENTRYID ORDER BY t1e.FMATERIALID))) AS 'aPATH'
		,t0.aPATH AS 'PPATH'
		,t0.lv + 1 lv
		,t0.oType
		,t1e.MoId AS 'MoId'
		,t1e.MoEntryId AS 'MoEntryId'
		,t1e.MoBillNo AS 'MoBillNo'
		,t0.FID AS 'PMoId'
		,t0.FENTRYID AS 'PMoEntryId'
		,t0.FBILLNO AS 'PMoBillNo'
		,0 AS 'isTrue'
	FROM #TopMo t0
		CROSS APPLY (
			SELECT t1e.FLOT,t1e.FLOT_TEXT,t1e.FMATERIALID,SUM(t1e.FAMOUNT) AS 'FAMOUNT'
				,ISNULL(t2.FID,0) AS 'MoId',ISNULL(t2e.FENTRYID,0) AS 'MoEntryId',ISNULL(t2.FBILLNO,'') AS 'MoBillNo'
			FROM T_PRD_PICKMTRLDATA t1e
				LEFT JOIN T_PRD_MO t2 on t2.FBILLNO = t1e.FLOT_TEXT
				LEFT JOIN T_PRD_MOENTRY t2e on t2e.FID = t2.FID
			WHERE t1e.FMOENTRYID = t0.FENTRYID
			GROUP BY t1e.FLOT,t1e.FLOT_TEXT,t1e.FMATERIALID,t2.FID,t2e.FENTRYID,t2.FBILLNO
		) t1e
	UNION ALL
	SELECT tt.TopMaterialId
		,ISNULL(t0.MoMaterialId,'')
		,t0.FMATERIALID
		,t0.FLOT
		,t0.FLOT_TEXT
		,t0.FAMOUNT
		,ISNULL(t0.入库数量,0) AS '入库数量'
		,t0.FSTATUS
		,CONVERT(varchar(1000),CONCAT(tt.aPATH,'.',ROW_NUMBER() OVER (PARTITION BY tt.MoId,tt.MoEntryId ORDER BY t0.FMATERIALID))) AS 'aPATH'
		,tt.aPATH
		,tt.lv + 1 lv
		,ISNULL(t0.oType,-1)
		,ISNULL(t0.FID,0) AS 'MoId'
		,ISNULL(t0.FENTRYID,0) AS 'MoEntryId'
		,ISNULL(t0.FBILLNO,'') AS 'MoBillNo'
		,tt.MoId AS 'PMoId'
		,tt.MoEntryId AS 'PMoEntryId'
		,tt.MoBillNo AS 'PMoEntryId'
		,CASE WHEN t0.FBILLNO = tt.MoBillNo THEN 1 ELSE 0 END AS 'isTrue'
	FROM #TABLE1 tt 
		CROSS APPLY (
			SELECT t0.FID,t0.FBILLNO,t0e.FENTRYID,t0e.FMATERIALID AS MoMaterialId,t0e.FBOMID
				--,t0e_a.FSTOCKINQUASELAUXQTY AS '入库数量'
				,CONVERT(decimal(23,10),0) AS '入库数量'
				,0 AS 'FSTATUS'
				,t1.FLOT,t1.FLOT_TEXT,t1.FMATERIALID,t1.FAMOUNT,t1.FMOENTRYID,t1.oType
			FROM #生产领料单 t1
				LEFT JOIN T_PRD_MO t0 on t0.FBILLNO = t1.FLOT_TEXT
				LEFT JOIN T_PRD_MOENTRY t0e on t0.FID = t0e.FID
				--LEFT JOIN T_PRD_MOENTRY_A t0e_a on t0e.FENTRYID = t0e_a.FENTRYID
			WHERE t1.FMOENTRYID = tt.MoEntryId
				AND tt.oType = t1.oType
			UNION ALL
			SELECT t0.FID,t0.FBILLNO,t0e.FENTRYID,t0e.FMATERIALID AS MoMaterialId,t0e.FBOMID
				,t0e.FSTOCKINQTY,t0e.FSTATUS
				,t1.FLOT,t1.FLOT_TEXT,t1.FMATERIALID,t1.FAMOUNT,t1.FMOENTRYID,t1.oType
			FROM #委外领料单 t1
				INNER JOIN T_SUB_REQORDER t0 on t0.FBILLNO = t1.FLOT_TEXT
				INNER JOIN T_SUB_REQORDERENTRY t0e on t0.FID = t0e.FID
			WHERE t1.FMOENTRYID = tt.MoEntryId
				AND tt.oType = t1.oType
		) t0
	WHERE 1=1 
		AND tt.isTrue = 0
		--AND tt.lv < 10
) 
, #table2 AS (
	SELECT FID AS 'MoId',FENTRYID AS 'MoEntryId',FBILLNO AS 'MoBillNo'
		,0 AS 'PMoId'
		,0 AS 'PMoEntryId'
		,'' AS 'PMoBillNo'
		,TopMaterialId,TopMaterialId AS 'MoMaterialId',FMATERIALID,FLOT,FLOT_TEXT,FAMOUNT,入库数量,FSTATUS,aPATH,'' AS 'PPATH',lv,oType
		--,CONCAT('/',aPATH,'/') RnPath
		--,(CASE LEFT(FBILLNO,2) WHEN 'WO' THEN 1 WHEN 'RO' THEN 2 WHEN 'TO' THEN 3 WHEN 'RT' THEN 4 ELSE 0 END) AS 'MoType'
	FROM #TopMo
	UNION ALL
	SELECT MoId,MoEntryId,MoBillNo,PMoId,PMoEntryId,PMoBillNo
		,TopMaterialId,MoMaterialId,FMATERIALID,FLOT,FLOT_TEXT,FAMOUNT,入库数量,FSTATUS,aPATH,PPATH,lv,oType
		--,CONCAT('/',REPLACE(aPATH,'.','/'),'/') RnPath
		--,(CASE LEFT(MoBillNo,2) WHEN 'WO' THEN 1 WHEN 'RO' THEN 2 WHEN 'TO' THEN 3 WHEN 'RT' THEN 4 ELSE 0 END) AS 'MoType'
	FROM #TABLE1 
)
, #实际工时归集 AS (
	SELECT t0e.FPROORDERNO,t0e.FPROORDERENTRYID,FCOSTCENTERID
		,SUM(t0e.FHRWORKTIME) AS '人员实作工时',SUM(t0e.FRPTQTY) AS '汇报数量'
		,SUM(t2e.FHRWORKTIME) FHRWORKTIME,SUM(t2e.FFINISHQTY) FFINISHQTY
	FROM T_CB_WORKHOURSENTRY t0e
		INNER JOIN T_PRD_MORPTENTRY t2e on t2e.FENTRYID = t0e.FSRCENTRYID
	WHERE t0e.FSRCBILLFORMID = 'PRD_MORPT'
	GROUP BY t0e.FPROORDERNO,t0e.FPROORDERENTRYID,FCOSTCENTERID
)
, #table3 AS (
	SELECT MoBillNo,PMoBillNo
		,MoId,MoEntryId,PMoId,PMoEntryId,TopMaterialId,MoMaterialId,t0.FMATERIALID
		--,t1.FNUMBER,t1_l.FNAME
		--,CASE t1b.FERPCLSID WHEN 1 THEN '外购' WHEN 2 THEN '自制' WHEN 3 THEN '委外' WHEN 5 THEN '虚拟' ELSE '' END AS '物料属性'
		,t0.FLOT,t0.FLOT_TEXT AS '批号',aPATH,PPATH,lv,t0.oType
		--,t0.FAMOUNT AS '领料总成本', ISNULL(t2.FAMOUNT,0) AS '补料总成本',ISNULL(t3.FAMOUNT,0) AS '退料总成本'
		--, ISNULL(t4.FAMOUNT,0) AS '委外补料总成本',ISNULL(t5.FAMOUNT,0) AS '委外退料总成本'
		,(t0.FAMOUNT + ISNULL(t2.FAMOUNT,0) -ISNULL(t3.FAMOUNT,0) + ISNULL(t4.FAMOUNT,0) - ISNULL(t5.FAMOUNT,0)) AS '直接材料'
		,CASE ISNULL(t6.汇报数量,0) WHEN 0 THEN 0 ELSE ISNULL(t6.人员实作工时,0)/ISNULL(t6.汇报数量,0) END AS '单位工时B'
		,(CASE LEFT(t0.MoBillNo,2) WHEN 'WO' THEN 1 WHEN 'TO' THEN 2 WHEN 'RO' THEN 3 WHEN 'RT' THEN 4 ELSE 0 END) AS 'MoType'
		,CASE t0.oType WHEN 0 THEN ISNULL(t0e.FSTOCKINQUASELAUXQTY ,0) ELSE t0.入库数量 END AS '入库数量A'
		,CASE t0.oType WHEN 0 THEN ISNULL(t0e.FSTATUS ,0) ELSE t0.FSTATUS END AS '业务状态'
	FROM #table2 t0 
		LEFT JOIN T_PRD_MOENTRY_A t0e on t0.MoEntryId = t0e.FENTRYID
		LEFT JOIN #生产补料单 t2 on t2.FMOENTRYID = t0.MoEntryId AND t2.FMATERIALID = t0.FMATERIALID AND t2.FLOT = t0.FLOT AND t2.oType = t0.oType 
		LEFT JOIN #生产退料单 t3 on t3.FMOENTRYID = t0.MoEntryId AND t3.FMATERIALID = t0.FMATERIALID AND t3.FLOT = t0.FLOT AND t3.oType = t0.oType
		LEFT JOIN #委外补料单 t4 on t4.FMOENTRYID = t0.MoEntryId AND t4.FMATERIALID = t0.FMATERIALID AND t4.FLOT = t0.FLOT AND t4.oType = t0.oType
		LEFT JOIN #委外退料单 t5 on t5.FMOENTRYID = t0.MoEntryId AND t5.FMATERIALID = t0.FMATERIALID AND t5.FLOT = t0.FLOT AND t5.oType = t0.oType
		LEFT JOIN #实际工时归集 t6 on t6.FPROORDERENTRYID = t0.MoEntryId
) 
, #table4 AS (
	SELECT t0.MoBillNo
		,t0.PMoBillNo
		,t0.aPATH
		,t0.PPATH
		,t0.lv
		,t0.批号
		,t0.直接材料
		,t0.业务状态
		,t0.入库数量A
		,t0.单位工时B
		,CASE t0.MoType WHEN 1 THEN t0.单位工时B ELSE 0 END '普通C'
		,CASE t0.MoType WHEN 2 THEN t0.单位工时B ELSE 0 END '试制D'
		,CASE t0.MoType WHEN 3 THEN t0.单位工时B ELSE 0 END '返工E'
		,CASE t0.MoType WHEN 4 THEN t0.单位工时B ELSE 0 END '返工试制F'
		,CASE t0.MoType WHEN 0 THEN t0.单位工时B ELSE 0 END '其他G'
		,CASE t0.MoType WHEN 1 THEN t0.单位工时B * t0.入库数量A ELSE 0 END '普通I=C*A'
		,CASE t0.MoType WHEN 2 THEN t0.单位工时B * t0.入库数量A ELSE 0 END '试制J=D*A'
		,CASE t0.MoType WHEN 3 THEN t0.单位工时B * t0.入库数量A ELSE 0 END '返工K=E*A'
		,CASE t0.MoType WHEN 4 THEN t0.单位工时B * t0.入库数量A ELSE 0 END '返工试制L=F*A'
		,CASE t0.MoType WHEN 0 THEN t0.单位工时B * t0.入库数量A ELSE 0 END '其他M=G*A'
		,MoId,MoEntryId,PMoId,PMoEntryId,TopMaterialId,MoMaterialId,t0.FMATERIALID
	FROM #table3 t0
)
,#统计 AS (
	SELECT 
		SUM(t1.[普通C]) AS 'C'
		,SUM(t1.[试制D]) AS 'D'
		,SUM(t1.[返工E]) AS 'E'
		,SUM(t1.[返工试制F]) AS 'F'
		,SUM(t1.[其他G]) AS 'G'
		,SUM(t1.[普通I=C*A]) AS 'I'
		,SUM(t1.[试制J=D*A]) AS 'J'
		,SUM(t1.[返工K=E*A]) AS 'K'
		,SUM(t1.[返工试制L=F*A]) AS 'L'
		,SUM(t1.[其他M=G*A]) AS 'M'
		,t0.aPATH
	FROM #table4 t0
		INNER JOIN #table4 t1 ON CHARINDEX(t0.aPATH,t1.aPATH) = 1
	GROUP BY t0.aPATH
) 
SELECT t0.MoBillNo
	,t0.PMoBillNo
	--,t0.FNUMBER,t0.FNAME,t0.物料属性
	,t1.FNUMBER,t1_l.FNAME
	,CASE t1b.FERPCLSID WHEN 1 THEN '外购' WHEN 2 THEN '自制' WHEN 3 THEN '委外' WHEN 5 THEN '虚拟' ELSE '' END AS '物料属性'
	,t0.批号
	,t0.业务状态
	,t0.直接材料
	,t0.入库数量A
	,t0.单位工时B
	,t2.C AS [普通C]
	,t2.D [试制D]
	,t2.E AS [返工E]
	,t2.F AS [返工试制F]
	,t2.G AS [其他G]
	,t2.C + t2.D +t2.E + t2.F + t2.G AS [合计H=C+D+E+F+G]
	,t2.I AS [普通I=C*A]
	,t2.J AS [试制J=D*A]
	,t2.K AS [返工K=E*A]
	,t2.L AS [返工试制L=F*A]
	,t2.M AS [其他M=G*A]
	,t2.I + t2.J + t2.K + t2.L + t2.M AS [合计N=I+J+K+L+M]
	,t0.aPATH
	,t0.PPATH
	,t0.lv
	,MoId,MoEntryId,PMoId,PMoEntryId,TopMaterialId,MoMaterialId,t0.FMATERIALID
FROM #table4 t0
	INNER JOIN T_BD_MATERIAL t1 on t0.FMATERIALID = t1.FMATERIALID
	INNER JOIN T_BD_MATERIALBASE t1b on t1b.FMATERIALID = t0.FMATERIALID
	INNER JOIN T_BD_MATERIAL_L t1_l on t0.FMATERIALID = t1_l.FMATERIALID AND t1_l.FLOCALEID = 2052
	INNER JOIN #统计 t2 on t0.aPATH = t2.aPATH
--ORDER BY CAST(t0.RnPath AS HIERARCHYID)
ORDER BY CAST(CONCAT('/',REPLACE(t0.aPATH,'.','/'),'/') AS HIERARCHYID)