With the use of API's: Code400.com, iSeries, OS/400

There is a small change required because the size changes with every OS release. If you need it, I can send you the changes.