Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Profile Log in to check your private messages Log in
 
ICETOOL question

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> DFSORT/ICETOOL
View previous topic :: :: View next topic  
Author Message
CICS fan

New User


Joined: 03 Apr 2008
Posts: 82
Location: United States

PostPosted: Tue Aug 10, 2010 7:23 pm    Post subject: ICETOOL question
Reply with quote

I have an input file of 381 LRECL. Some of which has got charcters 'PR" in the 1st position of the record. Some of them dont have it.

I want to have the output to take on the record with 10th ocurence of 'PR" at 1st position till before 25th occurrence of 'PR' on 1st poition.

i.e if input rec

PRkefhwfkhwhlhwhwf....
AB..........
CD........
PR........
........
......
PRporeefwjffwfl (10th occurrence of PR in 1st pos, i want from this in output)
AB..........
CD........
PR........
........
......
RTljwefhwlhwf ( i want till this in output)
PRporeefwjffwfl (25th occurrence of PR in 1st pos)
.........
.........

Please guide me.
Back to top
View user's profile Send private message

sqlcode1

Active Member


Joined: 08 Apr 2010
Posts: 578
Location: USA

PostPosted: Tue Aug 10, 2010 8:04 pm    Post subject:
Reply with quote

CICS fan,
Why do you call it ICETOOL question?

Try this

Code:
  INREC IFTHEN=(WHEN=GROUP,BEGIN=(1,2,CH,EQ,C'PR'),PUSH=(382:ID=8)) 
  SORT FIELDS=COPY                                                   
  OUTFIL INCLUDE=(382,8,ZD,GE,10,AND,382,8,ZD,LT,25),BUILD=(1,381)   



Thanks,
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> DFSORT/ICETOOL All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts JES2 EXIT 6 QUESTION Randy Horowitz All Other Mainframe Topics 30 Tue Feb 06, 2018 5:47 pm
No new posts ICETOOL - RESIZE DYNAMICALLY kranthikumarb DFSORT/ICETOOL 0 Tue Nov 21, 2017 5:30 pm
No new posts question about dfsms management clas... Hervey Martinez IBM Tools 0 Tue Oct 10, 2017 6:19 pm
No new posts Difference in SORT & ICETOOL Mohan Kothakota DFSORT/ICETOOL 5 Fri Sep 22, 2017 4:56 pm
No new posts Question related to Data dictionary f... rexx77 SYNCSORT 3 Thu Aug 31, 2017 7:23 am

Facebook
Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us