View previous topic :: View next topic |
Author |
Message |
mf_user Intermediate

Joined: 01 Jun 2003 Posts: 372 Topics: 105
|
Posted: Tue Jan 20, 2009 9:59 am Post subject: RRN of a particular record alone. |
|
|
Hi,
How to get RRN of a particular record using DISPLAY feature of ICETOOL?
I tried it on a huge file to get RRN of a 10,000th record using COPY with USING but could not succeed. It gave me RRN as 1 after completion of job !
Please suggest. _________________ MF
==
Any training that does not include the emotions, mind and body is incomplete; knowledge fades without feeling.
== |
|
Back to top |
|
 |
dbzTHEdinosauer Supermod
Joined: 20 Oct 2006 Posts: 1411 Topics: 26 Location: germany
|
Posted: Tue Jan 20, 2009 10:29 am Post subject: |
|
|
MF,
If you had only 2 posts, I would look it up in the doco for you and provide a URL.
But, you have 217 posts and still did not bother to provide us with the control cards that you used.
I know that Frank has discussed this in at least two threads (8-10 months ago, last year, year before ? I forget). _________________ Dick Brenholtz
American living in Varel, Germany |
|
Back to top |
|
 |
mf_user Intermediate

Joined: 01 Jun 2003 Posts: 372 Topics: 105
|
Posted: Tue Jan 20, 2009 10:45 am Post subject: Reply |
|
|
Dick,
I was trying out this feature of ICETOOL after reading manual. This is the code I tried..
Code: |
//TOOLIN DD *
DISPLAY FROM(IN1) LIST(OUT1) -
TITLE('RRN OF A PARTICULAR REC') PAGE DATE TIME -
HEADER('RELATIVE RECORD NUMBER') ON(NUM)
|
Thanks. _________________ MF
==
Any training that does not include the emotions, mind and body is incomplete; knowledge fades without feeling.
== |
|
Back to top |
|
 |
Frank Yaeger Sort Forum Moderator

Joined: 02 Dec 2002 Posts: 1618 Topics: 31 Location: San Jose
|
Posted: Tue Jan 20, 2009 11:06 am Post subject: |
|
|
You seem to have a habit of telling us cryptically what you want and showing some solution you tried that didn't do what you want, without actually telling us what you want.
From what you've said, I have no idea what you're trying to do. The RRN of a particular record based on what? The 10000th record has an RRN of 10000 so why do you need DISPLAY to figure that out? Your DISPLAY operator seems to have nothing to do with getting an RRN.
Now and in the future, it would get you a solution much faster if you would give an example of your input records (relevant fields only) and what you expect for output, explain exactly what you're trying to do, give the RECFM and LRECL of the input file, and the starting position, length and format of each relevant field. _________________ Frank Yaeger - DFSORT Development Team (IBM)
Specialties: JOINKEYS, FINDREP, WHEN=GROUP, ICETOOL, Symbols, Migration
DFSORT is on the Web at:
www.ibm.com/storage/dfsort |
|
Back to top |
|
 |
mf_user Intermediate

Joined: 01 Jun 2003 Posts: 372 Topics: 105
|
Posted: Tue Jan 20, 2009 12:07 pm Post subject: Reply |
|
|
Hi, Frank.
Sorry for not putting it correctly.
My input file (LRECL=80 & RECFM=FB) contains records but I need to find out the record number if it has certain value 29th position.
Code: |
02096XXXXN8CK10706 9 MRE 90209613 83438344 007 101
02096XXXXN9CK10706 9 MRE 90209613 83438344 007 101
02096XXXXXBCK10706 9 MRE 90209613 83438344 007 101
02096XXXXXCCK10706 9 MRE 90209613 83438344 007 101
02096XXXXXDCK10706 9 MRE 90209613 83438344 007 101
02096XXXXXFCK10706 9 MRE 90209613 83438344 007 101
02096XXXXXGCK10706 9 MRE 90209613 83438344 007 101
03598XXXXXPCT15403 98 CRE 90359813 83318337 007 101
03598XXXXX2CT15403 98 MRE 90359813 83318337 007 101
05172XXXXX4 1WB19 91 MRE 90517213 90129013 007 101
05172XXXXX5 1WB19 91 MRE 90517213 90129013 007 101
05263XXXXXFCK31053 9E INR 90526313 83669006 007 101
05437XXXXXSCK20953 9 ONR 901291003613 83448351 007 101
|
So, here I want to find out the record number if 29th position has CRE, INR or ONR.
Output:
Code: |
00008 03598XXXXXPCT15403 98 CRE 90359813 83318337 007 101
00012 05263XXXXXFCK31053 9E INR 90526313 83669006 007 101
00013 05437XXXXXSCK20953 9 ONR 901291003613 83448351 007 101
|
Thanks. _________________ MF
==
Any training that does not include the emotions, mind and body is incomplete; knowledge fades without feeling.
== |
|
Back to top |
|
 |
kolusu Site Admin

Joined: 26 Nov 2002 Posts: 12378 Topics: 75 Location: San Jose
|
Posted: Tue Jan 20, 2009 12:52 pm Post subject: |
|
|
mf_user,
*Sigh* All you need is a simple INCLUDE cond card.
Try this DFSORT Job
Code: |
//STEP0100 EXEC PGM=ICEMAN
//SYSOUT DD SYSOUT=*
//SORTIN DD *
02096XXXXN8CK10706 9 MRE 90209613 83438344 007 101
02096XXXXN9CK10706 9 MRE 90209613 83438344 007 101
02096XXXXXBCK10706 9 MRE 90209613 83438344 007 101
02096XXXXXCCK10706 9 MRE 90209613 83438344 007 101
02096XXXXXDCK10706 9 MRE 90209613 83438344 007 101
02096XXXXXFCK10706 9 MRE 90209613 83438344 007 101
02096XXXXXGCK10706 9 MRE 90209613 83438344 007 101
03598XXXXXPCT15403 98 CRE 90359813 83318337 007 101
03598XXXXX2CT15403 98 MRE 90359813 83318337 007 101
05172XXXXX4 1WB19 91 MRE 90517213 90129013 007 101
05172XXXXX5 1WB19 91 MRE 90517213 90129013 007 101
05263XXXXXFCK31053 9E INR 90526313 83669006 007 101
05437XXXXXSCK20953 9 ONR 901291003613 83448351 007 101
//SORTOUT DD SYSOUT=*
//SYSIN DD *
SORT FIELDS=COPY
OUTREC BUILD=(SEQNUM,5,ZD,X,1,80)
OUTFIL INCLUDE=(35,3,SS,EQ,C'CRE,INR,ONR')
//* |
Hope this helps...
Cheers
Kolusu _________________ Kolusu
www.linkedin.com/in/kolusu |
|
Back to top |
|
 |
mf_user Intermediate

Joined: 01 Jun 2003 Posts: 372 Topics: 105
|
Posted: Wed Jan 21, 2009 5:47 am Post subject: Thanks. |
|
|
Oh......thanks. I was thinking all impossible ideas before I posed it  _________________ MF
==
Any training that does not include the emotions, mind and body is incomplete; knowledge fades without feeling.
== |
|
Back to top |
|
 |
|
|