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

Ice tool problem


IBM Mainframe Forums -> DFSORT/ICETOOL
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
pjnithin

Active User


Joined: 22 Dec 2005
Posts: 116

PostPosted: Wed Mar 01, 2006 2:50 am
Reply with quote

I picked up an example from sort tricks site. But using the same steps I am not getting the desired outputs.
the job is :

//SORT1 EXEC PGM=ICETOOL
//SYSOUT DD SYSOUT=*
//TOOLMSG DD SYSOUT=*
//LIST99 DD SYSOUT=*
//DFSMSG DD SYSOUT=*
//IN1 DD DSN=infile,DISP=SHR
//OUT1 DD DSN=outfile,
// DISP=OLD
//TOOLIN DD *
//CTL1CNTL DD *
SORT FROM(IN1) TO(OUT1) USING(CTL1)
/*
INCLUDE COND=(1,1,CH,EQ,C'2'),
INREC IFTHEN=(WHEN=(1,1,CH,EQ,C'2'),
BUILD=(1:32,9,10:95,30,40:77,15,55:93,1,56:1,1000))
SORT FIELDS=(1,55,A)
/*

In the output I am supposed to get only those records having their first byte '2'.

But what is happening is I am getting all the records in the input file in output file also. And those records having the first byte '2' is getting reformatted as mentioned. Do anyone know why I am getting all tyhe records in the output file????
Also, eventhough the sort criteria is mentioned its not getting sorted. I need the file to get sorted after the desired reformatting is done.
Back to top
View user's profile Send private message
Frank Yaeger

DFSORT Developer


Joined: 15 Feb 2005
Posts: 7129
Location: San Jose, CA

PostPosted: Wed Mar 01, 2006 3:36 am
Reply with quote

You copied this from the DFSORT Tricks site? I don't think so! Please tell me the URL of the page you found this on because it couldn't possibly have looked like that given that it wouldn't work because of syntax errors, and I test all of the DFSORT Tricks examples to make sure they work before I post them.

You have:

Code:

//TOOLIN DD *
//CTL1CNTL DD *
SORT FROM(IN1) TO(OUT1) USING(CTL1)
/*
  INCLUDE COND=(1,1,CH,EQ,C'2'),
  INREC IFTHEN=(WHEN=(1,1,CH,EQ,C'2'),
    BUILD=(1:32,9,10:95,30,40:77,15,55:93,1,56:1,1000))
  SORT FIELDS=(1,55,A)
/*


First of all you have the TOOLIN and CTL1CNTL DD statements in the wrong place. The way you have it, TOOLIN has no control statements, CTL1CNTL has the ICETOOL SORT operator instead of the DFSORT control statements, and the DFSORT control statements are ignored since they aren't associated with any DD statement. It's actually quite a mess! You're also missing the format from the SORT statement.

Cleaning this up, the correct syntax would be something like this:

Code:

//TOOLIN DD *
SORT FROM(IN1) TO(OUT1) USING(CTL1)
/*
//CTL1CNTL DD *
  INCLUDE COND=(1,1,CH,EQ,C'2'),
  INREC IFTHEN=(WHEN=(1,1,CH,EQ,C'2'),
    BUILD=(1:32,9,10:95,30,40:77,15,55:93,1,56:1,1000))
  SORT FIELDS=(1,55,CH,A)
/*


I can't tell you whether or not that actually does what you want to do since you haven't explained what it is you want to do.
Back to top
View user's profile Send private message
pjnithin

Active User


Joined: 22 Dec 2005
Posts: 116

PostPosted: Wed Mar 01, 2006 8:55 am
Reply with quote

Can IFTHEN and BUILD functions be used for ICEMAN.
Back to top
View user's profile Send private message
Frank Yaeger

DFSORT Developer


Joined: 15 Feb 2005
Posts: 7129
Location: San Jose, CA

PostPosted: Wed Mar 01, 2006 8:56 pm
Reply with quote

Quote:
Can IFTHEN and BUILD functions be used for ICEMAN.


ICEMAN is just the name used to invoked the sort product installed at your site.

You'll need z/OS DFSORT V1R5 PTF UQ95214 or DFSORT R14 PTF UQ95213 (Dec, 2004) in order to use DFSORT's IFTHEN, BUILD and OVERLAY functions. Only DFSORT has these functions, so if you don't have DFSORT, you won't be able to use them. If you do have DFSORT, but you don't have the Dec, 2004 PTF, ask your System Programmer to install it (it's free). For complete details on all of the new DFSORT and ICETOOL functions available with the Dec, 2004 PTF, see:

Use [URL] BBCode for External Links
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

 


Similar Topics
Topic Forum Replies
No new posts Map Vols and Problem Dataset All Other Mainframe Topics 2
No new posts Error while running web tool kit REXX... CLIST & REXX 5
No new posts z/vm installation problem All Other Mainframe Topics 0
No new posts Mass JCL release via IDZ tool(eclipse... CA Products 1
No new posts Job scheduling problem. JCL & VSAM 9
Search our Forums:

Back to Top