Seq # *Modification Id* Act
----------------------------+
00001 M00S00001.combcpr +++|
00002 M00S00002.combcpr +++|# COMBCPR - CALLSS PARAMETER BLOCK AND REQUEST/RESPONSE CODES. #
00003 M00S00003.combcpr +++| CONTROL NOLIST;
00004 M00S00004.combcpr +++| CONTROL IFEQ LISTCON,1;
00005 M00S00005.combcpr +++| CONTROL LIST;
00006 M00S00006.combcpr +++| CONTROL FI;
00007 M00S00007.combcpr +++| BEGIN # COMBCPR #
00008 M00S00008.combcpr +++|
00009 M00S00009.combcpr +++|#
00010 M00S00010.combcpr +++|*** COMBCPR - CALLSS PARAMETER BLOCK AND REQUEST/RESPONSE CODES.
00011 M00S00011.combcpr +++|*
00012 M00S00012.combcpr +++|* COMBCPR CONTAINS A DEFINITION OF THE CALLSS REQUEST BLOCK,
00013 M00S00013.combcpr +++|* THE REQUEST CODES AND THE RESPONSE CODES FOR EACH OF THE
00014 M00S00014.combcpr +++|* SIX TYPES OF UCP REQUESTS.
00015 M00S00015.combcpr +++|#
00016 M00S00016.combcpr +++|
00017 M00S00017.combcpr +++|
00018 M00S00018.combcpr +++|#
00019 M00S00019.combcpr +++|* WORD COUNTS OF THE CALLSS PARAMETER BLOCK
00020 M00S00020.combcpr +++|* FOR THE DIFFERENT TYPES OF REQUESTS.
00021 M00S00021.combcpr +++|#
00022 M00S00022.combcpr +++|
00023 M00S00023.combcpr +++| DEF TYP1$WC #3#; # WORD COUNT FOR TYPE 1 REQUEST #
00024 M00S00024.combcpr +++| DEF TYP2$WC #4#; # WORD COUNT FOR TYPE 2 REQUEST #
00025 M00S00025.combcpr +++| DEF TYP3$WC #9#; # WORD COUNT FOR TYPE 3 REQUEST #
00026 M00S00026.combcpr +++| DEF TYP4$WC #5#; # WORD COUNT FOR TYPE 4 REQUEST #
00027 M00S00027.combcpr +++| DEF TYP5$WC #3#; # WORD COUNT FOR TYPE 5 REQUEST #
00028 M00S00028.combcpr +++|
00029 M00S00029.combcpr +++|#
00030 M00S00030.combcpr +++|* TYPES OF UCP REQUESTS.
00031 M00S00031.combcpr +++|#
00032 M00S00032.combcpr +++|
00033 M00S00033.combcpr +++| STATUS TYP
00034 M00S00034.combcpr +++| TYP0, # NOT USED #
00035 M00S00035.combcpr +++| TYP1, # UCP LINKAGE REQUESTS #
00036 M00S00036.combcpr +++| TYP2, # *SSMOVE* REQUESTS #
00037 M00S00037.combcpr +++| TYP3, # UTILITY CATALOG REQUESTS #
00038 M00S00038.combcpr +++| TYP4, # UTILITY HARDWARE REQUESTS #
00039 M00S00039.combcpr +++| TYP5, # SSALTER REQUESTS #
00040 M00S00040.combcpr +++| TYPLST; # END OF STATUS LIST #
00041 M00S00041.combcpr +++|
00042 M00S00042.combcpr +++|#
00043 M00S00043.combcpr +++|* UCP REQUEST CODES FOR TYPE 1 REQUESTS.
00044 M00S00044.combcpr +++|#
00045 M00S00045.combcpr +++|
00046 M00S00046.combcpr +++| STATUS REQTYP1
00047 M00S00047.combcpr +++| RES1, # NOT USED #
00048 M00S00048.combcpr +++| CONNECT, # CONNECT WITH EXEC #
00049 M00S00049.combcpr +++| DISCONNECT, # DISCONNECT WITH EXEC #
00050 M00S00050.combcpr +++| LSTREQTYP1; # END OF STATUS LIST #
00051 M00S00051.combcpr +++|
00052 M00S00052.combcpr +++|#
00053 M00S00053.combcpr +++|* UCP REQUEST CODES FOR TYPE 2 REQUESTS.
00054 M00S00054.combcpr +++|#
00055 M00S00055.combcpr +++|
00056 M00S00056.combcpr +++| STATUS REQTYP2
00057 M00S00057.combcpr +++| RES2, # NOT USED #
00058 M00S00058.combcpr +++| FILE$READY, # EXEC/MOVE COMMUNICATION FILE IS
00059 M00S00059.combcpr +++| READY #
00060 M00S00060.combcpr +++| LSTREQTYP2; # END OF STATUS LIST #
00061 M00S00061.combcpr +++|
00062 M00S00062.combcpr +++|#
00063 M00S00063.combcpr +++|* UCP REQUEST CODES FOR TYPE 3 REQUESTS.
00064 M00S00064.combcpr +++|*
00065 M00S00065.combcpr +++|* NOTE - ANY CHANGE TO THE STATUS LIST *REQTYP3* WILL IMPACT
00066 M00S00066.combcpr +++|* THE ERROR MAPPING ARRAY IN THE PROCEDURE *CONVER3*.
00067 M00S00067.combcpr +++|#
00068 M00S00068.combcpr +++|
00069 M00S00069.combcpr +++| STATUS REQTYP3
00070 M00S00070.combcpr +++| RES3, # NOT USED #
00071 M00S00071.combcpr +++| ADD$CUBE, # ADD CUBICLE TO FAMILY #
00072 M00S00072.combcpr +++| ADD$CART, # ADD CARTRIDGE TO FAMILY #
00073 M00S00073.combcpr +++| ADD$CSU, # ADD SM TO FAMILY #
00074 M00S00074.combcpr +++| RMV$CUBE, # REMOVE CUBICLE FROM FAMILY #
00075 M00S00075.combcpr +++| RMV$CART, # REMOVE CARTRIDGE FROM FAMILY #
00076 M00S00076.combcpr +++| RMV$CSU, # REMOVE SM FROM FAMILY #
00077 M00S00077.combcpr +++| UPD$CAT, # UPDATE CATALOG FIELD #
00078 M00S00078.combcpr +++| UPD$MAP, # UPDATE SMMAP ENTRY #
00079 M00S00079.combcpr +++| PURG$FRAG, # PURGE FRAGMENT #
| Line S00080 Modification History |
M01 (Removed by) | common1 |
Seq # *Modification Id* Act
----------------------------+
00080 M01S00080.common1 ---| PURG$ORPH, # PURGE ORPHAN #
| Line S00001 Modification History |
M01 (Added by) | common1 |
Seq # *Modification Id* Act
----------------------------+
00081 M01S00001.common1 +++| REL$SETUP, # RELEASE CATALOG SPACE #
00082 M00S00081.combcpr +++| PURG$FCT, # PURGE *FCT* ENTRY #
00083 M00S00082.combcpr +++| GT$PRGDATE, # GET PURGE DATE #
00084 M00S00083.combcpr +++| REL$MPLK, # RELEASE MAP INTERLOCK #
00085 M00S00084.combcpr +++| REC$MPLK, # RECLAIM MAP INTERLOCK #
00086 M00S00085.combcpr +++| LSTREQTYP3; # END OF STATUS LIST #
00087 M00S00086.combcpr +++|
00088 M00S00087.combcpr +++|#
00089 M00S00088.combcpr +++|* UCP REQUEST CODES FOR TYPE 4 REQUESTS.
00090 M00S00089.combcpr +++|#
00091 M00S00090.combcpr +++|
00092 M00S00091.combcpr +++| STATUS REQTYP4
00093 M00S00092.combcpr +++| RES4, # NOT USED #
00094 M00S00093.combcpr +++| LOAD$CART, # LOAD CARTRIDGE #
00095 M00S00094.combcpr +++| UNLD$CART, # UNLOAD CARTRIDGE #
00096 M00S00095.combcpr +++| WRT$LAB, # WRITE LABEL #
00097 M00S00096.combcpr +++| CPY$AD, # COPY AU TO DISK #
00098 M00S00097.combcpr +++| CPY$DA, # COPY DISK TO AU #
00099 M00S00098.combcpr +++| CP$RAW$AU, # COPY RAW AU #
00100 M00S00099.combcpr +++| INITHW, # INITIALIZE M860 HARDWARE #
00101 M00S00100.combcpr +++| LSTREQTYP4; # END OF STATUS LIST #
00102 M00S00101.combcpr +++|
00103 M00S00102.combcpr +++|#
00104 M00S00103.combcpr +++|* UCP REQUEST CODES FOR TYPE 5 REQUESTS.
00105 M00S00104.combcpr +++|#
00106 M00S00105.combcpr +++|
00107 M00S00106.combcpr +++| STATUS REQTYP5
00108 M00S00107.combcpr +++| RES5, # NOT USED #
00109 M00S00108.combcpr +++| SSA$PUDT, # PASS UNIT DEVICE TABLE #
00110 M00S00109.combcpr +++| SSA$UUDT, # UPDATE UNIT DEVICE TABLE #
00111 M00S00110.combcpr +++| LSTREQTYP5; # END OF STATUS LIST #
00112 M00S00111.combcpr +++|
00113 M00S00112.combcpr +++|#
00114 M00S00113.combcpr +++|* UCP RESPONSE CODES FOR TYPE1 REQUESTS.
00115 M00S00114.combcpr +++|#
00116 M00S00115.combcpr +++|
00117 M00S00116.combcpr +++| STATUS RESPTYP1
00118 M00S00117.combcpr +++| OK1, # OK #
00119 M00S00118.combcpr +++| LSTRESPTYP1; # END OF STATUS LIST #
00120 M00S00119.combcpr +++|
00121 M00S00120.combcpr +++|#
00122 M00S00121.combcpr +++|* UCP RESPONSE CODES FOR TYPE 2 REQUESTS.
00123 M00S00122.combcpr +++|#
00124 M00S00123.combcpr +++|
00125 M00S00124.combcpr +++| STATUS RESPTYP2
00126 M00S00125.combcpr +++| OK2, # OK #
00127 M00S00126.combcpr +++| MRFERR, # UNABLE TO ATTACH FILE #
00128 M00S00127.combcpr +++| LSTRESPTYP2; # END OF STATUS LIST #
00129 M00S00128.combcpr +++|
00130 M00S00129.combcpr +++|#
00131 M00S00130.combcpr +++|* UCP RESPONSE CODES FOR TYPE 3 REQUESTS.
00132 M00S00131.combcpr +++|#
00133 M00S00132.combcpr +++|
00134 M00S00133.combcpr +++| STATUS RESPTYP3
00135 M00S00134.combcpr +++| OK3, # OK #
00136 M00S00135.combcpr +++| C$M$INTLCK, # CATALOG/MAP INTERLOCKED #
00137 M00S00136.combcpr +++| C$M$NOPEN, # CATALOG/MAP NOT OPEN #
00138 M00S00137.combcpr +++| RESUB$REQ, # RESUBMIT REQUEST #
00139 M00S00138.combcpr +++| SUB$CAT$EX, # SUBCATALOG ALREADY EXISTS #
00140 M00S00139.combcpr +++| NO$SUB$CAT, # NO SUCH SUBCATALOG #
00141 M00S00140.combcpr +++| PF$PROB, # PERMANENT FILE PROBLEM #
00142 M00S00141.combcpr +++| MSC$NEMPTY, # DRD NOT EMPTY #
00143 M00S00142.combcpr +++| ILLEG$ORD, # ORDINAL OUT OF RANGE #
00144 M00S00143.combcpr +++| NFROZ$FRAG, # NON FROZEN FRAGMENT #
00145 M00S00144.combcpr +++| GROUP$FUL, # GROUP FULL STATUS #
00146 M00S00145.combcpr +++| LSTRESPTYP3; # END OF STATUS LIST #
00147 M00S00146.combcpr +++|
00148 M00S00147.combcpr +++|#
00149 M00S00148.combcpr +++|* UCP RESPONSE CODES FOR TYPE 4 REQUESTS.
00150 M00S00149.combcpr +++|#
00151 M00S00150.combcpr +++|
00152 M00S00151.combcpr +++| STATUS RESPTYP4
00153 M00S00152.combcpr +++| OK4, # OK #
00154 M00S00153.combcpr +++| CART$LB$ERR, # PART OF LABEL MATCHED #
00155 M00S00154.combcpr +++| CSN$IN$USE, # CSN IN USE #
00156 M00S00155.combcpr +++| CELL$EMP, # SPECIFIED CELL EMPTY #
00157 M00S00156.combcpr +++| CELL$FULL, # SPECIFIED CELL FULL #
00158 M00S00157.combcpr +++| EX$DMARK, # EXCESSIVE DEMARKS #
00159 M00S00158.combcpr +++| UNK$CART, # NO CARTRIDGE LABEL MATCH #
00160 M00S00159.combcpr +++| UN$RD$ERR, # UNRECOVERABLE READ ERROR #
00161 M00S00160.combcpr +++| UN$WRT$ERR, # UNRECOVERABLE WRITE ERROR #
00162 M00S00161.combcpr +++| VOL$HD$ERR, # VOLUME HEADER ERROR #
00163 M00S00162.combcpr +++| M86$HDW$PR, # M860 HARDWARE PROBLEM #
00164 M00S00163.combcpr +++| RMS$FL$ERR, # DISK FILE ERROR #
00165 M00S00164.combcpr +++| DISK$FULL, # DISK FULL #
00166 M00S00165.combcpr +++| ATTACH$ERR, # ATTACH ERROR #
00167 M00S00166.combcpr +++| SMA$OFF, # SM IS OFF #
00168 M00S00167.combcpr +++| EOI, # END OF INFORMATION ON FILE #
00169 M01S00002.common1 +++| PPU$D$PROB, # PPU FOUND DATA PROBLEM #
00170 M00S00168.combcpr +++| LSTRESPTYP4; # END OF STATUS LIST #
00171 M00S00169.combcpr +++|
00172 M00S00170.combcpr +++|#
00173 M00S00171.combcpr +++|* UCP RESPONSE CODES FOR TYPE 5 REQUESTS.
00174 M00S00172.combcpr +++|#
00175 M00S00173.combcpr +++|
00176 M00S00174.combcpr +++| STATUS RESPTYP5
00177 M00S00175.combcpr +++| OK5, # OK - NOT IN INITIALIZE #
00178 M00S00176.combcpr +++| SSA$UIRC, # UNIT ALREADY IN REQUESTED STATE
00179 M00S00177.combcpr +++| (NOT IN INITIALIZATION) #
00180 M00S00178.combcpr +++| SSA$ERROR, # ERRORED - TURNED BACK OFF #
00181 M00S00179.combcpr +++| SSA$OK, # OK - (BEFORE INITIALIZATION) #
00182 M00S00180.combcpr +++| LSTRESPTYP5; # END OF STATUS LIST #
00183 M00S00181.combcpr +++|
00184 M00S00182.combcpr +++|#
00185 M00S00183.combcpr +++|* STATUS LIST IDENTIFYING THE FIELDS IN A CATALOG
00186 M00S00184.combcpr +++|* ENTRY, TO BE USED IN *UPDATE CATALOG FIELD*.
00187 M00S00185.combcpr +++|#
00188 M00S00186.combcpr +++|
00189 M00S00187.combcpr +++| STATUS UCF # UPDATE CATALOG FIELD #
00190 M00S00188.combcpr +++| UNUSED, # NOT USED #
00191 M00S00189.combcpr +++| LOADC, # LOAD COUNT #
00192 M00S00190.combcpr +++| FREEFL, # FREE FLAG #
00193 M00S00191.combcpr +++| INHIB, # INHIBIT ALLOCATION #
00194 M00S00192.combcpr +++| LOST, # LOST CARTRIDGE #
00195 M00S00193.combcpr +++| EWPE, # EXCESSIVE WRITE PARITY ERRORS #
00196 M00S00194.combcpr +++| CMAP, # SMMAP ERROR FLAG #
00197 M00S00195.combcpr +++| FROZ, # FROZEN CHAIN FLAG #
00198 M00S00196.combcpr +++| CONF, # CONFLICT FLAG #
00199 M00S00197.combcpr +++| SOF, # START OF FRAGMENT FLAG #
00200 M00S00198.combcpr +++| LSTSOF; # END OF STATUS LIST #
00201 M00S00199.combcpr +++|
00202 M00S00200.combcpr +++|#
00203 M00S00201.combcpr +++|* IF THE FOLLOWING DEF FOR *CPRLEN* IS EVER CHANGED,
00204 M00S00202.combcpr +++|* THE SIZE OF ARRAY *PRAMUCP* IN DECK *COMBUCR* MUST
00205 M00S00203.combcpr +++|* BE CHANGED ALSO.
00206 M00S00204.combcpr +++|#
00207 M00S00205.combcpr +++|
00208 M00S00206.combcpr +++| DEF CPRLEN #10#; # LENGTH OF CALLSS REQUEST BLOCK #
00209 M00S00207.combcpr +++|
00210 M00S00208.combcpr +++| COMMON BCPRCOM;
00211 M00S00209.combcpr +++|
00212 M00S00210.combcpr +++| BEGIN # BCPRCOM #
00213 M00S00211.combcpr +++|
| Line S00001 Modification History |
M01 (Added by) | mse3 |
Seq # *Modification Id* Act
----------------------------+
00214 M01S00001.mse3 +++| ARRAY PFMRET [0:0] S(4); # PFM RETURN MESSAGE AREA #
00215 M01S00002.mse3 +++| BEGIN
00216 M01S00003.mse3 +++| ITEM PFMRETM C(00,00,40);
00217 M01S00004.mse3 +++| END
00218 M01S00005.mse3 +++|
00219 M00S00212.combcpr +++| BASED
00220 M00S00213.combcpr +++| ARRAY CPR [0:0] P(CPRLEN); # CALLSS PARAMETER BLOCK #
00221 M00S00214.combcpr +++| BEGIN
00222 M00S00215.combcpr +++| ITEM CPR1 U(00,00,60); # FULL REFFERENCE FOR WORD 1 #
00223 M00S00216.combcpr +++| ITEM CPR$WC U(00,36,06); # WORD COUNT #
00224 M00S00217.combcpr +++| ITEM CPR$RT U(00,46,02); # CALLSS *RT* FIELD #
00225 M00S00218.combcpr +++| ITEM CPR$SSPFLG B(00,46,01); # SUBSYSTEM PRESENCE FLAG #
00226 M00S00219.combcpr +++| ITEM CPR$SSBFLG B(00,47,01); # SUBSYSTEM BUSY FLAG #
00227 M00S00220.combcpr +++| ITEM CPR$ES U(00,48,11); # ERROR CONDITION #
00228 M00S00221.combcpr +++| ITEM CPR$C B(00,59,01); # COMPLETION BIT #
00229 M00S00222.combcpr +++| ITEM CPR2 U(01,00,60); # FULL REFERENCE FOR WORD 3 #
00230 M00S00223.combcpr +++| ITEM CPR$RQT U(01,00,06); # REQUEST TYPE #
00231 M00S00224.combcpr +++| ITEM CPR$RQC U(01,06,06); # REQUEST CODE #
00232 M00S00225.combcpr +++| ITEM CPR$RQI U(01,12,05); # REQUESTOR IDENTIFIER #
00233 M00S00226.combcpr +++| ITEM CPR$UCO U(01,17,04); # UDT CONTROLLER ORDINAL #
00234 M00S00227.combcpr +++| ITEM CPR$UDTQ U(01,22,10); # UDT ORDINAL #
00235 M00S00228.combcpr +++| ITEM CPR$CSU U(01,18,06); # LOGICAL SM-ID #
00236 M00S00229.combcpr +++| ITEM CPR$NW B(01,17,01); # *SSMOVE* NO WAIT OPTION #
00237 M00S00230.combcpr +++| ITEM CPR$DRD U(01,24,01); # DRD UNIT 0 OR 1 #
00238 M00S00231.combcpr +++| ITEM CPR$GR U(01,26,06); # GROUP NUMBER #
00239 M00S00232.combcpr +++| ITEM CPR$YZ U(01,33,09); # Y AND Z COORDINATE #
00240 M00S00233.combcpr +++| ITEM CPR$Y U(01,33,05); # Y COORDINATE #
00241 M00S00234.combcpr +++| ITEM CPR$BYNR U(01,33,06); # OFF SET BIT NUMBER #
00242 M00S00235.combcpr +++| ITEM CPR$PMMR B(01,40,01); # STATUS BIT #
00243 M00S00236.combcpr +++| ITEM CPR$Z U(01,38,04); # Z COORDINATE #
00244 M00S00237.combcpr +++| ITEM CPR$ADDR2 U(01,42,18); # ADDRESS OF ADDITIONAL DATA #
00245 M00S00238.combcpr +++| ITEM CPR3 U(02,00,60); # FULL REFERENCE FOR WORD 3 #
00246 M00S00239.combcpr +++| ITEM CPR$RQR U(02,00,06); # RESPONSE CODE #
00247 M00S00240.combcpr +++| ITEM CPR$CUORD U(02,06,06); # *CU* ORDINAL #
00248 M00S00241.combcpr +++| ITEM CPR$CIF U(02,12,03); # CHANNEL INTERFACE #
00249 M00S00242.combcpr +++| ITEM CPR$FCT U(02,06,12); # *FCT* ORDINAL #
00250 M00S00243.combcpr +++| ITEM CPR$DATE U(02,24,36); # LAST PURGE DATE #
| Line S00003 Modification History |
M01 (Added by) | common1 |
Seq # *Modification Id* Act
----------------------------+
00251 M01S00003.common1 +++| ITEM CPR$RELC U(02,24,36); # RELEASE COUNT #
00252 M00S00244.combcpr +++| ITEM CPR$AU U(02,48,12); # *AU* NUMBER #
00253 M00S00245.combcpr +++| ITEM CPR$ST$LW U(02,06,18); # STRIPE LOW #
00254 M00S00246.combcpr +++| ITEM CPR$ST$HI U(02,24,18); # STRIPE HIGH #
00255 M00S00247.combcpr +++| ITEM CPR$GRT U(02,36,04); # GROUP ORDINAL #
00256 M00S00248.combcpr +++| ITEM CPR$ADDR3 U(02,24,18); # UDT OFFSET WORD #
00257 M00S00249.combcpr +++| ITEM CPR$ADDR4 U(02,42,18); # WORD COUNT #
00258 M00S00250.combcpr +++| ITEM CPR4 U(03,00,60); # FULL REFERENCE FOR WORD 4 #
00259 M00S00251.combcpr +++| ITEM CPR$FAM C(03,00,07); # FAMILY NAME #
00260 M00S00252.combcpr +++| ITEM CPR$SUB U(03,42,06); # SUB FAMILY #
00261 M00S00253.combcpr +++| ITEM CPR5 U(04,00,60); # FULL REFERENCE FOR WORD 5 #
00262 M00S00254.combcpr +++| ITEM CPR$PFN C(04,00,07); # FILE NAME #
00263 M00S00255.combcpr +++| ITEM CPR$CCOD C(04,00,02); # CARTRIDGE IDENTIFIER LETTER #
00264 M00S00256.combcpr +++| ITEM CPR$CSND C(04,12,08); # CARTRIDGE CSN #
00265 M00S00257.combcpr +++| ITEM CPR6 U(05,00,60); # FULL REFERENCE FOR WORD 6 #
00266 M00S00258.combcpr +++| ITEM CPR$B U(05,16,12); # SMALL FILE SPACE ALLOCATED #
00267 M00S00259.combcpr +++| ITEM CPR$FLD U(05,30,06); # CATALOG FIELD NAME #
00268 M00S00260.combcpr +++| ITEM CPR$VAL U(05,36,24); # CATALOG FIELD VALUE #
00269 M00S00261.combcpr +++| ITEM CPR$UI U(05,42,18); # USER INDEX #
00270 M00S00262.combcpr +++| ITEM CPR7 U(06,00,60); # FULL REFERENCE FOR WORD 7 #
00271 M00S00263.combcpr +++| ITEM CPR$STRD U(06,00,30); # NUMBER OF STRIPES READ #
00272 M00S00264.combcpr +++| ITEM CPR$STWR U(06,30,30); # NUMBER OF STRIPES WRITTEN #
00273 M00S00265.combcpr +++| ITEM CPR8 U(07,00,60); # FULL REFERENCE FOR WORD 8 #
00274 M00S00266.combcpr +++| ITEM CPR$SRDE U(07,00,30); # NUMBER OF SOFT READ ERRORS #
00275 M00S00267.combcpr +++| ITEM CPR$SWRE U(07,30,30); # NUMBER OF SOFT WRITE ERROR #
00276 M00S00268.combcpr +++| ITEM CPR9 U(08,00,60); # FULL REFERENCE FOR WORD 9 #
00277 M00S00269.combcpr +++| ITEM CPR$HRDE U(08,00,15); # NUMBER OF HARD READ ERRORS #
00278 M00S00270.combcpr +++| ITEM CPR$STDM U(08,15,15); # NUMBER OF DEMARKED STRIPES #
00279 M00S00271.combcpr +++| ITEM CPR$CRLD U(08,30,15); # NUMBER OF CARTRIDGE LOADS #
00280 M00S00272.combcpr +++| ITEM CPR$LDER U(08,45,15); # NUMBER OF LOAD ERRORS #
00281 M00S00273.combcpr +++| ITEM CPR$MAPENT C(06,00,30); # 3 WORD SMAMAP ENTRY #
00282 M00S00274.combcpr +++| END
00283 M00S00275.combcpr +++|
00284 M00S00276.combcpr +++| END # BCPRCOM #
00285 M00S00277.combcpr +++|
00286 M00S00278.combcpr +++| END # COMBCPR #
00287 M00S00279.combcpr +++|
00288 M00S00280.combcpr +++| CONTROL LIST;