La función strtok descompone en tokens una cadena de caracteres.
La función atoi convierte de string a integer.
la función atoi puede sustituirse por la BIF %dec si utilizas RPG V5R2 pero el
y para comprobar de forma práctica todo esto he subido un ejemplo a http://www.ajut400.com/descargas/tokens.rpgle
Y mucho más lo puedes encontrar en este redbook
http://www.redbooks.ibm.com/abstracts/sg245402.html
Who Knew You Could Do That with RPG IV? A Sorcerer's Guide to System Access and More
Salu2
El día 4/04/06, Metalkris, s.a. <[EMAIL PROTECTED]> escribió:
Estimados compañeros del foro, me he repasado todos los correos del foro referente al tratamiento y obtención de datos en cadenas de caracteres y no he conseguido solucionar el problema. Os cuento un poco el tema:Tengo varias cadenas alfanuméricas ejemplo: "MEDIDA ESPEJO 1950 ESPECIAL CROMO", se trata de tomar la parte numérica, pero ... el problema está en que la parte numéricas puede ser de 3 ó 4 dígitos y puede comenzar en cualquier lugar de la cadena, para complicarlo aún mas, pueden existir varios espacios antes de la medida.Yo lo haría de diferentes manera, pero se me antojan un poco "chapuceras", lo que quiero encontrar es una manera más elegante de hacerlo con ILERPG, seguro que se puede resolver el problema en una ó dos líneas de código.Gracias por vuestra ayudaFernando Sánchez PiñaProceso de Datos
916448013 (ext.127) 916449357 [EMAIL PROTECTED] http://www.metalkris.com
--
Mi blog sobre as400
http://www.ajut400.com
