DELETE FROM DLAB_MODELOS.TMP_VMVP_1ER_NIVEL_UPDATE_SEGMENTACION_BPE;
INSERT INTO DLAB_MODELOS.TMP_VMVP_1ER_NIVEL_UPDATE_SEGMENTACION_BPE
WITH MAX_FEC_VPC_CLIENTE as(
    SELECT MAX(fecha_dt) max_fec_del_mes
 FROM  E_DW_VIEWS.V_VPC_CLIENTE_BANCA_FINAL_HST 
 WHERE PERIODO_VAL = (SELECT MAX(PERIODO) FROM DLAB_MODELOS.HM_LAST_MONTH)
),
MAXIMA_FECHA_SECTORISTA as(
    SELECT MAX(FecInformacion_Dt) max_fec_del_mes
 FROM  E_DW_VIEWS.V_VPC_EQUIV_SECTORISTA_HST 
 WHERE CAST(CAST(FecInformacion_Dt AS FORMAT 'YYYYMM') AS VARCHAR(6)) = (SELECT MAX(PERIODO) FROM DLAB_MODELOS.HM_LAST_MONTH)
),
MAXIMA_FECHA_CARTERA as(
    SELECT MAX(fecha_dt) max_fec_del_mes
 FROM  E_DW_VIEWS.V_MST_VPC_CART_ACTIVA_SEG_HST 
 WHERE PERIODO_VAL = (SELECT MAX(PERIODO) FROM DLAB_PROGRAMADATOSVPC.HM_LAST_MONTH)
),
MAXIMA_FECHA_SALDOS as(
    SELECT MAX(Fecha_Saldo_Dt) max_fec_del_mes
 FROM  E_DW_VIEWS.V_AGG_SALDOS_DIARIOS 
 WHERE PERIODO = (SELECT MAX(PERIODO) FROM DLAB_PROGRAMADATOSVPC.HM_LAST_MONTH)
)
SELECT x.CODUNICOCLI
      ,aa.CodigoRegistro_Cd
   ,b.RegEjecutivo_Val
   ,coalesce(b.RegEjecutivo_Val, aa.CodigoRegistro_Cd) CodigoRegistro_Final
   ,c.Tipo_Identificacion_Desc, c.Numero_Identificacion
   ,CASE WHEN d.Codigo_Unico_Cliente_Cd IS NULL THEN 'N' ELSE 'S' END As Tiene_Cartera_Activa_Flg
   ,CASE WHEN e.Cuc_Val IS NULL THEN 'N' ELSE 'S' END As Tiene_Deposito_Flg
   ,CAST(CURRENT_DATE AS FORMAT 'YYYY-MM-DD') || ' ' || CAST(CAST(CURRENT_TIME AS FORMAT 'HH:MI:SS') AS CHAR(8)) FECHA_CARGA
from DLAB_MODELOS.TMP_JTT_CODUNICOCLI  X
LEFT JOIN E_DW_VIEWS.V_VPC_CLIENTE_BANCA_FINAL_HST a
ON a.Cuc_Num = x.CODUNICOCLI
AND A.fecha_dt = (SELECT max(max_fec_del_mes) FROM MAX_FEC_VPC_CLIENTE)
LEFT JOIN E_DW_VIEWS.V_VPC_EQUIV_SECTORISTA_HST aa
ON aa.CodigoSectorLargo_Cd = a.Cod_Sectorista_Val
AND aa.FecInformacion_Dt = (SELECT max(max_fec_del_mes) FROM MAXIMA_FECHA_SECTORISTA)
LEFT JOIN (
    select Cod_Unico_Val, max(case when a.Orden=1 then a.RegEjecutivo_Val end) RegEjecutivo_Val
     ,max(Fecha_Desemb_Dt) Fecha_Desemb_Dt
     ,max(FLG_Reactiva_Repro_22) FLG_Reactiva_Repro_22, max(FLG_Reactiva_Repro) FLG_Reactiva_Repro
     ,max(FLG_Reactiva) FLG_Reactiva, max(FLG_Crecer) FLG_Crecer
     ,max(FLG_Capital_Trabajo) FLG_Capital_Trabajo, max(FLG_Linea) FLG_Linea, max(FLG_CIMA) FLG_CIMA
 from DLAB_MODELOS.TMP_JTT_CREDITOS_SDA  A
 --where A.Centro_Val not IN ('CIMA VISA')
 group by Cod_Unico_Val 
) b
ON b.Cod_Unico_val = a.Cuc_Num
LEFT JOIN E_DW_VIEWS.V_DIM_CLIENTE C--141468
ON C.Cuc_Num = X.CODUNICOCLI 
--INFORMACION CARTERA ACTIVA
LEFT JOIN E_DW_VIEWS.V_MST_VPC_CART_ACTIVA_SEG_HST D
ON a.Cuc_Num = d.Codigo_Unico_Cliente_Cd 
AND d.Fecha_Dt = (SELECT max(max_fec_del_mes) FROM MAXIMA_FECHA_CARTERA)
--INFORMACION PRODUCTOS DEPOSITOS
LEFT JOIN (
    SELECT A.Fecha_Saldo_Dt,
     A.Cuc_Val 
 FROM E_DW_VIEWS.V_AGG_SALDOS_DIARIOS A
 INNER JOIN E_DW_VIEWS.V_DIM_VPC_JERARQUIA_PRODUCTOS JPRD
 ON A.Producto_CCOA_Val = JPRD.Producto_Cd
 AND A.Grupo_Producto_Id = JPRD.Grupo_Producto_Id
 WHERE A.Fecha_Saldo_Dt = (SELECT max(max_fec_del_mes) FROM MAXIMA_FECHA_SALDOS)
 AND JPRD.Tipo_Prod_Cd = 20311
 GROUP BY A.Fecha_Saldo_Dt, A.Cuc_Val 
) E
on e.Cuc_Val = a.Cuc_Num

--) WITH DATA PRIMARY INDEX (CODUNICOCLI);