REXX- compressing a PDS

kalais · New User Joined: 18 Apr 2006 Posts: 22

hi,

i want to compress a PDS in REXX .
what macro/function/command can i use for this.

thanks,
kalai

superk · Posted: Thu May 18, 2006 6:52 pm Post subject: Re: REXX- compressing a PDS

Use the LMCOMP ISPF Library Management service. Otherwise, run a normal IEBCOPY COMPRESS.

kalais · New User Joined: 18 Apr 2006 Posts: 22

hi

i tried to compress the PDS with the following code

/* REXX */
"ISPEXEC LMINIT DATAID(ID) DATASET('PDS') ENQ(EXCLU)"

"ISPEXEC LMCOMP DATAID(ID)"
"FREE DS('PDS')"

But the pds did not get compressed.
Is the above code is valid for the compression?

superk · Posted: Sat May 20, 2006 1:46 am Post subject: Re: REXX- compressing a PDS

It worked for me when coded properly: