Back to OIM Explorer

dbo.CPL_RSubRuleFillObject

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

  • No direct source references extracted.

Complete Source

SQL66 lines
1CREATE PROCEDURE CPL_RSubRuleFillObject(2  @Slotnumber int,3  @uid_complianceSubrule varchar(38),4  @Dummy1 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  BEGIN TRY19    INSERT INTO @DBQueueCurrent(UID_DialogDBQueue,20    UID_Parameter,21    UID_SubParameter,22    GenProcID)23    SELECT24      UID_DialogDBQueue,25      UID_Parameter,26      UID_SubParameter,27      GenProcID28    FROM QBMDBQueueCurrent cu29      WITH(readpast)30    WHERE31      cu.SlotNumber = @SlotNumber32    IF @@rowcount = 033    BEGIN34      GOTO EndLabel35    END36    IF NOT EXISTS(37      SELECT TOP 1 138      FROM complianceSubrule39      WHERE40        uid_complianceSubrule = @uid_complianceSubrule)41    BEGIN42      DELETE @DBQueueToMove43      INSERT INTO @DBQueueToMove(UID_DialogDBQueue)44      SELECT cul.UID_DialogDBQueue45      FROM @DBQueueCurrent cul46      WHERE47        cul.UID_Parameter = @uid_complianceSubrule48      IF @@ROWCOUNT > 049      BEGIN50        SELECT @SlotNumberSource = @SlotNumber51        SELECT @SlotnumberTarget = 052        EXEC @RowsMoved = QBM_PDBQCS_CurrentMoveSlot @DBQueueToMove,53          @SlotNumberSource,54          @SlotnumberTarget55      END56    END57  END TRY58  BEGIN CATCH59    EXEC QBM_PSessionErrorAdd DEFAULT60    RAISERROR('',61    18,62    1)63      WITH NOWAIT64  END CATCH65  endLabel:66END
Open raw exported source
SQL ยท Raw11 lines
1create   procedure CPL_RSubRuleFillObject ( @Slotnumber int , @uid_complianceSubrule varchar(38) , @Dummy1 varchar(38) , @GenProcID varchar(38) 2) AS begin declare @ObjectKeysToCheck_Projection QBM_YParameterList declare @ObjectKeysToCheck_Jobrunning QBM_YParameterList declare @MyName nvarchar(643) = object_name(@@procid) declare @DBQueueCurrent QBM_YDBQueueCurrent declare @resetted int declare @SlotNumberSource int declare @SlotNumberTarget int4 declare @DBQueueToMove QBM_YDBQCSCurrentToMove declare @RowsMoved int BEGIN TRY insert into @DBQueueCurrent(UID_DialogDBQueue, UID_Parameter, UID_SubParameter5, GenProcID) select UID_DialogDBQueue, UID_Parameter, UID_SubParameter, GenProcID from QBMDBQueueCurrent cu with (readpast) where cu.SlotNumber = @SlotNumber6 if @@rowcount = 0 begin goto EndLabel end  if not exists (select top 1 1 from complianceSubrule where uid_complianceSubrule = @uid_complianceSubrule )7 begin delete @DBQueueToMove  insert into @DBQueueToMove(UID_DialogDBQueue) select cul.UID_DialogDBQueue from @DBQueueCurrent cul where cul.UID_Parameter8 = @uid_complianceSubrule if @@ROWCOUNT > 0 begin select @SlotNumberSource = @SlotNumber  select @SlotnumberTarget = 0 exec @RowsMoved = QBM_PDBQCS_CurrentMoveSlot9 @DBQueueToMove, @SlotNumberSource, @SlotnumberTarget   end end END TRY BEGIN CATCH exec QBM_PSessionErrorAdd default RAISERROR ('', 18, 1) WITH NOWAIT10 END CATCH endLabel: end 11