dbo.QBM_TIDialogTable

1   create   trigger QBM_TIDialogTable on DialogTable  for Insert not for Replication as begin  declare @SQLToCheck QBM_YParameterList declare @DebugSwitch
2 int = 0 declare @ConditionsToCheck QBM_YParameterList BEGIN TRY if exists (select top 1 1 from inserted) goto start return start: if @DebugSwitch > 0 
3begin print '### im Insert trigger angekommen' end declare @GenProcID varchar(38) select @GenProcID = dbo.QBM_FGISessionContext('')  insert into @ConditionsToCheck
4 (ContentFull) select i.PreProcessorCondition from inserted i exec QBM_PPrePropCheckSyntax @ConditionsToCheck   delete  @SQLToCheck  insert into @SQLToCheck
5(Parameter1, ContentFull) select c.XObjectKey, 'select top 1 1 as columnvalue from ' + b.TableName + '
6		 where (
7		 ' + c.ViewWhereClause + '
8		 )'
9 from inserted c  join DialogTable b on b.UID_DialogTable = c.UID_DialogTableBase where c.ViewWhereClause > ' ' exec QBM_PSQLCheckExecutable @SQLToCheck
10, @RaiseError = 1  delete  @SQLToCheck  insert into @SQLToCheck(Parameter1, ContentFull) select i.XObjectKey, concat('select top 1 1 as columnvalue 
11									from ('
12 , ' select ', i.ExtensionForProxyTable, '
13											from ' , i.tablename , '
14											where 1 = 0
15										) as x' ) from inserted i  where i.ExtensionForProxyTable
16 > ' ' exec QBM_PSQLCheckExecutable @SQLToCheck, @RaiseError = 1 if @DebugSwitch > 0 begin print '### vor dem 26 Test' end  if exists ( select substring
17(TableName,1,26), count(*) from dialogtable group by substring(TableName,1,26) having count(*) > 1 ) begin  raiserror( '#LDS#The first 26 characters of a table name have to be unique.|'
18, 18, 2) end if @DebugSwitch > 0 begin print '### nach dem 26 test' end declare @DBQueueElements_01 QBM_YDBQueueRaw insert into @DBQueueElements_01 (object
19, subobject, genprocid) select dbo.QBM_FGITableName(x.uid), null, @GenProcID from (select i.UID_DialogTable as UID from inserted i ) as x exec QBM_PDBQueueInsert_Bulk
20 'QBM-K-CommonPrepropTable', @DBQueueElements_01 exec QBM_PGUIDReplaceCustomizerFill    exec QBM_PDBQueueInsert_Single 'QBM-K-TableRevisionFill', null,
21 null, @GenProcID  declare @DBQueueElements_36836 QBM_YDBQueueRaw insert into @DBQueueElements_36836(Object, SubObject, GenProcID) select x.uid, null, 
22@GenProcID from ( select ra.UID_DialogTableParent as uid from inserted t join QBM_VQBMRelationALL ra on t.UID_DialogTable = ra.UID_DialogTableChild union
23 select ra.UID_DialogTableChild from inserted t join QBM_VQBMRelationALL ra on t.UID_DialogTable = ra.UID_DialogTableParent union select t.UID_DialogTable
24 from inserted t ) as x exec QBM_PDBQueueInsert_Bulk 'QBM-K-MissingDisplayRightFill', @DBQueueElements_36836  END TRY BEGIN CATCH exec QBM_PSessionErrorAdd
25 default RAISERROR ('', 18, 1) WITH NOWAIT END CATCH ende: return end 
26