Rational Developer for System z
PL/I for Windows, Version 8.0, Programming Guide

Example 1

A call to PLISRTA sorting 80-byte records from SORTIN to SORTOUT, and a return code, RETCODE, declared as FIXED BINARY (31,0).

  call plisrta (' SORT FIELDS=(1,80,CH,A) ',
                ' RECORD TYPE=F,LENGTH=(80) ',
                  0,
                  retcode);
Rational Developer for System z
PL/I for Windows, Version 8.0, Programming Guide