++PTF(ASP1015). /*-----------------------------------------------------
ASP1015 050914 ASEC200 V220 Upper-case bundle banner address box lines

COPYRIGHT AUSTRALIAN SYSTEMS ENGINEERING PTY. LTD. 2005

_APARLIST:

ASZ3388 050809 61VODP TI ASEC200 V220 SUGG OK    OMCSIRMV 050822 S__1010
provide an option to upper-case the address lines on bundle banner pages

ASZ3390 050812 61VASE PS ASEC200 V220 INCORROUT  OMCSIRBM 050822 S__1010
if option MV "user" and "report" names contain lower case characters,
those characters print as blanks in bundle banner block letter lines.

ASZ3396 050914 61VODP TI ASEC200 V220 SUGG OK    OMCSIRMV 050920 S__1015
upper-case all address box lines on bundle banner pages

       */
++VER(Z038) FMID(ASEC200)
            PRE(ASP0835,ASP0885,ASP0991)
            SUP(ASP1010,ASZ3388,ASZ3390,ASZ3396).
++SRC(OMCSIRBM).
++SRC(OMCSIRBT).
++SRC(OMCSIRMV).
++MOD(OMCSIRBM).
++MOD(OMCSIRBT).
++MOD(OMCSIRMV).
++PNL(OMCHIRMX).
++PNL(OMCSIRMV).