dbo.backend_vigente_cheques_rechazados

SET QUOTED_IDENTIFIER, ANSI_NULLS ON
GO

CREATE OR ALTER PROCEDURE dbo.backend_vigente_cheques_rechazados
@p_cuit_consultado varchar(11),
@p_id_cheque int,
@p_usuario int
AS

DECLARE @p_nro_cheque int
DECLARE @p_fecha_rechazo date
DECLARE @p_importe money
DECLARE @p_id_causa smallint
DECLARE @p_visible bit

SELECT  @p_nro_cheque = nro_cheque,
  @p_fecha_rechazo = fecha_rechazo,
  @p_importe = importe,
  @p_id_causa = id_causa,
  @p_visible = visible
FROM ChequesBCRA 
WHERE id_cheque = @p_id_cheque

BEGIN
    SET NOCOUNT ON;

 /* set visible = 1 */
 if (@p_visible = 0) 
     begin
   if exists (SELECT * FROM ChequesBCRA WHERE id_cheque IN (SELECT id_cheque FROM ChequesBCRA WHERE -- Query para encontrar los cheques gemelos
                 nro_cheque=@p_nro_cheque 
                 AND @p_cuit_consultado IN (cuit_firmante,Cuit_relacionado) 
                 AND @p_fecha_rechazo = CONVERT(DATE,fecha_rechazo) 
                 AND @p_importe = importe
                 AND @p_id_causa = id_causa
                 AND visible = 1))
         begin 
        select '1' as error, 'No se puede activar el registro. Ya existe un cheque activo para ese Cuit firmante' as mensaje
      end
            else 
      begin
         update ChequesBCRA 
            set visible = 1, 
             modified = GETDATE(),
             modified_by = @p_usuario
            where id_cheque IN (SELECT id_cheque FROM ChequesBCRA WHERE -- Query para encontrar los cheques gemelos
          nro_cheque=@p_nro_cheque 
          AND @p_cuit_consultado IN (cuit_firmante,Cuit_relacionado) 
          AND @p_fecha_rechazo = CONVERT(DATE,fecha_rechazo) 
          AND @p_importe = importe
          AND @p_id_causa = id_causa) 
         select '0' as error, 'Activación OK' as mensaje
      end 
  end 

 /* set visible = 0 */
 else 
     begin
     update ChequesBCRA 
        set visible = 0,
         modified = GETDATE(),
         modified_by = @p_usuario
      where id_cheque IN (SELECT id_cheque FROM ChequesBCRA WHERE -- Query para encontrar los cheques gemelos
        nro_cheque=@p_nro_cheque 
        AND @p_cuit_consultado IN (cuit_firmante,Cuit_relacionado) 
        AND @p_fecha_rechazo = CONVERT(DATE,fecha_rechazo) 
        AND @p_importe = importe
        AND @p_id_causa = id_causa)  
     select '0' as error, 'Baja OK (el registro pasó a Inactivo)' as mensaje
  end  
 
END 

GO