I think there is a limit in sort on the position that validates for any condition. its working when i give postion 10 or 20 but when I give position 900 throwing error
SYSIN :
SORT FIELDS=COPY
INCLUDE COND=(212,788,CH,NE,C' ')
*
INSTALLATION OPTIONS IN MFXPRMIT WILL BE USED
INCLUDE/OMIT INVALID LENGTH
It's not very useful. Could you please try with what sergeyken suggested and post the full sysout.
its not working though
Code:
SORT FIELDS=COPY
INCLUDE COND=(212,200,SS,NE,C' ')
even with length as 900 its not working...file has many records but throwing empty file.
Code:
********************************* TOP OF DATA **********************************
SYNCSORT FOR Z/OS 2.1.4.0R U.S. PATENTS: 4210961, 5117495 (C) 2014 SYNCSO
STATE OF WISCONSIN - DET SERVICES, ESD HELPDESK: 608-264-9383 80
SYNCSORT LICENSED FOR CPU SERIAL NUMBER 5E6E7, MODEL 3906 704 LICEN
SYSIN :
SORT FIELDS=COPY
INCLUDE COND=(212,890,SS,NE,C' ')
WER813I INSTALLATION OPTIONS IN MFXPRMIT WILL BE USED
WER276B SYSDIAG= 7953145, 12350668, 12350668, 25550320
WER164B 6,904K BYTES OF VIRTUAL STORAGE AVAILABLE, MAX REQUESTED,
WER164B 0 BYTES RESERVE REQUESTED, 2,376K BYTES USED
WER146B 12K BYTES OF EMERGENCY SPACE ALLOCATED
WER108I SORTIN : RECFM=FB ; LRECL= 1200; BLKSIZE= 27600
WER073I SORTIN : DSNAME=DWDCARES.RT41.D07111
WER110I SORTOUT : RECFM=FB ; LRECL= 1200; BLKSIZE= 27600
WER074I SORTOUT : DSNAME=DWDCARES.CAREF.DESIGN
WER410B 5,876K BYTES OF VIRTUAL STORAGE AVAILABLE ABOVE THE 16-MEGABYTE LINE,
WER410B 0 BYTES RESERVE REQUESTED, 2,228K BYTES USED
WER055I INSERT 0, DELETE 23331
WER211B SYNCSMF CALLED BY SYNCSORT; RC=0000
WER449I SYNCSORT GLOBAL DSM SUBSYSTEM ACTIVE
WER416B SORTIN : EXCP'S=57,UNIT=3390,DEV=6458,CHP=28292A2BA8A9AAAB,VOL=SLR04
WER416B SORTOUT : EXCP'S=0,UNIT=3390,DEV=60BF,CHP=28292A2BA8A9AAAB,VOL=SHR027
WER416B TOTAL OF 57 EXCP'S ISSUED FOR COPYING
WER054I RCD IN 23331, OUT 0
WER169I RELEASE 2.1 BATCH 0539 TPF LEVEL 4.0
WER052I END SYNCSORT - PWCCRDES,STEP020,,DIAG=AE00,710A,8200,004E,E6FE,48A3,06
1) Please, learn some basics of logical operations. Your example is senseless
2) You are given ready-to-use solution above. Stop re-inventing the wheel. Force self-education.
1) Please, learn some basics of logical operations. Your example is senseless
2) You are given ready-to-use solution above. Stop re-inventing the wheel. Force self-education.
Joined: 17 Oct 2006 Posts: 2481 Location: @my desk
Looks like the OP is trying to exclude all-blanks in positions 210 thru 1200 into one output, ie INCLUDE records with ANY non blank character in ANY of these positions.
The SS 'solution' suggested above does not seem to apply to the OP's problem. It INCLUDEs records with ALL the positions 210 thru 1200 filled with non-blank characters. (the OP might not have such a record and ended up with an empty output).
Changing the NEs to EQs in OP's original control card like this would have been one of the options.