Back to OIM Explorer

dbo.CPL_RSubRuleFillPersonS

Stored ProcedureSQL_STORED_PROCEDURESandbox DB

Stored Procedure.

Source: sandbox-db sys.sql_modules

Source size: 1.464 characters

Interpretation

  • Database routine. Review parameters, called procedures, DBQueue inserts, and QBM_PJobCreate helper calls before assuming side effects.

Relations

  • No extracted relations.

Typed Edges

  • references source dbo.CPL_RSubRuleFillPerson source text reference
  • references source dbo.QBM_PDBQCS_CurrentMoveSlot source text reference
  • references source dbo.QBM_PSessionErrorAdd source text reference

References

Referenced By

  • No direct source references extracted.

Complete Source

SQL70 lines
1CREATE PROCEDURE CPL_RSubRuleFillPersonS(2  @SlotNumber int3)4AS5BEGIN6  DECLARE @ObjectKeysToCheck_Projection QBM_YParameterList7  DECLARE @ObjectKeysToCheck_Jobrunning QBM_YParameterList8  DECLARE @MyName nvarchar(64) = object_name(@@procid)9  DECLARE @DBQueueCurrent QBM_YDBQueueCurrent10  DECLARE @resetted int11  DECLARE @SlotNumberSource int12  DECLARE @SlotNumberTarget int13  DECLARE @DBQueueToMove QBM_YDBQCSCurrentToMove14  DECLARE @RowsMoved int15  SET XACT_ABORT OFF16  BEGIN TRY17    INSERT INTO @DBQueueCurrent(UID_DialogDBQueue,18    UID_Parameter,19    UID_SubParameter,20    GenProcID)21    SELECT22      UID_DialogDBQueue,23      UID_Parameter,24      UID_SubParameter,25      GenProcID26    FROM QBMDBQueueCurrent cu27      WITH(readpast)28    WHERE29      cu.SlotNumber = @SlotNumber30    IF @@rowcount = 031    BEGIN32      GOTO EndLabel33    END34    IF EXISTS(35      SELECT TOP 1 136      FROM @DBQueueCurrent cu37    LEFT38    OUTER39      JOIN ComplianceRule r40      WITH(readpast)41      ON cu.UID_Parameter = r.UID_ComplianceRule42    WHERE43      r.UID_ComplianceRule IS NULL)44    BEGIN45      SELECT @SlotNumberSource = @SlotNumber46      SELECT @SlotnumberTarget = 047      DELETE @DBQueueToMove48      INSERT INTO @DBQueueToMove(UID_DialogDBQueue)49      SELECT cul.UID_DialogDBQueue50      FROM @DBQueueCurrent cul51      LEFT52      OUTER53      JOIN ComplianceRule r54        ON cul.UID_Parameter = r.UID_ComplianceRule55      WHERE56        r.UID_ComplianceRule IS NULL57      EXEC @RowsMoved = QBM_PDBQCS_CurrentMoveSlot @DBQueueToMove,58        @SlotNumberSource,59        @SlotnumberTarget60    END61  END TRY62  BEGIN CATCH63    EXEC QBM_PSessionErrorAdd DEFAULT64    RAISERROR('',65    18,66    1)67      WITH NOWAIT68  END CATCH69  endLabel:70END
Open raw exported source
SQL ยท Raw11 lines
1create   procedure CPL_RSubRuleFillPersonS (@SlotNumber int) AS begin declare @ObjectKeysToCheck_Projection QBM_YParameterList declare @ObjectKeysToCheck_Jobrunning2 QBM_YParameterList declare @MyName nvarchar(64) = object_name(@@procid) declare @DBQueueCurrent QBM_YDBQueueCurrent declare @resetted int declare @SlotNumberSource3 int declare @SlotNumberTarget int declare @DBQueueToMove QBM_YDBQCSCurrentToMove declare @RowsMoved int SET XACT_ABORT OFF BEGIN TRY insert into @DBQueueCurrent4(UID_DialogDBQueue, UID_Parameter, UID_SubParameter, GenProcID) select UID_DialogDBQueue, UID_Parameter, UID_SubParameter, GenProcID from QBMDBQueueCurrent5 cu with (readpast) where cu.SlotNumber = @SlotNumber if @@rowcount = 0 begin goto EndLabel end if exists (select top 1 1 from @DBQueueCurrent cu left 6outer join ComplianceRule r with (readpast) on cu.UID_Parameter = r.UID_ComplianceRule where r.UID_ComplianceRule is null ) begin select @SlotNumberSource7 = @SlotNumber  select @SlotnumberTarget = 0 delete @DBQueueToMove  insert into @DBQueueToMove(UID_DialogDBQueue) select cul.UID_DialogDBQueue from @DBQueueCurrent8 cul left outer join ComplianceRule r on cul.UID_Parameter = r.UID_ComplianceRule where r.UID_ComplianceRule is null exec @RowsMoved = QBM_PDBQCS_CurrentMoveSlot9 @DBQueueToMove, @SlotNumberSource, @SlotnumberTarget  end END TRY BEGIN CATCH exec QBM_PSessionErrorAdd default RAISERROR ('', 18, 1) WITH NOWAIT END 10CATCH endLabel: end 11