######################################################### 1- PRIMERO HACER EL TEMPORAL SDA
DELETE FROM DLAB_MODELOS.TMP_JTT_CREDITOS_SDA;
INSERT INTO DLAB_MODELOS.TMP_JTT_CREDITOS_SDA
WITH MAXIMA_FECHA as(
    SELECT MAX(FecInformacion_Dt) max_fec_del_mes
 FROM  E_DW_VIEWS.V_MST_SDA_SOLICITUD 
 WHERE CAST(CAST(FecInformacion_Dt AS FORMAT 'YYYYMM') AS VARCHAR(6)) = (SELECT MAX(PERIODO) FROM DLAB_MODELOS.HM_LAST_MONTH)
)
SEL a.FecInformacion_Dt, a.Cod_Unico_Val, a.Solicitud_Cd, a.Credito_Cd
 , a.Fecha_Desemb_Dt, a.RegEjecutivo_Val, a.Reg_EjecutivoInicial_Val, a.Centro_Val
 , a.SubProducto_Val
 , case when a.SubProducto_Val like '30K REACTIVA PERU REPROG 2022' then 1 else 0 end FLG_Reactiva_Repro_22
 , case when a.SubProducto_Val like '30K REACTIVA PERU REPROG' then 1 else 0 end FLG_Reactiva_Repro
 , case when a.SubProducto_Val like '30K REACTIVA PERU' and a.SubProducto_Val not like '%REPROG%' then 1 else 0 end FLG_Reactiva
 , case when a.SubProducto_Val like 'COFIDE FONDO CRECER' then 1 else 0 end FLG_Crecer
 , case when a.SubProducto_Val like 'CAPITAL%TRABAJO%'  and A.Centro_Val not in ('CIMA VISA') then 1 else 0 end FLG_Capital_Trabajo
 , case when a.SubProducto_Val like 'LINEA%' then 1 else 0 end FLG_Linea
 , case when A.Centro_Val in ('CIMA VISA') then 1 else 0 end FLG_CIMA 
 , row_number () over (partition by a.Cod_Unico_Val order by a.Solicitud_Cd desc ) Orden
from E_DW_VIEWS.V_MST_SDA_SOLICITUD a
where a.FecInformacion_Dt = (SEL MAX(max_fec_del_mes) from MAXIMA_FECHA)
--and a.Credito_Cd <> ''
and a.Estado_SolCre_Val in ('VIGENTE','VENCIDA')
and a.Centro_Val <> 'RECUPERACIONES'
and (
   (a.SubProducto_Val like 'LINEA%REVOLVENTE%' and COALESCE(a.Saldo_Pri_Amt, 0) >= 0) OR a.Saldo_Pri_Amt > 0
)
--)
--WITH DATA PRIMARY INDEX (FecInformacion_Dt, Cod_Unico_Val);

######################################################### 2- CONSEGUIR EL EJECUTIVO
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 


######################################################### 3- SI NO CONISGUES EJECUTVO con lo anterior
 , coalesce(b.CodigoRegistro_Final, a.REGISTRO) REGISTRO
 , 'STOCK' TIPO_CARGA
 , CURRENT_DATE
FROM DLAB_MODELOS.HM_SEG_BPE A
LEFT JOIN DLAB_MODELOS.TMP_VMVP_1ER_NIVEL_UPDATE_SEGMENTACION_BPE B
on a.CODUNICOCLI = b.CODUNICOCLI