bdfd1m1mDatabase Administration

Packing Files Regularly

The following scenario addresses packing files regularly.

Problem

A TPFDF file is updated frequently in high-performance transactions. It contains 300-byte LRECs in 1055-byte blocks in the subfile. Each LREC that is deleted causes an internal pack operation that creates substantial processing overhead.

Solution

Use the NOPACK parameter when closing the subfile to disable the packing operation. Write a small application to reorganize and pack the file or use the ZUDFM OAP command.

DSECT Set Symbols

Not applicable.

DBDEF Statements

Not applicable.

Application Coding

      DBCLS REF=zzzzzz,RELEASE,NOPACK