|
SELCOPY
Examples Menu
Storing data on disk is extremely inefficient when the data consists of
many embedded blanks and other duplicated characters. To avoid this
inefficiency, the COMPRESS/EXPAND facility has been introduced, allowing
compression before writing, and expansion back to the full record size
after reading a compressed record.
read BIGFILE nordw worklen=2222 * Ignore the 4-byte RDW.
compress fr 1 to 1001 * Compress LRECL bytes.
wr TAPEFIL fr 1001 recfm=vb b=32000 l=4096 * Write Back-up.
|