IF OBJECT_ID('dbo.sp_fco_cambio_cias_datos_adi') IS NOT NULL
    DROP PROCEDURE dbo.sp_fco_cambio_cias_datos_adi
GO
CREATE PROCEDURE dbo.sp_fco_cambio_cias_datos_adi
(
    @pch_compania char(4),
    @pch_tipo_id char(3),
    @pch_dpto char(2),
    @pch_ciudad char(3),  
    @pvc_fax varchar(20),  
    @pvc_nit_ARP varchar(11),  
    @pvc_nombre_ARP varchar(30),  
    @pch_clase_aportante char(1),  
    @pch_forma_presentacion char(1),  
    @pch_sucursal_pagadora char(10),  
    @pch_nro_patronal char(11),  
    @pvc_nombre_retenedor varchar(60),  
    @pvc_cedula_retenedor varchar(60),  
    @pvc_agencias varchar(300),  
    @pti_arp_iss  tinyint,
    --Agregado JAS, Reporte Dian Grasco
    @pvc_dir_ARP varchar(50),
    @pvc_tel_ARP varchar(20),
    @pvc_nit_SENA varchar(11),
    @pvc_nombre_SENA varchar(30),
    @pvc_dir_SENA varchar(50),
    @pvc_tel_SENA varchar(20),
    @pvc_nit_ICBF varchar(11),
    @pvc_nombre_ICBF varchar(30),
    @pvc_dir_ICBF varchar(50),
    @pvc_tel_ICBF varchar(20),
    @pvc_cod_admon varchar(40),
    @pbi_iss_redondea bit,
    @pch_cod_ARP char(6)
)
AS
BEGIN
    IF EXISTS(SELECT 1 FROM fco_cias_datos_adi WHERE compania = @pch_compania)
        UPDATE  
          fco_cias_datos_adi
        SET  
          tipo_id = @pch_tipo_id,  
          cod_dpto = @pch_dpto,  
          cod_ciudad = @pch_ciudad,  
          fax = @pvc_fax,  
          nit_ARP = @pvc_nit_ARP,  
          nombre_ARP = @pvc_nombre_ARP,  
          clase_aportante = @pch_clase_aportante,  
          forma_presentacion = @pch_forma_presentacion,  
          sucursal_pagadora = @pch_sucursal_pagadora,  
          nro_patronal = @pch_nro_patronal,  
          nombre_retenedor = @pvc_nombre_retenedor,  
          cedula_retenedor = @pvc_cedula_retenedor,  
          agencias = @pvc_agencias,  
          arp_iss = @pti_arp_iss,
          dir_ARP = @pvc_dir_ARP,
          tel_ARP = @pvc_tel_ARP,
          nit_SENA = @pvc_nit_SENA,
          nombre_SENA = @pvc_nombre_SENA,
          dir_SENA = @pvc_dir_SENA,
          tel_SENA = @pvc_tel_SENA,
          nit_ICBF = @pvc_nit_ICBF,
          nombre_ICBF = @pvc_nombre_ICBF,
          dir_ICBF = @pvc_dir_ICBF,
          tel_ICBF = @pvc_tel_ICBF,
          cod_admon = @pvc_cod_admon,
          iss_redondea = @pbi_iss_redondea,
          cod_ARP = @pch_cod_ARP
        WHERE  
          compania = @pch_compania
   ELSE
        INSERT INTO fco_cias_datos_adi
        (compania, tipo_id, cod_dpto, cod_ciudad, fax, nit_ARP, nombre_ARP, 
         clase_aportante, forma_presentacion, sucursal_pagadora, nro_patronal, 
         nombre_retenedor, cedula_retenedor, agencias, arp_iss, dir_ARP, 
         tel_ARP, nombre_SENA, nit_SENA, dir_SENA, tel_SENA, 
         nombre_ICBF, nit_ICBF, dir_ICBF, tel_ICBF, cod_admon, iss_redondea, cod_ARP)
        SELECT
        @pch_compania, @pch_tipo_id, @pch_dpto, @pch_ciudad, @pvc_fax,  @pvc_nit_ARP, @pvc_nombre_ARP, 
        @pch_clase_aportante, @pch_forma_presentacion, @pch_sucursal_pagadora, @pch_nro_patronal, 
        @pvc_nombre_retenedor, @pvc_cedula_retenedor, @pvc_agencias, @pti_arp_iss, @pvc_dir_ARP, 
        @pvc_tel_ARP, @pvc_nombre_SENA, @pvc_nit_SENA, @pvc_dir_SENA, @pvc_tel_SENA, 
        @pvc_nombre_ICBF, @pvc_nit_ICBF, @pvc_dir_ICBF, @pvc_tel_ICBF, @pvc_cod_admon, 
        @pbi_iss_redondea, @pch_cod_ARP

END
GO
GRANT EXECUTE ON sp_fco_cambio_cias_datos_adi TO PUBLIC
GO
