SET IDENTITY_INSERT asurnet.dbo.CARPETAS ON;

INSERT INTO asurnet.dbo.CARPETAS (CRP_Id, CRP_Nombre, CRP_Tipo_Objeto, CRP_Id_Objeto)
SELECT A.ADC_ID, A.ADC_Nombre, A.ADC_Objeto, B.IDTSS
from vsegbas.dbo.ARCHIVODOCUMENTAL A
         INNER JOIN tssseg0001.dbo.IDTraspasos B
                    ON A.OBJ_Id = B.IDTras COLLATE Modern_Spanish_CI_AI AND B.TableID = 'Clientes'
where A.ADC_Objeto = 1
  AND A.ADC_IsFolder = 1;

INSERT INTO asurnet.dbo.CARPETAS (CRP_Id, CRP_Nombre, CRP_Tipo_Objeto, CRP_Id_Objeto)
SELECT A.ADC_ID, A.ADC_Nombre, A.ADC_Objeto, B.IDTSS
from vsegbas.dbo.ARCHIVODOCUMENTAL A
         INNER JOIN tssseg0001.dbo.IDTraspasos B
                    ON A.OBJ_Id = B.IDTras COLLATE Modern_Spanish_CI_AI AND B.TableID = 'Colaboradores'
where A.ADC_Objeto = 2
  AND A.ADC_IsFolder = 1;

INSERT INTO asurnet.dbo.CARPETAS (CRP_Id, CRP_Nombre, CRP_Tipo_Objeto, CRP_Id_Objeto)
SELECT A.ADC_ID, A.ADC_Nombre, A.ADC_Objeto, B.IDTSS
from vsegbas.dbo.ARCHIVODOCUMENTAL A
         INNER JOIN tssseg0001.dbo.IDTraspasos B
                    ON A.OBJ_Id = B.IDTras COLLATE Modern_Spanish_CI_AI AND B.TableID = 'Companias'
where A.ADC_Objeto = 3
  AND A.ADC_IsFolder = 1;

--Polizas no usan la tabla traductora
INSERT INTO asurnet.dbo.CARPETAS (CRP_Id, CRP_Nombre, CRP_Tipo_Objeto, CRP_Id_Objeto)
SELECT A.ADC_ID, A.ADC_Nombre, A.ADC_Objeto, A.OBJ_Id
from vsegbas.dbo.ARCHIVODOCUMENTAL A
where A.ADC_Objeto = 7
  AND A.ADC_IsFolder = 1;

INSERT INTO asurnet.dbo.CARPETAS (CRP_Id, CRP_Nombre, CRP_Tipo_Objeto, CRP_Id_Objeto)
SELECT A.ADC_ID, A.ADC_Nombre, A.ADC_Objeto, B.IDTSS
from vsegbas.dbo.ARCHIVODOCUMENTAL A
         INNER JOIN tssseg0001.dbo.IDTraspasos B
                    ON A.OBJ_Id = B.IDTras COLLATE Modern_Spanish_CI_AI AND B.TableID = 'Recibos'
where A.ADC_Objeto = 10
  AND A.ADC_IsFolder = 1;

INSERT INTO asurnet.dbo.CARPETAS (CRP_Id, CRP_Nombre, CRP_Tipo_Objeto, CRP_Id_Objeto)
SELECT A.ADC_ID, A.ADC_Nombre, A.ADC_Objeto, B.IDTSS
from vsegbas.dbo.ARCHIVODOCUMENTAL A
         INNER JOIN tssseg0001.dbo.IDTraspasos B
                    ON A.OBJ_Id = B.IDTras COLLATE Modern_Spanish_CI_AI AND B.TableID = 'Siniestros'
where A.ADC_Objeto = 13
  AND A.ADC_IsFolder = 1;

INSERT INTO asurnet.dbo.CARPETAS (CRP_Id, CRP_Nombre, CRP_Tipo_Objeto, CRP_Id_Objeto)
SELECT A.ADC_ID, A.ADC_Nombre, A.ADC_Objeto, B.IDTSS
from vsegbas.dbo.ARCHIVODOCUMENTAL A
         INNER JOIN tssseg0001.dbo.IDTraspasos B
                    ON A.OBJ_Id = B.IDTras COLLATE Modern_Spanish_CI_AI AND B.TableID = 'Suplementos'
where A.ADC_Objeto = 14
  AND A.ADC_IsFolder = 1;

--Oportunidades no usan la tabla traductora
INSERT INTO asurnet.dbo.CARPETAS (CRP_Id, CRP_Nombre, CRP_Tipo_Objeto, CRP_Id_Objeto)
SELECT A.ADC_ID, A.ADC_Nombre, A.ADC_Objeto, A.OBJ_Id
from vsegbas.dbo.ARCHIVODOCUMENTAL A
where A.ADC_Objeto = 160
  AND A.ADC_IsFolder = 1;

SET IDENTITY_INSERT asurnet.dbo.CARPETAS OFF;
