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

7-68

AB234CIC012345 ALBERS *

BB222CIC012345 WOODS *

AC102GSD100001 WOODSON *

EOF FOUND 1N FROMFILE AFTER RECORD 3

4 RECORDS PROCESSED *** 0 ERRORS

END OF SUBSYSTEM

:EOJ

CPU SEC. = 6. ELAPSED MIN. = 1. WED, MAR 11, 1981, 9:45 AM

Example 2: Job Stream with XSORTEXT.

Single input to different output.

!JOB TSTXSRT2,MGR.SUBSYS,XSORT;OUTCLASS=,1

!COMMENT THIS IS AN EXAMPLE OF A SINGLE INPUT-TO-

!COMMENT DIFFERENT-OUTPUT SORT.THE JOB IS STREAMED,

!COMMENT THE SPECIFICATIONS ON XSORTEXT.

!COMMENT******************************************

!FCOPY FROM=TSTIN;TO=

!PURGE TSTOUT

!FILE XSORTIN=TSTIN

!FILE XSORTOUT=TSTOUT

!FILE XSORTEXT=TSTSPEC

!RUN XSORT.PUB.SYS

!SAVE TSTOUT

!FCOPY FROM=TSTOUT;TO=

!EOJ

NOTE The only difference between Example 1 and Example 2 is the use of TSTSPEC in the

equationusing XSORTEXT.TSTSPECisan EDITORfilecontainingthe sameXSORT

specs as those imbedded in the previous job stream.

Example 3: Session With the Speciﬁcations Entered Interactively.

Single input to different output.

:PURGE TSTOUT

:FILE XSORTIN=TSTIN

:FILE XSORTOUT=TSTOUT

:RUN XSORT.PUB.SYS

HP32104A.05.00 EXTRA FUNCTION SORT FOR RPG/3000 (XSORT)

00000HSORTR 4A X 33

00000NSORTR 4A X 33

00005I C 33NECX