Manipulación de strings en AdvPL
Combina búsqueda, recorte y sustitución de texto.
Descripción general
AllTrim elimina espacios externos. At busca primera ocurrencia y RAt última; cero indica ausencia. SubStr usa inicio 1 y cantidad; Stuff elimina cantidad e inserta texto en copia. Lower/Upper cambian caja; Asc/Chr relacionan código y carácter. Len mide representación, no contador Unicode universal. Ejemplo usa ASCII fijo. (Fuentes: refs. 1–10.)
Ejemplo comentado
#Include "Protheus.ch"
User Function Ed409()
Local cTexto := " AB-CD-AB "
// Normalizar antes de calcular posiciones.
cTexto := AllTrim(cTexto)
ConOut(cValToChar(Len(cTexto)))
ConOut(cValToChar(At("-",cTexto)))
ConOut(cValToChar(RAt("-",cTexto)))
ConOut(SubStr(cTexto,4,2))
ConOut(Stuff(cTexto,4,2,"XY"))
ConOut(Lower(cTexto))
ConOut(Upper(Lower(cTexto)))
ConOut(cValToChar(Asc("A")))
ConOut(Chr(65))
Return Nil8; 3; 6; CD; AB-XY-AB; ab-cd-ab; AB-CD-AB; 65; A. En revisión: ejemplo editorial no compilado ni ejecutado en Protheus. Comprobar includes, release, RDD y contexto antes de probar.
- Comprobar ausencia antes de usar posición y definir codificación.
- En revisión: ejemplo editorial no compilado ni ejecutado en Protheus. Comprobar includes, release, RDD y contexto antes de probar.

Comentarios
Todavía no hay comentarios aprobados.
Inicia sesión con Google o Microsoft para comentar.