How to use CA Datacom Presspak compression exit
search cancel

How to use CA Datacom Presspak compression exit

book

Article ID: 17408

calendar_today

Updated On:

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


Figure 1

ISPF Browse of PMF Dataset when using Presspak compression DCTPMF


Figure 2

Environment

Release: DATABB00200-14-Datacom/AD
Component:

Resolution

see  explanation above

Attachments