No tengo una función pero esto debiera servirte como base.
data letranumero type string.
data letras type string.
data numeros type p decimals 0.
data cnumeros type string.
data offset type i.
letranumero = 'ABCDYYTRE334425632'.
FIND REGEX '[0-9]' in letranumero MATCH OFFSET offset.
letras = letranumero(offset).
numeros = letranumero+offset.
cnumeros = letranumero+offset.
write / letranumero.
write / numeros.
write / cnumeros.
write / letras.
Saludos
Úlima edición por Mauricio Hidalgo fecha: 08/07/13 a las 18:34:37.
|