Run t-sql delete statement with adaptable rowcount for easier load on server until finished

runwithrowlimit.sql

declare @rowcount int = 1000
declare @maxseconds int = 10
declare @waitseconds int = 5
declare @sql nvarchar(max) = 'delete from Log where CreatedDate<''2022-06-28'' '
declare @message nvarchar(max)
declare @start datetime
declare @seconds int
set @start = getdate()
set rowcount @rowcount
exec sp_executesql @sql
while @@rowcount >= @rowcount
begin
	set @seconds = datediff(second, @start, getdate())
	set @message = convert(nvarchar(max), @seconds) + ':' + convert(nvarchar(max), @rowcount)
	raiserror(@message, 0, 1) with nowait

	if @seconds < @maxseconds
		set @rowcount = @rowcount * 15 / 10
	else
		set @rowcount = @rowcount * 10 / 15
	set rowcount @rowcount

	waitfor delay @waitseconds
	set @start = getdate()
	exec sp_executesql @sql
end