Not able to sum up numbers



IBM's flagship sort product DFSORT for sorting, merging, copying, data manipulation and reporting. Includes ICETOOL and ICEGENER

Not able to sum up numbers

Postby Quasar » Thu May 10, 2012 10:39 am

Hi everyone,

I have written a job, to sum up the sales-figures in the following data. But it simply doesn't sum up numbers. Could you help me figure out what's going wrong?

//STUDENTA JOB A123,'BIN-7 QUASAR',CLASS=A,MSGCLASS=Y,NOTIFY=&SYSUID 
//SUM01   EXEC PGM=SORT,PARM='OVFLO=RC4'                             
//SORTIN    DD *                                                     
QUASAR SHABBIR CHUNAWALA MAHARASHTRA 01000                           
NEHA LAXMAN RAWAT        UTTARAKHAND 02000                           
JINAL JAGADISH PATEL     GUJARAT     03000                           
SHASHIKANT PATEL         GUJARAT     04000                           
DINESH BABU              TAMIL NADU  05000                           
/*                                                                   
//SORTOUT   DD SYSOUT=*                                               
//SYSIN     DD *                                                     
 SORT FIELDS=(01,37,CH,A)                                             
 SUM FIELDS=(38,05,ZD)                                               
/*                                                                   
//SYSPRINT  DD SYSOUT=*                                               
//SYSOUT    DD SYSOUT=*                                               


Here's the output in //SORTOUT :
 SDSF OUTPUT DISPLAY STUDENTA JOB02337  DSID   103 LINE 0       COLUMNS 02- 81 
 COMMAND INPUT ===>                                            SCROLL ===> PAGE
********************************* TOP OF DATA **********************************
DINESH BABU              TAMIL NADU  05000                                     
JINAL JAGADISH PATEL     GUJARAT     03000                                     
NEHA LAXMAN RAWAT        UTTARAKHAND 02000                                     
QUASAR SHABBIR CHUNAWALA MAHARASHTRA 01000                                     
SHASHIKANT PATEL         GUJARAT     04000                                     
******************************** BOTTOM OF DATA ********************************


Here's the SYSOUT Listing :
ICE143I 0 BLOCKSET     SORT  TECHNIQUE SELECTED                                 
ICE250I 0 VISIT http://www.ibm.com/storage/dfsort FOR DFSORT PAPERS, EXAMPLES AN
ICE000I 1 - CONTROL STATEMENTS FOR 5694-A01, Z/OS DFSORT V1R5 - 23:55 ON WED MAY
           SORT FIELDS=(01,37,CH,A)                                             
           SUM FIELDS=(38,05,ZD)                                               
ICE201I 0 RECORD TYPE IS F - DATA STARTS IN POSITION 1                         
ICE751I 0 C5-BASE   C6-BASE   C7-BASE   C8-Q83041 E9-BASE   C9-BASE   E5-Q90312
ICE193I 0 ICEAM1 ENVIRONMENT IN EFFECT - ICEAM1 INSTALLATION MODULE SELECTED   
ICE088I 1 STUDENTA.SUM01   .        , INPUT LRECL = 80, BLKSIZE = 80, TYPE = FB
ICE093I 0 MAIN STORAGE = (MAX,6291456,6278238)                                 
ICE156I 0 MAIN STORAGE ABOVE 16MB = (6217712,6217712)                           
ICE127I 0 OPTIONS: OVFLO=RC4 ,PAD=RC0 ,TRUNC=RC0 ,SPANINC=RC16,VLSCMP=N,SZERO=Y,
ICE128I 0 OPTIONS: SIZE=6291456,MAXLIM=1048576,MINLIM=450560,EQUALS=N,LIST=Y,ERE
ICE129I 0 OPTIONS: VIO=N,RESDNT=ALL ,SMF=NO   ,WRKSEC=Y,OUTSEC=Y,VERIFY=N,CHALT=
ICE130I 0 OPTIONS: RESALL=4096,RESINV=0,SVC=109 ,CHECK=Y,WRKREL=Y,OUTREL=Y,CKPT=
ICE131I 0 OPTIONS: TMAXLIM=6291456,ARESALL=0,ARESINV=0,OVERRGN=65536,CINV=Y,CFW=
ICE132I 0 OPTIONS: VLSHRT=N,ZDPRINT=Y,IEXIT=N,TEXIT=N,LISTX=N,EFS=NONE    ,EXITC
ICE133I 0 OPTIONS: HIPRMAX=OPTIMAL,DSPSIZE=MAX ,ODMAXBF=0,SOLRF=Y,VLLONG=N,VSAMI
ICE235I 0 OPTIONS: NULLOUT=RC0                                                 
ICE084I 0 BSAM ACCESS METHOD USED FOR SORTOUT                                   
ICE084I 0 BSAM ACCESS METHOD USED FOR SORTIN                                   
ICE750I 0 DC 500000 TC 0 CS DSVUU KSZ 37 VSZ 37                                 
ICE752I 0 FSZ=6250 RC  IGN=0 E  AVG=80 0  WSP=650 C  DYN=0 0                   
ICE751I 1 DE-Q82816 D5-Q84357 D9-Q91626 E8-Q91626                               
ICE090I 0 OUTPUT LRECL = 80, BLKSIZE = 80, TYPE = FB                           
ICE080I 0 IN MAIN STORAGE SORT                                                 
ICE055I 0 INSERT 0, DELETE 0                                                   
ICE054I 0 RECORDS - IN: 5, OUT: 5                                               
ICE134I 0 NUMBER OF BYTES SORTED: 400                                           
ICE199I 0 MEMORY OBJECT STORAGE USED = 0M BYTES                                 
ICE180I 0 HIPERSPACE STORAGE USED = 0K BYTES                                   
ICE188I 0 DATA SPACE STORAGE USED = 0K BYTES                                   
ICE052I 0 END OF DFSORT                                                         
Quasar Chunawala,
Software Engineer, Lives at Borivali, Mumbai
User avatar
Quasar
 
Posts: 102
Joined: Wed Nov 10, 2010 7:11 pm
Location: Borivali, Mumbai
Has thanked: 13 times
Been thanked: 2 times

Re: Not able to sum up numbers

 

Re: Not able to sum up numbers

Postby BillyBoyo » Thu May 10, 2012 11:39 am

Nicely presented, as usual.

SUM doesn't work the way you think. It adds up where duplicate keys exist. Your keys are unique, so nothing to add.

You need to look at the reporting functions of DFSORT. For example, TRAILER1 with TOT is probably what you really want.
BillyBoyo
Global moderator
 
Posts: 3804
Joined: Tue Jan 25, 2011 12:02 am
Has thanked: 22 times
Been thanked: 264 times

Re: Not able to sum up numbers

Postby Nik22Dec » Thu May 10, 2012 4:31 pm

Hey,

Problem very well presented. I am giving you a sample code. Try manipulating it & I am sure you will be able to modify it to suit your requirements.

//SORTIN   DD  *                       
A 1                                   
B 2                                   
C 3                                   
D 4                                   
//SORTOUT  DD  SYSOUT=*               
//SYSIN    DD  *                       
 SORT FIELDS=COPY                     
 OUTFIL FNAMES=SORTOUT,               
 OUTREC=(1:1,5,30X),                   
 TRAILER1=(1:'TOTAL : ',TOT=(3,1,ZD)) 


The output should look like this -
A 1                   
B 2                   
C 3                   
D 4                   
TOTAL :              10


All the Best!!
Thanks,
Nik
User avatar
Nik22Dec
 
Posts: 68
Joined: Mon Dec 26, 2011 6:38 pm
Has thanked: 2 times
Been thanked: 0 time


Return to DFSORT/ICETOOL/ICEGENER

 


  • Related topics
    Replies
    Views
    Last post