My requirement is to write all these records in an O/P GDG (FB,250), but each version should have only 20,000 records.
If it crosses 20,000 I should write into the next version of GDG.
I need to do it dynamically based on the number of Input records.
Joined: 14 Mar 2007 Posts: 8797 Location: Welsh Wales
When talking about GDS it is important to use the correct terminology, as both version and generation are both valid in terms of a GDS.
It is a well known fact that only one version of a GDS may exist at any one time, however, multiple generations may exist together.
Please learn and use the correct terminology when posting, as using the wrong term can cause confusion and possibly delay a resolution to your problem.
Also, looking back on your previous posts you appear to be using both SYNCSORT and DFSORT in the titles of your posts. Can you please clarify EXACTLY which product that you are using by running the code below and posting the full output from the JES SYSOUT element.
Again, with your previous postings, you start a thread and have never once returned to that thread to give the forum an update about the status of your problem. Please make the effort to do so in future.
This request also includes providing answers to questions asked, as in a previous post, December 2009, I have asked for exactly the same information, but unfortunately just like Diana Ross, "I'm still waiting".
Sorry for not coming back to the previous posts. I will take care of that in future.
Regarding the exact product, here is my JES SYSOUT for the code you gave:
Code:
SYNCSORT FOR Z/OS 1.3.2.2R U.S. PATENTS: 4210961, 5117495 (C) 2007 SYNCSOR
The Company that I am working with z/OS 1.1
SYNCSORT LICENSED FOR CPU SERIAL NUMBER 99999, MODEL 99999 999 LICENS
SYSIN :
SORT FIELDS=COPY
WER276B SYSDIAG= 264902, 570660, 570660, 1067700
WER164B 5,872K BYTES OF VIRTUAL STORAGE AVAILABLE, MAX REQUESTED,
WER164B 48K BYTES RESERVE REQUESTED, 272K BYTES USED
WER146B 20K BYTES OF EMERGENCY SPACE ALLOCATED
WER108I SORTIN : RECFM=FB ; LRECL= 80; BLKSIZE= 80
WER110I SORTOUT : RECFM=FB ; LRECL= 80; BLKSIZE= 80
WER410B 4,844K BYTES OF VIRTUAL STORAGE AVAILABLE ABOVE THE 16MEG LINE,
WER410B 0 BYTES RESERVE REQUESTED, 156K BYTES USED
WER211B SYNCSMF CALLED BY SYNCSORT; RC=0000
WER449I SYNCSORT GLOBAL DSM SUBSYSTEM ACTIVE
WER416B BSAM WAS USED FOR SORTIN
WER416B BSAM WAS USED FOR SORTOUT
WER054I RCD IN 1, OUT 1
Joined: 17 Oct 2006 Posts: 2481 Location: @my desk
Quote:
can you generate 2 generations of the same gdg in one step?
It works for me (as well)
Anuj,
The OP needs to do it dynamically based on the number of input records. I feel that requires either a JCL created on the fly based on the input record count or some REXX code and not just a SORT split.