++PTF(ASP0927) /*------------------------------------------------------
ASP0927 020408 ASEB200 V201 ASZ3256 Correct DBCOPY return code

COPYRIGHT AUSTRALIAN SYSTEMS ENGINEERING PTY. LTD. 2002

APAR Fixes:

ASZ3256 020408 61vtel mc ASEB200 V201 INCORROUT  DBCOPY   ...... O__-PMD
DBCOPY incorrectly returns cc=0 when ASEDBCPY returns a non zero return
code.

  */.
++VER(Z038) FMID(ASEB200) SUP(ASZ3256)
                          PRE(ASP0911).
++MOD(DBCOPY).
++SRC(DBCOPY).