SyncSort can accomplish what you have to do...sort of. Below is an excerpt from the SyncSort manual. My guess is that this is geared toward assembler programs.
The COMMAREA instructs SyncSort to provide an area for communication between exit programs. The size of this area is given as a decimal number n of bytes; x, character string at most n bytes long, designates the initial value to be stored in this area. Regardless of the value of n, which may be between 1 and 256, x may not exceed 89 bytes in length. (Whenever x has fewer than n characters, it will be right-padded with blanks to a length of n.) If COMMAREA is specified via the EXEC statement, blanks may be included within the string x. However, if COMMAREA is specified via the $ORTPARM DD statement, intervening blanks are not allowed. In neither case is a right parenthesis permitted since it delimits the COMMAREA parameter. Both n and x are optional. If either subparameter is specified, it will determine the other: n defaults to the length of x, x defaults to n blanks. If neither x nor n is specified, n defaults to 80 bytes, x to 80 blanks. NOCOMMAREA is the program default: no area for communication between exit programs is provided, although exit routines may still use the 19th word of the save area. Exit program access to this communication area is described in the discussion of exit programs; see "The Exit Communication Area" on page 7.4. The Exit Communication Area. When an exit routine is given control, Register 13 points to a 19-word area, the first 18 of which can be used to save registers. The 19th word of this area can be used to pass information between Assembler exits. For example, when the COMMAREA PARM is used, the 19th word can be set to point to the exit communication area COMMAREA provides. The first 2 bytes of this communication area give the length of the area. The user is free to change the entire communication area, including the initial halfword. Thanks; Ray Baraniecki Morgan Stanley Smith Barney 1 New York Plaza - 18th Floor New York, NY 10004 Telephone: 212-276-5641 Cell: 917-597-5692 -----Original Message----- From: IBM Mainframe Discussion List [mailto:[email protected]] On Behalf Of Terry Draper Sent: Wednesday, September 29, 2010 11:41 AM To: [email protected] Subject: Re: SORT question The question stated "I have a large file that is sorted in ascending order by a date field, YYYYMMDD". So I must assume it is already in sequence od date. Terry Draper zSeries Performance Consultant [email protected] mobile: +66 811431287 --- On Wed, 29/9/10, Staller, Allan <[email protected]> wrote: From: Staller, Allan <[email protected]> Subject: Re: SORT question To: [email protected] Date: Wednesday, 29 September, 2010, 15:05 At E15 time, the file has not yet been sorted. <snip> Maybe try using an E15 exit to read the input file. Stop passing the records when you reach the date higher than required.. I am not sure how I would pass the date to the E15. Could it be a parm. Or it could be read from a separate single record input file on first pass through the E15. Any comments on this? </snip> ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -------------------------------------------------------------------------- Important Notice to Recipients: It is important that you do not use e-mail to request, authorize or effect the purchase or sale of any security or commodity, to send fund transfer instructions, or to effect any other transactions. Any such request, orders, or instructions that you send will not be accepted and will not be processed by Morgan Stanley Smith Barney. The sender of this e-mail is an employee of Morgan Stanley Smith Barney LLC. If you have received this communication in error, please destroy all electronic and paper copies and notify the sender immediately. Erroneous transmission is not intended to waive confidentiality or privilege. Morgan Stanley Smith Barney reserves the right, to the extent permitted under applicable law, to monitor electronic communications. By e-mailing with Morgan Stanley Smith Barney you consent to the foregoing. ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
