Prueba con:
CRTPF FILE(MYLIB/FIND) RCDLEN(598) MBR(*FILE)
CHGVAR VAR(&CMD) VALUE('find ' *CAT &DIR
*TCAT FX3*.TXT -name "*" -print >/qsys.lib/mylib.lib/find.file/find.mbr')
QSH CMD(&CMD)
Gracias, Marti.
Lo había pensado, pero no quería andarme por las
ramas y además no tengo instalado el QSHELL.
Un saludo.
__________________________________________________
Forum.HELP400 es un servicio más de NEWS/400.
© Publicaciones Help400, S.L. - Todos los derechos reservados
http://www.help400.es
_____________________________________________________
Para darte de baja visita la siguente URL:
http://listas.combios.es/mailman/listinfo/forum.help400
