++PTF(ASP0911) /*------------------------------------------------------
ASP0911 010716 ASEB200 V201 New directry sysfile structure

COPYRIGHT AUSTRALIAN SYSTEMS ENGINEERING PTY. LTD. 2001

APAR Fixes:

ASZ2934 970715 61VASE PS OMCSV2  P710 INCORROUT  ASEDAMGR 970716 __S0758
Bulk copy function of the access method fails if the output file is
to be compressed.

ASZ2967 971118 61VASE PM OMCSV2  P??? INCORROUT  OMCSDBUT 971118 __S0758
Backup time stamp is wrong after file backed up with OMCS7BUT is restore

ASZ2985 980115 61VNAB WM OMCSV2  P711 ABS0C4     ASEDAMBM 980120 __S0758
when d/base has many secondaries and a large file is being deleted.

ASZ3090 990810 61VTEL MC OMCS/V2 P804 LOOP       OMCSDBVR 990810 S__0894
when PARM='BTECHK FN= FT=' and non-generic filetype specified.

ASZ3221 010716 61VASE PM ASEB200 V210 INCORROUT  ASEDAMFM 010716 o__0911
Files lost if insert for directry entry fails.

ASZ3224 010730 61vase pm ASEB200 V201 INCORROUT  DBCOPY   ...... o__0911
Cmd "DBCOPY DIRECTRY SYSFILE DIRECTRY BACKUP" only copies records which
are after "DIRECTRY BACKUP".

ASZ3222 010726 61vtel JB ASEB200 V201 WAIT       ASEDAMGR ...... o__0911
TSO user locks up ASEDA... resource for .JOBDETL MASTER after *** wait

 NOTES:

CHANGES TO OMCSDBVR

This PTF enhances OMCSDBVR by adding the ability to "de-gas" the
database directory.  This operation removes wasted freespace from
directory blocks and shuffles all records to the start of the file
thereby ensuring that free blocks are available for new directory
entries.

OMCSDBVR will also increase the size of the directory if it is found
to be too small for the database. This will occur the first time
that OMCSDBVR is run with the FIXFILE option after applying this PTF.
It is recommended that a full backup of the database be taken prior
to the first time that OMCSDBVR is run with the FIXFILE option.

The following new operand has been added to the PARM field of OMCSDBVR:

DEGAS - Force file DIRECTRY SYSFILE to be "de-gassed" regardless of
        whether it is necessary. If this operand is not specified the
        program will determine whether to  "de-gas" the directory.

The following new messages are issued by OMCSDBVR:

OMCVR103E DIRECTRY SYSFILE DE-GAS REQUIRED

        The database directory contains wasted space and needs to be
        de-gassed. The FIXFILE operand must be specified inorder for
        OMCSDBVR to automatically de-gas the directory.

OMCVR105I DE-GASSING DIRECTRY SYSFILE

        The database directory is being de-gassed.

OMCVR107I DE-GAS COMPLETE

        The de-gas operation has completed succesfully.

OMCVR108I DE-GAS FAILED

        The de-gas operation did not complete succesfully. A following
        message will indicate the cause of the error.

OMCVR109I NO SECONDARY DATABASES DEFINED

        This message indicates the CLUSTER SYSFILE file was empty and
        there are no secondary databases defined for this database.

OMCVR110E CLUSTER SYSFILE ENTRY NOT IN ROOT BLOCK

        The directory entry for CLUSTER SYSFILE was not in the root
        block for DIRECTRY SYSFILE. This may prevent CLUSTER SYSFILE
        from being found during database initialization. The directory
        will be de-gassed to attemp to move the directory entry to the
        root block.

OMCVR112E SHORT DIRECTRY ENTRY FOUND

        A record was found in the database directory that was too short
        to be a valid directory entry.  If the FIXFILE option is
        specified then the record will be deleted.

OMCVR113I SHORT DIRECTRY ENTRY WILL BE DELETED
        A record was found in the database directory that was too short
        to be a valid directory entry.  The FIXFILE option has been
        specified and the record will be deleted.


CHANGES TO ASEDAMFM

  ASEDAMFM has been modified to issue the enqueue wait messages:

    DAIO45I WAITING FOR ACCESS TO OMCS DATABASE FILE
    DAIO45I DATABASE.NAME.FILE=FILENAMEFILETYPE

  only once for an outstanding enqueue.  A new message:

   DAIO45I DATABASE.NAME.FILE=FILENAMEFILETYPE ACQUIRED

  will be issued when the enqueue is acquired.

       */.
++VER(Z038) FMID(ASEB200) SUP(ASP0894,ASZ3090,ASZ3221,ASZ3224,ASP0758,
                              ASZ2934,ASZ2967,ASZ2985,ASZ3222)
                          PRE(ASP0804,ASP0905,ASP0711,ASP0742,ASP0435).
++HOLD(ASP0911) SYSTEM FMID(ASEB200) REASON(DOC)
      COMMENT(SEE COVERLETTER FOR OMVSDBVR CHANGES AND NEW MSGS).
++JCLIN.
++MOD(ASEDAMDM).
++MOD(ASEDAMFM).
++MOD(ASEDAMGR).
++MOD(ASEDAMRM).
++MOD(OMCSDBVR).
++MOD(DBCOPY).
++SRC(DBCOPY).