I am trying to filter all records with a date greater than 20100530, but my INCLUDE output is not catching all records yet, do I have a syntax error?
Please let me know what you think - Details are below - Thanks - Tom
JCL:
//S001 EXEC PGM=SORT
//*
//SYSOUT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=D
//*
//SORTIN DD DSN=ABC.DATA,DISP=SHR
//SORTOUT DD DSN=ABC.OUT,
// DISP=(NEW,CATLG,DELETE),
// UNIT=(TAPE,30),
// SPACE=(CYL,(20000,10000),RLSE),
// DCB=(XXX,RECFM=VB,BLKSIZE=32760)
//*
//SYSIN DD *
SORT FIELDS=(COPY)
INCLUDE COND=(25,10,PD,GT,20100530)
/*
//*
//SYSOUT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=D
//*
//SORTIN DD DSN=ABC.DATA,DISP=SHR
//SORTOUT DD DSN=ABC.OUT,
// DISP=(NEW,CATLG,DELETE),
// UNIT=(TAPE,30),
// SPACE=(CYL,(20000,10000),RLSE),
// DCB=(XXX,RECFM=VB,BLKSIZE=32760)
//*
//SYSIN DD *
SORT FIELDS=(COPY)
INCLUDE COND=(25,10,PD,GT,20100530)
/*
Snipet of data, put onto disk for viewing.
(The input file is VB Tape, but, the fields only become VB, after the date field, so the date always in the same spot - 25).
009030000999999F000095110065709793010080A00F0000444444444
05C0C000514791C000C1910C2002C115C20C01C0C2C3000C000000000
---------------------------------------------------------
æ j pij*0 m 2 000000
009030000999999F000005220052204686000010900F0000444FFFFFF
05C0C000514791C000C2010C2010C115C40C00C042C2000C000000000
---------------------------------------------------------
æ j pij*0 l m 1 000000
009030000999999F000005230052303929800010900F0000444FFFFFF
05C0C000514791C000C2011C2011C040C30C00C042C1000C000000000
---------------------------------------------------------
æ j pij*0 - * - * e m 2 000000
009030000999999F000006150061501886000010900F0000444FFFFFF
05C0C000514791C000C2000C2000C145C40C00C042C2000C000000000
---------------------------------------------------------
æ j pij*0 - - @l m 1 000000
009030000999999F000006130061303279800010900F0000444FFFFFF
05C0C000514791C000C2001C2001C013C30C00C042C1000C000000000
05C0C000514791C000C1910C2002C115C20C01C0C2C3000C000000000
---------------------------------------------------------
æ j pij*0 m 2 000000
009030000999999F000005220052204686000010900F0000444FFFFFF
05C0C000514791C000C2010C2010C115C40C00C042C2000C000000000
---------------------------------------------------------
æ j pij*0 l m 1 000000
009030000999999F000005230052303929800010900F0000444FFFFFF
05C0C000514791C000C2011C2011C040C30C00C042C1000C000000000
---------------------------------------------------------
æ j pij*0 - * - * e m 2 000000
009030000999999F000006150061501886000010900F0000444FFFFFF
05C0C000514791C000C2000C2000C145C40C00C042C2000C000000000
---------------------------------------------------------
æ j pij*0 - - @l m 1 000000
009030000999999F000006130061303279800010900F0000444FFFFFF
05C0C000514791C000C2001C2001C013C30C00C042C1000C000000000
Job Output
SYSIN :
SORT FIELDS=(COPY)
INCLUDE COND=(25,10,PD,GT,20100530)
WER276B SYSDIAG= 1656311, 2726031, 2726031, 1146150
WER164B 8,864K BYTES OF VIRTUAL STORAGE AVAILABLE, MAX REQUESTED,
WER164B 0 BYTES RESERVE REQUESTED, 2,240K BYTES USED
WER146B 32K BYTES OF EMERGENCY SPACE ALLOCATED
WER108I SORTIN : RECFM=VB ; LRECL= 381; BLKSIZE= 32760
WER110I SORTOUT : RECFM=VB ; LRECL= 381; BLKSIZE= 32760
WER410B 7,836K BYTES OF VIRTUAL STORAGE AVAILABLE ABOVE THE 16MEG LINE,
WER410B 0 BYTES RESERVE REQUESTED, 2,112K BYTES USED
WER055I INSERT 0, DELETE 3126170
WER211B SYNCSMF CALLED BY SYNCSORT; RC=0000
WER449I SYNCSORT GLOBAL DSM SUBSYSTEM ACTIVE
WER416B SORTIN : EXCP'S=17150,UNIT=3490,DEV=4AB4,CHP=4958717A
WER416B SORTOUT : EXCP'S=15972,UNIT=3490,DEV=4BF0,CHP=797BA0AC
WER416B TOTAL OF 33,122 EXCP'S ISSUED FOR COPYING
WER054I RCD IN 50127245, OUT 47001075
WER169I RELEASE 1.3 BATCH 0492 TPF LEVEL 2.2
WER052I END SYNCSORT - XXXXXXXJ,S001,,DIAG=8800,5380,A000,006C,C0FE,6CAB,2248,66E4
SORT FIELDS=(COPY)
INCLUDE COND=(25,10,PD,GT,20100530)
WER276B SYSDIAG= 1656311, 2726031, 2726031, 1146150
WER164B 8,864K BYTES OF VIRTUAL STORAGE AVAILABLE, MAX REQUESTED,
WER164B 0 BYTES RESERVE REQUESTED, 2,240K BYTES USED
WER146B 32K BYTES OF EMERGENCY SPACE ALLOCATED
WER108I SORTIN : RECFM=VB ; LRECL= 381; BLKSIZE= 32760
WER110I SORTOUT : RECFM=VB ; LRECL= 381; BLKSIZE= 32760
WER410B 7,836K BYTES OF VIRTUAL STORAGE AVAILABLE ABOVE THE 16MEG LINE,
WER410B 0 BYTES RESERVE REQUESTED, 2,112K BYTES USED
WER055I INSERT 0, DELETE 3126170
WER211B SYNCSMF CALLED BY SYNCSORT; RC=0000
WER449I SYNCSORT GLOBAL DSM SUBSYSTEM ACTIVE
WER416B SORTIN : EXCP'S=17150,UNIT=3490,DEV=4AB4,CHP=4958717A
WER416B SORTOUT : EXCP'S=15972,UNIT=3490,DEV=4BF0,CHP=797BA0AC
WER416B TOTAL OF 33,122 EXCP'S ISSUED FOR COPYING
WER054I RCD IN 50127245, OUT 47001075
WER169I RELEASE 1.3 BATCH 0492 TPF LEVEL 2.2
WER052I END SYNCSORT - XXXXXXXJ,S001,,DIAG=8800,5380,A000,006C,C0FE,6CAB,2248,66E4
I have a SAS Program that filters dates after 20100530 correctly. So I know the right output record count 1,849,629 - and I've validated this.
If I can filter in SORT, my jobs will be faster.
Any tips would be appreciated, thanks for your time.
