How to use CA Datacom Presspak compression exit

Products

• Datacom
• Ideal
• COMMON SERVICES FOR Z/OS
• Datacom/AD
• IPC

Issue/Introduction

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)

1. Use IVPNEW05 job member from CA Datacom/DB 14.0 installation which is in INSTJCL library, to get:
   
   
   1. create a PMF extract dataset which will be used as a backup for step3
      
      
   2. create a DCTPMF Presspak module (degree 8) in CUSLIB
      
      (DCT=DCTPMF,DEGREE=8,NRECS=200,START=1)
      
      
2. 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
   
   
3. 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

Environment

Release: DATABB00200-14-Datacom/AD
Component:

Resolution

see  explanation above