Habe es schon selber gefunden:

SELECT * FROM TABLE(QSYS2.OBJECT_STATISTICS(OBJECT_SCHEMA=>'MYLIB',
OBJTYPELIST=>'PGM, SRVPGM')) AS X

liefert die benötigten Daten.