MVSFORUMS.com

MikeBaker · Beginner Joined: 04 May 2004 Posts: 96 Topics: 9

Is there any way of compressing a Loadlib being used by CICS (it's in the DFHRPL) without having to bring CICS down in order to do so??

Thanks.

kolusu · Posted: Fri Oct 01, 2004 1:04 pm Post subject:

MikeBaker,

Check this link which discusses the exact problem as yours.

http://www.xephon.com/arcinframe.php/c072a07

Hope this helps...

Cheers

kolusu
_________________
Kolusu
www.linkedin.com/in/kolusu

MikeBaker · Beginner Joined: 04 May 2004 Posts: 96 Topics: 9

Hi Kolusu,

Thanks very much for your quick reply. Cheers.

However, on that "Xephon" example, the library I want to compress is the USER.PROGRAMS.LOADLIB. The writer does not talk about this one.

Another link http://www.xephon.com/arcinframe.php/c071a02, says the usual; ie: that it's not possible to compress USER.PROGRAMS.LOADLIB'.

The problem doesn't happen very often, it's just a pain when it does. And because I recently discovered that you can successfully rename/delete modules present in active CICS libaries, by using the IDCAMS "FILE" option, I was wondering if there might be some similar tweak available via either Batch Job, REXX, or Assembler program for achieving the desired Compress.

Bouncing CICS seems to be the standard, but it just seems archaic.

Thanks.

Mike.

Mike Chantrey · Posted: Mon Oct 04, 2004 8:56 am Post subject:

To safely compress a loadlib defined to CICS you should first disable all programs on the loadlib e.g. with CEMT SET PROG(XX*) DIS
Then compress the loadlib (e.g. IEBCOPY it to itself with DISP=SHR)
Then newcopy all the programs in the loadlib CEMT SET PROG(XX*) NEW
Then enable the programs with CEMT SET PROG(XX*) ENA

Mike Chantrey · Posted: Mon Oct 04, 2004 8:58 am Post subject:

Obviously this is much more cumbersome if your programs have 'messy' names and there are lots of them!

Mike Chantrey · Posted: Mon Oct 04, 2004 9:03 am Post subject:

You could probably get away without the DISABLE/ENABLE (this might cause a lot of disruption in a production environment) but you might get some errors in the time between the compress starting and the NEWCOPY completing if you were unlucky.
The best solution is to switch to using PDSEs as CICS loadlibs since these are self-compressing but I'd only recommend it if you're on a current level of z/OS (too many bugs/restrictions on older OS/390 levels etc.)

MikeBaker · Beginner Joined: 04 May 2004 Posts: 96 Topics: 9

Thanks Mike.

Our DEV machine was just upgraded to zOS over the weekend, which is fortuitous, because this means I can now investigate the PDSE option. Cheers.