|
|
| Author |
Message |
graswant
Active User
Joined: 29 Apr 2006 Posts: 81 Location: Gurgaon
|
|
|
|
Now everything is working fine but I am not able to get few things which the above program should give....
Show volume free space statistics
STATS FROM(OUTDD1) ON(40,1,BI)
* Show the number of volumes with free space > 30%
RANGE FROM(OUTDD1) ON(40,1,BI) HIGHER(30)
AND
* Part 5
* Create a temporary data set that contains:
* - Type 'C' capacity planning records,
* - Occupancy after processing > target occupancy, and
* - Volume level is L0
COPY FROM(INDD) TO(OUTDD3) USING(CPY2)
* PRINT A REPORT SHOWING VOLUME SERIAL NUMBER, TARGET OCCUPANCY,
* occupancy after processing and date
DISPLAY FROM(OUTDD3) LIST(VOLRPT) BLANK -
DATE(DMY.) TITLE('VOLUMES NOT MEETING TARGET THRESHOLD') -
HEADER('VOLUME') ON(29,6,CH) -
HEADER('TARGET OCCUPANCY') ON(45,1,FI) -
HEADER('OCCUPANCY AFTER PROCESSING') ON(48,1,FI) -
HEADER('DATE') ON(35,4,PD)
The 3 optput files created...2 have records...Type V and D but what is this type C records for...the thrd output file is empty.....and even if the first file have type V records...I am not getting the output for free space statistics....Can someone please help .....
Thanks |
|
| Back to top |
|
 |
References
|
|
 |
graswant
Active User
Joined: 29 Apr 2006 Posts: 81 Location: Gurgaon
|
|
|
|
| Work done...used this jcl to get the report...and then wrote a REXX to find if some volser is filled above 90% and throw a msg using SEND command...thanks for the inputs guys...... |
|
| Back to top |
|
 |
dick scherrer
Global Moderator
Joined: 23 Nov 2006 Posts: 9187 Location: 221 B Baker St
|
|
|
|
Good to hear that it is working as you need - thank you for letting us know
d |
|
| Back to top |
|
 |
Pedro
Senior Member
Joined: 01 Sep 2006 Posts: 630 Location: work
|
|
|
|
DCOLLECT is an IDCAMS command which gives you volume information. You probably want a job somewhat like this that creates your DCOLLECT dataset.
| Code: |
//IDCAMS EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//REPORT DD SYSOUT=*
DCOLLECT OUTFILE(REPORT) VOLUMES(SYS159)
/*EOF |
|
|
| Back to top |
|
 |
|
|