-- Schema: C6MartPeriodico
-- Stored Procedure: PL_MP_S140AnalisiRisparmioCharts



-- [C6MartPeriodico].[PL_MP_S140AnalisiRisparmioCharts_NoLight] 'S','BRNGDI72S69L219Y'
CREATE procedure [C6MartPeriodico].[PL_MP_S140AnalisiRisparmioCharts]
	@Rete char(1), 
	@CodiceFiscale varchar(16)
AS
BEGIN
	SET NOCOUNT ON;

--QUERY PER INTERMEDIARIO
SELECT 
	RETE,
	COD_FISCALE,
	INTERMEDIARIO,
	CASE WHEN INTERMEDIARIO  IN ( 'Fideuram', 'Sanpaolo Invest', 'IW Private Investments') THEN 1
			ELSE 2 END AS ORDINE,
	SUM(CTV)  AS CTV_TOT,
	SUM(CASE WHEN RISKCLASS = 'NON COPERTO' THEN CTV ELSE 0 END)  AS CTV_notCovered,
	SUM(CASE WHEN RISKCLASS = 'Classe A' 
					or RISKCLASS = 'Classe B'
						or RISKCLASS = 'Classe C' 
							or RISKCLASS = 'Classe D' 
		THEN CTV ELSE 0 END)  AS CTV_CreditRisk,
	SUM(CASE WHEN RISKCLASS = 'NA' THEN CTV ELSE 0 END)  AS CTV_na,
	--CASE WHEN SUM(CTV)=0 THEN 0 ELSE (SUM(CASE WHEN RISKCLASS = 'NON COPERTO' THEN CTV ELSE 0 END)/SUM(CTV))*100  END AS PERC_notCovered,
	CASE WHEN SUM(CTV)=0 THEN 0 ELSE (SUM(CASE WHEN RISKCLASS = 'Classe A' 
													or RISKCLASS = 'Classe B'
														or RISKCLASS = 'Classe C' 
															or RISKCLASS = 'Classe D' THEN CTV ELSE 0 END)
										/SUM(CASE WHEN RISKCLASS <> 'NON COPERTO' THEN CTV ELSE 1 END) 
	)*100 END AS PERC_CreditRisk,

	CASE WHEN SUM(CTV)=0 THEN 0 ELSE (SUM(CASE WHEN RISKCLASS = 'NA' THEN CTV ELSE 0 END) /sum(CASE WHEN RISKCLASS <> 'NON COPERTO' THEN CTV ELSE 1 END))*100  END as PERC_NA
FROM
(
 -- Start 1.1
	SELECT 
	PATRBF.RETE,
	PATRBF.COD_FISCALE,
	CASE	
		WHEN RISCHIO_PROD.COPERTURA < 100 
			THEN 'NON COPERTO'
		WHEN DESCRIZIONE IS NULL
			THEN 'NA'
		ELSE DESCRIZIONE	
	END AS RISKCLASS,
	CASE WHEN PATRBF.RETE = 'F' THEN 'Fideuram' WHEN PATRBF.RETE = 'S' THEN 'Sanpaolo Invest' ELSE 'IW Private Investments'  END AS INTERMEDIARIO,
	--SUM(CASE WHEN PATRBF.ID_AREA = 'Cc' AND PATRBF.CTV < 0 THEN 0 ELSE PATRBF.CTV END) AS CTV
	--INIZIO INTERVENTI OMNIA
	--SUM(CASE WHEN ctvcc.cc_ctv <0 and patrbf.id_area='cc' THEN 0 ELSE PATRBF.CTV END) AS ctv
	SUM(CASE WHEN ctvcc.cc_ctv <0 and patrbf.id_area='cc'   THEN 0 
			 WHEN ctvself.self_ctv <0 and patrbf.id_area='self' THEN 0
		ELSE PATRBF.CTV END) AS ctv
	--FINE INTERVENTI OMNIA
	FROM
	[C6MartPeriodico].[patrimonio_bf] PATRBF
	---Per calcolare la somma algebrica dei cc 
	LEFT OUTER JOIN
	(select cod_fiscale, rete, sum(ctv) as cc_ctv
	from
	[C6MartPeriodico].[patrimonio_bf] 
	where id_Area='Cc'
	group by cod_fiscale, rete
	) ctvcc
	on 
	patrbf.cod_fiscale=ctvcc.cod_fiscale
	and
	patrbf.rete=ctvcc.rete
	--fine calcolo somma cc
	--INIZIO INTERVENTI OMNIA
	---Per calcolare la somma algebrica dei self negativi
	LEFT OUTER JOIN
	(select cod_fiscale, rete, sum(ctv) as self_ctv
	from
	[C6MartPeriodico].[patrimonio_bf] 
	where id_Area='Self'
	group by cod_fiscale, rete
	) ctvself
	on 
	patrbf.cod_fiscale=ctvself.cod_fiscale
	and
	patrbf.rete=ctvself.rete
	--fine calcolo somma self negativi
	--FINE INTERVENTI OMNIA
	LEFT OUTER JOIN
	[C6Martperiodico].RISCHIO_AGGREGATO RISCHIO_PROD 
	ON 
		PATRBF.RETE= RISCHIO_PROD.RETE
		AND PATRBF.COD_FISCALE= RISCHIO_PROD.COD_FISCALE
		AND RISCHIO_PROD.COD_AGGREG = 
				CASE 
					WHEN (PATRBF.NOME_PROGETTO IS NOT NULL)
						THEN 'RISFIN|PIRAMIDE|' + LEFT(PATRBF.ID_AREA,3) + '|' + PATRBF.NOME_PROGETTO + '|' + isnull(cast(PATRBF.ordinamento_progetto as varchar),'') + '|'
					--V
					WHEN (PATRBF.NOME_PROGETTO IS NULL) AND PATRBF.ID_AREA IN ('EXT','INV','PRE','RIS','LIQ')
						THEN 'RISFIN|PIRAMIDE|' + LEFT(PATRBF.ID_AREA,3) + '|' 
					WHEN (PATRBF.NOME_PROGETTO IS NULL) AND PATRBF.ID_AREA IN ('CC')
						THEN 'COMPLESSIVO|BF|CC|' + LEFT(PATRBF.ID_AREA,3) + '|'  
					WHEN (PATRBF.NOME_PROGETTO IS NULL) AND PATRBF.ID_AREA IN ('NA')
						THEN 'RISFIN|' + LEFT(PATRBF.ID_AREA,3) + '|'  
					--
				END	+ PATRBF.POSITION_ID 
	--INNER JOIN C6MartPeriodico.CODIFICA_CREDITRISK CR
	LEFT outer JOIN C6MartPeriodico.CODIFICA_CREDITRISK CR
	ON RISCHIO_PROD.CREDITRISK = cr.p