ken_nogi/Pleasanter/Extended/ExtendedSqls/getSummarySanpai.json.sql

/*
@author  $Author: m.takahashi $
@version $Id: getSummarySanpai.json.sql 8103 2025-06-05 00:37:41Z m.takahashi $
*/
WITH M_HOUKOKUSHA AS (
	SELECT
		"ResultId"
		,"ClassA"	-- AS "識別コード"
		,"ClassF"	-- AS "郵便番号"
		,"ClassB"	-- AS "住所"
		,"ClassC"	-- AS "氏名"
		,"ClassD"	-- AS "電話番号"
		,"ClassE"	-- AS "業種"
	FROM
		"Results"
	WHERE
		"SiteId" = @M1_SiteId
), M_SANPAI AS (
	SELECT
		"ResultId"
		,"NumA"		-- AS "産業廃棄物No."
		,"ClassA"	-- AS "産業廃棄物の種類"
		,"NumB"		-- AS "換算係数"
	FROM
		"Results"
	WHERE
		"SiteId" = @M2_SiteId
), M_UNPAN AS (
	SELECT
		"ResultId"
		,"NumA"		-- AS "受託者No"
		,"ClassA"	-- AS "運搬or処分受託者の氏名又は名称"
		,"ClassB"	-- AS "運搬先の住所の事業場"
		,"ClassC"	-- AS "都道府県（政令市）コード"
		,"ClassD"	-- AS "電話番号"
		,"ClassE"	-- AS "郵便番号"
		,"ClassF"	-- AS "許可番号（下桁）"
		,"ClassG"	-- AS "許可番号"
	FROM
		"Results"
	WHERE
		"SiteId" = @M3_SiteId
), M_KEIYAKU AS (
	SELECT
		"ResultId"
		,"ClassH"	-- AS "契約コード"
		,"ClassT"	-- AS "顧客コード"
		,"ClassJ"	-- AS "邸名"
		,"ClassL"	-- AS "建上地"
	FROM
		"Results"
	WHERE
		"SiteId" = @MK_SiteId
), D_SUMMARY AS (
	SELECT
		D."ClassM"		AS D_ClassM		--"年度"
		,D."ClassN"		AS D_ClassN		--"報告者
		,D."ClassB"		AS D_ClassB		--"報告書提出先"
		,D."ClassA"		AS D_ClassA		--"契約コード"
		,D."ClassK"		AS D_ClassK		--"産業廃棄物No."
		,D."ClassD"		AS D_ClassD		--"運搬受託者No."
		,D."ClassE"		AS D_ClassE		--"運搬先の事業場No."
		,D."ClassF"		AS D_ClassF		--"処分受託者No."
		,CASE WHEN D."ClassG" = '' THEN NULL ELSE D."ClassG" END		AS D_ClassG		--"詰替１"
		,CASE WHEN D."ClassH" = '' THEN NULL ELSE D."ClassH" END		AS D_ClassH		--"運搬受託者(区間2)"
		,CASE WHEN D."ClassI" = '' THEN NULL ELSE D."ClassI" END		AS D_ClassI		--"詰替２"
		,CASE WHEN D."ClassJ" = '' THEN NULL ELSE D."ClassJ" END		AS D_ClassJ		--"運搬受託者(区間3)"
		,SUM(
			CASE D."ClassC"	--1:kg 2:m3 3:ton
				WHEN '1' THEN D."NumC" / 1000
				WHEN '2' THEN D."NumC" * M2."NumB"
				ELSE D."NumC"
			END
		)			AS SUM_TON
		,COUNT(*)	AS CNT_REPORT
	FROM
		"Results"	D
			INNER JOIN
		M_SANPAI		M2
			ON(
				D."ClassK"::bigint = M2."ResultId"
			)
	WHERE
		D."SiteId" = @D_SiteId
		AND D."CheckA" = '1'
	GROUP BY
		D."ClassM"		-- "年度"
		,D."ClassN"		-- "報告者
		,D."ClassB"		-- "報告書提出先"
		,D."ClassA"		-- "契約コード"
		,D."ClassK"		-- "産業廃棄物No."
		,D."ClassD"		-- "運搬受託者No."
		,D."ClassE"		-- "運搬先の事業場No."
		,D."ClassF"		-- "処分受託者No."
		,D."ClassG"		-- "詰替１"
		,D."ClassH"		-- "運搬受託者(区間2)"
		,D."ClassI"		-- "詰替２"
		,D."ClassJ"		-- "運搬受託者(区間3)"
)
SELECT
		D.D_ClassM		--"年度"
		,D.D_ClassN		--"報告者
		,M1."ClassA"	AS M1_ClassA	--郵便番号
		,M1."ClassB"	AS M1_ClassB	--住所
		,M1."ClassC"	AS M1_ClassC	--氏名
		,M1."ClassD"	AS M1_ClassD	--電話番号
		,M1."ClassE"	AS M1_ClassE	--業種
		,D.D_ClassB		--"報告書提出先"
		,D.D_ClassA		--"契約コード"
		,MK."ClassH"	AS MK_ClassH	--契約コード
		,MK."ClassJ"	AS MK_ClassJ	--邸名
		,MK."ClassL"	AS MK_ClassL	--建上地
		,D.D_ClassK		--"産業廃棄物No."
		,M2."ClassA"	AS M2_ClassA	--産業廃棄物の種類
		,D.D_ClassD		--"運搬受託者No."
		,M3."ClassF"	AS M3_ClassF	--運搬受託者 "許可番号（下桁）"
		,M3."ClassA"	AS M3_ClassA	--運搬受託者 名称
		,D.D_ClassE		--"運搬先の事業場No."
		,M4."ClassB"	AS M4_ClassB	--"運搬先の住所の事業場"
		,M4."ClassE"	AS M4_ClassE	--"運搬先の住所の事業場" "郵便番号"
		,D.D_ClassF		--"処分受託者No."
		,M5."ClassF"	AS M5_ClassF	--処分受託者 "許可番号（下桁）"
		,M5."ClassA"	AS M5_ClassA	--処分受託者 名称
		,D.D_ClassG		--"詰替１"
		,M6."ClassB"	AS M6_ClassB	--詰替１ "運搬先の住所の事業場
		,M6."ClassE"	AS M6_ClassE	--詰替１ "運搬先の住所の事業場" "郵便番号"
		,D.D_ClassH		--"運搬受託者(区間2)"
		,M7."ClassF"	AS M7_ClassF	--運搬受託者(区間2) "許可番号（下桁）"
		,M7."ClassA"	AS M7_ClassA	--運搬受託者(区間2) 名称
		,D.D_ClassI		--"詰替２"
		,M8."ClassB"	AS M8_ClassB	--詰替２ "運搬先の住所の事業場
		,M8."ClassE"	AS M8_ClassE	--詰替２ "運搬先の住所の事業場" "郵便番号"
		,D.D_ClassJ		--"運搬受託者(区間3)"
		,M9."ClassF"	AS M9_ClassF	--運搬受託者(区間3) "許可番号（下桁）"
		,M9."ClassA"	AS M9_ClassA	--運搬受託者(区間3) 名称
		,D.SUM_TON
		,D.CNT_REPORT
FROM
	D_SUMMARY	D
		INNER JOIN
	M_KEIYAKU		MK
		ON(
			D.D_ClassA::bigint = MK."ResultId"
		)
		INNER JOIN
	M_HOUKOKUSHA	M1
		ON(
			D.D_ClassN::bigint = M1."ResultId"
		)
		INNER JOIN
	M_SANPAI		M2
		ON(
			D.D_ClassK::bigint = M2."ResultId"
		)
		INNER JOIN
	M_UNPAN			M3
		ON(
			D.D_ClassD::bigint = M3."ResultId"
		)
		INNER JOIN
	M_UNPAN			M4
		ON(
			D.D_ClassE::bigint = M4."ResultId"
		)
		INNER JOIN
	M_UNPAN			M5
		ON(
			D.D_ClassF::bigint = M5."ResultId"
		)
		LEFT OUTER JOIN
	M_UNPAN			M6
		ON(
			D.D_ClassG::bigint = M6."ResultId"
		)
		LEFT OUTER JOIN
	M_UNPAN			M7
		ON(
			D.D_ClassH::bigint = M7."ResultId"
		)
		LEFT OUTER JOIN
	M_UNPAN			M8
		ON(
			D.D_ClassI::bigint = M8."ResultId"
		)
		LEFT OUTER JOIN
	M_UNPAN			M9
		ON(
			D.D_ClassJ::bigint = M9."ResultId"
		)
ORDER BY
	D.D_ClassM		--"年度"
	,D.D_ClassN		--"報告者
	,D.D_ClassB		--"報告書提出先"
	,D.D_ClassA		--"契約コード"
	,M2."NumA"		--"産業廃棄物No."
	,D.D_ClassD		--"運搬受託者No."
	,D.D_ClassE		--"運搬先の事業場No."
	,D.D_ClassF		--"処分受託者No."
	,D.D_ClassG		--"詰替１"
	,D.D_ClassH		--"運搬受託者(区間2)"
	,D.D_ClassI		--"詰替２"
	,D.D_ClassJ		--"運搬受託者(区間3)"