Can you try this query...
SELECT A.PROCNAME,B.BNAME
from SYSCAT.PROCEDURES A, SYSCAT.PACKAGEDEP B
WHERE SUBSTR(A.IMPLEMENTATION,1,8) = B.PKGNAME
AND BSCHEMA = 'TBLPY00'
AND BTYPE = 'F'
ORDER BY 1,2
NOTE : This query works only if the first 8 characters of IMPLEMENTATION represents the package name.