Rational Developer for System z
Enterprise PL/I for z/OS, Version 3.8, プログラミング・ガイド

例 3

ソートが 2 つのフィールドで行われることを除けばこの例も例 1 と同じです。 最初に、文字であるバイト 1 から 10 までと、次に、 それらが等しい場合は、2 進数フィールドが含まれているバイト 11 と 12 が昇順にソートされます。

CALL PLISRTA (' SORT FIELDS=(1,10,CH,A,11,2,BI,A) ',
              ' RECORD TYPE=F,LENGTH=(80) ',
                1048576,
                RETCODE);

Terms of use | Feedback

This information center is powered by Eclipse technology. (http://www.eclipse.org)