//***  PLEASE READ BEFORE USING THE HOLDDATA FIX EXEC!!!!!  ***         00000010
//*  You can use the following JCL to run the REXX exec which will      00000100
//*  fix HOLD errors in your SMP/E CSI.  First you will need to have    00000200
//*  1. You will need to have this exec in your SYSPROC or SYSEXEC      00000210
//*     libraries.  It should be named FIXHPRFX (if you change the      00000300
//*     name, change it on the SYSTSIN card below).                     00000400
//*  2. You will also need the APAR prefix table.  It should be in a    00000600
//*     data set named hlq.APARPRFX.TABLE (you specify hlq).            00000700
//*  3. Run LIST HOLDDATA HOLDERROR to get a list of your HOLDERROR     00000800
//*     statements from your SMP/E CSI global zone.  This output should 00000900
//*     be named hlq.HOLD.LIST (use the same hlq as before).            00000910
//*  4. To run this JCL, place a jobcard at the top, fill in the        00000920
//*     data set names for the SYSEXEC and SYSPROC, and for the ISPF    00000930
//*     libraries.  Replace hlq with the high level qualifier that      00000940
//*     you are using.                                                  00000950
//*  5. Submit the JCL.                                                 00000960
//*  6. The new good HOLDDATA output will be in hlq.HOLDDATA.FIX.       00000970
//*  ALTERNATIVE:  Do 1 through 3, then run FIXHPRFX under TSO like     00000980
//*     this:  TSO FIXHPRFX hlq                                         00000990
//*-------------------------------------------------------------------- 00000991
//JOBCARD  JOB ...                                                      00001000
//*                                                                     00003000
//FIXPRE   EXEC PGM=IKJEFT01,DYNAMNBR=50,TIME=1439                      00010000
//*------------------------------------------------------------------   00010010
//**** SYSEXEC or SYSPROC where REXX exec is stored ****                00010100
//*------------------------------------------------------------------   00010200
//SYSEXEC  DD   DISP=SHR,DSN=                                           00020000
//SYSPROC  DD   DISP=SHR,DSN=                                           00030000
//*------------------------------------------------------------------   00030010
//* ISPF Libraries go below ****                                        00030100
//*------------------------------------------------------------------   00030200
//ISPPLIB  DD   DISP=SHR,DSN=                                           00070000
//ISPMLIB  DD   DISP=SHR,DSN=                                           00080000
//ISPTLIB  DD   DISP=SHR,DSN=                                           00090000
//ISPSLIB  DD   DISP=SHR,DSN=                                           00100000
//ISPPROF  DD   UNIT=VIO,SPACE=(CYL,(1,1,1)),                           00110000
//         DCB=(RECFM=FB,LRECL=80,BLKSIZE=8000)                         00120000
//SYSTSPRT DD   SYSOUT=*                                                00130000
//*------------------------------------------------------------------   00130010
//* hlq is  the high level qualifier you are using for LIST HOLDDATA    00130100
//* HOLDERROR output which is the input to this, and for the APAR       00130200
//* prefix table given to you.                                          00130300
//*------------------------------------------------------------------   00130400
//SYSTSIN  DD   *                                                       00140000
 ISPSTART CMD(%FIXHPRFX hlq)                                            00150003
/*                                                                      00160000