dbo.QBM_ZConstraintEnable

1    create   procedure QBM_ZConstraintEnable ( @SlotNumber int , @dummy1 varchar(38) , @dummy2 varchar(38) , @GenProcID varchar(38) ) as begin  
2declare @ProcedureDisable varchar(30) = 'QBM_ZConstraintDisable'  declare @TasksDisable QBM_YSingleGUID  declare @DebugLevel char(1) = 'W' declare @WarFehlerhaftT
3 int declare @WarFehlerhaftC int declare @UID_MeineTask varchar(38) declare @SlotNumberSource int declare @SlotNumberTarget int declare @DBQueueToMove 
4QBM_YDBQCSCurrentToMove declare @RowsMoved int BEGIN TRY select top 1 @UID_MeineTask = s.UID_Task from QBMDBQueueCurrent  s with (nolock) where s.SlotNumber
5 = @SlotNumber if @UID_MeineTask = 'QBM-K-QBMConstraintEnable' begin insert into @TasksDisable(UID_SingleGuid ) select 'QBM-K-QBMConstraintDisable' end
6 if @UID_MeineTask = 'QBM-K-QBMConstraintEnable2' begin insert into @TasksDisable(UID_SingleGuid ) select 'QBM-K-QBMConstraintDisable' union select 'QBM-K-QBMConstraintDisable2'
7 end if exists (select top 1 1 from DialogDBQueue q with (nolock) where q.UID_Task in (select td.UID_SingleGuid  from @TasksDisable td)  and q.Generation
8 >= 0 ) or exists (select top 1 1 from QBMDBQueueCurrent q with (nolock) where q.UID_Task in (select td.UID_SingleGuid from @TasksDisable td) and q.SlotNumber
9 <> 0 ) begin   delete @DBQueueToMove  insert into @DBQueueToMove(UID_DialogDBQueue) select cul.UID_DialogDBQueue from QBMDBQueueCurrent cul with (readpast
10)  where @SlotNumber = @SlotNumber if @@ROWCOUNT > 0 begin select @SlotNumberSource = @SlotNumber  select @SlotnumberTarget = dbo.QBM_FGIDBQueueSlotResetType
11('DBQueue') exec @RowsMoved = QBM_PDBQCS_CurrentMoveSlot @DBQueueToMove, @SlotNumberSource, @SlotnumberTarget exec QBM_PJournal 'erst mal nichst gemacht, nächstes Disable steht schon bereit'
12, @@procid, 'D', @DebugLevel goto endLabel end end   if not exists (select top 1 1 from sys.triggers x where x.is_disabled = 1 and x.name != 'QBM_TUIndicator474488'
13 ) and not exists (select top 1 1 from sys.foreign_keys x where x.is_disabled = 1 ) begin goto endLabel end exec QBM_PSessionErrorClean exec @WarFehlerhaftT
14 = QBM_PTriggerEnable '%' , @HandleErrorSilent = 1 exec @WarFehlerhaftC = QBM_PConstraintEnable '%', @HandleErrorSilent = 1 if @WarFehlerhaftT + @WarFehlerhaftC
15 > 0 begin  if dbo.QBM_FGISessionErrorForLog() like '%547%ALTER TABLE statement conflicted with the FOREIGN KEY constraint%' begin RAISERROR ('', 18, 1
16) WITH NOWAIT end else begin exec QBM_PDBQueueInsert_Single 'QBM-K-QBMConstraintEnable2', '', '', @GenProcID exec QBM_PJournal 'Triggers und / oder constraints nicht geklappt, wieder eingestellt'
17, @@procid, 'D', @DebugLevel end end else begin exec QBM_PJournal 'Triggers and constraints enabled', @@procid, 'D', @DebugLevel end END TRY BEGIN CATCH
18 exec QBM_PSessionErrorAdd default RAISERROR ('', 18, 1) WITH NOWAIT END CATCH endLabel: end 
19