*** 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..
 
 
Panel/IMOD optional patches
---------- -------- -------
 
 
// JOB  BF53160
/* CATALOG BF053160.fix TO the VIO PDS
/*
/* This optional patch changes &fp1jid=0 to &fp1jid=1
/* which displays JID=origin job number partially overlaying the
/* User Information area on the POWER queue list display.
/*
/* 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 BASOTEMP.PROC member
/* that is created:
/*
/* 	// EXEC BIM$RXBA,PARM='BIM$UTFX S=lib.sublib P=BASO R=V5.3A'
/*	/*
/*
/* where lib.sublib is the location of your BIM-FAQS/ASO 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=BF053160.fix
MEM=FAQMENP1.SDF PDS=VIO REL=V5.3A TYP=OPT
E2C3C1D540C1D9C77E508697F19189847EF0FF
D9C5D740F1FF
40404040508697F19189847EF140404040404040404040404040404040404040404061
5C40A285A340A39640F1408986409697A389969581937A40C2C6F1F8F6F9F84040405C
61FF
615BFF
./ END
/*
/&
// JOB  BF53161
/* CATALOG BF053161.fix TO the VIO PDS
/*
/* This optional patch sets change mode as the initial screen default
/* instead of command mode.
/*
/* 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 BASOTEMP.PROC member
/* that is created:
/*
/* 	// EXEC BIM$RXBA,PARM='BIM$UTFX S=lib.sublib P=BASO R=V5.3A'
/*	/*
/*
/* where lib.sublib is the location of your BIM-FAQS/ASO 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=BF053161.fix
MEM=FAQMENP1.SDF PDS=VIO REL=V5.3A TYP=OPT
E2C3C1D540C1D9C77E508697F1A396877EF1FF
D9C5D740F1FF
40404040508697F1A396877EF040404040404040404040615C40F17EC3D4C46B40F07E
C3C8C74081A24084858681A493A340405C61FF
615BFF
./ END
/*
/&
// JOB  BF53162
/* CATALOG BF053162.fix TO the VIO PDS
/*
/* This optional patch allows users to delete POWER queue entries
/* without requiring the PF10 key to be used.
/*
/* 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 BASOTEMP.PROC member
/* that is created:
/*
/* 	// EXEC BIM$RXBA,PARM='BIM$UTFX S=lib.sublib P=BASO R=V5.3A'
/*	/*
/*
/* where lib.sublib is the location of your BIM-FAQS/ASO 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=BF053162.fix
MEM=FAQMENP1.SDF PDS=VIO REL=V5.3A TYP=OPT
E2C3C1D540C1D9C77E898640837E7E7DD37D40504050C1C9C47E7E7DC17D40A3888595
408496FF
D9C5D740F1FF
4040404040404040898640837E7E7DD37D40A3888595408496FF
615BFF
./ END
/*
/&
// JOB  BF53163
/* CATALOG BF053163.fix TO the VIO PDS
/*
/* This optional patch displays the full 16 characters of user
/* information by removing the slashes from the date in each display
/* line.
/*
/* 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 BASOTEMP.PROC member
/* that is created:
/*
/* 	// EXEC BIM$RXBA,PARM='BIM$UTFX S=lib.sublib P=BASO R=V5.3A'
/*	/*
/*
/* where lib.sublib is the location of your BIM-FAQS/ASO 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=BF053163.fix
MEM=FAQMENP1.SDF PDS=VIO REL=V5.3A TYP=OPT
E2C3C1D540C1D9C77E508697F1A489957EF0FF
D9C5D740F1FF
40404040508697F1A489957EF140404040404040404040404040404040404040404061
5C40A285A340A39640F1408696994086A4939340A4A28599408995869640404040405C
61FF
615BFF
./ END
/*
/&
// JOB  BF53164
/* CATALOG BF053164.fix TO the VIO PDS
/*
/* This optional patch prevents SYSOUT archival member display
/* users from deleting entries in the SYS$ARC PDS.
/*
/* 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 BASOTEMP.PROC member
/* that is created:
/*
/* 	// EXEC BIM$RXBA,PARM='BIM$UTFX S=lib.sublib P=BASO R=V5.3A'
/*	/*
/*
/* where lib.sublib is the location of your BIM-FAQS/ASO 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=BF053164.fix
MEM=FAOMENUS.SDF PDS=VIO REL=V5.3A TYP=OPT
E2C3C1D540C1D9C77E5DD3D360F140E0D37EC4859385A38540C27EC29996A6A28540D7
7ED7998995A34040404AFF
D9C5D740F1FF
5DD3D360F140E0C27EC29996A6A28540D77ED7998995A34040404AFF
615BFF
E2C3C1D540C1D9C77E898640835F7E7DD37D405040835F7E7DC27D405040835F7E7DD7
7D40A3888595FF
D9C5D740F1FF
404040404040898640835F7E7DC27D405040835F7E7DD77D40A3888595FF
615BFF
./ END
/*
/&
// JOB  BF53165
/* CATALOG BF053165.fix TO the VIO PDS
/*
/* This optional patch changes the Display(D), Delete(L), AND Print(P)
/* BIM-FAQS/ASO POWER commands agree with the BIMEDIT commands to avoid
/* mistakes.  These would be List(L), Purge(P), and then print is
/* changed to O because P is in use by Purge.
/*
/* 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 BASOTEMP.PROC member
/* that is created:
/*
/* 	// EXEC BIM$RXBA,PARM='BIM$UTFX S=lib.sublib P=BASO R=V5.3A'
/*	/*
/*
/* where lib.sublib is the location of your BIM-FAQS/ASO 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=BF053165.fix
MEM=FAQMENP1.SDF PDS=VIO REL=V5.3A TYP=OPT
E2C3C1D540C1D9C77E508697F18294857EF0FF
D9C5D740F1FF
40404040508697F18294857EF140404040404040404040404040404040404040404061
5C40A285A340A39640F1408986409697A389969581937A40C2C6F1F9F4F3F74040405C
61FF
615BFF
./ END
/*
/&
// JOB  BF53166
/* CATALOG BF053166.fix TO the VIO PDS
/*
/* This optional patch changes the D A initial display to be All instead
/* of Que.  The toggle will be the same except for its initial starting
/* point.
/*
/* 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 BASOTEMP.PROC member
/* that is created:
/*
/* 	// EXEC BIM$RXBA,PARM='BIM$UTFX S=lib.sublib P=BASO R=V5.3A'
/*	/*
/*
/* where lib.sublib is the location of your BIM-FAQS/ASO 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=BF053166.fix
MEM=FAQMENP2.SDF PDS=VIO REL=V5.3A TYP=OPT
40E2C3C1D540C1D9C77E508697F2818193937EF0FF
D9C5D740F1FF
40508697F2818193937EF2404040404040404040404040404040404040404040404061
5C40A285A340A39640F2408986409697A389969581937A40C2C6F1F9F4F8F04040405C
61FF
615BFF
./ END
/*
/&
// JOB  BF53167
/* CATALOG BF053167.fix TO the VIO PDS
/*
/* This optional patch changes the BIM-FAQS/ASO POWER queue display
/* screen to display TO= information initially instead of DATE and
/* TIME.  The toggle works the same.  Only the initial setting has
/* been changed.
/*
/* 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 BASOTEMP.PROC member
/* that is created:
/*
/* 	// EXEC BIM$RXBA,PARM='BIM$UTFX S=lib.sublib P=BASO R=V5.3A'
/*	/*
/*
/* where lib.sublib is the location of your BIM-FAQS/ASO 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=BF053167.fix
MEM=FAQMENP1.SDF PDS=VIO REL=V5.3A TYP=OPT
40E2C3C1D540C1D9C77E508697F184A3877EF0FF
D9C5D740F1FF
40404040508697F184A3877EF240404040404040404040404040404040404040404061
5C40A285A340A39640F2408986409697A389969581937A40C2C6F1F9F4F8F44040405C
61FF
615BFF
./ END
/*
/&
// JOB  BF53168
/* CATALOG BF053168.fix TO the VIO PDS
/*
/* This optional patch changes the BIM-FAQS/ASO POWER queue display
/* screen to maximize the number of lines of data displayed.  Each
/* MOD terminal now has 5 more lines of POWER Queue entries.
/*
/* 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 BASOTEMP.PROC member
/* that is created:
/*
/* 	// EXEC BIM$RXBA,PARM='BIM$UTFX S=lib.sublib P=BASO R=V5.3A'
/*	/*
/*
/* where lib.sublib is the location of your BIM-FAQS/ASO 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=BF053168.fix
MEM=FAQMENP1.SDF PDS=VIO REL=V5.3A TYP=OPT
E2C3C1D540C1D9C77E508697F19481A77EF0FF
D9C5D740F1FF
40508697F19481A77EF140404040404040404040404040404040404040404040404061
5C40A285A340A39640F1408986409697A389969581937A40C2C6F1F9F4F8F64040405C
61FF
615BFF
./ END
/*
/&
// JOB  BF53169
/* CATALOG BF053169.fix TO the VIO PDS
/*
/* This optional patch suppresses the print to BIM-GSS CPR facility
/* within the POWER Queue list display and the queue alter display
/* panels.
/*
/* 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 BASOTEMP.PROC member
/* that is created:
/*
/* 	// EXEC BIM$RXBA,PARM='BIM$UTFX S=lib.sublib P=BASO R=V5.3A'
/*	/*
/*
/* where lib.sublib is the location of your BIM-FAQS/ASO 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=BF053169.fix
MEM=FAQMENP1.SDF PDS=VIO REL=V5.3A TYP=OPT
E2C3C1D540C1D9C77E508697F197A2A4977EF0FF
D9C5D740F1FF
40404040508697F197A2A4977EF1404040404040404040404040404040404040404061
5C40A285A340A39640F1408986409697A389969581937A40C2C6F5F2F4F6F94040405C
61FF
615BFF
./ END
/*
/&
// JOB  BF53170
/*
/* In order to access CA-EPIC from the BIM-FAQS/ASO on-line
/* interface, you must define the following on-line command.
/* Enter "AO I.O" from the BIM-FAQS/ASO command line to get
/* to the proper panel.  Enter an "A" next to an entry and
/* set as follows:
/*
/* New Command:             EPIC
/* Replacement Command:     .P=FAQMENU0.V.EPIC @ @ @ @ @ @
/* Set YES for "Allow arguments to be passed ... command"
/* Set No  for "Also pass COMMAND as the first variable"
/*
/* Use PF5 to save the new command, PF3 to return to the previous
/* panel, and then PF6 to load the changed on-line command file.
/*
/* See the BIM-FAQS/ASO On-line User's guide for more information.
/*
/*
/&
// JOB  BF53171
/* CATALOG BF053171.fix TO the VIO PDS
/*
/* This optional patch suppresses the new sorting feature within
/* the POWER Queue list display.
/*
/* 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 BASOTEMP.PROC member
/* that is created:
/*
/* 	// EXEC BIM$RXBA,PARM='BIM$UTFX S=lib.sublib P=BASO R=V5.3A'
/*	/*
/*
/* where lib.sublib is the location of your BIM-FAQS/ASO 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=BF053171.fix
MEM=FAQMENP1.SDF PDS=VIO REL=V5.3A TYP=OPT
E2C3C1D540C1D9C77E508697F1A299A37EF1FF
D9C5D740F1FF
40404040508697F1A299A37EF0404040404040404040FF
615BFF
./ END
/*
/&
// JOB  BF53172
/* CATALOG BF053172.fix TO the VIO PDS
/*
/* This optional patch allows you to determine the maximum number
/* of POWER queue entries that may be sorted using  the new sorting
/* feature within the POWER Queue member list display.  In the line
/* below that starts with "405086", replace the "????????" with the
/* hex display value of the limit you wish to use.  For example, if
/* you want a limit of decimal 2000 members, you would change to
/* "F2F0F0F0".
/*
/* 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 BASOTEMP.PROC member
/* that is created:
/*
/* 	// EXEC BIM$RXBA,PARM='BIM$UTFX S=lib.sublib P=BASO R=V5.3A'
/*	/*
/*
/* where lib.sublib is the location of your BIM-FAQS/ASO 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=BF053172.fix
MEM=FAQMENP1.SDF PDS=VIO REL=V5.3A TYP=OPT
E2C3C1D540C1D9C77E508697F1A299A394A77EFF
99859740F1FF
40508697F1A299A394A77E????????4040404040404040404040404040404040404061
5C40A285A340A39640A58193A485408986409697A3899695819340404040404040405C
61FF
615BFF
./ END
/*
/&
 
 
****************************************************************************
 
 
PHASE optional patches
----- -------- -------
 
// JOB BF53175
/*
/* THIS OPTIONAL PATCH ALLOWS THE WAIT TIME BETWEEN COMMAND
/* REQUESTS FROM FAQSOPER TO BE CHANGED BY DEFAULT.  IN THE
/* ALTER 000568 LINE, CHANGE THE XX TO THE VALUE YOU WANT AS
/* THE DEFAULT IN SECONDS IN HEXADECIMAL FORMAT.
/*
/*
// EXEC MSHP,SIZE=900K
 CORRECT 2885-BF2-00-53A : BF53175
 AFFECTS PHASE=FAQSOPER
 ALTER 000568 00000005 : 000000XX
 RESOLVES '(O) CHANGE COMMAND WAIT DEFLT'
/*
/&
// JOB BF53176
/*
/* This patch provides DBCS for POWER member display.
/*
// EXEC MSHP,SIZE=900K
   CORRECT 2885-BF2-00-53A : BF53176
   AFFECT PHASE=FAQSPWR6
   ALTER 005686 47F0 : 4700
   AFFECT PHASE=FAQSPW64
   ALTER 00581E 47F0 : 4700
   AFFECT PHASE=FAQSPW67
   ALTER 00581E 47F0 : 4700
   RESOLVES '(O) POWER DISPLAY DBCS SUPPORT'
/*
/&
// JOB BF53177
/*
/* THIS OPTIONAL PATCH ALLOWS YOU TO USE THE "PROFILE" SECURITY
/* ENTRY TO ALLOW USERS TO ENTER BIM-FAQS/ASO ON-LINE WHEN THE
/* SCTY ENTRY FOR A USER INDICATES THEY ARE NOT PERMITTED.  THIS
/* ALLOWS YOU TO RESTRICT A GIVEN USER BASED ON THE VSE MACHINE
/* HE/SHE IS ATTEMPTING TO ACCESS, WHILE ALLOWING THE NORMAL AUTO
/* SIGN ON PROCESS.  FOR THE USERS AFFECTED, CHANGE THEIR SCTY:
/*
/* VM MACHINE      ALL  INCLUDE EXCLUDE  USER-ID  USER-ID ...
/* RESTRICTIONS   ( X )  (   )   (   )   ________ ________...
/*
/* TO INCLUDE OR EXCLUDE THE VSE SYSTEMS YOU WANT A GIVEN USER TO
/* USE THE DEFAULT PROFILE.  THE USER-ID FOR EACH BIM-FAQS/ASO
/* ON-LINE PARTITION IS DETERMINED BY THE "NM=" VALUE IN GFX402I:
/*
/* GFX402I FAQSMAIN ACTIVATED, NM=VB31     ID=FAQSTXPC
/*
/* NOTE: YOU WILL ALSO NEED TO APPLY OPTIONAL PATCH BF53187 IF YOU
/*       NEED TO INCLUDE INTERFACES OTHER THAN IUCV/VMCF.
/*
// EXEC MSHP,SIZE=900K
 CORRECT 2885-BF2-00-53A : BF53177
 REQUIRES PRE=BF53120
 AFFECTS PHASE=FAQSMAIN
 ALTER 4EC6 47F027EE : 47F02726
 RESOLVES '(O) RESTRICT FAQS USERS'
/*
/&
// JOB BF53178
/*
/* THIS OPTIONAL PATCH ALLOWS ONLY THE STACKED REPLIES TO BE DISPLAYED
/* INSTEAD OF DISPLAYING ALL OF THE MESSAGE, ETC. ENTRIES.  THIS
/* FEATURE IS ACTIVATED BY USING THE ASO MSG REPLY FUNCTION INSTEAD
/* OF THE ASO MSG.  WITHOUT THIS PATCH, ASO MSG PROVIDES FOR NO
/* ADDITIONAL PARAMETERS.
/*
/*
// EXEC MSHP,SIZE=900K
 CORRECT 2885-BF2-00-53A : BF53178
 AFFECTS PHASE=$FAQS
 ALTER 000C7C 0000000000000000 : 4780E9BE95D95004
 ALTER 000C84 000000000000     : 4780E9DA07F2
 ALTER 0010C4 4780E9BE         : 45201C7C
 RESOLVES '(O) SUPPORT ASO MSG REPLY'
/*
/&
// JOB BF53179
/*
/* THIS OPTIONAL PATCH ALLOWS DISPLAY OF THE POWER JOB NAME FOR
/* PARTITIONS, WHEN AVAILABLE, INSTEAD OF THE VSE JOB NAME.
/*
/* THIS PATCH IS FOR THE ON-LINE COMMANDS D S,S; D S,J; D S,W;
/* AND ASO J FOR BIM-FAQS/ASO.
/*
/*
// EXEC MSHP,SIZE=900K
 CORRECT 2885-BF2-00-53A : BF53179
 REQUIRES PRE=BF53120
 AFFECTS PHASE=FAQSMAIN
 ALTER 00A968 47F0 : 4700
 RESOLVES '(O) USE POWER JOB NAME FOR D S'
/*
/&
// JOB BF53180
/*
/* CHANGE XX IN ALTER TO CREATE DESIRED DISPLAY.  BITS CAN
/* AND'D TO CREATE DIFFERENT COMBINATIONS AS FOLLOWS:
/*
/* WHERE XX= 80 - SKIP SUBTASKS
/*           40 - INCLUDE WAIT BOUND TASKS
/*           A0 - SKIP ALL PHASE LINES
/*           E0 - SIMULATE MLOG DISPLAY
/*
// EXEC MSHP,SIZE=900K
   CORRECT 2885-BF2-00-53A : BF53180
   REQUIRES PRE=BF53120
   AFFECT PHASE=FAQSMAIN
   ALTER 00996C 00:XX
   RESOLVES '(O) CHANGE D S,W DISPLAY'
/*
/&
// JOB BF53181
// EXEC MSHP,SIZE=900K
   CORRECT 2885-BF2-00-53A:BF53181
   REQUIRES PRE=BF53120
   AFFECTS PHASE=FAQSMAIN
   ALTER   2440 40404040404040   : 8A8B8C8D8E8F90
   ALTER   2450 4040404040404040 : 9A9B9C9D9E9FA9A1
   ALTER   2460 404040AD4040     : AAABACADAEAF
   ALTER   2470 404040BD4040     : BABBBCBDBEBF
   AFFECTS PHASE=FAQXCONS
   ALTER   7282 40404040404040   : 8A8B8C8D8E8F90
   ALTER   7292 4040404040404040 : 9A9B9C9D9E9FA9A1
   ALTER   72A2 404040AD4040     : AAABACADAEAF
   ALTER   72B2 404040BD4040     : BABBBCBDBEBF
   RESOLVES '(O) SUPPORT ALL KATAKANA CHARS'
/*
/&
// JOB BF53182
/*
/* CHANGE Fx TO ONE OF THE FOLLOWING VALUES:
/*
/* F1=BLUE, F2=RED, F3=PINK, F4=GREEN, F5=TURQUOISE
/* F6=YELLOW, OR F7=WHITE
/*
/* This change applies to hardcopy records beyond the
/* area contained within the cache only.
/*
/*
// EXEC MSHP,SIZE=900K
   CORRECT 2885-BF2-00-53A : BF53182
   REQUIRES PRE=BF53120
   AFFECT PHASE=FAQXCONS
   ALTER 00236C 94FF : 92Fx
   RESOLVES '(O) CHANGE REDISPLAY COLOR'
/*
/&
// JOB BF53183
/*
/* This patch allows the use of POWER job name for GSFAQS
/* message handling for job name selection.
/*
// EXEC MSHP,SIZE=900K
   CORRECT 2885-BF2-00-53A : BF53183
   AFFECT PHASE=GSFAQS
   ALTER 009BE6 4700 : 47F0
   RESOLVES '(O) USE POWER JOBNAME FOR MID'
/*
/&
// JOB BF53184
/*
/* CHANGE THE XXXX IN THE PATCH TO THE NUMBER OF BYTES TO ALLOCATE TO
/* THE LINE ADDRESS TABLE.  1000 WOULD GIVE YOU 4K WHICH SHOULD BE MORE
/* THAN ENOUGH.
/*
/* NOTE:  THE INITIAL SETTING IS NOW 4K, SO IT SHOULD BE RARE THAT YOU
/*        NEED TO APPLY THIS PATCH.
// EXEC MSHP,SIZE=900K
   CORRECT 2885-BF2-00-53A : BF53184
   AFFECT PHASE=FAQSPWR6
   ALTER 000082 1000 : xxxx
   AFFECT PHASE=FAQSPW64
   ALTER 000082 1000 : xxxx
   AFFECT PHASE=FAQSPW67
   ALTER 000082 1000 : xxxx
   RESOLVES '(O) CORRECT GFP002E RC=05'
/*
/&
// JOB BF53185
/* This optional patch allows support of up to 100 steps in
/* the eoj console summary report instead of just 8.
// EXEC MSHP,SIZE=900K
   CORRECT 2885-BF2-00-53A : BF53185
   AFFECT PHASE=GSJOBCTL
   ALTER 11D8 41100008 : 41100064
   ALTER 1350 41000130 : 41000E20
   ALTER 1374 41100008 : 41100064
   RESOLVES '(O) EOJ SUM RPT MAX STEPS=100'
/*
/&
// JOB BF53186
/* This optional patch disassociates transfer from member edit
/* security for POWER members for BIM-FAQS/ASO security.
// EXEC MSHP,SIZE=900K
   CORRECT 2885-BF2-00-53A : BF53186
   AFFECT PHASE=FAQSPWR6
   ALTER 47C2 47E0 : 4700
   AFFECT PHASE=FAQSPW64
   ALTER 495A 47E0 : 4700
   AFFECT PHASE=FAQSPW67
   ALTER 495A 47E0 : 4700
   RESOLVES '(O) REMOVE TRANSFER EDIT SCTY'
/*
/&                                         	
// JOB BF53187
/* This optional patch allows control of BIM-FAQS/ASO user
/* access based on the machine name for all interface users
.* instead of just for CMS interface (IUCV/VMCF) users.
// EXEC MSHP,SIZE=900K
   CORRECT 2885-BF2-00-53A : BF53187
   REQUIRES PRE=BF53120
   AFFECT PHASE=FAQSMAIN
   ALTER 4EA0 0785 : 0705
   RESOLVES '(O) CHECK CMS ID FOR VSE'
/*
/&
// JOB BF53188
// EXEC MSHP,SIZE=900K
   CORRECT 2885-BF2-00-53A : BF53188
   AFFECT PHASE=GSJOBCTL
   ALTER 10A4 96809DAC : 47F090FC
   RESOLVES '(O) DISABLE CQON/CQOFF'
/*
/&
// JOB BF53189
/*
/*
/* This patch is provided, but no longer needed since the MAX command
/* is now available.  See POWER display HELP for more details.
/*
/*
/* This optional patch allows you to change the maximum number of
/* lines to scan before allowing another user to get access (TSHARE).
/* If you want faster access to scan data, increase this value.  If
/* you decrease this value, more users get access but each one has
/* less of a timeslice per access.  If you set this value to 0000,
/* TSHARE during scans is disabled.  Do not exceed 7FFF (32767) since
/* the access is via halfword commands.
/*
// EXEC MSHP,SIZE=900K
   CORRECT 2885-BF2-00-53A : BF53189
   AFFECT PHASE=FAQSPWR6
   ALTER 0084 1388 : xxxx
   AFFECT PHASE=FAQSPW64
   ALTER 0084 1388 : xxxx
   AFFECT PHASE=FAQSPW67
   ALTER 0084 1388 : xxxx
   RESOLVES '(O) CHANGE SCAN LINE MAX'
/*
/&
// JOB BF53190
/*
/* THIS PATCH SUPPRESSES THE ACTION/OPTION PW LINES
/* FROM THE BIM-FAQS/ASO POWER MEMBER DISPLAY.
/*
/*
// EXEC MSHP,SIZE=900K
 CORRECT 2885-BF2-00-53A : BF53190
 AFFECT PHASE=FAQSPWR6
 ALTER 0060AC  4700 : 4780
 AFFECT PHASE=FAQSPW64
 ALTER 006244  4700 : 4780
 AFFECT PHASE=FAQSPW67
 ALTER 006244  4700 : 4780
 RESOLVES '(O) SUPPRESS ACTION/OPTION PW='
/*
/&
// JOB BF53191
/*
/* THIS OPTIONAL PATCH CAUSES THE FBUF= VALUE SELECTED
/* DURING GSFTL STARTUP TO BE DOUBLE WHAT IS SPECIFIED.
/*
/*
// EXEC MSHP,SIZE=900K
 CORRECT 2885-BF2-00-53A : BF53191
 REQUIRES PRE=BF53110
 AFFECT PHASE=GSFTL
 ALTER 0007BE  89F0000A : 89F0000B
 RESOLVES '(O) DOUBLE FBUF= SIZE IN GSFTL'
/*
/&
 
 
// JOB BF53192
/*
/* THIS OPTIONAL PATCH ALLOWS YOU TO USE THE POWER JOBNAME FOR
/* INDEX/DISPLAY INSTEAD OF THE DOS JOBNAME.
/*
/*
// EXEC MSHP,SIZE=900K
 CORRECT 2885-BF2-00-53A : BF53192
 REQUIRES PRE=BF53110
 AFFECT PHASE=GSFAQSHC
 ALTER 00134E 4700             : 4780
 ALTER 001358 4700             : 4770
 ALTER 00135C 4700             : 47F0
 RESOLVES '(O) INDEX BY POWER JOBNAME'
/*
/&
 
// JOB BF53193
/*
/* THIS OPTIONAL PATCH CAUSES SYSOUT ARCHIVAL MEMBERS TO USE
/* THE POWER JOB NAME INSTEAD OF THE VSE JOB NAME.
/*
/*
// EXEC MSHP,SIZE=900K
 CORRECT 2885-BF2-00-53A : BF53193
 AFFECT PHASE=GSJOBCTL
 ALTER 0039AE 47F0 : 4700
 RESOLVES '(O) POWER JOB NAME FOR SYSOUT'
/*
/&
// JOB BF53194
/*
/* THIS OPTIONAL PATCH ALLOWS THE ID CARD IN POWER MEMBERS TO
/* BE PASSED AS IS INSTEAD OF BEING SUPPRESSED WHEN EDITTING.
/*
/*
// EXEC MSHP,SIZE=900K
 CORRECT 2885-BF2-00-53A : BF53194
 AFFECT PHASE=FAQSPWR6
 ALTER 00611C 4710A1E8 : 07150700
 AFFECT PHASE=FAQSPW64
 ALTER 0062B4 4710A1E8 : 07150700
 AFFECT PHASE=FAQSPW67
 ALTER 0062B4 4710A1E8 : 07150700
 RESOLVES '(O) ALLOW ID CARD EDIT'
/*
/&
// JOB BF53195
/*
/* THIS OPTIONAL FIX CHANGES THE NUMBER OF DATA LINES RETURNED FROM
/* FAQSVSPO (VTAM FUNCTION) FROM 64 TO A USER SPECIFIED NUMBER.  THE
/* FORMULA FOR 'XXX' BELOW IS THE HEXADECIMAL VALUE OF THE NUMBER OF
/* LINES TIMES 4 WITH A MAXIMUM OF 200 LINES.  SO IF YOU WANT THE 200
/* MAXIMUM YOU WOULD TAKE 200 * 4 = 800, so XXX would be 320.
/*
// EXEC MSHP,SIZE=900K
 CORRECT 2885-BF2-00-53A : BF53195
 REQUIRES PRE=BF53120
 AFFECTS PHASE=FAQSVSPO
 ALTER 000040 00000100 : 00000XXX
 AFFECTS PHASE=FAOXSFN
 ALTER 004720 41001100 : 41001XXX
 RESOLVES '(O) CHANGE MAX VTAM() LINES'
/*
/&
 
// JOB BF53196
/*
/* THIS OPTIONAL PATCH PREVENTS USERS FROM LOOKING BACK BEYOND
/* THE DEFINED BIM-FAQS/ASO HARDCOPY FILE CACHE.  THREE EXCEPTIONS
/* TO THIS ARE THE DATE/TIME PARAMETERS AND THE S=IPL SPECIAL
/* PARAMETER WHICH WILL STILL ACCESS THE HARDCOPY FILE.
/*
/*
// EXEC MSHP,SIZE=900K
 CORRECT 2885-BF2-00-53A : BF53196
 REQUIRES PRE=BF53120
 AFFECTS PHASE=FAQXCONS
 ALTER 00579A 4700 : 47F0
 RESOLVES '(O) RESTRICT HC FILE ACCESS'
/*
/&
// JOB BF53197
/*
/* THIS OPTIONAL PATCH ENABLES DISPLAY OF MESSAGE GFF398I WHICH
/* PROVIDES A MESSAGE FOR EACH SYSOUT ARCHIVAL MEMBER CREATED THAT
/* CONTAINS THE CREATED MEMBER NAME IN DISPLAY HEX FORMAT AND THE
/* NAME OF THE JOB IT WAS CREATED FOR.
/*
/*
// EXEC MSHP,SIZE=900K
 CORRECT 2885-BF2-00-53A : BF53197
 AFFECTS PHASE=GSJOBCTL
 ALTER 00000F8C 07F5 : 0705
 RESOLVES '(O) SUPPORT FOR GFF398I'
/*
/&
// JOB BF53198
/*
/* THIS OPTIONAL PATCH ESTABLISHES A NON-ZERO RETURN CODE FOR
/* JOBS THAT ARE CANCELLED OR OTHERWISE ABEND BUT THE MAXRC
/* REMAINED AT ZERO.  This patch will set the MAXRC value for
/* SYSOUT archival purposes to be 16 (x'10').  If you want to
/* set a different return code, change the F0F0F1F6 to another
/* value.  For example to set the return code to 1024, you would
/* change F0F0F1F6 to F1F0F2F4.
/*
/*
// EXEC MSHP,SIZE=900K
 CORRECT 2885-BF2-00-53A : BF53198
 AFFECTS PHASE=GSJOBCTL
 ALTER 00003890 F0F0F0F0 : F0F0F1F6
 ALTER 00003AA6 47F0     : 4700
 RESOLVES '(O) SET RC ON CANCEL IF MRC=0'
/*
/&
// JOB BF53199
/*
/* OPTIONAL PATCH TO STOP ID SUPPRESSION FOR POWER RDR QUEUE
/* MEMBERS.
/*
/*
// EXEC MSHP,SIZE=900K
 CORRECT 2885-BF2-00-53A : BF53199
 AFFECTS PHASE=FAQSPW67
 ALTER 00621C 0775 : 07F5
 AFFECTS PHASE=FAQSPW64
 ALTER 00621C 0775 : 07F5
 AFFECTS PHASE=FAQSPWR6
 ALTER 006084 0775 : 07F5
 RESOLVES '(O) STOP ID SUPPRESS'
/*
/&
 
 
 
********************************************************************************
 
 
Obsolete optional patches
-------- -------- -------
 
 
// JOB BF19082
/*
/* THIS OPTIONAL PATCH ALLOWS THE COLOR OF D S,X STATUS SCREENS TO
/* BE CHANGED BASED ON CPUID OR MACHINE NAME.
/*
/*   This patch has been replaced by the STATS (S=x/y) parameter during
/*   FAQSMAIN start up.  The new parameter is (S)TATS=clr/atr, where
/*   clr is the one of the colors (RED,GRE,BLU,TUR,WHI,YEL,or PIN) and
/*   atr is UND, REV, BLI, or NOR ...  For example, to change the status
/*   area to green and reverse you would add the following parameter to
/*   FAQSMAIN start up:
/*
/*     S=GRE/REV
/*
/&
// JOB  BF19083
/* CATALOG BF019083.fix TO the VIO PDS
/*
/* This optional patch allows you to change the port number used by
/* the BIM-FAQS/ASO HTML interface to agree with the defined port
/* number for your HTTP Daemon.  This patch is only necessary if that
/* port number is not the default value of 80.
/*
/*   This patch is no longer necessary because you can now enter the
/*   port number in the HTML document instead of this IMOD.  Please
/*   see the cover letter and/or the sample TXT documents named
/*   FAQScgic and FAQScgip for more information..
/*
/&