Back to OIM Explorer

dbo.CPL_RSubRuleFillPerson

Stored ProcedureSQL_STORED_PROCEDURESandbox DB

Stored Procedure.

Source: sandbox-db sys.sql_modules

Source size: 1.426 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.QBM_PDBQCS_CurrentMoveSlot source text reference
  • references source dbo.QBM_PSessionErrorAdd source text reference

References

Referenced By

Complete Source

SQL67 lines
1CREATE PROCEDURE CPL_RSubRuleFillPerson(2  @SlotNumber int,3  @UID_ComplianceRule varchar(38),4  @dummy varchar(38),5  @GenprocID varchar(38)6)7AS8BEGIN9  DECLARE @ObjectKeysToCheck_Projection QBM_YParameterList10  DECLARE @ObjectKeysToCheck_Jobrunning QBM_YParameterList11  DECLARE @MyName nvarchar(64) = object_name(@@procid)12  DECLARE @DBQueueCurrent QBM_YDBQueueCurrent13  DECLARE @resetted int14  DECLARE @SlotNumberSource int15  DECLARE @SlotNumberTarget int16  DECLARE @DBQueueToMove QBM_YDBQCSCurrentToMove17  DECLARE @RowsMoved int18  SET XACT_ABORT OFF19  BEGIN TRY20    INSERT INTO @DBQueueCurrent(UID_DialogDBQueue,21    UID_Parameter,22    UID_SubParameter,23    GenProcID)24    SELECT25      UID_DialogDBQueue,26      UID_Parameter,27      UID_SubParameter,28      GenProcID29    FROM QBMDBQueueCurrent cu30      WITH(readpast)31    WHERE32      cu.SlotNumber = @SlotNumber33    IF @@rowcount = 034    BEGIN35      GOTO EndLabel36    END37    IF NOT EXISTS(38      SELECT TOP 1 139      FROM compliancerule40      WHERE41        uid_compliancerule = @uid_compliancerule)42    BEGIN43      SELECT @SlotNumberSource = @SlotNumber44      SELECT @SlotnumberTarget = 045      DELETE @DBQueueToMove46      INSERT INTO @DBQueueToMove(UID_DialogDBQueue)47      SELECT cul.UID_DialogDBQueue48      FROM @DBQueueCurrent cul49      WHERE50        cul.UID_Parameter = @uid_compliancerule51      IF @@ROWCOUNT > 052      BEGIN53        EXEC @RowsMoved = QBM_PDBQCS_CurrentMoveSlot @DBQueueToMove,54          @SlotNumberSource,55          @SlotnumberTarget56      END57    END58  END TRY59  BEGIN CATCH60    EXEC QBM_PSessionErrorAdd DEFAULT61    RAISERROR('',62    18,63    1)64      WITH NOWAIT65  END CATCH66  endLabel:67END
Open raw exported source
SQL ยท Raw11 lines
1create   procedure CPL_RSubRuleFillPerson (@SlotNumber int , @UID_ComplianceRule varchar(38) , @dummy varchar(38) , @GenprocID varchar(38) ) AS 2begin declare @ObjectKeysToCheck_Projection QBM_YParameterList declare @ObjectKeysToCheck_Jobrunning QBM_YParameterList declare @MyName nvarchar(64) = 3object_name(@@procid) declare @DBQueueCurrent QBM_YDBQueueCurrent declare @resetted int declare @SlotNumberSource int declare @SlotNumberTarget int declare4 @DBQueueToMove QBM_YDBQCSCurrentToMove declare @RowsMoved int SET XACT_ABORT OFF BEGIN TRY insert into @DBQueueCurrent(UID_DialogDBQueue, UID_Parameter5, UID_SubParameter, GenProcID) select UID_DialogDBQueue, UID_Parameter, UID_SubParameter, GenProcID from QBMDBQueueCurrent cu with (readpast) where cu.SlotNumber6 = @SlotNumber if @@rowcount = 0 begin goto EndLabel end if not exists (select top 1 1 from compliancerule where uid_compliancerule = @uid_compliancerule7 ) begin select @SlotNumberSource = @SlotNumber  select @SlotnumberTarget = 0 delete @DBQueueToMove  insert into @DBQueueToMove(UID_DialogDBQueue) select8 cul.UID_DialogDBQueue from @DBQueueCurrent cul where cul.UID_Parameter = @uid_compliancerule if @@ROWCOUNT > 0 begin exec @RowsMoved = QBM_PDBQCS_CurrentMoveSlot9 @DBQueueToMove, @SlotNumberSource, @SlotnumberTarget END  end END TRY BEGIN CATCH exec QBM_PSessionErrorAdd default RAISERROR ('', 18, 1) WITH NOWAIT 10END CATCH endLabel: end 11