115 lines
3.9 KiB
Transact-SQL
115 lines
3.9 KiB
Transact-SQL
-- Schema: C6MartPeriodico
|
|
-- Stored Procedure: DM_MONITORAGGIO_STORICO
|
|
|
|
|
|
|
|
-- Stored procedure
|
|
-- =============================================
|
|
-- Author: Paolo Giovanetti
|
|
-- Create date: 19 marzo 2009
|
|
-- Description:
|
|
-- =============================================
|
|
CREATE procedure [C6MartPeriodico].[DM_MONITORAGGIO_STORICO]
|
|
AS
|
|
BEGIN
|
|
|
|
SET NOCOUNT ON;
|
|
|
|
DECLARE @ID_ELAB INT
|
|
|
|
SET @ID_ELAB = [C6MartPeriodico].GETIDELAB()
|
|
|
|
-- Log esecuzione
|
|
INSERT INTO LOG_ESECUZIONE
|
|
(Nome, Inizio, Nota)
|
|
VALUES (
|
|
'DM_MONITORAGGIO_STORICO',
|
|
GETDATE(),
|
|
'Elaborazione trimestrale'
|
|
)
|
|
|
|
TRUNCATE TABLE [C6MartPeriodico].[MONITORAGGIO_STORICO]
|
|
|
|
INSERT INTO [C6MartPeriodico].[MONITORAGGIO_STORICO]
|
|
([RETE]
|
|
,[COD_FISCALE]
|
|
,[ID_AREA]
|
|
,[NOME_PROGETTO]
|
|
,[DATA_CTV]
|
|
,[CTV_MONITORATO]
|
|
,[RISORSE_ASSOCIATE]
|
|
,[ID_ELAB]
|
|
,CEDOLE_DIV
|
|
,ordinamento_progetto)
|
|
|
|
SELECT
|
|
TANAB.RETE AS RETE,
|
|
CASE
|
|
WHEN MANDATI.CODMAND IS NULL THEN TANAB.CODFIS
|
|
ELSE dbo.getFiduciariaByCodMand(MANDATI.CODMAND)
|
|
END AS COD_FISCALE,
|
|
CASE
|
|
WHEN TANAB.CODAREA = 'INV' THEN 'Inv'
|
|
WHEN TANAB.CODAREA = 'RIS' THEN 'Ris'
|
|
WHEN TANAB.CODAREA = 'EXR' THEN 'Ext'
|
|
WHEN TANAB.CODAREA = 'LIQ' THEN 'Liq'
|
|
END AS ID_AREA,
|
|
ISNULL(CASE
|
|
WHEN PROGETTO_BOZZA.C_PROJECTIDR_51E22 IS NULL THEN LTRIM(RTRIM(PRCONSUL.C_PROJECTNAM_11D1A))
|
|
ELSE LTRIM(RTRIM(PROGETTO_BOZZA.NUOVO_NOME_PROGETTO))
|
|
END, 'XXX') AS NOME_PROGETTO,
|
|
CAST(CAST(WRENAB.DTVALORIZ AS VARCHAR(8)) AS DATETIME) AS DATA_CTV,
|
|
WRENAB.CTV AS CTV_MONITORATO,
|
|
WRENAB.CVN AS RISORSE_ASSOCIATE,
|
|
@ID_ELAB AS ID_ELAB,
|
|
(TANAB.TOT_CED + TANAB.TOT_DIV) AS CEDOLE_DIV,
|
|
tanab.codprog
|
|
FROM C6STAGINGPERIODICO.TANAB AS TANAB
|
|
INNER JOIN C6StagingPeriodico.TRENAB AS WRENAB
|
|
ON TANAB.CODPROG = WRENAB.CODPROG
|
|
AND TANAB.DTRIF = WRENAB.DTRIF
|
|
INNER JOIN C6StagingPeriodico.PRCONSUL AS PRCONSUL
|
|
ON TANAB.CODPROG = PRCONSUL.C_PROJECTIDM_1AF31
|
|
INNER JOIN C6StagingPeriodico.CONSAREA AS AREA
|
|
ON PRCONSUL.F_PCONSULENZ_B69E4 = AREA.OID$
|
|
INNER JOIN C6StagingPeriodico.CONSUL AS CONSUL
|
|
ON AREA.F_PCONSULENZ_7FBE3 = CONSUL.OID$
|
|
INNER JOIN C6StagingPeriodico.ALL_CF_STATO AS SCELTA_STATO
|
|
ON CONSUL.ADBKID = SCELTA_STATO.CF_CLIENTE
|
|
AND CONSUL.INSTID = SCELTA_STATO.RETE
|
|
AND CONSUL.TYPE$_TIPOCO_1EA7C = SCELTA_STATO.STATO_CONSULENZA
|
|
LEFT JOIN C6StagingPeriodico.NOME_PROGETTO_BOZZA AS PROGETTO_BOZZA
|
|
ON PRCONSUL.C_PROJECTIDR_51E22 = PROGETTO_BOZZA.C_PROJECTIDR_51E22
|
|
LEFT OUTER JOIN C6StagingPeriodico.WMANDATI AS MANDATI
|
|
ON TANAB.CODFIS = MANDATI.CODMAND
|
|
WHERE 1 = 1
|
|
AND TANAB.DTFINE = '99991231'
|
|
AND SCELTA_STATO.FLAG_UTILIZZO_STATO = 1
|
|
--and tanab.codfis not in('GRVMRZ63C14L566J','DNGMRA56E66D542Z')
|
|
|
|
-- UNION
|
|
--
|
|
-- SELECT
|
|
-- TANAB.RETE AS RETE,
|
|
-- CASE
|
|
-- WHEN MANDATI.CODMAND IS NULL THEN TANAB.CODFIS
|
|
-- ELSE dbo.getFiduciariaByCodMand(MANDATI.CODMAND)
|
|
-- END AS COD_FISCALE,
|
|
-- CASE
|
|
-- WHEN TANAB.CODAREA = 'INV' THEN 'Inv'
|
|
-- WHEN TANAB.CODAREA = 'RIS' THEN 'Ris'
|
|
-- WHEN TANAB.CODAREA = 'EXR' THEN 'Ext'
|
|
-- WHEN TANAB.CODAREA = 'LIQ' THEN 'Liq'
|
|
-- END AS ID_AREA,
|
|
-- ISNULL(CASE
|
|
-- WHEN PROGETTO_BOZZA.C_PROJECTIDR_51E22 IS NULL THEN PRCONSUL.C_PROJECTNAM_11D1A
|
|
-- ELSE PROGETTO_BOZZA.NUOVO_NOME_PROGETTO
|
|
-- END, 'XXX') AS NOME_PROGETTO,
|
|
-- CAST(CAST(TRENAB.DTVALORIZ AS VARCHAR(8)) AS DATETIME) AS DATA_CTV,
|
|
-- TRENAB.CTV AS CTV_MONITORATO,
|
|
-- TRENAB.CVN AS RISORSE_ASSOCIATE,
|
|
-- @ID_ELAB AS ID_ELAB
|
|
--
|
|
-- FROM C6STAGINGPERIODICO.TANAB AS TANAB
|
|
-- INNER JOIN C6StagingPeriodico.TRENAB AS TRE
|