Hi all,
I have a file with information about tape files, that has the dataset name,
volser, space used and space used after compression.
Using DFSORT, I am trying to produce a file that will have one record by
high level qualifier, with the number of files and the total used space
without and with compression.
My problem is that the sum of used and the sum of compressed space are
wrong. Not only they are showing the exact same value (and the input values
are very different), as the value for the situations in which there is only
one data set for the HLQ is way different from the input file for that
dataset.
Sample of the input file:
----+----1----+----2----+----3----+----4----+----5----+----6----+----7----+
PRODHLA1.FDX967 VOL335 195035K
71303K
Sample of the output file for that dataset:
PPRDXI 1 1.077.952.576 1.077.952.576 KB
So, this are my DFSORT control statements:
//SYMNAMES DD *
ASA,1,1,CH
DSNAME,*,44,CH
SKIP,1
VOLSER,*,6,CH
SKIP,1
FILESZ,*,10,UFF * USED SPACE
SKIP,2
CMPRSZ,*,10,UFF * USED COMPRESSED SPACE
SKIP,1
*
TMP-HLQ,1,08,CH * HLQ
TMP-CNT,*,4,BI * NUMBER OF FILES BY HLQ
TMP-FILESZ,*,08,BI * TOTAL USED SPACE
TMP-FILESZ1,=,04,BI
TMP-FILESZ2,*,04,BI
TMP-CMPRSZ,*,08,BI * TOTAL COMPRESSED SPACE
TMP-CMPRSZ1,=,04,BI
TMP-CMPRSZ2,*,04,BI
*
//SYSIN DD *
OPTION VLSHRT,VLSCMP,DYNALLOC=(,4)
SORT FIELDS=(TMP-HLQ,A)
SUM FIELDS=(TMP-FILESZ,TMP-CMPRSZ,TMP-CNT)
*
INREC PARSE=(%01=(ABSPOS=02,ENDBEFR=C'.',FIXLEN=08))
OVERLAY=(TMP-HLQ:%01,
TMP-CNT:+1,BI,LENGTH=4,
TMP-FILESZ:8Z,
TMP-FILESZ2:FILESZ,
TMP-CMPRSZ:8Z,
TMP-CMPRSZ2:CMPRSZ)
*
OUTFIL FNAMES=OUT01,
BUILD=(TMP-HLQ,
5X,
TMP-CNT,EDIT=(III.IIT),
5X,
TMP-FILESZ,EDIT=(III.III.III.III.III),
5X,
TMP-CMPRSZ,EDIT=(III.III.III.III.III),
C' KB')
/*
I have been looking at these for so long that I must be looking straight
into the error without seeing it.
Regards
Jack
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
