SET LANGUAGE PORTUGUESE
IF OBJECT_ID ('TEMPDB..#REMESSA') IS NOT NULL DROP TABLE #REMESSA
SELECT DISTINCT
ID_CLIENTE,
ID_CENTROCUSTO,
ID_DT_ARQUIVO,
ID_DTVENC,
ID_EMP,
ID_ESCOBS,
ID_VALOR,
ID_FASE
INTO #REMESSA
FROM REPORTS..ARQUIVO_REMESSA WITH(NOLOCK)
WHERE CAST(ID_DT_ARQUIVO AS DATE) >= '01/03/2017'
AND   CAST(ID_DT_ARQUIVO AS DATE) <= '31/03/2017'


IF OBJECT_ID ('TEMPDB..#BASE_REMESSA_1') IS NOT NULL DROP TABLE #BASE_REMESSA_1
SELECT DISTINCT A.*
	  ,TITULO_ENVIADO = 1
	  ,MODO_PGTO = CASE WHEN B.ID_MOTIVO_BX = 'PG' THEN 'PG'
						WHEN C.ID_MOTIVO_BX = 'PC' THEN 'PC' ELSE '' END
      ,ID_DT_BAIXA = CASE WHEN B.ID_MOTIVO_BX = 'PG' THEN B.ID_DT_ARQUIVO
						  WHEN C.ID_MOTIVO_BX = 'PC' THEN C.ID_DT_ARQUIVO END
	  ,TITULO_PAGO = CASE WHEN B.ID_MOTIVO_BX = 'PG' THEN 1
						  WHEN C.ID_MOTIVO_BX = 'PC' THEN 1 ELSE 0 END
	  ,VALOR_PGTO  = CASE WHEN B.ID_MOTIVO_BX = 'PG' THEN A.ID_VALOR
						  WHEN C.ID_MOTIVO_BX = 'PC' THEN A.ID_VALOR ELSE 0 END
INTO #BASE_REMESSA_1 -- INFORMAÇÕES DA BAIXA
FROM #REMESSA A LEFT JOIN REPORTS..ARQUIVO_BAIXA B     WITH(NOLOCK) ON  CAST(A.ID_EMP AS FLOAT) = CAST(B.ID_EMP AS FLOAT)
				LEFT JOIN REPORTS..ARQUIVO_PRESTACAO C WITH(NOLOCK) ON  CAST(A.ID_EMP AS FLOAT) = CAST(C.ID_EMP AS FLOAT)


DROP TABLE #BASE_REMESSA_2
SELECT ID_CLIENTE
	  ,ID_CENTROCUSTO
	  ,ID_DT_ARQUIVO AS ULT_ENTRADA
	  ,ID_FASE AS FASE
	  ,ID_ESCOBS = MIN(CASE WHEN ID_ESCOBS = 'GR_CONTROLE' THEN 1
		                WHEN ID_ESCOBS = 'CSU' THEN 2  ELSE 3 END)
	  ,MAX(DATEDIFF(DD,ID_DTVENC,ID_DT_ARQUIVO))AS ATRASO
	  ,MAX(ID_DT_BAIXA)AS ID_DT_BAIXA
	  ,MAX(TITULO_ENVIADO)AS TITULO_ENVIADO
	  ,MAX(TITULO_PAGO)AS TITULO_PAGO
INTO #BASE_REMESSA_2
FROM #BASE_REMESSA_1
GROUP BY ID_CLIENTE,ID_CENTROCUSTO,ID_DT_ARQUIVO,ID_FASE

DROP TABLE #NEVER
SET LANGUAGE PORTUGUESE
SELECT DISTINCT COD_CLIENTE
--INTO #NEVER
FROM BASE_NEVER_PAID
WHERE CAST(MÊS AS DATE) >= '01/03/2017'
AND   CAST(MÊS AS DATE) <= '31/03/2017'


Select * FROM BASE_NEVER_PAID
WHERE CAST(MÊS AS DATE) >= '01/03/2017'
AND   CAST(MÊS AS DATE) <= '31/03/2017'

SELECT ID_CLIENTE AS CPF_CNPJ,
	   ID_CENTROCUSTO AS CENTRO_DE_CUSTO,
	   CONVERT(VARCHAR,ULT_ENTRADA,103)	AS ENTRADA_COBRANCA,
	   FASE AS FASE_DA_COBRANCA,
	   ESCRITORIO = CASE WHEN ID_ESCOBS = 1 THEN 'SELFCURE' WHEN ID_ESCOBS = 2 THEN 'GR_CONTROLE' ELSE 'ESCOBS' END,
	   ATRASO AS ULTIMO_ATRASO,
	   ISNULL(CONVERT(VARCHAR,ID_DT_BAIXA,103),'') AS ULTIMO_PAGAMENTO,
	   PAGOU = CASE WHEN TITULO_PAGO = 1 THEN 'SIM' ELSE 'NAO' END,
	   NEVER_PAID = CASE WHEN COD_CLIENTE IS NOT NULL THEN 'SIM' ELSE 'NAO' END
FROM #BASE_REMESSA_2 A
LEFT JOIN #NEVER B
ON CAST(ID_CLIENTE AS FLOAT) = CAST(COD_CLIENTE AS FLOAT)
WHERE ATRASO > 4