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 

Error in ICETOOL code !

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


Joined: 23 May 2003
Posts: 77
Topics: 26

PostPosted: Wed Dec 17, 2003 7:06 am    Post subject: Error in ICETOOL code ! Reply with quote

When running a ICETOOL job, I am getting the error message for the PD fields in the input file. Error says -
Code:

STATISTICS FOR FIELD (00018,004,ZD) - 
     MINIMUM: +000000000000015         
     MAXIMUM: +000000000000035         
     AVERAGE: +000000000000024         
     TOTAL  : +000000000000298         
STATISTICS FOR FIELD (00028,006,PD) -       
   INVALID DATA IN RECORD 000000000000001   
     MINIMUM: ****************             
     MAXIMUM: ****************             
     AVERAGE: ****************             
     TOTAL  : ****************             
STATISTICS FOR FIELD (00022,006,PD) -       
   INVALID DATA IN RECORD 000000000000001   
     MINIMUM: ****************             
     MAXIMUM: ****************             
     AVERAGE: ****************             
     TOTAL  : ****************             


My JCL looks like below.
Code:

//TOOL01   EXEC PGM=ICETOOL,REGION=1024K             
//TOOLMSG  DD   SYSOUT=*                             
//DFSMSG   DD   SYSOUT=*                             
//TOOLIN   DD   *                                     
                                                     
* STATS FROM ALL BRANCHES                             
STATS FROM(INPUT) ON(18,4,ZD) ON(28,6,PD) ON(22,6,PD)
/*                                                   
//INPUT    DD   DSN=USERID.INPUT,DISP=OLD           

And my INPUT file is here.
Code:

----+----1----+----2----+----3----+
LOS ANGELES    CA  32 22530 -4278 
SAN FRANCISCO  CA  35 42820  6832 
FORT COLLINS   CA  22 12300 -2863 
SACRAMENTO     CA  29 42726  8276 
SUNNYVALE      CA  18 16152  -978 
DENVER         CA  33 31876  6288 
BOULDER        CA  32 33866  7351 
MORGAN HILL    CA  15 18200  3271 
VAIL           CA  19 23202  5027 
SAN JOSE       CA  21 27225  8264 
SAN DIEGO      CA  22 32940  8275 
ASPEN          CA  20 25800  5200

Please clarify the reason why it is throwing error for PD fields and working fine for ZD fields. Is my input file wrong ? Is there any other way to write the PD fields in the Input file ?

Regards
Nancy
Back to top
View user's profile Send private message
kolusu
Site Admin
Site Admin


Joined: 26 Nov 2002
Posts: 12382
Topics: 75
Location: San Jose

PostPosted: Wed Dec 17, 2003 8:40 am    Post subject: Reply with quote

Nancy,

I don't see any Packed decimal data in your file. You have a zoned decimal as well as Signed numeric with leading floating sign(FS). so change your toolin card to the following
Code:

STATS FROM(INPUT) ON(18,4,ZD) ON(28,5,FS) ON(22,6,ZD)


Hope this helps..

cheers

kolusu
_________________
Kolusu
www.linkedin.com/in/kolusu
Back to top
View user's profile Send private message Send e-mail Visit poster's website
Nancy
Beginner


Joined: 23 May 2003
Posts: 77
Topics: 26

PostPosted: Wed Dec 17, 2003 9:11 am    Post subject: Reply with quote

Kolusu,

After making the suggested corrections, my job is running fine. Thanks !
Please go thru the link below and see the input file there. I was actually trying to run the same example.

http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/ICECG204/3.1.2?SHELF=&DT=19980721181156&CASE=

Regards
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 17, 2003 12:07 pm    Post subject: Reply with quote

Nancy,

That example is from "Getting Started with DFSORT". Table 39 shows that the Revenue and Profit fields are PD fields. Table 40 shows these fields in displayable format so you can read them since PD fields are not actually readable by humans. Smile A PD field actually has the format X'd...ds' where d is a digit (0-9) and s is a sign (usually C or F for positive or D for negative).

The book does discuss showing numeric fields in displayable format for convenience, earlier on. That's one of the problems with hyperlinks - you can jump in on any page and miss applicable explanations from other pages in the book.
_________________
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
Nancy
Beginner


Joined: 23 May 2003
Posts: 77
Topics: 26

PostPosted: Thu Dec 18, 2003 1:07 am    Post subject: Reply with quote

Frank,

Thanks for clarifying it to me !

Regards
Nancy
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