Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

Repeat a record multiple times

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

New User


Joined: 21 Dec 2006
Posts: 20
Location: London

PostPosted: Wed Jan 03, 2007 6:02 pm    Post subject: Repeat a record multiple times
Reply with quote

Hi,
I am facing a problem in repeating the record some 'n' number of times by incrementing a field value which is packed decimal of 8 in length,
when i give a 15 digit number it is giving me

ICE000I 1 - CONTROL STATEMENTS FOR 5694-A01, Z/OS DFSORT V1R5 - 11:24 ON
OPTION COPY
OUTFIL OVERLAY=(1:SEQNUM,8,PD,START=100000000000000,INCR=1),
?
ICE008A 0 FIELD OR VALUE EXCEEDS MAXIMUM ALLOWABLE CHARACTERS
REPEAT=10
?

But packed decimal can store 15 digit in it.
and my requirement is that for 15 digit only.Please help me out and tell me how this can be done.
Back to top
View user's profile Send private message

William Thompson

Global Moderator


Joined: 18 Nov 2006
Posts: 3158
Location: Tucson AZ

PostPosted: Wed Jan 03, 2007 6:33 pm    Post subject:
Reply with quote

The sort manual says:
Quote:
j specifies the starting value. The value for j must be between 0 and 100000000000. The default for j is 1.
But you need:
Quote:
OUTFIL OVERLAY=(1:SEQNUM,8,PD,START=100000000000000,INCR=1)
Do you expect the number of records to get large enough to be larger than sort's 100000000000?
If not, could you do something like this:
Quote:
OUTFIL OVERLAY=(1:x'1000',3:SEQNUM,6,PD,START=0,INCR=1)
?
Back to top
View user's profile Send private message
shuklas

New User


Joined: 21 Dec 2006
Posts: 20
Location: London

PostPosted: Wed Jan 03, 2007 6:53 pm    Post subject: Repeat a record multiple times
Reply with quote

Hi William,
My requirement is that we have to start from 100000000000000 or any 15 digit number is there any alternative that can be used.
Back to top
View user's profile Send private message
William Thompson

Global Moderator


Joined: 18 Nov 2006
Posts: 3158
Location: Tucson AZ

PostPosted: Wed Jan 03, 2007 7:01 pm    Post subject: Re: Repeat a record multiple times
Reply with quote

shuklas wrote:
My requirement is that we have to start from 100000000000000 or any 15 digit number is there any alternative that can be used.
I kind of figured that out, the question is will the sequence number ever get bigger than 11 digits?
If not. the top 4 digits can be emulated by a two byte hex '1000'.
Back to top
View user's profile Send private message
shuklas

New User


Joined: 21 Dec 2006
Posts: 20
Location: London

PostPosted: Wed Jan 03, 2007 8:13 pm    Post subject:
Reply with quote

Thanks William,
That works for me, icon_biggrin.gif now even i am happy.
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 Adding big TEXT lines to each record ... bshkris SYNCSORT 4 Sat May 06, 2017 1:40 am
No new posts Unable to create multiple files using... mbattu COBOL Programming 3 Fri May 05, 2017 5:35 pm
This topic is locked: you cannot edit posts or make replies. Merge two files and update Trailer re... Yashashri JCL & VSAM 1 Thu May 04, 2017 12:54 pm
This topic is locked: you cannot edit posts or make replies. SDSF multiple spool datasets extracte... PJAlarcon CLIST & REXX 1 Fri Apr 21, 2017 10:50 pm
No new posts Validating file with multiple header/... mohitsaini DFSORT/ICETOOL 6 Thu Apr 13, 2017 1:53 am


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us