HP 3000 Manual page 72

of multiple input files (XSORTIN1...XSORTING). You can combine the commands in
Example 8 with those above to produce a Count-only, multiple file sort.
Here is a physically condensed copy of Example 9 after it was run. Note the statistical report on the
records sorted.
:JOB TSTXSRT9,MGR.SUBSYS,XSORT
PRIORITY = DS; INPRI = 8; TIME = UNLIMITED SECONDS
JOB NUMBER = #J58
WED, MAR 11, 1981, 9:40 AM
HP3000 / MPE IV C.00.P8
D U K E
:COMMENT THIS IS AN EXAMPLE OF A COUNT-ONLY SORT FROM
:COMMENT WHICH THERE IS NO OUTPUT OTHER THAN A STATISTICAL
:COMMENT REPORT ON THE RECORDS SELECTED TO SORT.*******
:COMMENT************************************************
:FCOPY FROM=TSTIN;TO=
HEWLETT-PACKARD 32212A.3.13 FILE COPIER WED, MAR 11, 1981, 9:40 AM
(C) HEWLETT-PACKARD CO. 1980
*200*
WARNING: FROMFILE RECSIZE IS 72 BYTES, TOFILE RECSIZE IS 133 BYTES.
AB123GSD212345 JONES
AB234CICO12345 ALBERS
AC102GSD100001 WOODSON
AC321ABCD10001 FRANKEN
BB222CICO12345 WOODS
EOF FOUND IN FROMFILE AFTER RECORD 4
5 RECORDS PROCESSED *** 0 ERRORS
END OF SUBSYSTEM
:FILE XSORTIN=TSTIN
:RUN XSORT.PUB.SYS
HP32104A.05.0O EXTRA FUNCTION SORT FOR RPG/3000 (XSORT)
(C) HEWLETT-PACKARD CO. 1980 WED, MAR 11, 1981, 9:40 AM
00000HSORTC
00005I C 33NECX
RECORDS READ = 5
RECORDS SELECTED = 4
7-74
X
Statistics