Extraer los caracteres de una cadena y pasar a diferente campos
Tengo el siguiente problema tengo un campo en donde se ha almacenado datos de aulas concatenadas y deseo extraer las aulas una por una y almacenarlas en una tabla secuencial mente una debajo de la otra.
Así esta almacenada los datos en este campo:
99EV 132EV 135EV 137EV 138EV
Y deseo pasarlo a una Tabla X solo los datos numéricos:
99
132
135
137
138
Aunque la pregunta tiene ya tiempo acá, podría servir siempre.
Si esta es la cadena, 99EV 132EV 135EV 137EV 138EV, prueba poner esto en un botón y pruébalo. Verás el resultado de la extracción de los números por separado y ya puedas luego disponer de cada uno a tu voluntad.
lcCadena = "99EV 132EV 135EV 137EV 138EV"
FOR ln = 1 TO ALINES(laArray, lcCadena, 2, " ")
lx = CHRTRAN(laArray(ln),CHRTRAN(laArray(ln),"1234567890",""),"")
MESSAGEBOX(lx)
ENDFOR
La variable lx va "guardando" cada numero ya sin letras y ya puedes hacer uso de cada uno. Uso messagebox para que veas el resultado por separado solamente.
Saludos y un abrazo!
Desde Managua, Nicaragua!
Ravenn :D :D :D
