AS/400 - busqueda de enteros

Hola estoy tartando realizar una busqueda de entero el cual es una combinacion de 4 numeros del 0 al 9 en una cadena de caracteres, el problema es que el numero entero que estoy buscando no se encuentra en una posicion especifica. hay alguna funcion en RPG ILE que permita hacer lo que quiero?? les agradezco de antemano su ayuda.

Hola Marilyn.

Si el número a buscar es siempre el mismo, entonces:

posicion = %scan('numBuscado':cadena);

Por ejemplo, si
cadena = '223956788'
y quieres buscar el numero '5678'
el resultado será VERDADERO con posición = 5