MVSFORUMS.com Forum Index MVSFORUMS.com
A Community of and for MVS Professionals
 
 FAQFAQ   SearchSearch   Quick Manuals   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 

Question on VERIFY Operand of ICETOOL

 
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> Utilities
View previous topic :: View next topic  
Author Message
madan777in
Beginner


Joined: 07 Dec 2005
Posts: 12
Topics: 6
PostPosted: Wed Dec 07, 2005 12:09 pm    Post subject: Question on VERIFY Operand of ICETOOL Reply with quote
Hi ,

I used Icetool utility with verify , here its
Code:

//ICETOOL EXEC PGM=ICETOOL                                 
//STEPLIB  DD DSN=SYS1.SORTLIB,DISP=SHR                   
//TOOLMSG  DD SYSOUT=*                                     
//DFSMSG   DD SYSOUT=*                                     
//SYSOUT   DD SYSOUT=*                                     
//RECTYPE  DD SYSOUT=X                                     
//SYSUDUMP DD SYSOUT=I,FCB=FC02,CHARS=DUMP                 
//FIN      DD DISP=SHR,DSN=XX92.UQTY.RPT2                 
//FOUT     DD DSN=XX92.REMOVE.DUP6,DISP=(NEW,CATLG,DELETE),
//            DCB=(LRECL=40,BLKSIZE=0,RECFM=FB),           
//             SPACE=(CYL,(861,500),RLSE),UNIT=TEMP       
//TOOLIN   DD *                                           
//TOOLIN   DD *               
  VERIFY FROM(FIN) ON(2,8,CH) 
/*                             
//


here its input file

10*002050708752000600000001285
10200205070.876900060000000133
102002050708775000600000001000


when executing this JCL i come with abends

                                                                           
ICE630I 0 MODE IN EFFECT:  STOP                                             
                                                                           
            VERIFY FROM(FIN) ON(2,8,CH)                                     
                                    $                                       
ICE619A 0 INVALID LENGTH, FORMAT, OR COMBINATION FOR VERIFY   OPERATION     
ICE602I 0 OPERATION RETURN CODE:  12         


when i changed the parameter of VERIFY FROM(FIN) ON ,8,PD) results in same . Could you please let me know wht to change and how to use this command.

Your reply is highly appreciated .

Many Thanks,
Madan
Back to top
View user's profile Send private message
Frank Yaeger
Sort Forum Moderator
Sort Forum Moderator


Joined: 02 Dec 2002
Posts: 1618
Topics: 31
Location: San Jose
PostPosted: Wed Dec 07, 2005 1:09 pm    Post subject: Reply with quote
The VERIFY operator of DFSORT's ICETOOL is fully documented in Chapter 6 of "z/OS DFSORT Application Programming Guide". Here's a direct link to the information:

http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/ICE1CA10/6.16?DT=20050222160456

VERIFY operates on PD or ZD fields (not CH fields) and identifies invalid values. You can specify up to PD or ZD fields to be verified.

The input data you show can be treated as ZD data, so you could use:

Code:

//ICETOOL EXEC PGM=ICETOOL
//TOOLMSG  DD SYSOUT=*
//DFSMSG   DD SYSOUT=*
//FIN      DD DISP=SHR,DSN=XX92.UQTY.RPT2
//TOOLIN   DD *
VERIFY FROM(FIN) ON(2,8,ZD)
/*


and you would get the following in TOOLMSG:

Code:

ICE600I 0 DFSORT ICETOOL UTILITY RUN STARTED

ICE632I 0 SOURCE FOR ICETOOL STATEMENTS:  TOOLIN


ICE630I 0 MODE IN EFFECT:  STOP

          VERIFY FROM(FIN) ON(2,8,ZD)
ICE618A 0 INVALID (2,8,ZD)       VALUE - RECORD:  000000000000001
ICE649A 0   HEX VALUE:  F05CF0F0F2F0F5F0
ICE627I 0 DFSORT CALL 0001 FOR COPY FROM FIN      TO E35 EXIT COMPLETED
ICE628I 0 RECORD COUNT:  000000000000003
ICE602I 0 OPERATION RETURN CODE:  12


ICE601I 0 DFSORT ICETOOL UTILITY RUN ENDED - RETURN CODE:  12

_________________
Frank Yaeger - DFSORT Development Team (IBM)
Specialties: JOINKEYS, FINDREP, WHEN=GROUP, ICETOOL, Symbols, Migration
DFSORT is on the Web at:
www.ibm.com/storage/dfsort
Back to top
View user's profile Send private message Send e-mail Visit poster's website
madan777in
Beginner


Joined: 07 Dec 2005
Posts: 12
Topics: 6
PostPosted: Thu Dec 08, 2005 7:29 am    Post subject: Reply with quote
Thanks Mate
Back to top
View user's profile Send private message
Display posts from previous:   
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> Utilities All times are GMT - 5 Hours
Page 1 of 1

 
Jump to:  
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum


MVSFORUMS
Powered by phpBB © 2001, 2005 phpBB Group