Still celebrating National IT Professionals Day with 3 months of free Premium Membership. Use Code ITDAY17

x
?
Solved

Mainframe Sort (3rd Try)

Posted on 2012-03-28
1
Medium Priority
?
566 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
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
1 Comment
 
LVL 7

Accepted Solution

by:
garypfirstech earned 1350 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

On Demand Webinar - Networking for the Cloud Era

This webinar discusses:
-Common barriers companies experience when moving to the cloud
-How SD-WAN changes the way we look at networks
-Best practices customers should employ moving forward with cloud migration
-What happens behind the scenes of SteelConnect’s one-click button

Question has a verified solution.

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

If you’re involved with your company’s wide area network (WAN), you’ve probably heard about SD-WANs. They’re the “boy wonder” of networking, ostensibly allowing companies to replace expensive MPLS lines with low-cost Internet access. But, are they …
When trying to connect from SSMS v17.x to a SQL Server Integration Services 2016 instance or previous version, you get the error “Connecting to the Integration Services service on the computer failed with the following error: 'The specified service …
In this video, Percona Solution Engineer Dimitri Vanoverbeke discusses why you want to use at least three nodes in a database cluster. To discuss how Percona Consulting can help with your design and architecture needs for your database and infras…
Want to learn how to record your desktop screen without having to use an outside camera. Click on this video and learn how to use the cool google extension called "Screencastify"! Step 1: Open a new google tab Step 2: Go to the left hand upper corn…

660 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