Solved

Mainframe Sort (3rd Try)

Posted on 2012-03-28
1
534 Views
Last Modified: 2012-06-27
Apparently, though I am using the paperclip (attach apparatus) it is not actually attaching so I will take your advice, Tom, and paste that along with the original question below.

We have a as an example a file with 10 records.  The first display of this file is at the top of the Below Document which is at this time considered an unsorted file.  On this below display the second group is that same file sorted using the control card SORT FIELDS=(9,12,CH,D), in essence sorting the key field in descending order.  The third group takes the same unsorted file at the top and using the control card SORT FIELDS=(9,12,CH,A) gives you an Ascending sort.  The fourth groups is what I actually need..  I have been told there is a way to get there using an Alternate Sort Sequence in the JCL.  Please assist.  Below are the examples

11978528TPA00020901920111224000004771EJJONES INC                  
10059794TPA00024142520120123000056256HASSELBROCK, WATSON & CASE    
10150152TPB00002540092012013000000257LACEY T & D                  
10150162TPA00025401020120130000000257LACEY T & D                  
10054652TPA00025901220120126000000322FOLLIN TELEPHONES            
50771823TP000020901920111224000004771EJJONES
50013918TP000021861420111216000000609WATSON TIRE SALES            
50013916TP000021861520111216000001218WATSON TIRE SALES            
51028062TPB00022042220120110000021780ACE PLASTICS                  
50059764TP000024142520120123000056256HASSELBROCK, WATSON & CASE    

50059764TP000024142520120123000056256HASSELBROCK, WATSON & CASE
50013916TP000021861520111216000001218WATSON TIRE SALES        
50013918TP000021861420111216000000609WATSON TIRE SALES        
50771823TP000020901920111224000004771EJJONES INC              
51028062TPB00022042220120110000021780ACE PLASTICS              
10150152TPB00002540092012013000000257LACEY T & D              
10054652TPA00025901220120126000000322FOLLIN TELEPHONES        
10150162TPA00025401020120130000000257LACEY T & D              
10059794TPA00024142520120123000056256HASSELBROCK, WATSON & CASE
11978528TPA00020901920111224000004771EJJONES INC

11978528TPA00020901920111224000004771EJJONES INC                    
10059794TPA00024142520120123000056256HASSELBROCK, WATSON & CASE      
10150162TPA00025401020120130000000257LACEY T & D                    
10054652TPA00025901220120126000000322FOLLIN TELEPHONES              
10150152TPB00002540092012013000000257LACEY T & D                    
51028062TPB00022042220120110000021780ACE PLASTICS                    
50771823TP000020901920111224000004771EJJONES INC                    
50013918TP000021861420111216000000609WATSON TIRE SALES              
50013916TP000021861520111216000001218WATSON TIRE SALES              
50059764TP000024142520120123000056256HASSELBROCK, WATSON & CASE          

50771823TP000020901920111224000004771EJJONES INC                    
50013918TP000021861420111216000000609WATSON TIRE SALES              
50013916TP000021861520111216000001218WATSON TIRE SALES              
50059764TP000024142520120123000056256HASSELBROCK, WATSON & CASE  
11978528TPA00020901920111224000004771EJJONES INC                    
10059794TPA00024142520120123000056256HASSELBROCK, WATSON & CASE      
10150162TPA00025401020120130000000257LACEY T & D                    
10054652TPA00025901220120126000000322FOLLIN TELEPHONES              
10150152TPB00002540092012013000000257LACEY T & D                    
51028062TPB00022042220120110000021780ACE PLASTICS
0
Comment
Question by:mheatherton
1 Comment
 
LVL 7

Accepted Solution

by:
garypfirstech earned 450 total points
ID: 37777708
I'm not sure exactly what you want the sort to be for the fourth option.  However, have a look at

http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/ice1ca60/3.4?SHELF=EZ2ZO213&DT=20110608113434

for the use of the ALTSEQ CODE.  Be sure to change your SORT FIELDS control card to AQ instead of CH for the third parameter.
0

Featured Post

Is Your Active Directory as Secure as You Think?

More than 75% of all records are compromised because of the loss or theft of a privileged credential. Experts have been exploring Active Directory infrastructure to identify key threats and establish best practices for keeping data safe. Attend this month’s webinar to learn more.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Fine Tune your automatic Updates for Ubuntu / Debian
We need a new way to communicate time sensitive or critical info.   The best part of my role at xMatters is visiting our clients all over the world to learn about how they operate their businesses, share insights that xMatters has gleaned across…
Here's a very brief overview of the methods PRTG Network Monitor (https://www.paessler.com/prtg) offers for monitoring bandwidth, to help you decide which methods you´d like to investigate in more detail.  The methods are covered in more detail in o…
This demo shows you how to set up the containerized NetScaler CPX with NetScaler Management and Analytics System in a non-routable Mesos/Marathon environment for use with Micro-Services applications.

914 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

17 Experts available now in Live!

Get 1:1 Help Now