In case anyone uses this example in the future, CPK needs to identify the volume that the HFS file reside. It can be a DD statement, but it's easier with a VOL= operand. This is the JCL that includes the VOL= operand that reduces the HFS size to the HWM.
//RELEASE EXEC PGM=FDRCPK,REGION=0M //SYSPRINT DD SYSOUT=* //SYSMAP DD SYSOUT=* //SYSUDUMP DD SYSOUT=* //SYSIN DD * CPK TYPE=RLSE,VOL=HFSZ01 SELECT DSN=OMVS.CPAC.ZOSAR1.JV390,RLSE=TRK /* Joseph Butz [email protected] Innovation Data Processing -----Original Message----- From: Joseph Butz [mailto:[email protected]] Sent: Tuesday, April 21, 2009 4:40 PM To: 'IBM Mainframe Discussion List' Subject: RE: Decreasing an HFS Hi Dennis, You should be able to use FASTCPK (Compaktor) to release the space in the HFS file down to the HWM of used blocks. The JCL would be similar to: //RELEASE EXEC PGM=FDRCPK,REGION=0M //SYSPRINT DD SYSOUT=* //SYSMAP DD SYSOUT=* //SYSUDUMP DD SYSOUT=* //SYSIN DD * CPK TYPE=RLSE SELECT DSN=OMVS.CPAC.ZOSAR1.JV390,RLSE=TRK /* If you want to leave some free space, then add a %FREE= with the percentage to leave free. SELECT DSN=OMVS.CPAC.ZOSAR1.JV390,RLSE=TRK,%FREE=nn Any questions, please give us a call. Joseph Butz [email protected] Innovation Data Processing -----Original Message----- From: IBM Mainframe Discussion List [mailto:[email protected]] On Behalf Of Dennis McCarthy Sent: Tuesday, April 21, 2009 1:06 PM To: [email protected] Subject: Decreasing an HFS Environment: Testing z/OS 1.9 I use FDR to copy my HFS file systems when doing maintenance. I was able to successfully copy them (JV390, JAVA64V5 and JAVA64V6) to a larger size, but now that I see I've over allocated then, I want to copy again to a smaller size. They are currently 25,000 tracks each with a max of 16% used. Pre- allocation of even 10,000 tracks results in an "INSUFFICIENT SPACE" error message: FDR111** VOL=HFSZ01,DSN=OMVS.CPAC.ZOSAR1.JV390 HAS INSUFFICIENT SPACE ALLOCATED - 010000 TRACKS FDR111** NUMBER OF TRACKS NECESSARY=025000 FDR111** EXTENT CYL=01112 TRK=08,CYL=02199 TRK=04 FDR111** EXTENT CYL=02308 TRK=01,CYL=02887 TRK=13 FDR326** COPY ENDED WITH NO DATA SETS COPIED VOL=HFSZ01 If I allow FDR to allocate, it will attempt to get the 25,000 tracks, and I don't have the space on DASD. As an absolute last resort, I can get another pack, but I'd rather not. Suggestions? Regards, Dennis ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
