dbo.CPL_TUPersonInBaseTree

1create   trigger CPL_TUPersonInBaseTree on PersonInBaseTree  for Update not for Replication as begin   declare @XUser nvarchar(64) = object_name
2(@@procid) declare @Xdate datetime = getutcdate() BEGIN TRY if exists (select top 1 1 from deleted) goto start if exists (select top 1 1 from inserted)
3 goto start return start: declare @GenProcID varchar(38) select @GenProcID = dbo.QBM_FGISessionContext('') if update(IsDecisionMade) or update(IsExceptionGranted
4) or update(UID_PersonDecisionMade) begin if dbo.QBM_FGIConfigparmValue('QER\ComplianceCheck\DisableSelfExceptionGranting') = '1' begin if exists (select
5 top 1 1 from deleted i join personInBaseTree pio on i.XObjectKey = pio.XObjectKey join BaseTree b on pio.uid_org = b.uid_org and b.uid_orgRoot = 'CPL-V-NonCompliance'
6 join QER_VPersonsAreMe me on pio.UID_PersonDecisionMade = me.UID_PersonOrigin and pio.UID_Person = me.UID_PersonAlsoMe where pio.IsDecisionMade = 1 and
7 pio.IsExceptionGranted = 1 ) begin raiserror( '#LDS#Cannot make assignment because not permitted according to configuration of DisableSelfExceptionGranting.|'
8, 18, 3) with nowait end end end   if update(XOrigin) begin if exists (select top 1 1 from deleted d join PersonInBaseTree pio on d.XObjectKey = pio.XObjectKey
9 join BaseTree b on pio.UID_Org = b.UID_Org and b.UID_OrgRoot = 'CPL-V-NonCompliance' where d.XOrigin > 0 and pio.XOrigin = 0 ) begin   delete PersonInNCHasMControl
10 from PersonInNCHasMControl pmc join deleted d on pmc.ObjectKeyPersonInNonCompliance = d.XObjectKey join PersonInBaseTree pio on d.XObjectKey = pio.XObjectKey
11 join BaseTree b on pio.UID_Org = b.UID_Org and b.UID_OrgRoot = 'CPL-V-NonCompliance' where d.XOrigin > 0 and pio.XOrigin = 0 and pmc.UID_PersonWantsOrg
12 is null   update PersonInNCHasMControl set IsInActive = 1  , XDateUpdated = @Xdate , XUserUpdated = @XUser from PersonInNCHasMControl pmc join deleted
13 d on pmc.ObjectKeyPersonInNonCompliance = d.XObjectKey join PersonInBaseTree pio on d.XObjectKey = pio.XObjectKey join BaseTree b on pio.UID_Org = b.UID_Org
14 and b.UID_OrgRoot = 'CPL-V-NonCompliance' where d.XOrigin > 0 and pio.XOrigin = 0 and pmc.UID_PersonWantsOrg > ' ' end end  END TRY BEGIN CATCH exec QBM_PSessionErrorAdd
15 default RAISERROR ('', 18, 1) WITH NOWAIT END CATCH ende: return end 
16