dbo.Imperium_Racalcula_Compliance_FULL

SET QUOTED_IDENTIFIER, ANSI_NULLS ON
GO
/*
exec Imperium_Racalcula_Compliance_FULL 202308
*/
CREATE OR ALTER PROCEDURE  dbo.Imperium_Racalcula_Compliance_FULL
@pPeriodo int
AS

BEGIN
 SET NOCOUNT ON;

DECLARE @ERRORNUMBER SMALLINT 


DECLARE ImperiumDocs Cursor
FOR

select distinct top 250 ROW_NUMBER() over (order by contratista) as RecNo, contratista, periodo from led_DOCS
WHERE CONTRATISTA IS NOT NULL AND CONTRATISTA > 0
and periodo = @pPeriodo
/*and cliente = 7048064*/
group by contratista,periodo
ORDER BY PERIODO DESC,CONTRATISTA DESC

Open ImperiumDocs

DECLARE @periodo int
DECLARE @IDContratista INT
DECLARE @RecNo INT

Fetch NEXT FROM ImperiumDocs INTO @RecNo,@IDContratista,@periodo
While (@@FETCH_STATUS <> -1)
BEGIN
 BEGIN
  select @RecNo as RecNo,@IDContratista as contratista,@periodo AS PERIODO
 END
 BEGIN
  EXEC Imperium_Compliance_Periodo_Contratista @periodo,@IDContratista,'C'
 END
 BEGIN
  EXEC Imperium_Compliance_Periodo_Contratista @periodo,@IDContratista,'S'
 END
 BEGIN
  EXEC Imperium_Compliance_Periodo_Contratista @periodo,@IDContratista,'E'
 END
 BEGIN 
  EXEC Imperium_Compliance_Periodo_Contratista @periodo,@IDContratista,'V'
 END

Fetch NEXT FROM ImperiumDocs INTO @RecNo,@IDContratista,@periodo

END

CLOSE ImperiumDocs
DEALLOCATE ImperiumDocs

END

GO