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

ICETOOL Return Code 12
IBM Mainframe Forums -> DFSORT/ICETOOL
Post new topic   Reply to topic Quick References
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
 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: 1448
Location: Chicago, IL
PostPosted: Mon Mar 27, 2006 7:23 pm
 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

Global Moderator


Joined: 26 Apr 2004
Posts: 4652
Location: Raleigh, NC, USA
PostPosted: Mon Mar 27, 2006 7:25 pm
 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 Developer


Joined: 15 Feb 2005
Posts: 7129
Location: San Jose, CA
PostPosted: Mon Mar 27, 2006 9:19 pm
 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 View Bookmarks
All times are GMT + 6 Hours
Forum Index -> DFSORT/ICETOOL

 

Similar Topics
Topic Forum Replies
No new posts run rexx code with jcl CLIST & REXX 15
No new posts Compile rexx code with jcl CLIST & REXX 6
No new posts Return codes-Normal & Abnormal te... JCL & VSAM 7
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
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