Vous pouvez le faire en une instruction comme suit :

CPY OBJ('/QSYS.LIB/VOTRE.LIB/QRPGLESRC.FILE/*.MBR') TODIR('/Replic/RPGLE') TOCCSID(*PCASCII) DTAFMT(*TEXT)