dbo.ADS_PAfterMigrationJobCreate

1 create   procedure ADS_PAfterMigrationJobCreate (@GenProcID varchar(38) ) as begin declare @MyModule varchar(3) = 'ADS' SET XACT_ABORT OFF BEGIN
2 TRY declare @CountElements int declare @Puffer QBM_YCursorbuffer declare @ElementCount int declare @ElementIndex int declare @ElementLast int declare 
3@SQL nvarchar(max) declare @Parameters QBM_YParameterList insert into @Parameters (Parameter1, ContentFull) values ('SQLStmt', @SQL) , ('WithoutTransaction'
4, 'True')  select @CountElements = count(*) from ADSAccount u where UID_Person is null and NeverConnectToPerson = 0 insert into @Puffer(ContentFull) select
5 concat('exec QBM_PJobCreate_HOTemplate_B ''ADSAccount'', ''UID_Person is null and NeverConnectToPerson = 0 and UID_ADSAccount like ''''', hp.HexPattern
6, ''''' '', @Columns = ''NeverConnectToPerson''' , ',@GenProcID = ''', @Genprocid, '''' , ', @AdditionalObjectKeysAffected = default' ) from dbo.QBM_FTHexPattern
7( case when @CountElements > 20000000 then 3  when @CountElements > 3000000 then 2  else 1 end ) as hp select @ElementCount = @@ROWCOUNT select @ElementIndex
8 = @@IDENTITY - @ElementCount +1 select @ElementLast = @@IDENTITY while @ElementIndex <= @ElementLast begin select top 1 @SQL = bu.ContentFull from @Puffer
9 bu where bu.ElementIndex = @ElementIndex update @Parameters set ContentFull = @SQL where Parameter1 = 'SQLStmt' exec QBM_PJobCreate 'VI.JobService.JobComponents.SQLComponent'
10 , 'Execute SQL' , @Parameters = @Parameters , @GenProcID = @Genprocid , @ObjectKeysAffected = default select @ElementIndex += 1 end   select @CountElements
11 = count(*) from ADSContact u where UID_Person is null and NeverConnectToPerson = 0 insert into @Puffer(ContentFull) select concat('exec QBM_PJobCreate_HOTemplate_B ''ADSContact'', ''UID_Person is null and NeverConnectToPerson = 0 and UID_ADSContact like '''''
12, hp.HexPattern, ''''' '', @Columns = ''NeverConnectToPerson''' , ',@GenProcID = ''', @Genprocid, '''' , ', @AdditionalObjectKeysAffected = default' ) 
13from dbo.QBM_FTHexPattern( case when @CountElements > 20000000 then 3  when @CountElements > 3000000 then 2  else 1 end ) as hp select @ElementCount = 
14@@ROWCOUNT select @ElementIndex = @@IDENTITY - @ElementCount +1 select @ElementLast = @@IDENTITY while @ElementIndex <= @ElementLast begin select top 1
15 @SQL = bu.ContentFull from @Puffer bu where bu.ElementIndex = @ElementIndex update @Parameters set ContentFull = @SQL where Parameter1 = 'SQLStmt' exec
16 QBM_PJobCreate 'VI.JobService.JobComponents.SQLComponent' , 'Execute SQL' , @Parameters = @Parameters , @GenProcID = @Genprocid , @ObjectKeysAffected 
17= default select @ElementIndex += 1 end  END TRY BEGIN CATCH exec QBM_PSessionErrorAdd default RAISERROR ('', 18, 1) WITH NOWAIT END CATCH endLabel: return
18 end 
19