Download Print this page

HP 3000 Manual page 70

Mpe/ix computer systems, rpg/xl utilities
Hide thumbs Also See for 3000:

Advertisement

!COMMENT THIS IS AN EXAMPLE OF A SINGLE SORT FILE TO
!COMMENT DIFFERENT OUTPUT THAT ALREADY EXISTS.
!COMMENT IT IS STREAMED, SPECS IMBEDDED
!COMMENT **************************************
!COMMENT **************************************
!FCOPY FROM=TSTIN;TO=
!FCOPY FROM=TSTFILE;TO=
!FILE XSORTIN=TSTIN
!FILE XSORTOUT=TSTFILE
!RUN XSORT.PUB.SYS
00000HSORTR
4A
00000S Y
00005I C
33NECX
00010FNC 6 9
00020FDC 1 32
00030FDV
*
!FCOPY FROM=TSTFILE;TO=
!EOJ
1
No purge of the XSORTOUT file is required.
2
In this sort, the S Option must be employed to allow the program to overlay the existing file, TST-
FILE.
NOTE
After this job is run, the old contents of TSTFILE will have been erased, and replaced
by the same output data produced by the other examples.
Example 8: Job Stream With Specifications Imbedded.
Multiple input file.
!JOB TSTXSRT8,MGR.SUBSYS,XSORT;OUTCLASS=,1
!COMMENT THIS IS A SORT USING MULTIPLE-
!COMMENT INPUT FILES. IT IS STREAMED,SPECS
!COMMENT IMBEDDED.************************
!COMMENT *********************************
!FCOPY FROM=TSTIN1;TO=
!FCOPY FROM=TSTIN2;TO=
!FCOPY FROM=TSTIN3;TO=
!PURGE TSTOUT
!FILE XSORTIN1=TSTIN1
7-72
X 33
Specifications
imbedded in
job stream
EDITOR file
Multiple input

Advertisement

loading