*** 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 BG52480                                                      
/* 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-52D : BG52480                              
   AFFECT PHASE=BIM$TICI                                          
   ALTER 000430 58F065DC05EF     : 92XX700B0700                   
   RESOLVES '(O) ASRA ON BCIN FOR CICS 2.2'                       
/*                                                                
/&   
// JOB BG52481                               
/*
/* This optional patch prevents BIM$PUTL from uppercasing all
/* DIRLIST reports.
/*
// EXEC MSHP,SIZE=900K                    
   CORRECT 2885-BGS-00-52D : BG52481      
   AFFECT PHASE=BIM$PUTL                    
   ALTER 002F30 D6 : D2                   
   RESOLVES '(O) DONT UPPERCASE REPORT'  
/*                                        
/&                                        
// JOB BG52482                                                      
/*                                                                  
/* 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-52D : BG52482                                  
 AFFECT PHASE=BIM$TICI                                              
 ALTER 0003DC 47F0 : 4700                                           
 ALTER 000496 47F0 : 4700
 RESOLVES '(O) USE USERID INSTEAD OF OPID'                          
/*                                                                  
/&                                                                  
// JOB BG52483                                                   
/*                                                               
/* 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-52D : BG52483                               
 AFFECT PHASE=BIM$OIED                                           
 ALTER 005720 7A : F8                                            
 ALTER 005748 4A : C8                                            
 RESOLVES '(O) STOP PF10=QUICAT'                                 
/*                                                               
/&                                                               
// JOB  BG52484                                  
/* CATALOG BG052484.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.2D'   
/*      /*                                                       
/*
/* 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=BG052484.fix                                               
MEM=CPRMENU0.SDF PDS=VIO REL=V5.2D TYP=OPT                             
E2C3C1D540C1D9C77E5083F081A4847E7DC47DFF                               
D9C5D740F1FF                                                           
40405083F081A4847E7DC57D4040404040404040404040404040615C40899584898381 
A38540C1E48489A340A39981899340859581829385844040404040404040405C61FF   
615BFF                                                                 
./ END                                                                 
/*
/&                                            
// JOB BG52499                                                        
/*                                                                    
/* OPTIONAL PATCH TO SEPARATE THE CSI AND CA PDS FILES.  ONCE YOU     
/* APPLY THIS PATCH YOU HAVE TO IPL AFTER CHANGING ANY SYS$XXX LABELS 
/* FOR THE PDS FILES USED BY CSI (BIM) TO CSS$XXX.  NO OTHER CHANGES  
/* SHOULD BE NECESSARY UNLESS YOU USE OTHER THAN STANDARD LABELS TO   
/* REFERENCE YOUR PDS FILES, SUCH AS FOR BACKUP/FORMAT/RESTORE.       
/*                                                                    
// EXEC MSHP,SIZE=720K                                                
   CORRECT 2885-BGS-00-52D : BG52499                                  
   AFFECT PHASE=BIM$OIED                                              
   ALTER 00286F 'SYS'            : 'CSS'                              
   AFFECT PHASE=BIM$PUTL                                              
   ALTER 002580 'SYS'            : 'CSS'                              
   AFFECT PHASE=BIM$PV31                                              
   ALTER 001D22 47F0             : 4770                               
   ALTER 001DD4 'BIM'            : 'CSS'                              
   ALTER 002F82 47F0             : 4770                               
   ALTER 003458 'BIM'            : 'CSS'                              
   ALTER 005AFA 47F0             : 4770                               
   ALTER 005B66 47F0             : 4770                               
   ALTER 005C76 47F0             : 4770                               
   ALTER 005CB2 070007000700     : D203C2C66001                       
   ALTER 0069C8 'BIM'            : 'CSS'                              
   RESOLVES '(O) SEPARATE CSI AND CA PDS'                             
/*                                                                    
/&