Joined: 14 Mar 2007 Posts: 8797 Location: Welsh Wales
You haven't really told us anything of use there. One could guess at the requirement being that the match is on the first field of the records, but that may be wrong.
So please think about what you want, and explain it clearly.
Also, please run the following and post the SYSOUT segment so that we know the sort product and release level.
My requirement is that. we have a ledger list in column1 and list of office names in column2. one or more office's can have the same ledger number. we have got a requirement to create a report with ledger number in one column and all the office names under the ledger in the second column. Here maximum number of offices for a ledger in unknown, so i cannot anticipate the report size.
Here is the sysout of the job which you have asked me run:-
Code:
ICE201I H RECORD TYPE IS F - DATA STARTS IN POSITION 1
ICE751I 0 C5-K76982 C6-K90026 C7-K82419 C8-K67572 E9-K60824 C9-BASE E5-K80744 E7-K79990
ICE143I 0 BLOCKSET COPY TECHNIQUE SELECTED
ICE250I 0 VISIT http://www.ibm.com/storage/dfsort FOR DFSORT PAPERS, EXAMPLES AND MORE
ICE000I 1 - CONTROL STATEMENTS FOR 5694-A01, Z/OS DFSORT V1R12 - 05:50 ON FRI JUL 26, 2013 -
SORT FIELDS=COPY
ICE201I H RECORD TYPE IS F - DATA STARTS IN POSITION 1
ICE751I 0 C5-K76982 C6-K90026 C7-K82419 C8-K67572 E9-K60824 C9-BASE E5-K80744 E7-K79990
ICE142I 0 SYSOUS NOT FOUND - SYSOUT USED
ICE193I 0 ICEAM1 INVOCATION ENVIRONMENT IN EFFECT - ICEAM1 ENVIRONMENT SELECTED
ICE252I 1 PARMLIB OPTIONS WERE MERGED WITH INSTALLATION MODULE DEFAULTS
ICE088I 0 NXV3668A.STEP1 . , INPUT LRECL = 80, BLKSIZE = 80, TYPE = FB
ICE093I 0 MAIN STORAGE = (MAX,10485760,10472542)
ICE156I 0 MAIN STORAGE ABOVE 16MB = (10350046,10350046)
ICE127I 0 OPTIONS: OVFLO=RC4 ,PAD=RC0 ,TRUNC=RC0 ,SPANINC=RC4 ,VLSCMP=N,SZERO=Y,RESET=Y,VSAMEMT=Y,DYNSPC=192
ICE128I 0 OPTIONS: SIZE=10485760,MAXLIM=2097152,MINLIM=450560,EQUALS=N,LIST=Y,ERET=ABEND,MSGDDN=SYSOUT
ICE129I 0 OPTIONS: VIO=Y,RESDNT=NONE,SMF=FULL ,WRKSEC=Y,OUTSEC=Y,VERIFY=N,CHALT=N,DYNALOC=N ,ABCODE=016
ICE130I 0 OPTIONS: RESALL=12288,RESINV=0,SVC=109 ,CHECK=Y,WRKREL=Y,OUTREL=Y,CKPT=N,COBEXIT=COB2
ICE131I 0 OPTIONS: TMAXLIM=10485760,ARESALL=0,ARESINV=0,OVERRGN=65536,CINV=Y,CFW=N,DSA=0
ICE132I 0 OPTIONS: VLSHRT=N,ZDPRINT=Y,IEXIT=N,TEXIT=N,LISTX=N,EFS=NONE ,EXITCK=W,PARMDDN=DFSPARM ,FSZEST=N
ICE133I 0 OPTIONS: HIPRMAX=OPTIMAL,DSPSIZE=128 ,ODMAXBF=0,SOLRF=Y,VLLONG=N,VSAMIO=N,MOSIZE=MAX
ICE235I 0 OPTIONS: NULLOUT=RC0
ICE236I 0 OPTIONS: DYNAPCT=10 ,MOWRK=Y
ICE084I 0 BSAM ACCESS METHOD USED FOR SORTOUT
ICE084I 0 BSAM ACCESS METHOD USED FOR SORTIN
ICE751I 1 EF-BASE F0-K66717 E8-K79990
ICE090I 0 OUTPUT LRECL = 80, BLKSIZE = 80, TYPE = FB
ICE055I 0 INSERT 0, DELETE 0
ICE054I 0 RECORDS - IN: 1, OUT: 1
ICE052I 0 END OF DFSORT
EDIT: Code'd. Please use "Code" tags while posting code.
Joined: 09 Mar 2011 Posts: 7309 Location: Inside the Matrix
We need to know the lengths of your fields. So some examples please of the input with 0-5 offices per ledger. Do you wasnt a report or a file? (you'll need some very wide paper for a report).
You should also consider what you want the thing to look like if the number of offices per a single ledger can exceed what can be held on a maximum-length (Operating System) record.
Joined: 10 May 2007 Posts: 2455 Location: Hampshire, UK
Well, you need to answer one of the questions that you have not yet answered as 1600 * 24 = 38,400 + 1599 commas + length of ledger code + 1 more comma sortof exceeds max lrecl.
.jpg)
