++APAR(ASZ2941).  /*---------------------------------------------------
ASZ2941 WAS PICKED UP BY ASP0742 SHIPPED - Y2000.

COPYRIGHT AUSTRALIAN SYSTEMS ENGINEERING PTY. LTD. 1997.

ASZ2941 970819 61VNAB WM OMCSV2  P711 ABS0C4     ASEDAMFM 970520 A__-PMD
Abend S0C4 during DBOPEN of a file in a database which has a secondary
database defined.

_PROBLEM DESCRIPTION:

 A S0C4 abend occurs during a DBOPEN statement.

_PROBLEM SUMMARY:

   USERS AFFECTED: All users

 The S0C4 occurs after storage used by the GETF code is corrupted by
 an unexpected recursive call to the GETF procedure. During a search of
 the database directory, a block is required from the secondary database
 which causes the INID routine to call GETF to open the database's
 spacemap.

_PROBLEM CONCLUSION

   RECOMMENDATION: Apply apar ASZ2941.

 The storage corrupted will be reset after the directory search is
 complete.

_NON-SMP/E SITES PLEASE NOTE:

1. Apply this fix using the ASMPMAIN program.  Refer to ASE Technical
   Bulletin TB90-0014 for sample JCL for running this program .

IF YOU DONT UNDERSTAND WHAT THIS MEANS PLEASE CALL ASE FOR ASSISTANCE.

       */
++VER(Z038) FMID(ASEB200) PRE(ASP0721).
++ZAP(ASEDAMFM).
NAME ASEDAMFM
IDRDATA ASZ2941
VER 2B8E 9104502D,4710CBB4
VER 3D38 BD38
REP 3D38 9104502D,4710CBB4,47F0CB96
REP 2B8E 5050A328,47F0BD38
*LMOD ASEDAMGR,OMCSTSSJ,OMCSIRUV