Example 2
This example uses REXX to report on total salaries paid, where
the salary is a packed number starting at column 20 for a length of
7.
rc = tally(20,7,P,'Total Salaries Paid')
rc = tally(20,7,P,'Total Salaries Paid')