IF OBJECT_ID('TMP_HM_VMVP_SEG_COLNETA_BPE_UP') IS NOT NULL DROP TABLE TMP_HM_VMVP_SEG_COLNETA_BPE_UP
SELECT LEFT(REPLACE(A.FECHA, '-', ''), 6) PERIODO,
       CASE WHEN LEN(A.NUMERO_DOCUMENTO)=11 AND SUBSTRING(A.NUMERO_DOCUMENTO,1,2)= 10 THEN SUBSTRING(A.NUMERO_DOCUMENTO,3,8)
         ELSE A.NUMERO_DOCUMENTO END CODDOC,
       PERSONA.CODSBS,
       MAX(A.FECHA) FECHA,
    MAX(COD_UNICO) COD_UNICO,
    COUNT(DISTINCT COD_CREDITO) NRO_CREDITOS,
    SUM(COLOCACION_NETA) COLOCACION_NETA,
    MIN(TEA_APROBADA) TEA_APROBADA,        
    SUM(CASE WHEN TIPO_COLOCACION LIKE '%Recurrente REACTIVA%' THEN COLOCACION_NETA ELSE 0 END) MONTO_RECURRENTE_REACTIVA,
    SUM(CASE WHEN TIPO_COLOCACION LIKE '%Nuevo%' THEN COLOCACION_NETA ELSE 0 END) MONTO_NUEVOS,
    SUM(CASE WHEN TIPO_COLOCACION LIKE '%Aprobado%' AND TIPO_COLOCACION NOT LIKE '%Pre%' THEN COLOCACION_NETA ELSE 0 END) MONTO_APROBADO,
    SUM(CASE WHEN TIPO_COLOCACION LIKE '%Giro%' THEN COLOCACION_NETA ELSE 0 END) MONTO_GIROS,
    SUM(CASE WHEN TIPO_COLOCACION LIKE '%Pre%' THEN COLOCACION_NETA ELSE 0 END) MONTO_PREAPROBADO,
    SUM(CASE WHEN TIPO_COLOCACION LIKE '%Ecosistema%' THEN COLOCACION_NETA ELSE 0 END) MONTO_ECOSISTEMAS,
    SUM(CASE WHEN TIPO_COLOCACION LIKE '%Expre%' THEN COLOCACION_NETA ELSE 0 END) MONTO_EXPRESS,
    SUM(CASE WHEN TIPO_COLOCACION = 'DESCUENTOS_ELECTRONICOS' THEN COLOCACION_NETA ELSE 0 END) MONTO_DESCUENTOS_ELECTRONICOS,
       
    MAX(CASE WHEN TIPO_COLOCACION LIKE '%Recurrente REACTIVA%' THEN 1 ELSE 0 END) FLG_RECURRENTE_REACTIVA,
    MAX(CASE WHEN TIPO_COLOCACION LIKE '%Nuevo%' THEN 1 ELSE 0 END) FLG_NUEVOS,
    MAX(CASE WHEN TIPO_COLOCACION LIKE '%Aprobado%' AND TIPO_COLOCACION NOT LIKE '%Pre%' THEN 1 ELSE 0 END) FLG_APROBADO,
    MAX(CASE WHEN TIPO_COLOCACION LIKE '%Giro%' THEN 1 ELSE 0 END) FLG_GIROS,
    MAX(CASE WHEN TIPO_COLOCACION LIKE '%Pre%' THEN 1 ELSE 0 END) FLG_PREAPROBADO,
    MAX(CASE WHEN TIPO_COLOCACION LIKE '%Ecosistema%' THEN 1 ELSE 0 END) FLG_ECOSISTEMAS,
    MAX(CASE WHEN TIPO_COLOCACION LIKE '%Expre%' THEN 1 ELSE 0 END) FLG_EXPRESS,
    MAX(CASE WHEN TIPO_COLOCACION = 'DESCUENTOS_ELECTRONICOS' THEN 1 ELSE 0 END) FLG_DESCUENTOS_ELECTRONICOS

INTO TMP_HM_VMVP_SEG_COLNETA_BPE_UP
FROM ODS.HD_VPC_BPE_COLNETA A
INNER JOIN FECHAS_CIERRE B ON A.FECHA = B.fecha
LEFT JOIN ODS.MD_VPC_RCC_PERSONA PERSONA WITH (NOLOCK)
ON (
   (CASE WHEN LEN(A.NUMERO_DOCUMENTO)=11 AND SUBSTRING(A.NUMERO_DOCUMENTO,1,2)= '10' THEN SUBSTRING(A.NUMERO_DOCUMENTO,3,8)
         ELSE A.NUMERO_DOCUMENTO END) =
   (CASE WHEN LEN(PERSONA.CODDOC)=11 AND SUBSTRING(PERSONA.CODDOC,1,2)= '10' THEN SUBSTRING(PERSONA.CODDOC,3,8)
         ELSE PERSONA.CODDOC END)  
)
WHERE 1 = 1
AND TIPO_COLOCACION in 
   ( '101. Recurrente REACTIVA','1. Campaña Nuevos','21. Recurrente Aprobado','42. Giros','22. Recurrente Pre Aprobado'
 ,'103.Ecosistemas'  ,'42. Giros','5. Campaña Express','4. EN – Express','DESCUENTOS_ELECTRONICOS'
 ,'7. Campaña Nuevos P3','4. Campaña Nuevos P3','3. Campaña Nuevos P2','2. Campaña Nuevos P1'
 ,'26. CDD Recurrente Pre Aprobado','25. CDD Recurrente Aprobado','24. Estacional Pre Aprobados','23. Estacional Aprobados') -- ,'99. Cima'
GROUP BY LEFT(REPLACE(A.FECHA, '-', ''), 6),
         CASE WHEN LEN(A.NUMERO_DOCUMENTO)=11 AND SUBSTRING(A.NUMERO_DOCUMENTO,1,2)= 10 THEN SUBSTRING(A.NUMERO_DOCUMENTO,3,8)
              ELSE A.NUMERO_DOCUMENTO END,  
         PERSONA.CODSBS