SYS Rechercher un objet dans une bibliothèque

Vous connaissez tous la solution qui consiste à passer par un dspobjd en outfile et une requete sql, pourquoi ne pas utiliser QSHELL

 

Exemple :

 

  QSH CMD('find /qsys.lib/votrebib.lib -name  *A*.FILE > /qsys.lib/votrebib.lib/qclsrc.file/result.mbr')                                           

 

Recherche tous les fichiers qui contiennent un A et place le résultat dans le fichier qclsrc de votre bibliothèque

 

Vous pouvez utiliser les même caractères de remplacement que sous DOS