IF OBJECT_ID('dbo.sp_fdt_crea_embargo') IS NOT NULL
   DROP PROCEDURE dbo.sp_fdt_crea_embargo
GO
CREATE PROCEDURE dbo.sp_fdt_crea_embargo  
(  
    @pch_compania      char(4),  
    @pch_trabajador    char(10),  
    @psi_concepto      smallint,  
    @pti_secuencia     tinyint,  
    @pdt_fecha_embargo smalldatetime,  
    @pdc_oficina       decimal(6,0),  
    @pti_clase         tinyint,  
    @pvc_expediente    varchar(10),  
    @pdc_juzgado       decimal(12,0),  
    @pti_banco         tinyint,  
    @pdc_cuenta        decimal(12,0),  
    @pti_tipo_id_dem   tinyint,  
    @pdc_id_demandante decimal(11,0),  
    @pvc_apellidos     varchar(20),  
    @pvc_nombres       varchar(100),  
    @pch_agr_conceptos char(3),  
    @psi_cnc_base      smallint,  
    @pti_quinta_parte  tinyint,  
    @pdc_monto_total   decimal(14,2),  
    @pdc_porcentaje    decimal(5,2),  
    @pdc_cuota_fija    decimal(14,2),  
    @pdc_saldo_actual  decimal(14,2)
--agregado por DCRP Agosto 22/2003
    ,@pch_ofOrigen	char(4)
    ,@pch_ofDestino	char(4)
    ,@pch_ciudad_pago   char(2)  
    ,@pti_porcentaje_aum tinyint
    ,@pti_valor_aum	decimal(14,2)
    ,@pti_mes_aum   tinyint
    ,@pin_anio_desde	integer
)  
/*********************************************************************/  
/*** Modulo:      Módulo Fiscal ADAM V.3 - Embargos                ***/  
/*** Descripcion: Crea o Actualiza el embargo para el trabajador   ***/  
/*** Autor:   Juan Carlos Leguizamon                           ***/  
/*** Fecha:   Abril 22 de 2002                                 ***/  
/*** Motor:   SQL Server 7.0 Version interna: 1.00      ***/  
/*********************************************************************/  
AS  
BEGIN  
    IF NOT EXISTS(SELECT 1 FROM fdt_embargos  
                  WHERE compania = @pch_compania And   
                        trabajador = @pch_trabajador And  
                        concepto = @psi_concepto And  
                        secuencia = @pti_secuencia)  
    BEGIN  
        INSERT INTO fdt_embargos  
            (compania,  
             trabajador,  
             concepto,  
             secuencia,  
             fecha_alta,  
             situacion,  
             consecutivo_oficina,  
             oficina_origen,  
             oficina_destino,  
             clase_deposito,  
             numero_expediente,  
             codigo_juzgado,  
             banco,  
             cuenta,  
             tipo_id_demandante,  
             id_demandante,  
             apellido_demandante,  
             nombre_demandante,  
             agr_conceptos_base,  
             concepto_base,  
             quinta_parte,  
             monto_total,  
             saldo_actual,  
             porcentaje,  
             cuota_fija,
	         ciudad_pago,
	         porcentaje_aumento,
             valor_aumento,
             mes_aumento,
             anio_desde)  
        VALUES  
            (@pch_compania,  
             @pch_trabajador,  
             @psi_concepto,  
             @pti_secuencia,  
             @pdt_fecha_embargo,  
             1,  
             @pdc_oficina,  
             @pch_ofOrigen, --'0010',  
             @pch_ofDestino, --'0010',  
             @pti_clase,  
             @pvc_expediente,  
             @pdc_juzgado,  
             @pti_banco,  
             @pdc_cuenta,  
             @pti_tipo_id_dem,  
             @pdc_id_demandante,  
             @pvc_apellidos,  
             @pvc_nombres,  
             @pch_agr_conceptos,  
             @psi_cnc_base,  
             @pti_quinta_parte,  
             @pdc_monto_total,  
             @pdc_monto_total,  
             @pdc_porcentaje,  
             @pdc_cuota_fija,
	         @pch_ciudad_pago,
             @pti_porcentaje_aum,
	         @pti_valor_aum,
             @pti_mes_aum,
             @pin_anio_desde)  
    END  
    ELSE  
    BEGIN  
        UPDATE fdt_embargos  
        SET  fecha_alta = @pdt_fecha_embargo,  
             consecutivo_oficina = @pdc_oficina,  
             clase_deposito = @pti_clase,  
             numero_expediente = @pvc_expediente,  
             codigo_juzgado = @pdc_juzgado,  
             banco = @pti_banco,  
             cuenta = @pdc_cuenta,  
             tipo_id_demandante = @pti_tipo_id_dem,  
             id_demandante = @pdc_id_demandante,  
             apellido_demandante = @pvc_apellidos,  
             nombre_demandante = @pvc_nombres,  
             agr_conceptos_base = @pch_agr_conceptos,  
             concepto_base = @psi_cnc_base,  
             quinta_parte = @pti_quinta_parte,   
             monto_total = @pdc_monto_total,  
             porcentaje = @pdc_porcentaje,  
             cuota_fija = @pdc_cuota_fija,  
             saldo_actual = @pdc_saldo_actual,
	         oficina_origen = @pch_ofOrigen,  --agregado DCRP Agosto21/2003
             oficina_destino = @pch_ofDestino,
             ciudad_pago = @pch_ciudad_pago,
	         porcentaje_aumento = @pti_porcentaje_aum,
	         valor_aumento = @pti_valor_aum,
             mes_aumento = @pti_mes_aum,
             anio_desde = @pin_anio_desde
      WHERE  
            compania = @pch_compania And  
            trabajador = @pch_trabajador And  
            concepto = @psi_concepto And  
            secuencia = @pti_secuencia  
    END  

    UPDATE fdt_embargos SET cuenta = null WHERE cuenta = 0
END  
GO
GRANT EXECUTE ON dbo.sp_fdt_crea_embargo TO PUBLIC
GO
