jsnair
New User
Joined: 26 Sep 2006 Posts: 38 Location: India
|
|
|
|
Hi All,
With the SORT JCL given below the HEADER is repeating for every 60 rows. I need this HEADR to be only at the top of the output file. Could any one please give me suggestions on how to avoid the repeating HEADER.
Code: |
//SRT3 EXEC PGM=SORT
//*
//SORTWK01 DD DISP=(,CATLG,CATLG),UNIT=WORK,SPACE=(CYL,10)
//SORTWK02 DD DISP=(,CATLG,CATLG),UNIT=WORK,SPACE=(CYL,10)
//SORTWK03 DD DISP=(,CATLG,CATLG),UNIT=WORK,SPACE=(CYL,10)
//SORTIN DD DISP=SHR,DSN=DEPXX11.XXXXXX.INPDARU.DAT1
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SORTOUT DD DSN=DEPXX11.XXXXXX.OUTDARU.DAT1,
// DISP=(,CATLG),MGMTCLAS=KEEP,
// DCB=(RECFM=FB,LRECL=115),
// SPACE=(TRK,(50,50),RLSE)
//SYSIN DD *
SORT FIELDS=COPY
OUTFIL FNAMES=SORTOUT,REMOVECC,
HEADER2=(1:'SYSTEM;WSTORGDATUM;MONTH;GUKANPP/POTTITIELL;GROUPE',
51:'E;PORTFOGROUPPAE;CONTROLSTRUCT;ELEMENTGROUPPEE;',
98:'TEST;FN-TAB'),
OUTREC=(1:1,3,C';',5:C'01.',8:8,2,C'.',11:4,4,C';',
16:10,1,C';',18:11,1,C';',20:12,3,C';',24:20,1,C';',
26:21,3,C';',30:24,3,C';',34:27,1,C';',36:28,5,C',',
42:33,2,72X)
/*
// |
|
|