SORT to Obtain SubTotals

In this Mainframe Forum - You can post your queries on DFSORT, ICETOOL , SyncSort & JCL Utilities

Moderators: Frank Yaeger, Moderator Group

Post Reply
nw372
Member
Posts: 5
Joined: Sun Aug 09, 2009 5:08 pm

SORT to Obtain SubTotals

Post by nw372 » Mon Aug 10, 2009 12:27 pm

Hi

I need your help.
I have a filewith RECFM=VB like this one:
44603<--------------DATA 1----------------------->
44603<--------------DATA 1----------------------->
44606<--------------DATA 2--------------------------------->

44603 and 44606 represent the control number.
The control number can be 1, 20 or 1000 different numbers.

I would like to count how many record do I have by control number.
Thank you very much

Best Regards,
NW3712

User avatar
Frank Yaeger
Moderator
Posts: 812
Joined: Sat Feb 18, 2006 5:45 am
Location: San Jose, CA
Contact:

Post by Frank Yaeger » Mon Aug 10, 2009 8:27 pm

Here's a DFSORT/ICETOOL job that will do what I think you're asking for:

Code: Select all

//S1   EXEC  PGM=ICETOOL                   
//TOOLMSG   DD  SYSOUT=*                   
//DFSMSG    DD  SYSOUT=*                   
//IN DD DSN=...  input file &#40;VB&#41;           
//RPT DD SYSOUT=*                          
//TOOLIN DD *                              
OCCUR FROM&#40;IN&#41; LIST&#40;RPT&#41; BLANK -           
  HEADER&#40;'Control number'&#41; ON&#40;5,5,ZD&#41; -    
  HEADER&#40;'Count'&#41; ON&#40;VALCNT&#41;               
/*
For your input example, RPT would have:

Code: Select all

Control number             Count                 
--------------   ---------------                 
         44603                 2                 
         44606                 1                 
If that's not what you want, then explain in detail what you do want and show the expected output.
Frank Yaeger - DFSORT Development Team (IBM) - yaeger@us.ibm.com
Specialties: JOINKEYS, FINDREP, WHEN=GROUP, ICETOOL, Symbols, Migration
=> DFSORT/MVS is on the Web at http://www.ibm.com/storage/dfsort

Post Reply

FREE TUTORIALS

Tutorials
Free tutorials from mainframegurukul
  • JCL Tutorial
    Covers all important JCL concepts.
  • Cobol Tutorial
    This tutorials covers all Cobol Topics from STRING to COMP-3.
  • DB2 Tutorial
    DB2 Tutorial focuses on DB2 COBOL Programming.
  • SORT Tutorial
    This Tutorial covers all important aspects of DFSORT with examples
  • CICS Tutorial
    This CICS tutorial covers CICS concepts and CICS Basics, CICS COBOL Programming.
Interview
Mainframe Interview questions



Other References
Mainframe Tools and others