Table #Textos (Indice int identity(1,1), Texto VarChar(1000))

Into #Textos (Texto) Values (‘teste teste é, teste teste á’)

Into #Textos (Texto) Values (‘teste teste é, ãõâêî teste á’)

Into #Textos (Texto) Values (‘teste ãõâêî é, teste teste á’)

Into #Textos (Texto) Values (‘teste teste á, ãõâêî’)

Into #Textos (Texto) Values (‘teste teste’)

table #TabelaAcentos (Indice Int Identity(1,1), Acento char(01), SemAcento Char(01))

Into #TabelaAcentos (Acento, SemAcento ) Values (‘á’,‘a’)

Into #TabelaAcentos (Acento, SemAcento ) Values (‘é’,‘e’)

Into #TabelaAcentos (Acento, SemAcento ) Values (‘í’,‘i’)

Into #TabelaAcentos (Acento, SemAcento ) Values (‘ó’,‘o’)

Into #TabelaAcentos (Acento, SemAcento ) Values (‘ú’,‘u’)

Into #TabelaAcentos (Acento, SemAcento ) Values (‘à’,‘a’)

Into #TabelaAcentos (Acento, SemAcento ) Values (‘è’,‘e’)

Into #TabelaAcentos (Acento, SemAcento ) Values (‘ì’,‘i’)

Into #TabelaAcentos (Acento, SemAcento ) Values (‘ò’,‘o’)

Into #TabelaAcentos (Acento, SemAcento ) Values (‘ù’,‘u’)

Into #TabelaAcentos (Acento, SemAcento ) Values (‘ã’,‘a’)

Into #TabelaAcentos (Acento, SemAcento ) Values (‘õ’,‘o’)

Into #TabelaAcentos (Acento, SemAcento ) Values (‘â’,‘a’)

Into #TabelaAcentos (Acento, SemAcento ) Values (‘ê’,‘e’)

Into #TabelaAcentos (Acento, SemAcento ) Values (‘î’,‘i’)

Into #TabelaAcentos (Acento, SemAcento ) Values (‘ô’,‘o’)

Into #TabelaAcentos (Acento, SemAcento ) Values (‘û’,‘u’)

Into #TabelaAcentos (Acento, SemAcento ) Values (‘ç’,‘c’)

@id int,@id_acento int,@old_char char(1), @new_char char(1),@texto varchar(1000)

@id=1

@id <= (select COUNT(1) from #Textos)

@texto=Texto from #Textos where indice=@id

set @id_acento=1

while @id_acento <= (select count(1) from #TabelaAcentos)

begin

select @old_char=Acento, @new_char=SemAcento from #TabelaAcentos where Indice=@id_acento

set @texto=REPLACE(@Texto,@old_char,@new_char)

set @id_acento=@id_acento+1

end

select @texto

@id=@id+1