dbo.POL_RQERPolicyFill

1create   procedure POL_RQERPolicyFill (@SlotNumber int , @UID_QERPolicy varchar(38) , @UID_SubParameter varchar(38) , @GenProcID varchar(38) ) AS
2 begin declare @ObjectKeysToCheck_Projection QBM_YParameterList declare @ObjectKeysToCheck_Jobrunning QBM_YParameterList declare @MyName nvarchar(64) =
3 object_name(@@procid) declare @DBQueueCurrent QBM_YDBQueueCurrent declare @resetted int declare @SlotNumberSource int declare @SlotNumberTarget int declare
4 @DBQueueToMove QBM_YDBQCSCurrentToMove declare @RowsMoved int BEGIN TRY insert into @DBQueueCurrent(UID_DialogDBQueue, UID_Parameter, UID_SubParameter
5, GenProcID) select UID_DialogDBQueue, UID_Parameter, UID_SubParameter, GenProcID from QBMDBQueueCurrent cu with (readpast) where cu.SlotNumber = @SlotNumber
6 if @@rowcount = 0 begin goto EndLabel end  delete @DBQueueToMove  insert into @DBQueueToMove(UID_DialogDBQueue) select cul.UID_DialogDBQueue from @DBQueueCurrent
7 cul  left outer join QERPolicy p with (readpast) on cul.UID_Parameter = p.UID_QERPolicy and isnull(p.IsInActive,0) = 0 and isnull(p.IsWorkingCopy,0) =
8 0 and isnull(p.IsNoWhereClause,0) = 0 where p.UID_QERPolicy is null if @@ROWCOUNT > 0 begin select @SlotNumberSource = @SlotNumber  select @SlotnumberTarget
9 = 0 exec @RowsMoved = QBM_PDBQCS_CurrentMoveSlot @DBQueueToMove, @SlotNumberSource, @SlotnumberTarget  delete @DBQueueCurrent from @DBQueueCurrent cu 
10join @DBQueueToMove mo on cu.UID_DialogDBQueue = mo.UID_DialogDBQueue end  insert into @ObjectKeysToCheck_Jobrunning(Parameter1, Parameter2) select x.UID_QERPolicy
11, x.XObjectKey from @DBQueueCurrent cu join QERPolicy x on cu.UID_Parameter = x.UID_QERPolicy exec @resetted = QBM_PSlotResetWhileJobRun_L @DBQueueCurrent
12, @@PROCID, @ObjectKeysToCheck_Jobrunning, @SlotNumber = @SlotNumber  END TRY BEGIN CATCH exec QBM_PSessionErrorAdd default RAISERROR ('', 18, 1) WITH 
13NOWAIT END CATCH endLabel: end 
14