++PTF(ASP1071). /* -------------------------------------------------
ASP1071 071207 ASEB200 ASEPRINT Support for DUPPRT(..)

COPYRIGHT AUSTRALIAN SYSTEMS ENGINEERING PTY. LTD. 2008

_APARLIST:

_NOTES :

This PTF adds support to ASEPRINT for duplicate prints via the
DUPPRT(..) keyword on the PRT OPEN statement.  The DUPPRT value would be
the operands of an allocate statement, eg:

 DUPPRT(DD=ddname)
  -or-
 DUPPRT(dsn(..) space(..) unit(..) recfm(..) lrecl(..) blksize(..) ..)

After ASEPRINT has opened its normal output dcb, if it finds that a
DUPPRT(..) term was present, then it will call ASEALLOC passing the
DUPPRT values. If the allocation is successful then ASEPRINT will open
the DUPPRT dcb.  Each time ASEPRINT writes a line to its normal output
file it will also write the line to the DUPPRT dcb.  When the normal
print DCB is closed, ASEPRINT will close its DUPPRT dcb and free the
allocated dataset.

If DD=ddname is specified as the DUPPRT value then ASEALLOC will
not be called. It is assumed that the specfied DD statemant is already
allocated. The duplicate output will be written to this statement.

       */
++VER(Z038) FMID(ASEB200)
            PRE(ASP0436,ASP0757)
            SUP(ASP0943,ASZ3254).
++MOD(ASEPRINT).
++MOD(ASEALLOC).