IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

ICETOOL space issues
IBM Mainframe Forums -> DFSORT/ICETOOL
Post new topic   Reply to topic Quick References
View previous topic :: View next topic  
Author Message
Bill Woodger

Moderator Emeritus


Joined: 09 Mar 2011
Posts: 7309
Location: Inside the Matrix
PostPosted: Mon Jul 16, 2012 5:56 pm
 Reply with quote
If one of your record-types is not doing FIELDS=NONE in your original, then it is not going to work in one go.

I'll say it once more. Extract you data from your input files into seperate files.

Seperately SORT each.

You may want to take advantage of Kolusu having spotted that some of your record types have the same length.
Back to top
View user's profile Send private message
umanaga

New User


Joined: 09 Apr 2007
Posts: 33
Location: India
PostPosted: Mon Jul 16, 2012 8:17 pm
 Reply with quote
Sorry i missed to copy
Code:
SUM FIELDS=NONE
after SORT.

On AB record, Sum fields is present but not on 5, 673 bytes.
since skolusu extracted AB as below by skipping 48-52 bytes, these are missed in o/p file
Code:
IFTHEN=(WHEN=(5,2,CH,EQ,C'AB'),BUILD=(1,4,5,43,53,66,564Z))


So on AB, can i put 48-52 after 677 during INREC build and build OUTREC from it.
Back to top
View user's profile Send private message
Bill Woodger

Moderator Emeritus


Joined: 09 Mar 2011
Posts: 7309
Location: Inside the Matrix
PostPosted: Mon Jul 16, 2012 8:19 pm
 Reply with quote
Yes, we know that.

So, do it differently.

I'm not going to outline it again.
Back to top
View user's profile Send private message
dbzTHEdinosauer

Global Moderator


Joined: 20 Oct 2006
Posts: 6966
Location: porcelain throne
PostPosted: Mon Jul 16, 2012 8:36 pm
 Reply with quote
Bill Woodger wrote:
I'm not going to outline it again.


you will have to since the TS obviously only reads what he thinks is important.
Back to top
View user's profile Send private message
Skolusu

Senior Member


Joined: 07 Dec 2007
Posts: 2205
Location: San Jose
PostPosted: Mon Jul 16, 2012 9:36 pm
 Reply with quote
umanaga,


I guess you have trouble making up your mind. In one post you say you don't want to eliminate dups and in another you want to eliminate them. The best option for you is to split the file and run the individual sorts.
Back to top
View user's profile Send private message
umanaga

New User


Joined: 09 Apr 2007
Posts: 33
Location: India
PostPosted: Tue Jul 17, 2012 9:16 pm
 Reply with quote
Sorry guys for confusion..i intended to post as below but missed last line earlier.. and i was not able to edit post after 10 mins icon_sad.gif

Code:

OUTFIL FILES=T1,                                                 
     INCLUDE=(5,2,CH,EQ,C'AB'),                                   
     OUTREC=(5,116),VTOF,                                         
     REMOVECC,                                                     
     TRAILER1=(1:5,11,                                             
              12:'999999999999',                                   
              24:COUNT=(M11,LENGTH=9),                             
              33:TOTAL=(68,11,ZD,EDIT=(STTTTTTTTT.TT),SIGNS=(+,-)),
 SORT FIELDS=(05,43,BI,A,                                         
              53,66,BI,A) 
SUM FIELDS=NONE


i was able to retain 48-52 data in AB record..appreciate all your suggestions.. spl thanks to skolusu
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> DFSORT/ICETOOL Goto page 1, 2  Next

 

Similar Topics
Topic Forum Replies
No new posts Issues Converting From ZD to Signed N... DFSORT/ICETOOL 4
No new posts Replace each space in cobol string wi... COBOL Programming 3
No new posts Shift left VB record without x00 endi... DFSORT/ICETOOL 11
No new posts how to calculate SUM value for VB fil... DFSORT/ICETOOL 1
No new posts how to calculate SUM for VB file usin... JCL & VSAM 1
Search our Forums:

Back to Top
IBMMainframes.com is not an official and/or affiliated with IBM® in anyway
Board Rules | FAQ | Downloads | Wiki | SiteMap | Contact Us