dbo.RPS_TURPSReport

1create   trigger RPS_TURPSReport on RPSReport for Update not for Replication as begin  declare @ObjectkeyOrdered varchar(138) declare @uid_accproduct
2 varchar(38) declare @whereclauseOrg nvarchar(max) declare @whereclauseMuster nvarchar(max) = ' UID_ITShopOrg in ( select UID_OrgPR 
3							from QER_VPWOProductNodesSlim
4							where ObjectkeyOrdered = ''@ObjectkeyOrdered'' 
5								and isnull(UID_AccProduct, '''') <> ''@UID_AccProduct''
6					)
7'
8 declare @ElementBuffer QBM_YCursorBuffer declare @ElementCount int declare @ElementIndex int declare @ConditionsToCheck QBM_YParameterList BEGIN TRY if
9 exists (select top 1 1 from inserted) goto start if exists (select top 1 1 from deleted) goto start return start: declare @GenProcID varchar(38) select
10 @GenProcID = dbo.QBM_FGISessionContext('')  declare @uid_RPSReport varchar(38) if update(isForITShop) or update(isITShopOnly) begin declare @FlagTest 
11QBM_YParameterlist insert into @FlagTest(Parameter1, Parameter2, HasContentFull, e.Parameter3) select i.UID_RPSReport, i.XObjectKey, i.IsForITShop, dbo.QBM_FCVBigIntToString
12(i.IsITShopOnly) from inserted i exec QER_PIsForITShopFlagCheck 'RPSReport', @FlagTest end   if update(uid_accproduct) begin insert into @ElementBuffer
13(ObjectKey1, UID1) select x.XObjectKey, isnull(x.uid_accproduct,'') from RPSReport x join deleted d on x.uid_RPSReport = d.uid_RPSReport  and d.uid_accproduct
14 > ' ' and isnull(x.uid_accproduct,'') <> isnull(d.uid_accproduct,'')  join dialogColumn c on c.UID_DialogTable = 'QER-T-ITShopOrg' and c.columnname = 
15'uid_ACCProduct' and c.IsDeactivatedByPreProcessor = 0  select @ElementCount = @@rowcount select @ElementIndex = 1 while @ElementIndex <= @ElementCount
16 begin select top 1 @ObjectkeyOrdered = bu.ObjectKey1 , @UID_AccProduct = bu.UID1 from @ElementBuffer bu where bu.ElementIndex = @ElementIndex select @whereclauseOrg
17 = @whereclauseMuster select @whereclauseOrg = replace(@whereclauseOrg, N'@ObjectkeyOrdered' , @ObjectkeyOrdered) select @whereclauseOrg = replace(@whereclauseOrg
18, N'@uid_accproduct' , rtrim(@uid_accproduct))    exec QBM_PJobCreate_HOUpdate_B 'ITShopOrg', @whereclauseOrg, @GenProcID , @p1 = 'uid_ACCProduct', @v1
19 = @uid_accproduct , @AdditionalObjectKeysAffected = DEFAULT select @ElementIndex += 1 end  end  if update (UID_AccProduct) begin declare @RecalcParameter_OA
20 QBM_YCursorBuffer insert into @RecalcParameter_OA (UID1, ObjectKey1, Ident1) select 'QER-PWODecisionRule-OA', a.XObjectKey, 'I' from inserted i join RPSReport
21 g on i.UID_RPSReport = g.UID_RPSReport join QERAccProductUsage u on g.XObjectKey = u.XObjectKey join AccProduct a on u.UID_AccProduct = a.UID_AccProduct
22 union select 'QER-PWODecisionRule-OA', a.XObjectKey, 'I' from deleted d join RPSReport g on d.UID_RPSReport = g.UID_RPSReport join QERAccProductUsage 
23u on g.XObjectKey = u.XObjectKey join AccProduct a on u.UID_AccProduct = a.UID_AccProduct exec QER_PITShopHelperFill_Recalc @RecalcParameter_OA, @GenprocID
24 declare @RecalcParameter_OA2 QBM_YCursorBuffer insert into @RecalcParameter_OA2 (UID1, ObjectKey1, Ident1) select 'QER-PWODecisionRule-OA', pwo.XObjectKey
25, 'I' from inserted i join RPSReport g on i.UID_RPSReport = g.UID_RPSReport join AccProduct a on i.UID_AccProduct = a.UID_AccProduct join PersonWantsOrg
26 pwo on g.XObjectKey = pwo.ObjectKeyElementUsedInAssign union select 'QER-PWODecisionRule-OA', pwo.XObjectKey, 'I' from deleted d join RPSReport g on d.UID_RPSReport
27 = g.UID_RPSReport join AccProduct a on d.UID_AccProduct = a.UID_AccProduct join PersonWantsOrg pwo on g.XObjectKey = pwo.ObjectKeyElementUsedInAssign 
28exec QER_PITShopHelperFill_Recalc @RecalcParameter_OA2, @GenprocID end  if update(IsInactive) or update(IsDeactivatedByPreProcessor) begin declare @DBQueueElements_01
29 QBM_YDBQueueRaw insert into @DBQueueElements_01 (object, subobject, genprocid) select x.uid, null, @GenProcID from ( select d.uid_RPSReport as uid from
30 deleted d join RPSReport r on d.uid_RPSReport = r.UID_RPSReport where d.IsInactive <> r.IsInactive or d.IsDeactivatedByPreProcessor <> r.IsDeactivatedByPreProcessor
31 ) as x exec QBM_PDBQueueInsert_Bulk 'RPS-K-AllForOneRPSReport', @DBQueueElements_01 end if update(PreProcessorCondition) begin  insert into @ConditionsToCheck
32 (ContentFull) select i.PreProcessorCondition from inserted i exec QBM_PPrePropCheckSyntax @ConditionsToCheck  declare @DBQueueElements_02 QBM_YDBQueueRaw
33 insert into @DBQueueElements_02 (object, subobject, genprocid) select x.uid, null, @GenProcID from ( select ao.UID_RPSReport as uid from deleted i join
34 RPSReport ao on ao.UID_RPSReport = i.UID_RPSReport where isnull(i.PreProcessorCondition, N'') <> isnull(ao.PreProcessorCondition, N'') ) as x exec QBM_PDBQueueInsert_Bulk
35 'RPS-K-PrepropRPSReport', @DBQueueElements_02 end  END TRY BEGIN CATCH exec QBM_PSessionErrorAdd default RAISERROR ('', 18, 1) WITH NOWAIT END CATCH ende:
36 return end 
37