Home      Mainframe Forum      Mainfarme Tutorials      IBM Manuals      Mainframe Interview Questions      Mainframe Books      IT News     SiteMap     Downloads


 Home     Mainframe Forum     FAQFAQ    SearchSearch  RegisterRegister   ProfileProfile    Log in to check your private messagesLog in to check your private messages    Log inLog in 
   		  
 
MAINFRAME - TIP OF THE DAY : programming pearls - The fastest algorithm can frequently be replaced by one that is almost as fast and much easier to understand.

Google
 
Web mainframegurukul.com

Welcome to the mainframegurukul forums.

You are currently viewing our mainframe forums as a guest which gives you limited access to view most discussions, articles. By joining our free community you will have access to post topics, communicate privately with other members (PM), respond to polls, upload your own photos. Registration is fast, simple and absolutely free so please, join our community today!

If you have any problems with the registration process or your account login, please contact contact support at admin@mainframegurukul.com


Query in dfsort / icetool

 
Post new topic   Reply to topic    mainframegurukul.com Forum Index -> DFSORT , ICETOOL & Utilities
  View previous topic :: View next topic  
Author Message
Krishna
Site Admin


Joined: 27 Jan 2006
Posts: 929
PostPosted: Wed Sep 20, 2006 11:40 am    Post subject: Query in dfsort / icetool Reply with quote
Following question asked in MVSQUEST and answered by Frank Yaeger


Query
------

I need to change the footer record of input file incremented by .01
(if the input file contains footer record FOOTER0000001. 01 the output file
should contain footer record FOOTER0000001. 02) and (if the input file
contains footer record FOOTER0000001. 99 the output file should contain
footer record FOOTER0000002. 00.

Could anyone help me how to solve using dfsort/icetool.
INPUT FILE:

Code:

   HEADER09192006
   AAAAAA111111
   BBBBBB222222
   CCCCCC333333
   DDDDDD444444
   EEEEEE555555
   FOOTER0000001.01


OUTPUT FILE:

Code:

 HEADER09192006
 AAAAAA111111
 BBBBBB222222
 CCCCCC333333
 DDDDDD444444
 EEEEEE555555
 FOOTER0000001.02



Frank Yaeger Answer :
Here's a DFSORT job that will do what you asked for:

Code:

//S1 EXEC PGM=ICEMAN
//SYSOUT DD SYSOUT=*
//SORTIN DD DSN=... input file
//SORTOUT DD DSN=... output file
//SYSIN DD *
  OPTION COPY
  INREC IFTHEN=(WHEN= (1,6,CH,EQ, C'FOOTER' ),
    OVERLAY=(7:7, 10,UFF,ADD, +1,EDIT=( TTTTTTT.TT) ))
_/*



Thanks
Krishna
Back to top
View user's profile Send private message Send e-mail

Frank Yaeger
Moderator


Joined: 18 Feb 2006
Posts: 487
Location: San Jose, CA
PostPosted: Wed Sep 20, 2006 9:07 pm    Post subject: Reply with quote
Krishna,

I answer numerous DFSORT/ICETOOL questions on other help boards every day (this is the least active board I participate in). I'm curious - why did you chose this one question and response to post here?
_________________
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/
Back to top
View user's profile Send private message Send e-mail Visit poster's website
Krishna
Site Admin


Joined: 27 Jan 2006
Posts: 929
PostPosted: Thu Sep 21, 2006 12:25 pm    Post subject: Reply with quote
Frank,

When i have seen this question, I thought it will be useful for IMG board users & posted the same here.


Thanks,
Krishna
Back to top
View user's profile Send private message Send e-mail
Display posts from previous:   
Post new topic   Reply to topic    mainframegurukul.com Forum Index -> DFSORT , ICETOOL & Utilities All times are GMT + 5 Hours
Page 1 of 1



 
Jump to:  
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum

Related topics
 Topics   Replies   Author   Views   Last Post 
No new posts IAM BEGINNER IN JCL ...PLZ HELP ME 3 Guest 12378 Wed Jul 07, 2010 8:20 am
anilsani285 View latest post
No new posts Many JCL statements contain specific values designed to dire 1 Krishna 1216 Tue May 12, 2009 5:39 pm
Krishna View latest post
No new posts File-Aid Help 1 Nicholas 8377 Thu Apr 13, 2006 2:12 pm
rangab View latest post
No new posts Search Batch file-aid help 6 frenchman 9142 Tue Mar 28, 2006 5:30 pm
Guest View latest post
No new posts executing java program thru JCL 1 Guest 7516 Fri Mar 17, 2006 10:14 am
arrbee View latest post
 



This widget requires Flash Player 9 or better







Go to top of the page
 

Online ABEND Reference ||  JCL References ||  COBOL References ||  VSAM References ||  Tutorials by Drona Series ||  SQL tutorial ||  BOOKS  ||  DB2 INTERVIEW QUESTIONS ||  COBOL INTERVIEW QUESTIONS  ||  JCL INTERVIEW QUESTIONS ||  JCL2 INTERVIEW QUESTIONS ||  VSAM INTERVIEW QUESTIONS ||  CICS INTERVIEW QUESTIONS  ||  Online tutorials ||  Online ABEND Reference ||  JCL References ||  COBOL References ||  VSAM References ||  Tutorials by Drona Series ||  SQL tutorial ||  BOOKS  ||  SiteMap  ||  Expeditor Tutorial  ||  FILE-AID Tutorial  ||  Changeman Tutorial  ||  COBOL   ||  DB2   ||  JCL  ||  CICS  ||  VSAM  ||  DB2 Interview Questions ( 110 )   || Simple JCL Tutorials  || JCL Tutorial from MainframeGurukul.com   || Simple JCL Tutorial - Chapter1 ;|| Mainframe Forum - Tutorials  || Mainframe Tutorials

Drona Educational Forums - Mainframe Cobol DB2 CICS Board
Powered by phpBB