例 2

この例では、REXX を使用して、20 桁目から始まる、長さが 7 のパック数の、合計支払給与を報告します。
  rc = tally(20,7,P,'Total Salaries Paid')