Como separar letras de números de una cadena

[Mauricio Hidalgo]

Cambio la especificación entonces:


data letranumero type string.

data letras type string.
data cnumeros type string.

letranumero = '12159CSXD56245'.

write / letranumero.

while strlen( letranumero ) > 0.
if letranumero(1) CO '0123456789'.
concatenate letras letranumero(1) into letras.
else.
concatenate cnumeros letranumero(1) into cnumeros.
endif.
shift letranumero by 1 places left.
endwhile.

write / cnumeros.
write / letras.

Espero te ayude

[lissecita]

Mauricio muchas gracias ya lo coloque y funciono perfecto! muchísimas gracias por tu colaboración... aprendí dos cosas nueva contigo

[lissecita]

Mauricio una pregunta esto funciona perfecto pero en el caso en que el cliente requiera que se deje de esta manera letras = 12159CSXD y números = 56245, osea que los números que inician hagan parte de las letras y que después de las letras queden los números, se podría con este código colocar de esa manera???

[Mauricio Hidalgo]

La expresión regular de la solución adjunta considera que un alfanumerico es la combinación de cero o más numeros seguidos de 1 o más letras mayusculas o mínusculas en tanto que los numeros será la secuencia de 1 o más digitos:

alfanumerico = [0-9]*[A-Z|a-z]+
numero = [0-9]+


Cualquier otra cosa, incorporar espacios y cualquier otro caracter que necesites considerar o incluso que el string comienze con letras y luego números como alfanumerico tendrás que modificar la expresión regular.

Querdaría algo asi entonces:

data letranumero type string.
data offset type i.
data largo type i.
data letras type string.
data cnumeros type string.

letranumero = '12159CSXD56245'.

FIND REGEX '[0-9]*[A-Za-z]+' in letranumero MATCH OFFSET offset MATCH LENGTH largo.
letras = letranumero+offset(largo).
FIND REGEX '[0-9]+' in letranumero MATCH OFFSET offset MATCH LENGTH largo.
cnumeros = letranumero+offset(largo).

write / letranumero.
write / letras.
write / cnumeros.

[lissecita]

Mauricio acabo de probar pero cuando pasa me dice por ejemplo de este caso 1CR6134 que letras es 1CR y el largo es 1 y me coloca el numero 1.

[Mauricio Hidalgo]

Oka, dejalo asi:


data letranumero type string.
data offset type i.
data largo type i.
data letras type string.
data cnumeros type string.

letranumero = '1CR6134'.

FIND REGEX '[0-9]*[A-Za-z]+' in letranumero MATCH OFFSET offset MATCH LENGTH largo.
letras = letranumero+offset(largo).
cnumeros = letranumero+largo.

write / letranumero.
write / letras.
write / cnumeros.

[lissecita]

Cuando hablas que se pueden incorporar cualquier otro carácter, dices que hay que modificar la expresión eso seria en el caso que se presentara el caso de algo así letrasnumero = 12CDF23N-2653256 seria fácil decir que el delimitador es '-' y el resto es el numero???

[Mauricio Hidalgo]

osea si hubiese un delimitador todo más facil. Pero si el "-" fuese parte de lo que se concidera alfanumerico hay que incorporarlo a la expresión regular.