dbo.QBM_ZForeignKeyRepair
Stored ProcedureSQL_STORED_PROCEDURESandbox DB
Interpretation
- Database routine. Review parameters, called procedures, DBQueue inserts, and QBM_PJobCreate helper calls before assuming side effects.
Relations
- No extracted relations.
Typed Edges
- references source dbo.QBM_PForeignKeyWrongRepair source text reference
- references source dbo.QBM_PForeignKeyWrongReport source text reference
- references source dbo.QBM_PJournal source text reference
- references source dbo.QBM_PSessionErrorAdd source text reference
Complete Source
1CREATE PROCEDURE QBM_ZForeignKeyRepair(2 @SlotNumberDummy int,3 @uid_Module varchar(38),4 @TableName varchar(38),5 @GenProcIDDummy varchar(38)6)7AS8BEGIN9 DECLARE @ModuleName varchar(3)10 DECLARE @Message nvarchar(2000)11 DECLARE @DebugLevel varchar(1) = 'W'12 DECLARE @CountRows int13 BEGIN TRY14 SELECT @ModuleName =15 LEFT(@uid_module,16 3)17 IF @DebugLevel IN('D',18 'T')19 BEGIN20 SELECT @Message = 'ForeignKeyRepair for ' + @ModuleName + '.' + @TableName21 EXEC @CountRows = QBM_PForeignKeyWrongreport @ChildTablePattern = '%',22 @ChildColumnPattern = '%',23 @ParentTablePattern = @TableName,24 @ParentColumnPattern = '%',25 @OwnerOfParent = @ModuleName26 SELECT @Message = @Message + STR(@CountRows) + ' row(s) affected'27 EXEC QBM_PJournal @message,28 @@procid,29 'D',30 @DebugLevel31 END32 EXEC QBM_PForeignKeyWrongRepair @ChildTablePattern = '%',33 @ChildColumnPattern = '%',34 @ParentTablePattern = @TableName,35 @ParentColumnPattern = '%',36 @RepairOnlyNonExistingModule = 0,37 @OwnerOfParent = @ModuleName38 SELECT @Message = 'executed ForeignKeyRepair for ' + @ModuleName + '.' + @TableName39 EXEC QBM_PJournal @message,40 @@procid,41 'T',42 @DebugLevel43 END TRY44 BEGIN CATCH45 EXEC QBM_PSessionErrorAdd DEFAULT46 RAISERROR('',47 18,48 1)49 WITH NOWAIT50 END CATCH51 ende:52 RETURN53END
Open raw exported source
1 create procedure QBM_ZForeignKeyRepair (@SlotNumberDummy int , @uid_Module varchar(38) , @TableName varchar(38) , @GenProcIDDummy varchar(382) ) AS begin declare @ModuleName varchar(3) declare @Message nvarchar(2000) declare @DebugLevel varchar(1) = 'W' declare @CountRows int BEGIN TRY select3 @ModuleName = LEFT(@uid_module, 3) if @DebugLevel in ('D', 'T') begin select @Message = 'ForeignKeyRepair for ' + @ModuleName + '.' + @TableName exec 4@CountRows = QBM_PForeignKeyWrongreport @ChildTablePattern ='%' , @ChildColumnPattern = '%' , @ParentTablePattern = @TableName , @ParentColumnPattern =5 '%' , @OwnerOfParent = @ModuleName select @Message = @Message + STR(@CountRows) + ' row(s) affected' exec QBM_PJournal @message, @@procid, 'D', @DebugLevel6 end exec QBM_PForeignKeyWrongRepair @ChildTablePattern ='%' , @ChildColumnPattern = '%' , @ParentTablePattern = @TableName , @ParentColumnPattern = '%'7 , @RepairOnlyNonExistingModule = 0 , @OwnerOfParent = @ModuleName select @Message = 'executed ForeignKeyRepair for ' + @ModuleName + '.' + @TableName8 exec QBM_PJournal @message, @@procid, 'T', @DebugLevel END TRY BEGIN CATCH exec QBM_PSessionErrorAdd default RAISERROR ('', 18, 1) WITH NOWAIT END CATCH9 ende: return end 10