Fera, criei duas soluções, uma para um texto simples e uma para tabela. Verifique por favor.
/* -------------------------------------------------------------------------- */
/* --- ESSE SCRIPT RESOLVE A SITUAÇÃO, CASO O NOME COMPLETO ESTEJA EM UMA --- */
/* --- VARIÁVEL ISOLADA, OU SEJA, CASO SEJA SOMENTE UM REGISTRO --- */
/* -------------------------------------------------------------------------- */
Declare @NomeCompleto VarChar(100), @PrimeiroNome VarChar(20), @NomeDoMeio VarChar(40), @UltimoNome VarChar(20)
Declare @i integer = 0, @PosicaoPrimeiroEspaco integer, @PosicaoUltimoEspaco integer
Declare @CaracterCorrente Char(01)
--Nome completo
Set @NomeCompleto = 'joão de oliveira da silva'
--Pega o primeiro nome, indo até o primeiro espaço - 1
Set @PrimeiroNome = Left(@NomeCompleto, CharIndex(' ', @NomeCompleto) - 1)
-- Faz um While verificando a posição do último espaço
while @i < Len(@NomeCompleto)
begin
Set @i = @i + 1;
Set @CaracterCorrente = SubString(@NomeCompleto, @i, 1)
if (@CaracterCorrente = ' ')
Set @PosicaoUltimoEspaco = @i
end
-- Pega a posição do primeiro espaço em branco
Set @PosicaoPrimeiroEspaco = CharIndex(' ', @NomeCompleto)
-- Pega o nome do meio: do primeiro espaço em branco + 1 até o último espaço em branco
-- Mas só pega o nome do meio se existir mais de um espaço em branco no texto, pois pode NÃO ter nome do meio
-- Ex.: 'Roberson Ferreira'
if (CharIndex(' ', @NomeCompleto, @PosicaoPrimeiroEspaco + 1) > 0)
Set @NomeDoMeio = SubString(@NomeCompleto, @PosicaoPrimeiroEspaco + 1, @PosicaoUltimoEspaco - @PosicaoPrimeiroEspaco - 1)
-- Pega o último nome, a partir da posição do último espaço
Set @UltimoNome = Right(@NomeCompleto, Len(@NomeCompleto) - @PosicaoUltimoEspaco)
Select @PrimeiroNome, @NomeDoMeio, @UltimoNome
----------------------------------------------------------------------------------------------------------
----------------------------------------------------------------------------------------------------------
/* ------------------------------------------------------------------------- */
/* ESSE SCRIPT RESOLVE A SITUAÇÃO, CASO O NOME COMPLETO ESTEJA EM UMA TABELA */
/* ------------------------------------------------------------------------- */
-- Criação da função que retornará a posição do último espaço no texto
Create Function dbo.fnc_RetornaPosicaoUltimoEspaco (@NomeCompleto VarChar(100)) Returns integer as
Begin
Declare @i integer = 0, @PosicaoUltimoEspaco integer = 0
Declare @CaracterCorrente Char(01)
While @i < Len(@NomeCompleto)
begin
Set @i = @i + 1;
Set @CaracterCorrente = SubString(@NomeCompleto, @i, 1)
if (@CaracterCorrente = ' ')
Set @PosicaoUltimoEspaco = @i
end
Return @PosicaoUltimoEspaco
End
GO
-- SIMULAÇÃO
Declare @Tabela Table (Nome VarChar(100))
Insert Into @Tabela Values ('João de Oliveira da Silva'), ('Roberson Ferreira')
Select
'Primeiro nome' = Left(Nome, CharIndex(' ', Nome) - 1),
'Nome do meio' = Case
When (CharIndex(' ', Nome, CharIndex(' ', Nome) + 1) > 0) Then
SubString(Nome, CharIndex(' ', Nome) + 1, (dbo.fnc_RetornaPosicaoUltimoEspaco(Nome)) - (CharIndex(' ', Nome)) - 1)
Else
''
End,
'Último nome' = Right(Nome, Len(Nome) - dbo.fnc_RetornaPosicaoUltimoEspaco(Nome))
From
@Tabela
