++APAR(ASZ3094). /*-----------------------------------------------------

COPYRIGHT AUSTRALIAN SYSTEMS ENGINEERING PTY. LTD. 1999.

ASZ3094 990924 61VASE PS OMCSV2  V201 LOOP       OMCSPDAF 990924 A__-PJS
when "advanced" print service program for AFP type printer handles
address box printing. (ASEB250 only)

_PROBLEM DESCRIPTION:
When an "advanced" print service program (PSP) is used with an AFP type
printer, it loops and continuously reprints the first bundle address
box.

_PROBLEM SUMMARY:
USERS AFFECTED: IRM users with PSPs for AFP printers

The AFP printer driver code has the wrong label on a GOTO statement.

_PROBLEM CONCLUSION
RECOMMENDATION: Apply APAR fix ASZ3094

OMCSPDAF will be modified to correct the bad label.

_SMP/E SITES PLEASE NOTE:

1. If you have PTF ASP0699 installed on your system, you may apply two
   or more source update APAR fixes to the same source module
   simultaneously.  If you do not have PTF ASP0699 installed, do NOT
   attempt to apply two or more source update APAR fixes to the same
   source module simultaneously - you will get incorrect results.

_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 or see
   the .ASESAMP member called RUNASMP.

2. This fix contains ++SRCUPD statements.  After applying the fix you
   must recompile the ECL programs named in ++SRCUPD statements to
   create new load modules from them.  For sample JCL see the .ASESAMP
   member called RUNECLC which was distributed on PUT9112.

NEED FURTHER HELP?  CALL ASE FOR ASSISTANCE.

       */
++VER(Z038) FMID(ASEB200) PRE(ASP0429).
++SRCUPD(OMCSPDAF).
./ CHANGE NAME=OMCSPDAF
APAR ASZ3094                                                            Z3094002
/*PRE ASP0429                                                           Z3094004
AUDIT ON                                                                Z3094006
F ADDR: 1                                                               Z3094008
F 'GOTO ADDR '                                                          Z3094010
C 'ADDR ' ADDRH                                                         Z3094012
END                                                                     Z3094014