Lucas Lira, eu Incrementei conforme solicitado para filtrar a quantidade de caracters para retorno, Retornar só números ou só letras ou todos.
Crie essa função:
CREATE FUNCTION [dbo].[fnRemoveCaracteresNaoNumericos](@Temp varchar(1000))
RETURNS varchar(1000)
AS
BEGIN
--Defini escala dos numeros
DECLARE @Manter AS varchar(50) = '%[^0-9]%'
WHILE PATINDEX(@Manter, @Temp) > 0
SET @Temp = STUFF(@Temp, PATINDEX(@Manter, @Temp), 1, '')
RETURN @Temp
END
Agora utilize o script atualizado:
DECLARE @Retorno CHAR(100)
-- Digitar tipo de retorno -> 'texto' /
-- 'numeros' / 'todos'
DECLARE @type VARCHAR(10) = 'texto'
DECLARE @total int = 1000
,@linha INT = 1
DECLARE @QtdeCaracter INT = 3 -- Defini qtde de caracters que ira retornar
DECLARE @table TABLE
(
Id INT IDENTITY(1,1),
Valor VARCHAR(MAX)
)
WHILE (@linha < @total)
BEGIN
SET @Retorno = (
SELECT
c1 AS [text()]
FROM(
SELECT TOP (1000) c1
FROM(
VALUES
('A'), ('B'), ('C'), ('D'), ('E'), ('F'), ('G'), ('H'), ('I'), ('J'),
('K'), ('L'), ('M'), ('N'), ('O'), ('P'), ('Q'), ('R'), ('S'), ('T'),
('U'), ('V'), ('W'), ('X'), ('Y'), ('Z'), ('0'), ('1'), ('2'), ('3'),
('4'), ('5'), ('6'), ('7'), ('8'), ('9')
) AS T1(c1)
ORDER BY ABS(CHECKSUM(NEWID()))
) AS T2
FOR XML PATH('')
)
INSERT INTO @table
VALUES
(LTRIM
(RTRIM(
(SELECT
CASE
WHEN (@type = 'Numeros')
THEN dbo.fnRemoveCaracteresNaoNumericos(@Retorno)
WHEN (@type = 'texto')
THEN
REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(
REPLACE(@Retorno, 0, ''), 1, ''), 2, ''), 3, ''), 4,
''), 5, ''), 6, ''), 7, ''), 8, ''), 9, '')
ELSE @Retorno
END))))
SET @linha = @linha + 1
END
--Distinct para nao repetir os valores, com funcão rtrim e ltrim para
-- limpar espacos em branco
SELECT DISTINCT RTRIM(LTRIM(SUBSTRING(valor, 1, @QtdeCaracter))) [Valor]
FROM @table
ORDER BY Valor