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

Reply via email to