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')