How to use CA Datacom Presspak compression exit

Document ID : KB000017408
Last Modified Date : 14/02/2018
Show Technical Document Details

Description:

Sample on how to implement DATPAK compression.

Solution:

Implementation is described in CA Datacom Presspak User Guide 14.0

https://support.ca.com/cadocs/7/CA%20Datacom%20DB%2014%200-ENU/Bookshelf.html

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

Figure 1

ISPF Browse of PMF Dataset when using Presspak compression DCTPMF

Figure 2

File Attachments:
TEC617168.zip