*** PATCHES ********************************************************************
 
 
*** WARNING ***
 
The following bucket consists of OPTIONAL patches that provide certain
features or changes to features that customers have requested.  If you
wish to apply any of these, please read the documentation for each job
before applying..
 
 
// JOB BG53180
/* CHANGE THE XX BELOW TO FF IF APL IS SUPPORTED, OR 00 IF APL IS
/* NOT SUPPORTED.  A WSFQ IS TO BE DONE ANYWAY, SO THIS DATA WILL
/* ONLY BE USED IF THE TERMINAL DOES NOT SUPPORT WSFQ.
/*
// EXEC MSHP,SIZE=900K
   CORRECT 2885-BGS-00-53A : BG53180
   AFFECT PHASE=BIM$TICI
   ALTER 000430 58F0660405EF     : 92XX700B0700
   RESOLVES '(O) ASRA ON BCIN FOR CICS 2.2'
/*
/&
// JOB BG53181
/*
/* This optional patch prevents BIM$PUTL from uppercasing all
/* DIRLIST reports.
/*
// EXEC MSHP,SIZE=900K
   CORRECT 2885-BGS-00-53A : BG53181
   AFFECT PHASE=BIM$PUTL
   ALTER 002F80 D6 : D2
   RESOLVES '(O) DONT UPPERCASE REPORT'
/*
/&
// JOB BG53182
/*
/* THIS OPTIONAL PATCH ALLOWS YOU TO USE THE CICS 8 CHARACTER USERID
/* INSTEAD OF THE THREE CHARACTER OPID.
/*
/*
// EXEC MSHP,SIZE=900K
 CORRECT 2885-BGS-00-53A : BG53182
 AFFECT PHASE=BIM$TICI
 ALTER 0003F6 47F0 : 4700
 ALTER 0004B0 47F0 : 4700
 RESOLVES '(O) USE USERID INSTEAD OF OPID'
/*
/&
// JOB BG53183
/*
/* THIS OPTIONAL PATCH PREVENTS EDIT SESSIONS FROM ATTEMPTING TO
/* EXECUTE THE PHASE QUICAT, PREVENTING AN ABEND IN FAQSMAIN.
/*
/*
// EXEC MSHP,SIZE=900K
 CORRECT 2885-BGS-00-53A : BG53183
 AFFECT PHASE=BIM$OIED
 ALTER 005730 7A : F8
 ALTER 005758 4A : C8
 RESOLVES '(O) STOP PF10=QUICAT'
/*
/&
// JOB  BG53184
/* CATALOG BG053184.fix TO the VIO PDS
/*
/* This optional patch enables BIM-GSS CPR Audit Trail.
/*
/* This job only catalogs the fix to the VIO PDS.  To activate
/* this and other fixes you must run the BIM$UTFX imod using
/* BIM$RXBA and then execute the generated BGSSTEMP.PROC member
/* that is created:
/*
/*      // EXEC BIM$RXBA,PARM='BIM$UTFX S=lib.sublib P=BGSS R=V5.3A'
/*      /*
/*
/* where lib.sublib is the location of your BIM-GSS library.
/* This process can be run multiple times without resulting in
/* any problems or duplication.  Each run will rebuild the PROC
/* with all .fix members found for the requested product and release
/* so that when you execute it all fixes are applied or reapplied.
/* The original PROC's for this release are never modified.
/*
/* Be sure the CAT= below has 'fix' in lowercase...
/*
// OPTION LOG,LOGSRC
/*
/*
// EXEC BIM$PUTL,SIZE=BIM$PUTL,PARM='INSTALL'
PDS=VIO,CAT=BG053184.fix
MEM=CPRMENU0.SDF PDS=VIO REL=V5.3A TYP=OPT
E2C3C1D540C1D9C77E5083F081A4847E7DC47DFF
D9C5D740F1FF
40405083F081A4847E7DC57D4040404040404040404040404040615C40899584898381
A38540C1E48489A340A39981899340859581829385844040404040404040405C61FF
615BFF
./ END
/*
/&
// JOB BG53199
/*
/*  OPTIONAL PATCH TO CHANGE THE PREFIX FOR PDS FILES FROM CSS$
/*  BACK TO SYS$.  YOU WILL NEED TO CHANGE YOUR STANDARD LABELS
/*  AND ANY OTHER BIM-GSS PDS LABELS ACCORDINGLY.  WE NOW
/*  RECOMMEND YOU SEPARATE OUR PDS FILES FROM ANY CA PDS FILES
/*  SINCE CA-GSS ACCESS CAUSES CORRUPTION OF THE PDS FILES.
/*
// EXEC MSHP,SIZE=720K
   CORRECT 2885-BGS-00-53A : BG53199
   AFFECT PHASE=BIM$OIED
   ALTER 00007C 80 : 00
   AFFECT PHASE=BIM$PURS
   ALTER 000068 80 : 00
   AFFECT PHASE=BIM$PUTL
   ALTER 0000E8 80 : 00
   AFFECT PHASE=BIM$PV31
   ALTER 0000DC 80 : 00
   ALTER 0058B0 80 : 00
   RESOLVES '(O) CHANGE PDS PREFIX TO SYS$'
/*
/&