dbo.QBM_PCustomSQLSort

1     create   procedure QBM_PCustomSQLSort ( @SlotnumberDummy int , @dummy1 varchar(38) , @Dummy2 varchar(38) , @GenProcIDDummy varchar(38) ) as
2 begin declare @Schema_Id int declare @XUser nvarchar(64) = 'QBMCustomSQL' declare @DebugSwitch int = 0   declare @durchlauf int declare @anzAend int  
3    declare @Xdate datetime = getutcdate() SET XACT_ABORT OFF BEGIN TRY select top 1 @Schema_Id = schema_id from sys.schemas where name = N'dbo'  if @DebugSwitch
4 > 0 begin print 'Start ' + convert(varchar(64), getutcdate(), 121) end   begin try exec QBM_PCustomSQLDependencyFill end try begin catch print ' na dann eben nich'
5 end catch  if @DebugSwitch > 0 begin print 'Dependencies gefüllt' + convert(varchar(64), getutcdate(), 121) end update QBMCustomsql set SortOrder = case
6 scripttype when N'N' then 1000 when N'F' then 2000 when N'V' then 3000 when N'P' then 4000 else 5000 end , XDateUpdated = @Xdate , XUserUpdated = @XUser
7  select @durchlauf = 0 marke: if @DebugSwitch > 0 begin print 'durchlauf  ' + str(@durchlauf) + convert(varchar(64), getutcdate(), 121) end select @anzAend
8 = 0 update QBMCustomSQL set SortOrder = case when co2.SortOrder < QBMCustomSQL.SortOrder then QBMCustomSQL.SortOrder +1 else co2.SortOrder +1 end , XDateUpdated
9 = @Xdate , XUserUpdated = @XUser  from QBMCustomSQL join sys.objects o1 on o1.name = QBMCustomSQL.scriptname collate database_default and left(o1.type
10,1) = QBMCustomSQL.scripttype collate database_default  join sys.sql_dependencies d on o1.object_id = d.object_id  join sys.objects o2 on d.referenced_major_id
11 = o2.object_id  join QBMCustomSQL co2 on o2.name = co2.scriptname collate database_default    and o1.name <> isnull(o2.name,N'') collate database_default
12 where QBMCustomSQL.SortOrder <= co2.SortOrder and o1.schema_id = @Schema_Id and o2.schema_id = @Schema_Id select @anzAend = @anzAend + @@rowcount    if
13 @anzAend = 0 goto ende select @durchlauf = @durchlauf +1 if @durchlauf < 10 goto marke   END TRY BEGIN CATCH exec QBM_PSessionErrorAdd default declare
14 @Rethrow varchar(1000) = dbo.QBM_FGISessionErrorRethrow() RAISERROR (@Rethrow, 18, 1) WITH NOWAIT END CATCH ende: return end 
15