++PTF(ASP0898).  /*---------------------------------------------------
ASP0898 010227 ASEB200 V201 PS ASZ3194 correct S0C4 in OMCSDBBU

COPYRIGHT AUSTRALIAN SYSTEMS ENGINEERING PTY. LTD. 2001

_APARLIST:

ASZ3194 001231 61VACI LC ASEB200 P757 ABENDS0C4  OMCSDBBU 010101 O__-PMD
Abend S0C4 when converting a TOD clock value for date 001231 into a
character string.
       */
++VER(Z038) FMID(ASEB200)
            PRE(ASP0757)
            SUP(ASZ3194).
++MOD(OMCSDBBU).