Yes, but it is funky because it is not supported directly. You must do something like:
cat "//''MVS.INPUT.DATASET''" | gzip >/u/me/mvs.input.dsn.gz Replace "/u/me" with a UNIX subdirectory in which you can create the output file. The biggest problem that I have is that JCL restricts me to 72 characters per "card" and I keep having problem trying to extend across multiple lines. The best JCL that I came up with is: // SET I=input.dataset.name // SET O=output.dataset.name.GZ // SET GZIP='/usr/local/bin/gzip' //DELETE EXEC PGM=IKJEFT01, // PARM='DEL &O' //SYSTSPRT DD SYSOUT=* //SYSTSIN DD * /* //ALLOC EXEC PGM=IEFBR14 //DD1 DD DSN=&O, // DISP=(NEW,CATLG),UNIT=SYSDA, // SPACE=(CYL,(20,10),RLSE), // RECFM=FB,LRECL=1,BLKSIZE=0,DSORG=PS //* //GZIP EXEC PGM=BPXBATCH, // PARM='SH cat "//''&I''" | &GZIP >/tmp/x; cp /tmp/x "//''&O''"' //STDOUT DD PATH='/dev/console',PATHOPTS=(OWRONLY) //STDERR DD PATH='/dev/console',PATHOPTS=(OWRONLY) //STDIN DD PATH='/dev/null',PATHOPTS=(ORDONLY) Change "input.dataset.name" and "output.dataset.name" as appropriate. And hope you don't blow the 120 character limit on the length of a PARM= in the GZIP step. The output dataset should be LRECL=1, RECFM=FB so that no "garbage" is at the end of the gzip'ed data. Since "gzip" can directly read or write MVS datasets, the GZIP step first uses "cat" to feed the MVS dataset into "gzip". "cat" can read MVS datasets. "gzip" then creates the output dataset, in a UNIX directory in which you can create a UNIX file (I used /tmp). Again "gzip" cannot write an MVS dataset, so I use "cp" to copy the data from the UNIX file into the MVS dataset. "cp" can both read and write MVS datasets. -- John McKown Senior Systems Programmer UICI Insurance Center Information Technology This message (including any attachments) contains confidential information intended for a specific individual and purpose, and its content is protected by law. If you are not the intended recipient, you should delete this message and are hereby notified that any disclosure, copying, or distribution of this transmission, or taking any action based on it, is strictly prohibited. > -----Original Message----- > From: Linux on 390 Port [mailto:[EMAIL PROTECTED] On > Behalf Of Eddie Chen > Sent: Monday, January 30, 2006 1:54 PM > To: [email protected] > Subject: USS gzip > > > Can the gzip on the USS read and compress the dataset to > MVS dataset. > > What I am trying to do it to. GZIP MVS DATASET and FTP to > UNIX work > station. > > > ----------------------------------------- > This message and its attachments may contain privileged and > confidential information. If you are not the intended recipient(s), > you are prohibited from printing, forwarding, saving or copying this > email. If you have received this e-mail in error, please immediately > notify the sender and delete this e-mail and its attachments from your > computer. > > ---------------------------------------------------------------------- > For LINUX-390 subscribe / signoff / archive access instructions, > send email to [EMAIL PROTECTED] with the message: INFO > LINUX-390 or visit > http://www.marist.edu/htbin/wlvindex?LINUX-390 > ---------------------------------------------------------------------- For LINUX-390 subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: INFO LINUX-390 or visit http://www.marist.edu/htbin/wlvindex?LINUX-390
