Quitar tildes
Publicado por Erick Naranjo (6 intervenciones) el 13/09/2013 04:19:26
pam3 = sintilde(pam3)
Procedure sintilde
parameter texto
resultado = strtran(strtran(strtran(strtran(strtran(texto,"á","a"),"é","e"),"í","i"),"ó","o"),"ú","u")
return resultado
Procedure sintilde
parameter texto
resultado = strtran(strtran(strtran(strtran(strtran(texto,"á","a"),"é","e"),"í","i"),"ó","o"),"ú","u")
return resultado
Valora esta pregunta
0