dbo.ADS_TDADSAccount

1create   trigger ADS_TDADSAccount on ADSAccount  for DELETE not for Replication as begin  if exists (select top 1 1 from deleted) goto start return
2 start: declare @GenProcID varchar(38) BEGIN TRY select @GenProcID = dbo.QBM_FGISessionContext('')  if exists (select top 1 1 from deleted d join PersonHasTSBAccountDef
3 pha on d.UID_Person = pha.UID_Person and d.UID_TSBAccountDef = pha.UID_TSBAccountDef where pha.XOrigin > 0 and pha.XIsInEffect = 1  ) begin raiserror(
4'#LDS#Delete Accounts with existing PersonHasTSBAccountDef is not permitted.|', 18, 1) with nowait end   if exists (select top 1 1 from deleted d where
5 d.ObjectSID > ' ' ) begin insert into ADSOtherSID (UID_ADSOtherSID, ObjectSID , DistinguishedName, canonicalName, Ident_ADSOtherSID , XDateInserted, XDateUpdated
6, XUserInserted, XUserUpdated, XObjectKey) select x.UID_ADSOtherSID, x.ObjectSID , x.DistinguishedName, x.canonicalName, x.Ident_ADSOtherSID , x.XDateInserted
7, x.XDateUpdated, x.XUserInserted, x.XUserUpdated, dbo.QBM_FCVElementToObjectKey1('ADSOtherSID', 'UID_ADSOtherSID', x.UID_ADSOtherSID) from ( select newid
8() as UID_ADSOtherSID, d.ObjectSID , d.DistinguishedName, d.canonicalName, d.cn as Ident_ADSOtherSID , d.XDateInserted, d.XDateUpdated, d.XUserInserted
9, d.XUserUpdated from deleted d where d.ObjectSID > ' ' and not exists (select top 1 1 from ADSOtherSID x where x.ObjectSID = d.ObjectSID ) ) as x end 
10   declare @DBQueueElements_01 QBM_YDBQueueRaw insert into @DBQueueElements_01 (object, subobject, genprocid) select x.uid, null, @GenProcID from ( select
11 distinct uid_person as uid from deleted where uid_person > ' ' ) as x exec QBM_PDBQueueInsert_Bulk 'ADS-K-PersonHasObject', @DBQueueElements_01 END TRY
12 BEGIN CATCH exec QBM_PSessionErrorAdd default RAISERROR ('', 18, 1) WITH NOWAIT END CATCH ende: return end 
13