*** 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 BF17736
/*
/* 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-52C : BF17736
   AFFECT PHASE=FAQSMAIN
   ALTER 0095DC 00:XX
   RESOLVES '(O) CHANGE D S,W DISPLAY'
/*
/&
// JOB BF17825
// EXEC MSHP,SIZE=900K
   CORRECT 2885-BF2-00-52C:BF17825
   AFFECTS PHASE=FAQSMAIN
   ALTER   2413 40404040404040   : 8A8B8C8D8E8F90
   ALTER   2423 4040404040404040 : 9A9B9C9D9E9FA9A1
   ALTER   2433 404040404040     : AAABACADAEAF
   ALTER   2443 404040404040     : BABBBCBDBEBF
   AFFECTS PHASE=FAQXCONS
   ALTER   723A 40404040404040   : 8A8B8C8D8E8F90
   ALTER   724A 4040404040404040 : 9A9B9C9D9E9FA9A1
   ALTER   725A 404040404040     : AAABACADAEAF
   ALTER   726A 404040404040     : BABBBCBDBEBF
   RESOLVES '(O) SUPPORT ALL KATAKANA CHARS'
/*
/&
// JOB BF17904
/*
/* 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-52C : BF17904
   AFFECT PHASE=FAQXCONS
   ALTER 0021B0 94FFA8B5 : 92FxA8B5
   RESOLVES '(O) CHANGE REDISPLAY COLOR'
/*
/&
// JOB BF17945
/*
/* 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-52C : BF17945
   AFFECT PHASE=GSFAQS
   ALTER 009BDE 4700 : 47F0
   RESOLVES '(O) USE POWER JOBNAME FOR MID'
/*
/&
// JOB BF17991
/*
/* 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.
/*
// EXEC MSHP,SIZE=900K
   CORRECT 2885-BF2-00-52C : BF17991
   AFFECT PHASE=FAQSPWR6
   ALTER 000082 0800 : xxxx
   AFFECT PHASE=FAQSPW64
   ALTER 000082 0800 : xxxx
   AFFECT PHASE=FAQSPW67
   ALTER 000082 0800 : xxxx
   RESOLVES '(O) CORRECT GFP002E RC=05'
/*
/&
// JOB BF18197
/* 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-52C : BF18197
   AFFECT PHASE=GSJOBCTL
   ALTER 11D8 41100008 : 41100064
   ALTER 1350 41000130 : 41000E20
   ALTER 1374 41100008 : 41100064
   RESOLVES '(O) EOJ SUM RPT MAX STEPS=100'
/*
/&
// JOB BF18247
/* 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-52C : BF18247
   AFFECT PHASE=FAQSPWR6
   ALTER 471E 47E0 : 4700
   AFFECT PHASE=FAQSPW64
   ALTER 48B6 47E0 : 4700
   AFFECT PHASE=FAQSPW67
   ALTER 48B6 47E0 : 4700
   RESOLVES '(O) REMOVE TRANSFER EDIT SCTY'
/*
/&                                         	
// JOB BF18335
/* 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-52C : BF18335
   AFFECT PHASE=FAQSMAIN
   ALTER 4E68 0785 : 0705
   RESOLVES '(O) CHECK CMS ID FOR VSE'
/*
/&
// JOB BF18408
// EXEC MSHP,SIZE=900K
   CORRECT 2885-BF2-00-52C : BF18408
   AFFECT PHASE=GSJOBCTL
   ALTER 10A4 96809DAC : 47F090FC
   RESOLVES '(O) DISABLE CQON/CQOFF'
/*
/&
// JOB BF18593
/*
/*
/* This patch is provided, but no longer needed since the MAX command
/* is now available.  See cover letter 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-52C : BF18593
   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 BF18680
/*
/* THIS PATCH SUPPRESSES THE ACTION/OPTION PW LINES
/* FROM THE BIM-FAQS/ASO POWER MEMBER DISPLAY.
/*
/*
// EXEC MSHP,SIZE=900K
 CORRECT 2885-BF2-00-52C : BF18680
 AFFECT PHASE=FAQSPWR6
 ALTER 00602C  4700 : 4780
 AFFECT PHASE=FAQSPW64
 ALTER 0061C4  4700 : 4780
 AFFECT PHASE=FAQSPW67
 ALTER 0061C4  4700 : 4780
 RESOLVES '(O) SUPPRESS ACTION/OPTION PW='
/*
/&
// JOB  BF18698
/* CATALOG BF018698.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.2C'
/*	/*
/*
/* 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=BF018698.fix
MEM=FAQMENP1.SDF PDS=VIO REL=V5.2C TYP=OPT
E2C3C1D540C1D9C77E508697F19189847EF0FF
D9C5D740F1FF
40404040508697F19189847EF140404040404040404040404040404040404040404061
5C40A285A340A39640F1408986409697A389969581937A40C2C6F1F8F6F9F84040405C
61FF
615BFF
./ END
/*
/&
// JOB BF18742
/*
/* 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-52C : BF18742
 AFFECT PHASE=GSFTL
 ALTER 0007A4  89F0000A : 89F0000B
 RESOLVES '(O) DOUBLE FBUF= SIZE IN GSFTL'
/*
/&
// JOB  BF18759
/* CATALOG BF018759.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.2C'
/*	/*
/*
/* 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=BF018759.fix
MEM=FAQMENP1.SDF PDS=VIO REL=V5.2C TYP=OPT
E2C3C1D540C1D9C77E508697F1A396877EF1FF
D9C5D740F1FF
40404040508697F1A396877EF040404040404040404040615C40F17EC3D4C46B40F07E
C3C8C74081A24084858681A493A340405C61FF
615BFF
./ END
/*
/&
// JOB  BF18779
/* CATALOG BF018779.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.2C'
/*	/*
/*
/* 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=BF018779.fix
MEM=FAQMENP1.SDF PDS=VIO REL=V5.2C TYP=OPT
E2C3C1D540C1D9C77E898640837E7E7DD37D40504050C1C9C47E7E7DC17D40A3888595
408496FF
D9C5D740F1FF
4040404040404040898640837E7E7DD37D40A3888595408496FF
615BFF
./ END
/*
/&
// JOB  BF18805
/* CATALOG BF018805.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.2C'
/*	/*
/*
/* 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=BF018805.fix
MEM=FAQMENP1.SDF PDS=VIO REL=V5.2C TYP=OPT
E2C3C1D540C1D9C77E508697F1A489957EF0FF
D9C5D740F1FF
40404040508697F1A489957EF140404040404040404040404040404040404040404061
5C40A285A340A39640F1408696994086A4939340A4A28599408995869640404040405C
61FF
615BFF
./ END
/*
/&
// 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..
/*
/&
// JOB BF19098
/*
/* 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-52C : BF19098
 AFFECT PHASE=GSFAQSHC
 ALTER 00133A 4700             : 4780
 ALTER 001344 4700             : 4770
 ALTER 001348 4700             : 47F0
 RESOLVES '(O) INDEX BY POWER JOBNAME'
/*
/&
// JOB  BF19162
/* CATALOG BF019162.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.2C'
/*	/*
/*
/* 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=BF019162.fix
MEM=FAOMENUS.SDF PDS=VIO REL=V5.2C TYP=OPT
E2C3C1D540C1D9C77E5DD3D360F140E0D37EC4859385A38540C27EC29996A6A28540D7
7ED7998995A34040404AFF
D9C5D740F1FF
5DD3D360F140E0C27EC29996A6A28540D77ED7998995A34040404AFF
615BFF
E2C3C1D540C1D9C77E898640835F7E7DD37D405040835F7E7DC27D405040835F7E7DD7
7D40A3888595FF
D9C5D740F1FF
404040404040898640835F7E7DC27D405040835F7E7DD77D40A3888595FF
615BFF
./ END
/*
/&
// JOB BF19172
/*
/* 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-52C : BF19172
 AFFECT PHASE=GSJOBCTL
 ALTER 0039AE 47F0 : 4700
 RESOLVES '(O) POWER JOB NAME FOR SYSOUT'
/*
/&
// JOB BF19221
/*
/* 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-52C : BF19221
 AFFECT PHASE=FAQSPWR6
 ALTER 00609C 4710A208 : 07150700
 AFFECT PHASE=FAQSPW64
 ALTER 006234 4710A208 : 07150700
 AFFECT PHASE=FAQSPW67
 ALTER 006234 4710A208 : 07150700
 RESOLVES '(O) ALLOW ID CARD EDIT'
/*
/&
// JOB BF19436
/*
/* 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-52C : BF19436
 AFFECTS PHASE=FAQSVSPO
 ALTER 000040 00000100 : 00000XXX
 AFFECTS PHASE=FAOXSFN
 ALTER 004680 41001100 : 41001XXX
 RESOLVES '(O) CHANGE MAX VTAM() LINES'
/*
/&
// JOB  BF19437
/* CATALOG BF019437.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.2C'
/*	/*
/*
/* 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=BF019437.fix
MEM=FAQMENP1.SDF PDS=VIO REL=V5.2C TYP=OPT
E2C3C1D540C1D9C77E508697F18294857EF0FF
D9C5D740F1FF
40404040508697F18294857EF140404040404040404040404040404040404040404061
5C40A285A340A39640F1408986409697A389969581937A40C2C6F1F9F4F3F74040405C
61FF
615BFF
./ END
/*
/&
// JOB  BF19480
/* CATALOG BF019480.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.2C'
/*	/*
/*
/* 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=BF019480.fix
MEM=FAQMENP2.SDF PDS=VIO REL=V5.2C TYP=OPT
40E2C3C1D540C1D9C77E508697F2818193937EF0FF
D9C5D740F1FF
40508697F2818193937EF2404040404040404040404040404040404040404040404061
5C40A285A340A39640F2408986409697A389969581937A40C2C6F1F9F4F8F04040405C
61FF
615BFF
./ END
/*
/&
// JOB  BF19484
/* CATALOG BF019484.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.2C'
/*	/*
/*
/* 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=BF019484.fix
MEM=FAQMENP1.SDF PDS=VIO REL=V5.2C TYP=OPT
40E2C3C1D540C1D9C77E508697F184A3877EF0FF
D9C5D740F1FF
40404040508697F184A3877EF240404040404040404040404040404040404040404061
5C40A285A340A39640F2408986409697A389969581937A40C2C6F1F9F4F8F44040405C
61FF
615BFF
./ END
/*
/&
// JOB  BF19486
/* CATALOG BF019486.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.2C'
/*	/*
/*
/* 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=BF019486.fix
MEM=FAQMENP1.SDF PDS=VIO REL=V5.2C TYP=OPT
E2C3C1D540C1D9C77E508697F19481A77EF0FF
D9C5D740F1FF
40508697F19481A77EF140404040404040404040404040404040404040404040404061
5C40A285A340A39640F1408986409697A389969581937A40C2C6F1F9F4F8F64040405C
61FF
615BFF
./ END
/*
/&
// JOB BF19511
/*
/* 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-52C : BF19511
 AFFECTS PHASE=FAQXCONS
 ALTER 00579A 4700 : 47F0
 RESOLVES '(O) RESTRICT HC FILE ACCESS'
/*
/&
// JOB BF19704
/*
/* 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-52C : BF19704
 AFFECTS PHASE=GSJOBCTL
 ALTER 00000F94 07F5 : 0705
 RESOLVES '(O) SUPPORT FOR GFF398I'
/*
/&
// JOB BF19800
/*
/* 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-52C : BF19800
 AFFECTS PHASE=GSJOBCTL
 ALTER 00003890 F0F0F0F0 : F0F0F1F6
 ALTER 00003AA6 47F08268 : 47008268
 RESOLVES '(O) SET RC ON CANCEL IF MRC=0'
/*
/&
// JOB BF52380
/*
/* OPTIONAL PATCH TO STOP ID SUPPRESSION FOR POWER RDR QUEUE
/* MEMBERS.
/*
/*
// EXEC MSHP,SIZE=900K
 CORRECT 2885-BF2-00-52C : BF52380
 AFFECTS PHASE=FAQSPW67
 ALTER 00619C 0775 : 07F5
 AFFECTS PHASE=FAQSPW64
 ALTER 00619C 0775 : 07F5
 AFFECTS PHASE=FAQSPWR6
 ALTER 006004 0775 : 07F5
 RESOLVES '(O) STOP ID SUPPRESS'
/*
/&
// JOB  BF52381
/* CATALOG BF052381.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.2C'
/*	/*
/*
/* 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=BF052381.fix
MEM=FAQMENP1.SDF PDS=VIO REL=V5.2C TYP=OPT
E2C3C1D540C1D9C77E508697F184A3947EF3FF
D9C5D740F1FF
40404040508697F197A2A4977EF1404040404040404040404040404040404040404061
5C40A285A340A39640F1408986409697A389969581937A40C2C6F5F2F3F8F14040405C
61FF
40404040508697F184A3947EF3FF
615BFF
E2C3C1D540C1D9C77E898640508697F184A29740A3888595408496FF
D9C5D740F1FF
40898640508697F184A297405040508697F197A2A4977EF040A3888595408496FF
615BFF
E2C3C1D540C1D9C77E898640837E7E7DD77D40A3888595408496FF
E2C3C1D540C1D9C77E97998693877EF1FF
D9C5D740F1FF
4040404040404040404040898640508697F197A2A4977EF040A3888595409799869387
7EF1FF
615BFF
E2C3C1D540C1D9C77E8697F184999697977AFF
E2C3C1D540C1D9C77E9985A3A49995FF
D9C5D740F1FF
408499969740508697F197A2A497FF
9985A3A49995FF
615BFF
E2C3C1D540C1D9C77E5DC1C9C4FF
E2C3C1D540C1D9C77E89864097869387A24BF140A388859540508697F1848394847E50
8697F184839484404F4F7DD77ED7998995A340A39640C2C9D460C3D7D9407DFF
D9C5D740F1FF
40404040898640508697F197A2A4977EF040A3888595FF
4040404040404089864097869387A24BF140A388859540508697F1848394847E508697
F184839484404F4F7DD77ED7998995A340A39640C2C9D460C3D7D9407DFF
615BFF
E2C3C1D540C1D9C77E898640837E7E7DD77D40A3888595408496FF
E2C3C1D540C1D9C77E97998693877EF1FF
D9C5D740F1FF
4040404040898640508697F197A2A4977EF040A38885954097998693877EF1FF
615BFF
./ END
/*
/&