any option with icetool

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

Moderators: Frank Yaeger, Moderator Group

Post Reply
4ubobby
Member
Posts: 19
Joined: Fri Nov 06, 2009 7:49 pm
Location: USA

any option with icetool

Post by 4ubobby » Fri Mar 12, 2010 10:31 pm

Hi ,

I have a requirement where i need to count the records in a file based upon a field value.

My input record is 80 characters

the field that needs to be considered for counting is 21:2 (two bytes from 21 position)

example of input data

11111111111111111111EA
22222222222222222222EA
33333333333333333333IN
44444444444444444444IN

The output should be as

EA -- 2
IN -- 2
thanks

Bobby

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

Post by Frank Yaeger » Fri Mar 12, 2010 11:28 pm

You can use the OCCUR operator of DFSORT's ICETOOL for that. Here's an example:

Code: Select all

//S1    EXEC  PGM=ICETOOL
//TOOLMSG DD SYSOUT=*
//DFSMSG  DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//IN DD *
11111111111111111111EA
22222222222222222222EA
33333333333333333333IN
44444444444444444444IN
//OUT DD SYSOUT=*
//TOOLIN DD *
OCCUR FROM(IN) LIST(OUT) ON(21,2,CH) ON(VALCNT,U05) BLANK
/*
OUT would have:

Code: Select all

(21,2,CH)   VALUE COUNT       
EA                    2       
IN                    2       

You can change the format of the report in various ways. For complete details, see:

http://publibz.boulder.ibm.com/cgi-bin/ ... 0527161936
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