The way to achieve this is by careful management of the extents in the callable cell pool services and ensuring that each extent starts and ends on a page boundary.
You are only going to be able to DSPSERV RELEASE when you are positive that all cells in the extent have been returned and you have performed the CSRPDAC and CSRPDIS. One way of achieving this is to maintain your own queue of available+inuse cells that include the extent number that the cell came from. You then pre-get all cells from the extent and add to your "available" queue. When callers need a new cell, you just pop the fella from the top of the queue (rather than use CSRPGET each time). Once your program decides it wants to release and extent, you have to mark that extent unavailable to your "cell get" routine so that you can effectively drain the extent over time (this might take a *long* time) . Periodically you have to scan the queues to make sure that there are no active cells from the extent before you can proceed with actually releasing it. Rob Scott Lead Developer Rocket Software 275 Grove Street * Newton, MA 02466-2272 * USA Tel: +1.617.614.2305 Email: [email protected] Web: www.rocketsoftware.com -----Original Message----- From: IBM Mainframe Discussion List [mailto:[email protected]] On Behalf Of Micheal Butz Sent: 11 November 2010 12:53 To: [email protected] Subject: Freeing CPOOL cells backed by dataspace Hi Since a Cell pool backed by a dataspace does not really free the storage. Doing a DSPSERV RELEASE does that and since the block size which is in units of 4096 probably doesn't match the CPOOL Size what is the best way of releasing CPOOL storage Thankx Sent from my iPhone ---------------------------------------------------------------------- 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
