SCRIPT/VS 4.0.0: DEVICE 1403N6 CHARS MONO $    ZDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD?  | |  | |  | |  | PROGRAM DIRECTORY |  | |  | |  | FOR USE WITH |  | |  | |  | RELEASE 01, MODIFICATION LEVEL 01 |  | |  | of |  | |  | PROGRAM 5688-021 |  | |  | |  | BAR CODE/OPTICAL CHARACTER RECOGNITION |  | |  | |  | MVS, VM, VSE FONT BOUNDED BOX FORMAT |  | |  | |  | Basic Material Features 5850, 5851, 5852 |  | |  | |  | (C) COPYRIGHT IBM CORPORATION 1988, 1990 |  | ALL RIGHTS RESERVED |  | |  | US GOVERNMENT USERS RESTRICTED RIGHTS |  | - USE, DUPLICATION OR DISCLOSURE |  | RESTRICTED BY GSA ADP SCHEDULE |  | CONTRACT WITH IBM CORPORATION |  | |  | LICENSED MATERIALS - PROPERTY OF IBM (5688-021 FONTS) |  | |  | |  | |  | |  | |  | This directory contains information concerning the material |  | and procedures associated with the installation of this |  | product. It should be reviewed in its entirety prior to |  | the installation of this product and retained for future |  | reference. |  | |  | |  @DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDY $    PREFACE  _______   The Bar Code/Optical Character Recognition product is one of  several font licensed programs offered by IBM. These licensed  programs provide fonts digitized for use on 240 dots-per-inch  non-impact printers supported by Advanced Function Printing  (AFP) software. Associated software support is required.  Refer to the Licensed Program Specifications (LPS) for  programming requirements.  The Bar Code/Optical Character Recognition licensed program  (5688-021) provides bar code families in 0.5 and 1 inch heights  formatted for use with the IBM-supplied subroutine or its  equivalent. The licensed program also provides size I OCR-A  and OCR-B character sets defined by ISO (the International  Organization for Standardization) International Standards  1073-I and 1073-II respectively.  Each feature number has two tapes: a font tape and a bar code  subroutine tape. This basic material font directory provides  information and installation instructions for the font tape  that is part of basic material feature numbers 5850, 5851, and  5852. There is a separate directory for the bar code  subroutine tape that is also part of the basic material feature  numbers 5850, 5851, and 5852. In addition, there are separate  directories for fonts and the bar code subroutine that are part  of the optional material feature numbers 5860, 5861, and 5862.  This release of the Bar Code/Optical Character Recognition  program provides bounded box format compatible with three  operating system environments: MVS, VM, and VSE.  The first section of the basic material font tape contains  bounded box format for an MVS environment and is installed  using System Modification Program Extended (SMP/E) or IEBCOPY.  The second section contains bounded box format for a VM  environment, and is installed using a combination of VMFPLC2  and an installation EXEC. The third section contains bounded  box format for a DOS/VSE environment suitable for installation  with Maintain System History Program (MSHP).  NOTE: Font format terminology is being updated to remove  ambiguities. The former "object format" is now called "bounded  box format". Bounded box format is used as input to PSF in all  operating environments for printing on printers like the 3825  and 3827. Bounded box format is also converted to unbounded   Preface i $    box format by PSF/VM for printing on printers like the 3800-3  and 3800-6.  In this program directory, any reference made to IBM licensed  programs is not intended to state or imply that only IBM's  licensed programs may be used; any functionally equivalent  program may be used instead.  Fonts contain no programming interfaces intended for use by  customers. This publication documents no programming interface  for use by customers in writing programs that request fonts.               Preface ii $    TABLE OF CONTENTS  _________________   PROGRAM DOCUMENTATION . . . . . . . . . . . . . . . . . . . 1  Program Contents . . . . . . . . . . . . . . . . . . . . . 1  Copyright Notice . . . . . . . . . . . . . . . . . . . . . 1  Basic Documentation . . . . . . . . . . . . . . . . . . . . 1  Reference and General Documentation . . . . . . . . . . . . 2  PROGRAM SUPPORT . . . . . . . . . . . . . . . . . . . . . . 4  Service Classification . . . . . . . . . . . . . . . . . . 4  Font Services . . . . . . . . . . . . . . . . . . . . . . . 4  Support Procedures . . . . . . . . . . . . . . . . . . . . 4  MACHINE READABLE BASIC MATERIAL . . . . . . . . . . . . . . 6  Basic Material Tape Format . . . . . . . . . . . . . . . . 7  PRE-INSTALLATION INFORMATION . . . . . . . . . . . . . . . 8  Direct Access Storage . . . . . . . . . . . . . . . . . . . 8  MVS Storage Requirements . . . . . . . . . . . . . . . . 8  VM Storage Requirements . . . . . . . . . . . . . . . . . 10  VSE Storage Requirements . . . . . . . . . . . . . . . . 11  Installation Programming Requirements . . . . . . . . . . . 11  SMP Procedures and Datasets . . . . . . . . . . . . . . . . 12  Unload Sample SMP/E JCL . . . . . . . . . . . . . . . . . . 13  INSTALLATION PROCEDURE - MVS ENVIRONMENT . . . . . . . . . 15  Instructions for Pre-Installation Planning . . . . . . . . 15  Installation Examples using IEBCOPY . . . . . . . . . . . . 16  Installation Example using SMP/E . . . . . . . . . . . . . 16  INSTALLATION PROCEDURE - VM ENVIRONMENT . . . . . . . . . . 20  Instructions for Pre-Installation Planning . . . . . . . . 20  Using the Installation Exec . . . . . . . . . . . . . . . . 20  INSTALLATION PROCEDURE - VSE ENVIRONMENT . . . . . . . . . 24  Instructions for Pre-Installation Planning . . . . . . . . 24  Explanation of Symbols Used in Examples . . . . . . . . . . 24  Installation Example (VSE/AF Version 2, Release 1) . . . . 25  CUSTOMER RESPONSIBILITY . . . . . . . . . . . . . . . . . . 27  APPENDIX A. MVS SMP/E INSTALL LOGIC . . . . . . . . . . . . 28  APPENDIX B. VM BOUNDED BOX FORMAT FILES . . . . . . . . . . 29  APPENDIX C. VSE BOUNDED BOX FORMAT PHASES . . . . . . . . . 30   Table of Contents iii $    APPENDIX D. SUMMARY OF CHANGES . . . . . . . . . . . . . . 31  READER'S COMMENT FORM . . . . . . . . . . . . . . . . . . . 33  END OF DOCUMENT . . . . . . . . . . . . . . . . . . . . . . 35                 Table of Contents iv $    LIST OF ILLUSTRATIONS  _____________________   Figure 1. Service Information . . . . . . . . . . . . . . 5  Figure 2. Basic Material Media . . . . . . . . . . . . . . 6  Figure 3. Basic Material Media Format . . . . . . . . . . 7  Figure 4. MVS Bounded Box Format Storage Requirements . . 9  Figure 5. VM Bounded Box Format Storage Requirements . . . 10  Figure 6. VSE Bounded Box Format Storage Requirements . . 11  Figure 7. Required DD name for APPLY and APPLY CHECK. . . 12  Figure 8. Required DD name for ACCEPT and ACCEPT CHECK. 13  Figure 9. SMP/E global zone OPTIONS entry . . . . . . . . 13  Figure 10. Sample JCL to Unload Sample SMP/E JCL from Tape 14  Figure 11. SMP/E JCL members . . . . . . . . . . . . . . . 14  Figure 12. Sample JCL to Load New Data Set . . . . . . . . 16  Figure 13. Sample JCL to Merge into Existing Data Set . . . 16  Figure 14. Sample SMP/E RECEIVE JCL (Sample member FONTREC) 17  Figure 15. Sample SMP/E APPLY CHECK Procedure (Sample member  FONTAPK) . . . . . . . . . . . . . . . . . . . . 17  Figure 16. Sample SMP/E APPLY Procedure (Sample member  FONTAPP) . . . . . . . . . . . . . . . . . . . . 18  Figure 17. Sample SMP/E ACCEPT CHECK Procedure (Sample  member FONTACK) . . . . . . . . . . . . . . . . 18  Figure 18. Sample SMP/E ACCEPT Procedure (Sample member  FONTACC) . . . . . . . . . . . . . . . . . . . . 19  Figure 19. VSE - Sample Creation of a New Library . . . . . 25  Figure 20. VSE - Sample Installation into an Existing  Library . . . . . . . . . . . . . . . . . . . . 25         List of Illustrations v $    PROGRAM DOCUMENTATION  _____________________   PROGRAM CONTENTS  ________________   You have received the bounded box format fonts of the Bar  Code/Optical Character Recognition licensed program.  Bar Code/Optical Character Recognition is one of a number of  font licensed programs offered by IBM.   COPYRIGHT NOTICE  ________________   Refer to Copyright Instructions Form Number G120-2083 for  maintaining the IBM copyright when modifying fonts.   BASIC DOCUMENTATION  ___________________   The following publications are distributed with the basic  material. For additional copies, contact your IBM  representative.  y Licensed Program Specifications, G544-3141.  _______________________________  y Bar Code Fonts User's Guide, S544-3190.  ____________________________        Program Documentation 1 $    REFERENCE AND GENERAL DOCUMENTATION  ___________________________________   The following publications are not shipped with this package  but are related to the installation of this product. You can  order publications by contacting your IBM representative.  y OS/VS2 MVS Utilities, GC26-3902.  ____________________  y MVS/XA Utilities, GC26-4018.  ________________  y MVS/370 JCL User's Guide, GC28-1349.  ________________________  y MVS/370 JCL Reference, GC28-1350.  _____________________  y MVS/XA JCL User's Guide, GC28-1351.  _______________________  y MVS/XA JCL Reference, GC28-1352.  ____________________  y MVS/ESA JCL Reference, GC28-1829.  _____________________  y MVS/ESA JCL User's Guide, GC28-1830.  ________________________  y System Modification Program Extended (SMP/E) User's Guide,  _________________________________________________________  SC28-1302.  y System Modification Program Extended (SMP/E) Reference,  ______________________________________________________  SC28-1107.  y IBM VM/SP: CP Command Reference for General Users,  __________________________________________________  SC19-6211  y IBM VM/SP: CMS Command and Macro Reference, SC19-6209.  ___________________________________________  y VSE/Advanced Functions Maintain System History Program  ______________________________________________________  Reference, SC33-6199 for Version 2, Release 1.  _________  The following publications are not shipped with this package  but are related to the execution of this product. You can  order publications by contacting your IBM representative.  y About Type: IBM's Guide for Type Users, S544-3122.  ______________________________________  y About Type: IBM's Guide for Using Print Management Facility  ___________________________________________________________  with Type, S544-3648.  _________  y About Type: IBM's Technical Reference for 240-pel Digitized  ___________________________________________________________  Type, S544-3516.  ____   Program Documentation 2 $    y About Type: IBM's Samples of 240-pel Digitized Fonts,  ____________________________________________________  G544-3644.  y IBM's Advanced Function Printing Software: General  __________________________________________________  Information, G544-3415.  ___________  y IBM's Advanced Function Printing: Data Stream Reference,  _______________________________________________________  S544-3202.  y IBM's Advanced Function Printing: Host Font Data Stream  ________________________________________________________  Reference, S544-3289.  _________               Program Documentation 3 $    PROGRAM SUPPORT  _______________   SERVICE CLASSIFICATION  ______________________   This program is classified as a Licensed Program (LP).   FONT SERVICES  _____________   Contact your IBM Marketing representative or Operations Systems  Engineer (OPSE) for specific information about available  program services.   SUPPORT PROCEDURES  __________________   Report any difficulties you have using this product to your IBM  Support Center. If an APAR is required, submit the data to the  location identified in the Programming System General  Information Manual (PSGIM), G229-2228, as being responsible for  the failing component. Figure 1 on page 5 identifies the Field  Engineering Service Number (FESN) and related information for  the Bar Code/Optical Character Recognition.  ZDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD?  | ENVIRONMENT/ |  | FORMAT FMID/CLC COMPONENT ID FESN |  ZDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD?  | |  | |  | MVS |  | Bounded Box HJH1200 568802101 8502101 |  | |  | VM |  | Bounded Box -- 568802101 8402101 |  | |  | VSE |  | Bounded Box B20 568802101 8602101 |  | |  | |  | Figure 1. Service Information |  @DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDY   Program Support 4 $                     Program Support 5 $    MACHINE READABLE BASIC MATERIAL  _______________________________   The distribution medium for Bar Code/Optical Character  Recognition is standard-labeled tapes or cartridges.  A bar code subroutine tape BARSUB.BASE is also distributed with  the basic material and is provided with a separate program  directory, which provides the necessary details when installing  the bar code subroutine.  The feature numbers of the tapes and cartridges for Bar  Code/Optical Character Recognition are as follows:  ZDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD?  | Feature External Description Volume Track/ |  | Number Tape Label Serial Density |  ZDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD?  | |  | |  | 5850 BAROCR.FONTS.BASE (fonts) JH1200 9/1600 |  | BARSUB.BASE (subroutine) JH1270 |  | |  | 5851 BAROCR.FONTS.BASE (fonts) JH1200 9/6250 |  | BARSUB.BASE (subroutine) JH1270 |  | |  | 5852 BAROCR.FONTS.BASE (fonts) JH1200 3480 |  | BARSUB.BASE (subroutine) JH1270 Cartridge |  | |  | Figure 2. Basic Material Media |  @DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDY        Machine Readable Basic Material 6 $    BASIC MATERIAL TAPE FORMAT  __________________________   ZDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD?  | Physical |  | Environ- Tape File File |  | ment File Content Description |  ZDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD?  | |  | |  | MVS 1 LABEL, HDR1, HDR2 |  | 2 SMPMCS SMP Control Statements |  | 3 EOF1, EOF2 |  | 4 HDR1, HDR2 |  | 5 HJH1200.F1 Bounded Box Format |  | (IEBCOPY Unloaded) |  | 6 EOF1, EOF2 |  | 7 HDR1, HDR2 |  | 8 SAMPJCL Sample SMP/E JCL |  | (IEBCOPY Unloaded) |  | 9 EOF1, EOF2 |  | 10 NULL End of MVS |  | |  | VM 11 I5688021 011103F Product Info. File |  | I5688021 EXEC Installation Exec |  | 12 I5688021 MEMO Memo File |  | 13 VM Fonts Bounded Box Format |  | (Filetype FONT3820) |  | ICHK021 EXEC Installation |  | Verification Exec |  | 14 Null End of VM |  | |  | VSE 15 Null |  | 16 History File |  | 17 VSE Fonts Bounded Box Format |  | (V2 DATA) |  | 18 Null |  | 19 EOB |  | 20 Null End of VSE |  | |  | Figure 3. Basic Material Media Format |  @DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDY     Machine Readable Basic Material 7 $    PRE-INSTALLATION INFORMATION  ____________________________   If Bar Code/Optical Character Recognition has been  previously installed, following the instructions in this  directory will replace equivalent members previously  installed. If you have modified one or more of those  members, then you may want to copy the modified members into  a temporary data set before installing Bar Code/Optical  Character Recognition.   DIRECT ACCESS STORAGE  _____________________   There must be sufficient direct access storage for the Bar  Code/Optical Character Recognition licensed program.  Refer to the bar code subroutine program directory for  subroutine direct access storage requirements.   MVS Storage Requirements  ________________________   The MVS storage requirements of the partitioned data set for  the bounded box format follow. The data set is named on the  OUT DD statements in "Installation Examples using IEBCOPY"  on page 16 and the FONTLIBB and AFNTLIBB DD statements in  "Installation Example using SMP/E" on page 16.        Pre-Installation Information 8 $    ZDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD?  | MVS BOUNDED BOX ALLOCATIONS |  ZDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD?  | |  | ORGANIZATION PO |  | RECFM VBM |  | LRECL 8205 |  | BLOCK SIZE 8209 |  | DIRECTORY ALLOCATION 1 Blocks |  | KBYTES OF DATA 232 KBYTES |  ZDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD?  | |  | |  | STORAGE ALLOCATION |  | 3380 3375 3350 3340 3330 |  ZDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD?  | |  | |  | 1 1 1 2 1 Cylinders|  | |  | 3 4 8 18 11 Tracks |  | |  | |  | Figure 4. MVS Bounded Box Format Storage Requirements |  @DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDY           Pre-Installation Information 9 $    VM Storage Requirements  _______________________   The VM storage requirements of the disk for the bounded box  format follow.  ZDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD?  | VM BOUNDED BOX ALLOCATIONS |  ZDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD?  | |  | BLOCKING FACTOR 1024 Bytes |  | KBYTES OF DATA 232 KBYTES |  ZDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD?  | |  | STORAGE ALLOCATION |  | |  | 3380 3375 3350 3340 3330 FBA |  ZDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD?  | |  | |  | 1 1 1 3 1 - Cylinders|  | |  | 5 7 13 29 19 - Tracks |  | |  | 464 Blocks |  | |  | |  | Figure 5. VM Bounded Box Format Storage Requirements |  @DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDY          Pre-Installation Information 10 $    VSE Storage Requirements  ________________________   The VSE storage requirements of the private library for the  bounded box format follow.  ZDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD?  | VSE BOUNDED BOX ALLOCATIONS |  ZDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD?  | |  | DATA FORMAT V2 |  | KBYTES OF DATA 232 KBYTES |  ZDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD?  | |  | STORAGE ALLOCATION |  | |  | 3380 3375 3350 3340 3330 FBA |  ZDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD?  | |  | |  | 1 1 1 1 1 - Cylinders|  | |  | 3 3 5 11 7 - Tracks |  | |  | 144 Blocks |  | |  | |  | Figure 6. VSE Bounded Box Format Storage Requirements |  @DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDY  y .   INSTALLATION PROGRAMMING REQUIREMENTS  _____________________________________   For the MVS operating environment, one of the following  programs is a prerequisite:  y Multiple Virtual Storage/370 System Product (MVS/370 SP)  Version 1, Release 3, Modification Level 0 or later,  Multiple Virtual Storage/Extended Architecture System  Product (MVS/XA SP) Version 2, Release 1, Modification  Level 3 or later, or Multiple Virtual Storage/Enterprise  Systems Architecture (MVS/ESA SP) Version 3, Release 1,  Modification 0 or later.  If SMP/E rather than IEBCOPY is used to install the bounded box  format, then the following is also a prerequisite:   Pre-Installation Information 11 $    y System Modification Program Extended (SMP/E), Release 5 or  later.   For the VM/SP operating environment, one of the following  programs is a prerequisite:  y Virtual Machine/System Product Conversational Monitor  System (VM/SP-CMS) Release 4 or later, VM/SP HPO Release  4.2 or later, or VM/XA SP Release 2 enhanced with Advanced  Printing Subsystem Support (APSS).   For the VSE operating environment, the following program is a  prerequisite:  y VSE/Advanced Functions Version 2, Release 1, or later.   SMP PROCEDURES AND DATASETS  ___________________________   If your SMP/E procedure is not named "SMPEPROC", substitute  your procedure name for "SMPEPROC" where appropriate. If you do  not have an SMP/E procedure, you can find instructions for  building one in the SMP/E User's Guide or in the SMP/E  Reference.  1. A Data Definition (DD) statement for the following DDNAME  is required for the SMP/E JCL for the APPLY and APPLY  CHECK:  ZDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD?  | DDNAME DSNAME FMID FORMAT |  ZDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD?  | |  | |  | FONTLIBB SYS1.FONTLIBB HJH1200 Bounded Box |  | |  | Figure 7. Required DD name for APPLY and APPLY CHECK. |  @DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDY  2. A Data Definition (DD) statement for the following DDNAME  is required for the SMP/E JCL for the ACCEPT and ACCEPT  CHECK:   Pre-Installation Information 12 $    ZDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD?  | DDNAME DSNAME FMID FORMAT |  ZDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD?  | |  | |  | AFNTLIBB SYS1.AFNTLIBB HJH1200 Bounded Box |  | |  | Figure 8. Required DD name for ACCEPT and ACCEPT CHECK. |  @DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDY  3. Following are the recommended values for the SMP/E global  zone OPTIONS entry:  ZDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD?  | SUB-ENTRY VALUE |  ZDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD?  | |  | |  | DSSPACE (500,50,1) (or greater) |  | PEMAX 9999 |  | |  | |  | Figure 9. SMP/E global zone OPTIONS entry |  @DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDY  See the SMP/E Reference for instructions on updating the  global zone.   UNLOAD SAMPLE SMP/E JCL  _______________________   Use the following JCL to unload the sample SMP/E JCL from the  tape BAROCR.FONTS.BASE.        Pre-Installation Information 13 $    ZDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD?  | //JOB JOB |  | //UNLOAD EXEC PGM=IEBCOPY |  | //SYSPRINT DD SYSOUT=A |  | //SYSUT3 DD UNIT=SYSDA,SPACE=(TRK,(1,1)), |  | // DISP=(NEW,DELETE) |  | //SYSUT4 DD UNIT=SYSDA,SPACE=(TRK,(1,1)), |  | // DISP=(NEW,DELETE) |  | //INTAPE DD DSN=SAMPJCL,UNIT=TAPE,VOL=SER=JH1200, |  | // LABEL=(3,SL),DISP=OLD |  | //OUT DD DSN=JH1200.JCLLIB,UNIT=SYSDA, |  | // DISP=(NEW,CATLG,DELETE),DCB=SYS1.PROCLIB, |  | // VOL=SER=xxxxxx,SPACE=(TRK,(1,1,4)) |  | //SYSIN DD * |  | COPY INDD=INTAPE,OUTDD=OUT |  | /* |  | |  | Figure 10. Sample JCL to Unload Sample SMP/E JCL from Tape |  @DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDY  The SAMPJCL file contains the following SMP/E JCL members.  These members are available for modification and use on your  system.  ZDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD?  | Description Member Name |  ZDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD?  | |  | |  | Sample RECEIVE BB021REC |  | Sample APPLY CHECK BB021APK |  | Sample APPLY BB021APP |  | Sample ACCEPT CHECK BB021ACK |  | Sample ACCEPT BB021ACC |  | |  | Figure 11. SMP/E JCL members |  @DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDY       Pre-Installation Information 14 $    INSTALLATION PROCEDURE - MVS ENVIRONMENT  ________________________________________   INSTRUCTIONS FOR PRE-INSTALLATION PLANNING  __________________________________________   y Ensure that you have tape BAROCR.FONTS.BASE (see Figure 2  on page 6).  y The bounded box format can be installed using the MVS  utility IEBCOPY or the MVS installation program SMP/E.  Select the appropriate technique for your installation and  ensure that the various components of your MVS system have  been brought up to the required level (see "Installation  Programming Requirements" on page 11).  y If you are using SMP/E, update SMP/E procedures and data  sets as appropriate (see "SMP Procedures and Datasets" on  page 12)  y Ensure that you have enough space in the partitioned data  set referenced by the OUT DD statements in "Installation  Examples using IEBCOPY" on page 16 or the FONTLIBB and  AFNTLIBB DD statements in "Installation Example using  SMP/E" on page 16 (see Figure 4 on page 9 for space  information).  y The Bar Code/Optical Character Recognition fonts in bounded  box format are ready to use. The tape contents can be  loaded directly into a system font library (SYS1.FONTLIBB  is created in the following example).  y Note that members installed with Bar Code/Optical Character  Recognition will replace existing members having the same  names.       Installation Procedure - MVS Environment 15 $    INSTALLATION EXAMPLES USING IEBCOPY  ___________________________________   ZDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD?  | //COPYJCL JOB |  | //COPY EXEC PGM=IEBCOPY |  | //SYSPRINT DD SYSOUT=* |  | //SYSUT3 DD UNIT=SYSDA,SPACE=(80,(12,2)) |  | //SYSUT4 DD UNIT=SYSDA,SPACE=(256,(1,1)),DCB=(KEYLEN=8) |  | //INTAPE DD DSN=HJH1200.F1,UNIT=xxxx,VOL=SER=JH1200, |  | // LABEL=(2,SL),DISP=OLD |  | //OUT DD DSN=SYS1.FONTLIBB,UNIT=SYSDA, |  | // DISP=(NEW,CATLG,DELETE), |  | // DCB=(RECFM=VBM,LRECL=8205,BLKSIZE=8209), |  | // VOL=SER=nnnnnn,SPACE=(TRK,(xx,x,xx),RLSE) |  | //SYSIN DD * |  | COPY INDD=INTAPE,OUTDD=OUT |  | /* |  | |  | Figure 12. Sample JCL to Load New Data Set |  @DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDY   ZDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD?  | //COPYJCL JOB |  | //COPY EXEC PGM=IEBCOPY |  | //SYSPRINT DD SYSOUT=* |  | //SYSUT3 DD UNIT=SYSDA,SPACE=(80,(12,2)) |  | //SYSUT4 DD UNIT=SYSDA,SPACE=(TRK,(300,50)) |  | //INTAPE DD DSN=HJH1200.F1,UNIT=xxxx,VOL=SER=JH1200, |  | // LABEL=(2,SL),DISP=OLD |  | //OUT DD DSN=SYS1.FONTLIBB,DISP=OLD |  | //SYSIN DD * |  | COPY INDD=((INTAPE,R)),OUTDD=OUT |  | /* |  | |  | Figure 13. Sample JCL to Merge into Existing Data Set |  @DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDY   INSTALLATION EXAMPLE USING SMP/E  ________________________________   NOTE: The SMP/E dialog panels may be used for the steps which  follow instead of the sample JCL shown.   Installation Procedure - MVS Environment 16 $    Load SMP/E Libraries via RECEIVE: Execute SMP/E to unload Bar  _________________________________  Code/Optical Character Recognition font data from the install  tape into the SMP/E data sets (SMPPTS and temporary data sets).  Sample JCL follows.  ZDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD?  | //JOB1 JOB |  | //RECEIVE EXEC SMPEPROC |  | //SMP.SMPPTFIN DD DSN=SMPMCS,DISP=(OLD,PASS), |  | // VOL=SER=JH1200,LABEL=(1,SL), |  | // UNIT=(xxxx,,DEFER) |  | //SMPTLIB DD UNIT=xxxx,DISP=OLD,VOL=SER=nnnnnn |  | //SMP.SMPCNTL DD * |  | SET BDY(GLOBAL). |  | RECEIVE S(HJH1200) SYSMODS. |  | /* |  | |  | Figure 14. Sample SMP/E RECEIVE JCL (Sample member |  | FONTREC) |  @DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDY  Perform SMP/E APPLY CHECK: Execute SMP/E to determine if the  __________________________  APPLY will execute as desired. Sample JCL follows. Resolve  any error messages before continuing with the apply step.  ZDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD?  | //JOB2 JOB |  | //APPLY EXEC SMPEPROC |  | //SMPTLIB DD UNIT=xxxx,DISP=OLD,VOL=SER=nnnnnn |  | //FONTLIBB DD DISP=SHR,DSN=SYS1.FONTLIBB |  | //SMP.SMPCNTL DD * |  | SET BDY(tgtzone). |  | APPLY CHECK |  | GROUP REDO |  | SELECT(HJH1200) |  | BYPASS(ID,PRE,REQ,IFREQ). |  | /* |  | |  | Figure 15. Sample SMP/E APPLY CHECK Procedure (Sample |  | member FONTAPK) |  @DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDY  Load Target Library via APPLY: Execute SMP/E to load the  ______________________________  target library from the SMP/E temporary data sets. Sample JCL  follows.    Installation Procedure - MVS Environment 17 $    ZDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD?  | //JOB3 JOB |  | //APPLY EXEC SMPEPROC |  | //SMPTLIB DD UNIT=xxxx,DISP=OLD,VOL=SER=nnnnnn |  | //FONTLIBB DD DISP=SHR,DSN=SYS1.FONTLIBB |  | //SMP.SMPCNTL DD * |  | SET BDY(tgtzone). |  | APPLY |  | GROUP REDO |  | SELECT(HJH1200). |  | /* |  | |  | Figure 16. Sample SMP/E APPLY Procedure (Sample member |  | FONTAPP) |  @DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDY  Perform SMP/E ACCEPT CHECK: Execute SMP/E to determine if the  ___________________________  ACCEPT will execute as desired. Sample JCL follows. Resolve  any error messages before continuing with the accept step.  ZDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD?  | //JOB4 JOB |  | //ACCEPT EXEC SMPEPROC |  | //SMPTLIB DD UNIT=xxxx,DISP=OLD,VOL=SER=nnnnnn |  | //AFNTLIBB DD DISP=SHR,DSN=SYS1.AFNTLIBB |  | //SMP.SMPCNTL DD * |  | SET BDY(dlibzone). |  | ACCEPT CHECK |  | GROUP REDO |  | SELECT(HJH1200) |  | BYPASS(ID,PRE,REQ,IFREQ). |  | /* |  | |  | Figure 17. Sample SMP/E ACCEPT CHECK Procedure (Sample |  | member FONTACK) |  @DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDY  Load Distribution Library via ACCEPT: Execute SMP/E to load  _____________________________________  the distribution library from the SMP/E temporary data sets.  Sample JCL follows.     Installation Procedure - MVS Environment 18 $    ZDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD?  | //JOB5 JOB |  | //ACCEPT EXEC SMPEPROC |  | //SMPTLIB DD UNIT=xxxx,DISP=OLD,VOL=SER=nnnnnn |  | //AFNTLIBB DD DISP=SHR,DSN=SYS1.AFNTLIBB |  | //SMP.SMPCNTL DD * |  | SET BDY(dlibzone). |  | ACCEPT |  | GROUP REDO |  | SELECT(HJH1200). |  | /* |  | |  | Figure 18. Sample SMP/E ACCEPT Procedure (Sample member |  | FONTACC) |  @DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDY              Installation Procedure - MVS Environment 19 $    INSTALLATION PROCEDURE - VM ENVIRONMENT  _______________________________________   INSTRUCTIONS FOR PRE-INSTALLATION PLANNING  __________________________________________   y Ensure that you have an 'A' disk accessed in write mode  before installing.  y Ensure that you have tape BAROCR.FONTS.BASE (see Figure 2  on page 6).  y Ensure that the various components of your VM/SP-CMS system  have been brought up to the required level (see  "Installation Programming Requirements" on page 11).  y Ensure that you have enough space on the disk you intend to  use (see Figure 5 on page 10).  y The Bar Code/Optical Character Recognition fonts in bounded  box format are ready for use on the system font library  disk.  y Note that files installed with Bar Code/Optical Character  Recognition will replace existing files having the same  names. See "Pre-Installation Information" on page 8 for  more detail.   USING THE INSTALLATION EXEC  ___________________________   When you install Bar Code/Optical Character Recognition fonts  under VM/SP, you use an EXEC supplied on the Bar Code/Optical  Character Recognition font tape to load the information onto  the system.  1. Determine the size of disk you will require for Bar  Code/Optical Character Recognition fonts. Have that disk  defined to the system and made available to the virtual  machine used for the installation.  2. Logon to a virtual machine.  3. Spool the console commands to provide a copy of the  interactions on your virtual reader.   Installation Procedure - VM Environment 20 $    SPOOL CONSOLE START *  4. Access the font disk in read/write mode. Suggested  commands are:  LINK fontdisk xxx yyy MR pword  ACCESS yyy mode  y fontdisk xxx identifies the disk to be used for the  installation  y yyy is the virtual address that will be used  (example below assumes 199)  y MR is the multi read/write mode  y pword is the multi password  y mode is an available access mode (for example, X)  5. Define and format a temporary disk to contain the  installation exec and memo during the installation.  Suggested commands are:  DEFINE Tnnnn zzz 5  FORMAT zzz C  y Tnnnn is the disk type (for example, T3380)  y zzz is the virtual address that will be used (for  example, 222)  y C is the default mode  6. Request that the operator attach a tape drive to your  virtual machine at virtual address 181 and mount the  distribution tape BAROCR.FONTS.BASE.  7. Position the tape to the VM section. Suggested 9-track  tape commands are:  VMFPLC2 REW  VMFPLC2 FSF 10  8. Load the font product. Following is a sample listing of  those interactions:  vmfplc2 load * * c (eof 2  LOADING.....  I5688021 011103F C1  I5688021 EXEC C1  END-OF-FILE OR END-OF-TAPE  I5688021 MEMO C1  END-OF-FILE OR END-OF-TAPE   Installation Procedure - VM Environment 21 $    R;  i5688021  ********************************************************************  * 5688-021 BAR CODE/OPTICAL CHARACTER RECOGNITION  * WHAT MATERIAL DO YOU WISH TO INSTALL? (BASIC | OPTIONAL | NONE)  ********************************************************************  basic  ENTER MDISK ADDRESS TO RECEIVE BAR CODE/OPTICAL CHARACTER RECOGNITION  ENTER END IF YOU WANT TO ABORT THIS INSTALL PROCESS.  199  DMSACC724I '199' REPLACES ' A (191) '  DMSACP726I '199' X RELEASED  ********************************************************************  ********************************************************************  * *  * BAR CODE/OPTICAL CHARACTER RECOGNITION  * INSTALLATION EXEC FOR VM FONT BASIC AND OPTIONAL TAPE FILES  * *  * (C) COPYRIGHT IBM CORPORATION 1988, 1990  * ALL RIGHTS RESERVED *  * LICENSED MATERIALS - PROPERTY OF IBM (5688-021 FONTS) *  * REFER TO COPYRIGHT INSTRUCTIONS FORM NUMBER G120-2083 *  ********************************************************************  ********************************************************************  * *  * ... INSTALLATION IN PROGRESS ... *  * *  * 5688-021 ... LOADING OF THE TAPE WAS DONE SUCCESSFULLY ... *  * *  * ... VERIFICATION IN PROCESS ... *  * *  * ... VERIFICATION COMPLETED SUCCESSFULLY ... *  * *  * ... INSTALLATION NOW COMPLETE ... *  ********************************************************************  R;   9. Restore disk access modes and close the console spool  operation. Suggested commands are:  ACCESS 191 a  ACCESS yyy mode  SPOOL CONSOLE CLOSE  y yyy is the virtual address that was used (for  example, 199)   Installation Procedure - VM Environment 22 $    y mode is an available access mode (for example, X)                  Installation Procedure - VM Environment 23 $    INSTALLATION PROCEDURE - VSE ENVIRONMENT  ________________________________________   INSTRUCTIONS FOR PRE-INSTALLATION PLANNING  __________________________________________   y Ensure that you have tape BAROCR.FONTS.BASE (see Figure 2  on page 6).  y Ensure that the various components of your VSE system have  been brought up to the required levels (see "Installation  Programming Requirements" on page 11).  y Ensure that you have enough space on the disk you intend to  use (see Figure 6 on page 11).  y The Bar Code/Optical Character Recognition fonts in bounded  box format are ready to use. The tape contents can be  loaded directly into a private library.  y Note that phases installed with Bar Code/Optical Character  Recognition will replace existing phases having the same  names.   EXPLANATION OF SYMBOLS USED IN EXAMPLES  _______________________________________   SYMBOL EXPLANATION  cuu - Replace with addresses of the various I/O  devices  xxxxx - The number of the start-track/block relative  to zero for a private library or a history file.  yyy - The number of tracks/blocks to be reserved for a  library or a history file  (see Figure 6 on page 11).  volser - ID of the disk containing the library.     Installation Procedure - VSE Environment 24 $    INSTALLATION EXAMPLE (VSE/AF VERSION 2, RELEASE 1)  __________________________________________________   The following job can be used to create a new private font  library:  ZDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD?  | // JOB DEFINE FONT LIBRARY |  | * FOR VSAM, USE THE FOLLOWING DLBL IN PLACE OF |  | * THE FONTCL DLBL AND DELETE THE EXTENT |  | * // DLBL fontcl,'afp.font.library',,VSAM,CAT=usercat |  | // DLBL fontcl,'afp.font.library',99/365,SD |  | // EXTENT ,volser,1,0,xxxxx,yyy |  | // EXEC LIBR |  | DEFINE LIB=fontcl |  | DEFINE SUB=fontcl.pr$021 |  | /* |  | /& |  | |  | Figure 19. VSE - Sample Creation of a New Library |  @DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDY  The following job can be used to install Bar Code/Optical  Character Recognition fonts into an existing private library:  ZDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD?  | // JOB INSTALL FONTS |  | * FOR VSAM, USE THE FOLLOWING DLBL IN PLACE OF |  | * THE FONTCL DLBL AND DELETE THE EXTENT |  | * // DLBL fontcl,'afp.font.library',,VSAM,CAT=usercat |  | // DLBL fontcl,'afp.font.library',99/365,SD |  | // EXTENT ,volser,1,0,xxxxx,yyy |  | // ASSGN SYS006,cuu |  | // PAUSE MOUNT TAPE BAROCR.FONTS.BASE (SYS006) |  | // MTC REW,SYS006 |  | // MTC FSF,SYS006,14 |  | // EXEC MSHP |  | INSTALL PRODUCT FROMTAPE ID='B20BASE' - |  | PRODUCTION INTO=fontcl.pr$021 |  | COMPATIBLE WITH=(021B20,021B60,021C20,021A11,021A12) |  | /* |  | /& |  | |  | Figure 20. VSE - Sample Installation into an Existing |  | Library |  @DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDY   Installation Procedure - VSE Environment 25 $    The Interactive Interface provided with VSE/SP can be used to  create the necessary job steps. However, check the interactive  output and make any necessary changes before executing that  output.                 Installation Procedure - VSE Environment 26 $    CUSTOMER RESPONSIBILITY  _______________________   All program materials remain the property of IBM and when no  longer needed, they are to be rendered unreadable.                 Customer Responsibility 27 $    APPENDIX A. MVS SMP/E INSTALL LOGIC  ___________________________________   The SMP/E install logic listed in this section is for  information only.   ++FUNCTION(HJH1200) FESN(8502101) FILES(1)  /*  (C) COPYRIGHT IBM CORPORATION 1988, 1990  ALL RIGHTS RESERVED  LICENSED MATERIALS - PROPERTY OF IBM (5688-021 FONTS)  REFER TO COPYRIGHT INSTRUCTIONS FORM NUMBER G120-2083  */  .  ++VER(Z038).  ++DATA2 (COIBM021) DISTLIB(AFNTLIBB) SYSLIB(FONTLIBB) RELFILE(1).  ++DATA2 (C0OCRA10) DISTLIB(AFNTLIBB) SYSLIB(FONTLIBB) RELFILE(1).  ++DATA2 (C0OCRB10) DISTLIB(AFNTLIBB) SYSLIB(FONTLIBB) RELFILE(1).  ++DATA2 (X0BC05) DISTLIB(AFNTLIBB) SYSLIB(FONTLIBB) RELFILE(1).  ++DATA2 (X0BC10) DISTLIB(AFNTLIBB) SYSLIB(FONTLIBB) RELFILE(1).  ++DATA2 (X0OC0A) DISTLIB(AFNTLIBB) SYSLIB(FONTLIBB) RELFILE(1).  ++DATA2 (X0OC0B) DISTLIB(AFNTLIBB) SYSLIB(FONTLIBB) RELFILE(1).  ++DATA2 (T1000892) DISTLIB(AFNTLIBB) SYSLIB(FONTLIBB) RELFILE(1).  ++DATA2 (T1000893) DISTLIB(AFNTLIBB) SYSLIB(FONTLIBB) RELFILE(1).  ++DATA2 (T1001300) DISTLIB(AFNTLIBB) SYSLIB(FONTLIBB) RELFILE(1).  ++DATA2 (C0BAR050) DISTLIB(AFNTLIBB) SYSLIB(FONTLIBB) RELFILE(1).  ++DATA2 (C0BAR100) DISTLIB(AFNTLIBB) SYSLIB(FONTLIBB) RELFILE(1).         Appendix A. MVS SMP/E Install Logic 28 $    APPENDIX B. VM BOUNDED BOX FORMAT FILES  _______________________________________   The files installed will be the same as those identified in the  ++DATA2 statements in "Appendix A. MVS SMP/E Install Logic" on  page 28 except that the MVS copyright member COIBM021 is  replaced by the VM copyright file FCHK021. On VM, the file  type of the installed files will be FONT3820.                Appendix B. VM Bounded Box Format Files 29 $    APPENDIX C. VSE BOUNDED BOX FORMAT PHASES  _________________________________________   The phases installed will be the same as those identified in  the ++DATA2 statements in "Appendix A. MVS SMP/E Install Logic"  on page 28 except that the MVS copyright member COIBM021 is  replaced by the VSE copyright phase $$$CO021.                Appendix C. VSE Bounded Box Format PHASES 30 $    APPENDIX D. SUMMARY OF CHANGES  ______________________________   No font changes have been made by this release of the Bar  Code/Optical Character Recognition licensed program. However,  the fonts have been repackaged so that:  1. Bounded box and unbounded box formats can be installed on  MVS using SMP/E release 5 (or later) or IEBCOPY.  2. Bounded box and unbounded box formats on VSE are V2 data,  installable on VSE 2.1 or later.  The following subroutine changes have been made by this release  of the Bar Code/Optical Character Recognition licensed program.  1. When using the Bar Code subroutine to create CODE 128 bar  code, and the first character position is an FNC 1, the  subroutine source and object have been corrected to  generate the minimal horizontal bar code for the FNC 1  character.  2. The UPC E code in the subroutine source and object has been  expanded to support the Number System 1 bar code.  The following subroutine change made by this release of the Bar  Code/Optical Character Recognition licensed program is not  correctly documented in the Bar Code Fonts User's Guide  (S544-3190-02).  1. The correct code for sequence number 00009370 on page 32 of  the Guide should be:  IF (f=0 | f=1 | f=2) then do;       Appendix D. Summary of Changes 31 $         This page left blank intentionally             Appendix D. Summary of Changes 32 $    READER'S COMMENT FORM  _____________________   5688-021 RELEASE 01 MODIFICATION 01  CLC B20  FMIDS HJH1200  FEATURES: 5850, 5851, 5852  This form may be used to communicate your views about this  publication. They will be sent to the author's department for  whatever review and action, if any, is necessary.  IBM may use or distribute any of the information you supply in  any way it believes appropriate without incurring any  obligation whatever. You may, of course, continue to use the  information you supply.  NOTE: Copies of IBM publications are not stocked at the  location to which this form is addressed. Please direct any  requests for copies of publications, or for assistance in using  your IBM system, to your IBM representative or to the IBM  branch office serving your locality.  Possible topics for comments are:  y Clarity  y Accuracy  y Completeness  y Organization    Thank you for your cooperation. When completed, you may mail  this form to the following address:  International Business Machines Corporation  Department 53S, Building 025P  P. O. Box 1900  Boulder, Colorado 80301-9191  U. S. A.   Reader's Comment Form 33 $         This page left blank intentionally             Reader's Comment Form 34 $           END OF DOCUMENT  _______________           End of Document 35