HP RPG/iX Utilities Reference Manual (30318-90006)

7-70
0003OFDV *
RECORDS READ = 5
RECORDS SELECTED & SORTED = 4
NUMBER OF COMPARES = 7
SCRATCHFILE I/O = 2
CPU SECONDS = .339
ELAPSED SECONDS = 1.447
TOTAL CPU SECONDS = 1.116
END OF PROGRAM
:SAVE TSTOUT
Example 5: Using XSORTEXT, Case 2
Single input to different output. Input from $STDIN and output to $STDLIST.
The file equation--XSORTIN=$STDIN, in this example--means the program does not know in advance how
many records are to be sorted since input is not from a disk file. As a result, it is necessary to enter an S
Option line, specifying "Maximum number of records to be sorted" in columns 10-16.
:PURGE TSTOUT
:FILE XSORTIN=$STDIN
:FILE XSORTOUT=$STDLIST
.FILE XSORTEXT=TSTSPEX
:RUN XSORT.PUB.SYS
HP32104A.05.00 EXTRA FUNCTION SORT FOR RPG/3000 (XSORT)
(C) HEWLETT-PACKARD CO. 1980 WED, MAR 11, 1981, 9:24 AM
00000HSORTR 4A X 33
00000S Y 35
00005I C 33NECX Specifications
00010FNC 6 9 from TSTSPEX
00020FDC 1 32
00030FDV *
AB123GSD212345 JONES X
AB234CICO12345 ALBERS Interactive
AC102GSD100001 WOODSON input from
AC321ABCD10001 FRANKEN $STDIN
BB222CICO12345 WOODS
:EOD
AC321ABCD10001 FRANKEN *