Vous connaissez tous la commande cpysplf qui permet de copier un spool vers un fichier mais cettte commande présente une limite, on ne peut pas copier des fichiers AFPDS ni IPDS.

Pour cela il existe 2 API  

1 pour la copie  

'job   USER  number' X'0001' 'Membre ') 

1 pour la restauration

 CALL PGM(QSYS/QSPPUTF) PARM('ichierDB biblio  ' 'outq biblio ' 'Membre')

Malheureusement pas de documentation sur les livres IBM.