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 Return Code 12

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

New User


Joined: 02 Feb 2006
Posts: 7
Location: Denmark

PostPosted: Mon Mar 27, 2006 7:09 pm    Post subject: ICETOOL Return Code 12
Reply with quote

Hi All,
I have created a JCL as below:
Code:
//STEP005  EXEC PGM=ICETOOL                                     
//TOOLMSG  DD SYSOUT=*                                           
//DFSMSG   DD SYSOUT=*                                           
//UNQKEYS  DD DSN=PODC.PBS.EIK.UNIQUE,DISP=SHR                   -> Input File
//UPDATED  DD DSN=PODC.PBS.EIK.UPDATED,DISP=(NEW,CATLG,DELETE),  -> Output File
//            SPACE=(TRK,(5,3),RLSE)                             
//NEWDEL   DD DSN=PODC.PBS.EIK.NEWDEL,DISP=(NEW,CATLG,DELETE),   -> Output File
//            SPACE=(TRK,(5,3),RLSE)                             
//REPORT   DD SYSOUT=*                                           
//TOOLIN   DD *                                                 
SELECT FROM(UNQKEYS) TO(UPDATED) ON(1,5,PD) ON(6,3,PD)  -       
ALLDUPS -                                                       
DISCARD(NEWDEL)                                                 
COUNT FROM(UPDATED) EMPTY  -> Error step                                     
COUNT FROM(NEWDEL) EMPTY                                         
MODE STOP                   


I have to include a condition check whether the file is empty or not.

I am getting sytax error as below:

Code:
ICE600I 0 DFSORT ICETOOL UTILITY RUN STARTED                             
                                                                         
ICE632I 0 SOURCE FOR ICETOOL STATEMENTS:  TOOLIN                         
                                                                         
                                                                         
ICE630I 0 MODE IN EFFECT:  STOP                                           
                                                                         
          SELECT FROM(UNQKEYS) TO(UPDATED) ON(1,5,PD) ON(6,3,PD)  -       
          ALLDUPS -                                                       
          DISCARD(NEWDEL)                                                 
ICE627I 0 DFSORT CALL 0001 FOR SORT FROM UNQKEYS  TO OUTFIL   COMPLETED   
ICE628I 0 RECORD COUNT:  000000000000014                                 
ICE638I 0 NUMBER OF RECORDS RESULTING FROM CRITERIA:  000000000000006     
ICE602I 0 OPERATION RETURN CODE:  00                                     
                                                                         
          COUNT FROM(UPDATED) EMPTY                                       
                              $                                           
ICE604A 0 ERROR IN KEYWORD, PARAMETER, OR DELIMITER                       
ICE602I 0 OPERATION RETURN CODE:  12                                     
ICE630I 2 MODE IN EFFECT:  SCAN                                           
                                                                           
          COUNT FROM(NEWDEL) EMPTY                                         
                             $                                             
ICE604A 0 ERROR IN KEYWORD, PARAMETER, OR DELIMITER                       
                                                                           
          MODE STOP                                                       
ICE630I 1 MODE IN EFFECT:  STOP                                           
ICE602I 1 OPERATION RETURN CODE:  00                                       
                                                                           
                                                                           
ICE601I 0 DFSORT ICETOOL UTILITY RUN ENDED - RETURN CODE:  12             

Could anybody help me in this.
Back to top
View user's profile Send private message

priyesh.agrawal

Senior Member


Joined: 28 Mar 2005
Posts: 1452
Location: Chicago, IL

PostPosted: Mon Mar 27, 2006 7:23 pm    Post subject: Re: ICETOOL
Reply with quote

Satya786,

Dont know what you are trying to do exactly with this job, but your error messages suggest clearly that EMPTY is not a valid Keyword or parameter for COUNT operator.

Regards,
Priyesh.
Back to top
View user's profile Send private message
superk

Moderator Team Head


Joined: 26 Apr 2004
Posts: 4650
Location: Raleigh, NC, USA

PostPosted: Mon Mar 27, 2006 7:25 pm    Post subject: Re: ICETOOL
Reply with quote

Satya786, what release of DFSORT are you running (look at the ICE000I message in the DFSMSG output)?
Back to top
View user's profile Send private message
Frank Yaeger

DFSORT Moderator


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

PostPosted: Mon Mar 27, 2006 9:19 pm    Post subject:
Reply with quote

Satyanarayana Rao KNV,

EMPTY has been a supported parameter of DFSORT/ICETOOL's COUNT operator since March, 2002. The error message indicates your shop is very downlevel in DFSORT service. Ask your System Programmer to install z/OS DFSORT V1R5 PTF UQ95214 or DFSORT R14 PTF UQ95213 (Dec, 2004). That will get you up-to-date with all of the latest DFSORT functions available.

Quote:
Dont know what you are trying to do exactly with this job, but your error messages suggest clearly that EMPTY is not a valid Keyword or parameter for COUNT operator.


Yes, it is, but you need the March, 2002 DFSORT PTF.

Quote:
what release of DFSORT are you running (look at the ICE000I message in the DFSMSG output)?


The release doesn't matter. The function is available for both supported releases (V1R5 and R14). You can't tell from the ICE000I message which PTFs are installed.
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 Speed-up/reduce CPU use of code prino PL/I & Assembler 0 Tue Sep 26, 2017 12:05 am
No new posts Difference in SORT & ICETOOL Mohan Kothakota DFSORT/ICETOOL 5 Fri Sep 22, 2017 4:56 pm
No new posts Return a Non Numeric value from REXX Learncoholic CLIST & REXX 3 Fri Sep 01, 2017 8:33 pm
This topic is locked: you cannot edit posts or make replies. how to code for GDG in Rexx cvnlynn CLIST & REXX 13 Wed Aug 09, 2017 9:13 pm
No new posts Multiple VSAM files single output fil... Mohan Kothakota DFSORT/ICETOOL 11 Wed Aug 09, 2017 7:57 pm

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