dbo.CPL_ZSubRuleFillPersonS
Stored ProcedureSQL_STORED_PROCEDURESandbox DB
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_PSubRuleFillPerson_i source text reference
- references source dbo.CPL_ZSubRuleFillPerson source text reference
- references source dbo.QBM_PSessionErrorAdd source text reference
References
Referenced By
- No direct source references extracted.
Complete Source
1CREATE PROCEDURE CPL_ZSubRuleFillPersonS(2 @SlotNumber int3)4AS5BEGIN6 DECLARE @DBQueueCurrent QBM_YDBQueueCurrent7 DECLARE @ElementBuffer QBM_YCursorBuffer8 DECLARE @ElementCount int9 DECLARE @ElementIndex int10 DECLARE @UID_ComplianceRule varchar(38)11 DECLARE @uid_person varchar(38)12 DECLARE @GenProcID varchar(38)13 DECLARE @Persons QBM_YSingleGUID14 SET XACT_ABORT OFF15 BEGIN TRY16 INSERT INTO @DBQueueCurrent(UID_DialogDBQueue,17 UID_Parameter,18 UID_SubParameter,19 GenProcID)20 SELECT21 UID_DialogDBQueue,22 UID_Parameter,23 UID_SubParameter,24 GenProcID25 FROM QBMDBQueueCurrent cu26 WITH(readpast)27 WHERE28 cu.SlotNumber = @SlotNumber29 INSERT INTO @ElementBuffer(UID1,30 UID3)31 SELECT32 p.UID_Parameter,33 max(p.GenProcID)34 FROM @DBQueueCurrent p35 GROUP BY p.UID_Parameter36 SELECT @ElementCount = @@ROWCOUNT37 SELECT @ElementIndex = 138 WHILE @ElementIndex <= @ElementCount39 BEGIN40 SELECT41 TOP 1 @UID_ComplianceRule = bu.UID1,42 @GenProcID = bu.UID343 FROM @ElementBuffer bu44 WHERE45 bu.ElementIndex = @ElementIndex46 DELETE @Persons47 INSERT INTO @Persons(UID_SingleGuid)48 SELECT49 DISTINCT cu.UID_SubParameter50 FROM @DBQueueCurrent cu51 WHERE52 cu.UID_Parameter = @UID_ComplianceRule53 EXEC CPL_PSubRuleFillPerson_i @UID_ComplianceRule,54 @persons,55 @GenProcID56 SELECT @ElementIndex += 157 END58 END TRY59 BEGIN CATCH60 EXEC QBM_PSessionErrorAdd DEFAULT61 RAISERROR('',62 18,63 1)64 WITH NOWAIT65 END CATCH66 endLabel:67 RETURN68END
Open raw exported source
1create procedure CPL_ZSubRuleFillPersonS (@SlotNumber int ) AS begin declare @DBQueueCurrent QBM_YDBQueueCurrent declare @ElementBuffer QBM_YCursorBuffer2 declare @ElementCount int declare @ElementIndex int declare @UID_ComplianceRule varchar(38) declare @uid_person varchar(38) declare @GenProcID varchar3(38) declare @Persons QBM_YSingleGUID SET XACT_ABORT OFF BEGIN TRY insert into @DBQueueCurrent(UID_DialogDBQueue, UID_Parameter, UID_SubParameter, GenProcID4) select UID_DialogDBQueue, UID_Parameter, UID_SubParameter, GenProcID from QBMDBQueueCurrent cu with (readpast) where cu.SlotNumber = @SlotNumber insert5 into @ElementBuffer (UID1, UID3) select p.UID_Parameter, max(p.GenProcID) from @DBQueueCurrent p group by p.UID_Parameter select @ElementCount = @@ROWCOUNT6 select @ElementIndex = 1 while @ElementIndex <= @ElementCount begin select top 1 @UID_ComplianceRule = bu.UID1 , @GenProcID = bu.UID3 from @ElementBuffer7 bu where bu.ElementIndex = @ElementIndex delete @Persons insert into @Persons(UID_SingleGuid) select distinct cu.UID_SubParameter from @DBQueueCurrent8 cu where cu.UID_Parameter = @UID_ComplianceRule exec CPL_PSubRuleFillPerson_i @UID_ComplianceRule, @persons, @GenProcID select @ElementIndex += 1 end 9 END TRY BEGIN CATCH exec QBM_PSessionErrorAdd default RAISERROR ('', 18, 1) WITH NOWAIT END CATCH endLabel: return end 10