Description:
Sample on how to implement DATPAK compression.
Solution:
Implementation is described in CA Datacom Presspak User Guide 15.1
documentation
There is a practical procedure to follow:
Testing procedure, uses sample Database DBID 001 (Human-Resource) and table PMF (Personnel)
- Use IVPNEW05 job member from CA Datacom/DB 14.0 installation which is in INSTJCL library, to get:
- create a PMF extract dataset which will be used as a backup for step3
- create a DCTPMF Presspak module (degree 8) in CUSLIB
(DCT=DCTPMF,DEGREE=8,NRECS=200,START=1)
- Use DDUPDATE to set the 3150 table transaction
//SYSIN DD *
COMM OPTION=CLOSE,DBID=01
-USR DATACOM-INSTALL,NEWUSER
-UPD DATABASE,HUMAN-RESOURCE(PROD,DD,PRIV)
1000 RESTORE,T006
-END
-UPD TABLE,PERSONNEL(T006,DD,PRIV)
3150 N PRESSPAK DCTPMF
-END
-CPY DATABASE,HUMAN-RESOURCE(T006,DD,PRIV),PROD
-END
-UPD DATABASE,HUMAN-RESOURCE(PROD,DD,PRIV)
1000 CATALOG
-END
//*
Presspak is in Column 43 (compression-exit)
DCTPMF is in column 52 (Encryption-Key)
N is in column 20
Note:
For Presspak STRONG compression leave space in column 52
For Presspak WEAK compression enter WEAK in column 52
Enter N in column 20 (Y = standard CA Datacom/DB compression) default is N
- Use DBUTLTY to load from Extract taken in step1
//SYSIN DD *
COMM OPTION=CLOSE,DBID=01
INIT AREA=PMF,DBID=01
LOAD AREA=PMF,TABLE=PMF,DBID=01,
FORMAT=EXTRACT,DDNAME=EXTPMF
COMM OPTION=STATS
REPORT AREA=CXX,DBID=01
/*
Sample CXX REPORT extract for table PMF showing User Compression


ISPF Browse of PMF Dataset when using Presspak compression DCTPMF
