zOs/SQL/PKGLAST

select translate( '789A4512', char(lastUsed), '123456789A')
           , lastUsed
from RZ2.TACCT_PKGUSED
fetch first row only