Which files in a library, are journaled?

whichFilesAreJournaledOnIBMi

WITH FILES(
    objLib,
    objName,
    objSize,
    objText,
    journalLibrary,
    journalName)
AS (
SELECT  OBJLIB,
        OBJNAME,
        OBJSIZE,
        OBJTEXT,
        JOURNAL_LIBRARY,
        JOURNAL_NAME
FROM    TABLE (QSYS2.OBJECT_STATISTICS('library#1','*ALL') ) AS X
WHERE   X.JOURNALED = 'YES'
AND     X.OBJTYPE = '*FILE'
UNION ALL
SELECT  OBJLIB,
        OBJNAME,
        OBJSIZE,
        OBJTEXT,
        JOURNAL_LIBRARY,
        JOURNAL_NAME
FROM    TABLE (QSYS2.OBJECT_STATISTICS('library#2','*ALL') ) AS X
WHERE   X.JOURNALED = 'YES'
AND     X.OBJTYPE = '*FILE'
UNION ALL
SELECT  OBJLIB,
        OBJNAME,
        OBJSIZE,
        OBJTEXT,
        JOURNAL_LIBRARY,
        JOURNAL_NAME
FROM    TABLE (QSYS2.OBJECT_STATISTICS('library#3','*ALL') ) AS X
WHERE   X.JOURNALED = 'YES'
AND     X.OBJTYPE = '*FILE'
)
SELECT  *
FROM    FILES
ORDER BY
        objLib,
        objName;