User Tools

Site Tools


cdc:nos2.source:opl.opl871:common:combcpr

Common COMBCPR

2 Modifications

Source

Seq #  *Modification Id* Act 
----------------------------+
00001  M01S00001.combcpr +++|
00002  M01S00002.combcpr +++|#     COMBCPR - CALLSS PARAMETER BLOCK AND REQUEST/RESPONSE CODES.    #
00003  M01S00003.combcpr +++|                                               CONTROL NOLIST;
00004  M01S00004.combcpr +++|                                               CONTROL IFEQ LISTCON,1;
00005  M01S00005.combcpr +++|                                               CONTROL LIST;
00006  M01S00006.combcpr +++|                                               CONTROL FI;
00007  M01S00007.combcpr +++|      BEGIN  # COMBCPR #
00008  M01S00008.combcpr +++|
00009  M01S00009.combcpr +++|#
00010  M01S00010.combcpr +++|***   COMBCPR - CALLSS PARAMETER BLOCK AND REQUEST/RESPONSE CODES.
00011  M01S00011.combcpr +++|*
00012  M01S00012.combcpr +++|*     COMBCPR CONTAINS A DEFINITION OF THE CALLSS REQUEST BLOCK,
00013  M01S00013.combcpr +++|*     THE REQUEST CODES AND THE RESPONSE CODES FOR EACH OF THE
00014  M01S00014.combcpr +++|*     SIX TYPES OF UCP REQUESTS.
00015  M01S00015.combcpr +++|#
00016  M01S00016.combcpr +++|
00017  M01S00017.combcpr +++|
00018  M01S00018.combcpr +++|#
00019  M01S00019.combcpr +++|*     WORD COUNTS OF THE CALLSS PARAMETER BLOCK
00020  M01S00020.combcpr +++|*     FOR THE DIFFERENT TYPES OF REQUESTS.
00021  M01S00021.combcpr +++|#
00022  M01S00022.combcpr +++|
00023  M01S00023.combcpr +++|      DEF TYP1$WC    #3#;            # WORD COUNT FOR TYPE 1 REQUEST #
00024  M01S00024.combcpr +++|      DEF TYP2$WC    #4#;            # WORD COUNT FOR TYPE 2 REQUEST #
00025  M01S00025.combcpr +++|      DEF TYP3$WC    #9#;            # WORD COUNT FOR TYPE 3 REQUEST #
00026  M01S00026.combcpr +++|      DEF TYP4$WC    #5#;            # WORD COUNT FOR TYPE 4 REQUEST #
00027  M01S00027.combcpr +++|      DEF TYP5$WC    #3#;            # WORD COUNT FOR TYPE 5 REQUEST #
00028  M01S00028.combcpr +++|
00029  M01S00029.combcpr +++|#
00030  M01S00030.combcpr +++|*     TYPES OF UCP REQUESTS.
00031  M01S00031.combcpr +++|#
00032  M01S00032.combcpr +++|
00033  M01S00033.combcpr +++|      STATUS TYP
00034  M01S00034.combcpr +++|        TYP0,                        # NOT USED #
00035  M01S00035.combcpr +++|        TYP1,                        # UCP LINKAGE REQUESTS #
00036  M01S00036.combcpr +++|        TYP2,                        # *SSMOVE* REQUESTS #
00037  M01S00037.combcpr +++|        TYP3,                        # UTILITY CATALOG REQUESTS #
00038  M01S00038.combcpr +++|        TYP4,                        # UTILITY HARDWARE REQUESTS #
00039  M01S00039.combcpr +++|        TYP5,                        # SSALTER REQUESTS #
00040  M01S00040.combcpr +++|        TYPLST;                      # END OF STATUS LIST #
00041  M01S00041.combcpr +++|
00042  M01S00042.combcpr +++|#
00043  M01S00043.combcpr +++|*     UCP REQUEST CODES FOR TYPE 1 REQUESTS.
00044  M01S00044.combcpr +++|#
00045  M01S00045.combcpr +++|
00046  M01S00046.combcpr +++|      STATUS REQTYP1
00047  M01S00047.combcpr +++|        RES1,                        # NOT USED #
00048  M01S00048.combcpr +++|        CONNECT,                     # CONNECT WITH EXEC #
00049  M01S00049.combcpr +++|        DISCONNECT,                  # DISCONNECT WITH EXEC #
00050  M01S00050.combcpr +++|        LSTREQTYP1;                  # END OF STATUS LIST #
00051  M01S00051.combcpr +++|
00052  M01S00052.combcpr +++|#
00053  M01S00053.combcpr +++|*     UCP REQUEST CODES FOR TYPE 2 REQUESTS.
00054  M01S00054.combcpr +++|#
00055  M01S00055.combcpr +++|
00056  M01S00056.combcpr +++|      STATUS REQTYP2
00057  M01S00057.combcpr +++|        RES2,                        # NOT USED #
00058  M01S00058.combcpr +++|        FILE$READY,                  # EXEC/MOVE COMMUNICATION FILE IS
00059  M01S00059.combcpr +++|                                       READY #
00060  M01S00060.combcpr +++|        LSTREQTYP2;                  # END OF STATUS LIST #
00061  M01S00061.combcpr +++|
00062  M01S00062.combcpr +++|#
00063  M01S00063.combcpr +++|*     UCP REQUEST CODES FOR TYPE 3 REQUESTS.
00064  M01S00064.combcpr +++|*
00065  M01S00065.combcpr +++|*     NOTE - ANY CHANGE TO THE STATUS LIST *REQTYP3* WILL IMPACT
00066  M01S00066.combcpr +++|*     THE ERROR MAPPING ARRAY IN THE PROCEDURE *CONVER3*.
00067  M01S00067.combcpr +++|#
00068  M01S00068.combcpr +++|
00069  M01S00069.combcpr +++|      STATUS REQTYP3
00070  M01S00070.combcpr +++|        RES3,                        # NOT USED #
00071  M01S00071.combcpr +++|        ADD$CUBE,                    # ADD CUBICLE TO FAMILY #
00072  M01S00072.combcpr +++|        ADD$CART,                    # ADD CARTRIDGE TO FAMILY #
00073  M01S00073.combcpr +++|        ADD$CSU,                     # ADD SM TO FAMILY #
00074  M01S00074.combcpr +++|        RMV$CUBE,                    # REMOVE CUBICLE FROM FAMILY #
00075  M01S00075.combcpr +++|        RMV$CART,                    # REMOVE CARTRIDGE FROM FAMILY #
00076  M01S00076.combcpr +++|        RMV$CSU,                     # REMOVE SM FROM FAMILY #
00077  M01S00077.combcpr +++|        UPD$CAT,                     # UPDATE CATALOG FIELD #
00078  M01S00078.combcpr +++|        UPD$MAP,                     # UPDATE SMMAP ENTRY #
00079  M01S00079.combcpr +++|        PURG$FRAG,                   # PURGE FRAGMENT #
Line S00080 Modification History
M01 (Added by) combcpr
M02 (Updated by) common1
Seq #  *Modification Id* Act 
----------------------------+
00080  M02S00080.common1 ---|        PURG$ORPH,                   # PURGE ORPHAN #
00081  M01S00001.common1 +++|        REL$SETUP,                   # RELEASE CATALOG SPACE #
00082  M01S00081.combcpr +++|        PURG$FCT,                    # PURGE *FCT* ENTRY #
00083  M01S00082.combcpr +++|        GT$PRGDATE,                  # GET PURGE DATE #
00084  M01S00083.combcpr +++|        REL$MPLK,                    # RELEASE MAP INTERLOCK #
00085  M01S00084.combcpr +++|        REC$MPLK,                    # RECLAIM MAP INTERLOCK #
00086  M01S00085.combcpr +++|        LSTREQTYP3;                  # END OF STATUS LIST #
00087  M01S00086.combcpr +++|
00088  M01S00087.combcpr +++|#
00089  M01S00088.combcpr +++|*     UCP REQUEST CODES FOR TYPE 4 REQUESTS.
00090  M01S00089.combcpr +++|#
00091  M01S00090.combcpr +++|
00092  M01S00091.combcpr +++|      STATUS REQTYP4
00093  M01S00092.combcpr +++|        RES4,                        # NOT USED #
00094  M01S00093.combcpr +++|        LOAD$CART,                   # LOAD CARTRIDGE #
00095  M01S00094.combcpr +++|        UNLD$CART,                   # UNLOAD CARTRIDGE #
00096  M01S00095.combcpr +++|        WRT$LAB,                     # WRITE LABEL #
00097  M01S00096.combcpr +++|        CPY$AD,                      # COPY AU TO DISK #
00098  M01S00097.combcpr +++|        CPY$DA,                      # COPY DISK TO AU #
00099  M01S00098.combcpr +++|        CP$RAW$AU,                   # COPY RAW AU #
00100  M01S00099.combcpr +++|        INITHW,                      # INITIALIZE M860 HARDWARE #
00101  M01S00100.combcpr +++|        LSTREQTYP4;                  # END OF STATUS LIST #
00102  M01S00101.combcpr +++|
00103  M01S00102.combcpr +++|#
00104  M01S00103.combcpr +++|*     UCP REQUEST CODES FOR TYPE 5 REQUESTS.
00105  M01S00104.combcpr +++|#
00106  M01S00105.combcpr +++|
00107  M01S00106.combcpr +++|      STATUS REQTYP5
00108  M01S00107.combcpr +++|        RES5,                        # NOT USED #
00109  M01S00108.combcpr +++|        SSA$PUDT,                    # PASS UNIT DEVICE TABLE #
00110  M01S00109.combcpr +++|        SSA$UUDT,                    # UPDATE UNIT DEVICE TABLE #
00111  M01S00110.combcpr +++|        LSTREQTYP5;                  # END OF STATUS LIST #
00112  M01S00111.combcpr +++|
00113  M01S00112.combcpr +++|#
00114  M01S00113.combcpr +++|*     UCP RESPONSE CODES FOR TYPE1 REQUESTS.
00115  M01S00114.combcpr +++|#
00116  M01S00115.combcpr +++|
00117  M01S00116.combcpr +++|      STATUS RESPTYP1
00118  M01S00117.combcpr +++|        OK1,                         # OK #
00119  M01S00118.combcpr +++|        LSTRESPTYP1;                 # END OF STATUS LIST #
00120  M01S00119.combcpr +++|
00121  M01S00120.combcpr +++|#
00122  M01S00121.combcpr +++|*     UCP RESPONSE CODES FOR TYPE 2 REQUESTS.
00123  M01S00122.combcpr +++|#
00124  M01S00123.combcpr +++|
00125  M01S00124.combcpr +++|      STATUS RESPTYP2
00126  M01S00125.combcpr +++|        OK2,                         # OK #
00127  M01S00126.combcpr +++|        MRFERR,                      # UNABLE TO ATTACH FILE #
00128  M01S00127.combcpr +++|        LSTRESPTYP2;                 # END OF STATUS LIST #
00129  M01S00128.combcpr +++|
00130  M01S00129.combcpr +++|#
00131  M01S00130.combcpr +++|*     UCP RESPONSE CODES FOR TYPE 3 REQUESTS.
00132  M01S00131.combcpr +++|#
00133  M01S00132.combcpr +++|
00134  M01S00133.combcpr +++|      STATUS RESPTYP3
00135  M01S00134.combcpr +++|        OK3,                         # OK #
00136  M01S00135.combcpr +++|        C$M$INTLCK,                  # CATALOG/MAP INTERLOCKED #
00137  M01S00136.combcpr +++|        C$M$NOPEN,                   # CATALOG/MAP NOT OPEN #
00138  M01S00137.combcpr +++|        RESUB$REQ,                   # RESUBMIT REQUEST #
00139  M01S00138.combcpr +++|        SUB$CAT$EX,                  # SUBCATALOG ALREADY EXISTS #
00140  M01S00139.combcpr +++|        NO$SUB$CAT,                  # NO SUCH SUBCATALOG #
00141  M01S00140.combcpr +++|        PF$PROB,                     # PERMANENT FILE PROBLEM #
00142  M01S00141.combcpr +++|        MSC$NEMPTY,                  # DRD NOT EMPTY #
00143  M01S00142.combcpr +++|        ILLEG$ORD,                   # ORDINAL OUT OF RANGE #
00144  M01S00143.combcpr +++|        NFROZ$FRAG,                  # NON FROZEN FRAGMENT #
00145  M01S00144.combcpr +++|        GROUP$FUL,                   # GROUP FULL STATUS #
00146  M01S00145.combcpr +++|        LSTRESPTYP3;                 # END OF STATUS LIST #
00147  M01S00146.combcpr +++|
00148  M01S00147.combcpr +++|#
00149  M01S00148.combcpr +++|*     UCP RESPONSE CODES FOR TYPE 4 REQUESTS.
00150  M01S00149.combcpr +++|#
00151  M01S00150.combcpr +++|
00152  M01S00151.combcpr +++|      STATUS RESPTYP4
00153  M01S00152.combcpr +++|        OK4,                         # OK #
00154  M01S00153.combcpr +++|        CART$LB$ERR,                 # PART OF LABEL MATCHED #
00155  M01S00154.combcpr +++|        CSN$IN$USE,                  # CSN IN USE #
00156  M01S00155.combcpr +++|        CELL$EMP,                    # SPECIFIED CELL EMPTY #
00157  M01S00156.combcpr +++|        CELL$FULL,                   # SPECIFIED CELL FULL #
00158  M01S00157.combcpr +++|        EX$DMARK,                    # EXCESSIVE DEMARKS #
00159  M01S00158.combcpr +++|        UNK$CART,                    # NO CARTRIDGE LABEL MATCH #
00160  M01S00159.combcpr +++|        UN$RD$ERR,                   # UNRECOVERABLE READ ERROR #
00161  M01S00160.combcpr +++|        UN$WRT$ERR,                  # UNRECOVERABLE WRITE ERROR #
00162  M01S00161.combcpr +++|        VOL$HD$ERR,                  # VOLUME HEADER ERROR #
00163  M01S00162.combcpr +++|        M86$HDW$PR,                  # M860 HARDWARE PROBLEM #
00164  M01S00163.combcpr +++|        RMS$FL$ERR,                  # DISK FILE ERROR #
00165  M01S00164.combcpr +++|        DISK$FULL,                   # DISK FULL #
00166  M01S00165.combcpr +++|        ATTACH$ERR,                  # ATTACH ERROR #
00167  M01S00166.combcpr +++|        SMA$OFF,                     # SM IS OFF #
00168  M01S00167.combcpr +++|        EOI,                         # END OF INFORMATION ON FILE #
00169  M01S00002.common1 +++|        PPU$D$PROB,                  # PPU FOUND DATA PROBLEM #
00170  M01S00168.combcpr +++|        LSTRESPTYP4;                 # END OF STATUS LIST #
00171  M01S00169.combcpr +++|
00172  M01S00170.combcpr +++|#
00173  M01S00171.combcpr +++|*     UCP RESPONSE CODES FOR TYPE 5 REQUESTS.
00174  M01S00172.combcpr +++|#
00175  M01S00173.combcpr +++|
00176  M01S00174.combcpr +++|      STATUS RESPTYP5
00177  M01S00175.combcpr +++|        OK5,                         # OK - NOT IN INITIALIZE #
00178  M01S00176.combcpr +++|        SSA$UIRC,                    # UNIT ALREADY IN REQUESTED STATE
00179  M01S00177.combcpr +++|                                       (NOT IN INITIALIZATION) #
00180  M01S00178.combcpr +++|        SSA$ERROR,                   # ERRORED - TURNED BACK OFF #
00181  M01S00179.combcpr +++|        SSA$OK,                      # OK - (BEFORE INITIALIZATION) #
00182  M01S00180.combcpr +++|        LSTRESPTYP5;                 # END OF STATUS LIST #
00183  M01S00181.combcpr +++|
00184  M01S00182.combcpr +++|#
00185  M01S00183.combcpr +++|*     STATUS LIST IDENTIFYING THE FIELDS IN A CATALOG
00186  M01S00184.combcpr +++|*     ENTRY, TO BE USED IN *UPDATE CATALOG FIELD*.
00187  M01S00185.combcpr +++|#
00188  M01S00186.combcpr +++|
00189  M01S00187.combcpr +++|      STATUS UCF                     # UPDATE CATALOG FIELD #
00190  M01S00188.combcpr +++|        UNUSED,                      # NOT USED #
00191  M01S00189.combcpr +++|        LOADC,                       # LOAD COUNT #
00192  M01S00190.combcpr +++|        FREEFL,                      # FREE FLAG #
00193  M01S00191.combcpr +++|        INHIB,                       # INHIBIT ALLOCATION #
00194  M01S00192.combcpr +++|        LOST,                        # LOST CARTRIDGE #
00195  M01S00193.combcpr +++|        EWPE,                        # EXCESSIVE WRITE PARITY ERRORS #
00196  M01S00194.combcpr +++|        CMAP,                        # SMMAP ERROR FLAG #
00197  M01S00195.combcpr +++|        FROZ,                        # FROZEN CHAIN FLAG #
00198  M01S00196.combcpr +++|        CONF,                        # CONFLICT FLAG #
00199  M01S00197.combcpr +++|        SOF,                         # START OF FRAGMENT FLAG #
00200  M01S00198.combcpr +++|        LSTSOF;                      # END OF STATUS LIST #
00201  M01S00199.combcpr +++|
00202  M01S00200.combcpr +++|#
00203  M01S00201.combcpr +++|*     IF THE FOLLOWING DEF FOR *CPRLEN* IS EVER CHANGED,
00204  M01S00202.combcpr +++|*     THE SIZE OF ARRAY *PRAMUCP* IN DECK *COMBUCR* MUST
00205  M01S00203.combcpr +++|*     BE CHANGED ALSO.
00206  M01S00204.combcpr +++|#
00207  M01S00205.combcpr +++|
00208  M01S00206.combcpr +++|      DEF CPRLEN     #10#;           # LENGTH OF CALLSS REQUEST BLOCK #
00209  M01S00207.combcpr +++|
00210  M01S00208.combcpr +++|      COMMON BCPRCOM;
00211  M01S00209.combcpr +++|
00212  M01S00210.combcpr +++|        BEGIN  # BCPRCOM #
00213  M01S00211.combcpr +++|
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  M01S00212.combcpr +++|        BASED
00220  M01S00213.combcpr +++|        ARRAY CPR [0:0] P(CPRLEN);   # CALLSS PARAMETER BLOCK #
00221  M01S00214.combcpr +++|          BEGIN
00222  M01S00215.combcpr +++|          ITEM CPR1       U(00,00,60);  # FULL REFFERENCE FOR WORD 1 #
00223  M01S00216.combcpr +++|          ITEM CPR$WC     U(00,36,06);  # WORD COUNT #
00224  M01S00217.combcpr +++|          ITEM CPR$RT     U(00,46,02);  # CALLSS *RT* FIELD #
00225  M01S00218.combcpr +++|          ITEM CPR$SSPFLG B(00,46,01);  # SUBSYSTEM PRESENCE FLAG #
00226  M01S00219.combcpr +++|          ITEM CPR$SSBFLG B(00,47,01);  # SUBSYSTEM BUSY FLAG #
00227  M01S00220.combcpr +++|          ITEM CPR$ES     U(00,48,11);  # ERROR CONDITION #
00228  M01S00221.combcpr +++|          ITEM CPR$C      B(00,59,01);  # COMPLETION BIT #
00229  M01S00222.combcpr +++|          ITEM CPR2       U(01,00,60);  # FULL REFERENCE FOR WORD 3 #
00230  M01S00223.combcpr +++|          ITEM CPR$RQT    U(01,00,06);  # REQUEST TYPE #
00231  M01S00224.combcpr +++|          ITEM CPR$RQC    U(01,06,06);  # REQUEST CODE #
00232  M01S00225.combcpr +++|          ITEM CPR$RQI    U(01,12,05);  # REQUESTOR IDENTIFIER #
00233  M01S00226.combcpr +++|          ITEM CPR$UCO    U(01,17,04);  # UDT CONTROLLER ORDINAL #
00234  M01S00227.combcpr +++|          ITEM CPR$UDTQ   U(01,22,10);  # UDT ORDINAL #
00235  M01S00228.combcpr +++|          ITEM CPR$CSU    U(01,18,06);  # LOGICAL SM-ID #
00236  M01S00229.combcpr +++|          ITEM CPR$NW     B(01,17,01);  # *SSMOVE* NO WAIT OPTION #
00237  M01S00230.combcpr +++|          ITEM CPR$DRD    U(01,24,01);  # DRD UNIT 0 OR 1 #
00238  M01S00231.combcpr +++|          ITEM CPR$GR     U(01,26,06);  # GROUP NUMBER #
00239  M01S00232.combcpr +++|          ITEM CPR$YZ     U(01,33,09);  # Y AND Z COORDINATE #
00240  M01S00233.combcpr +++|          ITEM CPR$Y      U(01,33,05);  # Y COORDINATE #
00241  M01S00234.combcpr +++|          ITEM CPR$BYNR   U(01,33,06);  # OFF SET BIT NUMBER #
00242  M01S00235.combcpr +++|          ITEM CPR$PMMR   B(01,40,01);  # STATUS BIT #
00243  M01S00236.combcpr +++|          ITEM CPR$Z      U(01,38,04);  # Z COORDINATE #
00244  M01S00237.combcpr +++|          ITEM CPR$ADDR2  U(01,42,18);  # ADDRESS OF ADDITIONAL DATA #
00245  M01S00238.combcpr +++|          ITEM CPR3       U(02,00,60);  # FULL REFERENCE FOR WORD 3 #
00246  M01S00239.combcpr +++|          ITEM CPR$RQR    U(02,00,06);  # RESPONSE CODE #
00247  M01S00240.combcpr +++|          ITEM CPR$CUORD  U(02,06,06);  # *CU* ORDINAL #
00248  M01S00241.combcpr +++|          ITEM CPR$CIF    U(02,12,03);  # CHANNEL INTERFACE #
00249  M01S00242.combcpr +++|          ITEM CPR$FCT    U(02,06,12);  # *FCT* ORDINAL #
00250  M01S00243.combcpr +++|          ITEM CPR$DATE   U(02,24,36);  # LAST PURGE DATE #
00251  M01S00003.common1 +++|          ITEM CPR$RELC   U(02,24,36);  # RELEASE COUNT #
00252  M01S00244.combcpr +++|          ITEM CPR$AU     U(02,48,12);  # *AU* NUMBER #
00253  M01S00245.combcpr +++|          ITEM CPR$ST$LW  U(02,06,18);  # STRIPE LOW #
00254  M01S00246.combcpr +++|          ITEM CPR$ST$HI  U(02,24,18);  # STRIPE HIGH #
00255  M01S00247.combcpr +++|          ITEM CPR$GRT    U(02,36,04);  # GROUP ORDINAL #
00256  M01S00248.combcpr +++|          ITEM CPR$ADDR3  U(02,24,18);  # UDT OFFSET WORD #
00257  M01S00249.combcpr +++|          ITEM CPR$ADDR4  U(02,42,18);  # WORD COUNT #
00258  M01S00250.combcpr +++|          ITEM CPR4       U(03,00,60);  # FULL REFERENCE FOR WORD 4 #
00259  M01S00251.combcpr +++|          ITEM CPR$FAM    C(03,00,07);  # FAMILY NAME #
00260  M01S00252.combcpr +++|          ITEM CPR$SUB    U(03,42,06);  # SUB FAMILY #
00261  M01S00253.combcpr +++|          ITEM CPR5       U(04,00,60);  # FULL REFERENCE FOR WORD 5 #
00262  M01S00254.combcpr +++|          ITEM CPR$PFN    C(04,00,07);  # FILE NAME #
00263  M01S00255.combcpr +++|          ITEM CPR$CCOD   C(04,00,02);  # CARTRIDGE IDENTIFIER LETTER #
00264  M01S00256.combcpr +++|          ITEM CPR$CSND   C(04,12,08);  # CARTRIDGE CSN #
00265  M01S00257.combcpr +++|          ITEM CPR6       U(05,00,60);  # FULL REFERENCE FOR WORD 6 #
00266  M01S00258.combcpr +++|          ITEM CPR$B      U(05,16,12);  # SMALL FILE SPACE ALLOCATED #
00267  M01S00259.combcpr +++|          ITEM CPR$FLD    U(05,30,06);  # CATALOG FIELD NAME #
00268  M01S00260.combcpr +++|          ITEM CPR$VAL    U(05,36,24);  # CATALOG FIELD VALUE #
00269  M01S00261.combcpr +++|          ITEM CPR$UI     U(05,42,18);  # USER INDEX #
00270  M01S00262.combcpr +++|          ITEM CPR7       U(06,00,60);  # FULL REFERENCE FOR WORD 7 #
00271  M01S00263.combcpr +++|          ITEM CPR$STRD   U(06,00,30);  # NUMBER OF STRIPES READ #
00272  M01S00264.combcpr +++|          ITEM CPR$STWR   U(06,30,30);  # NUMBER OF STRIPES WRITTEN #
00273  M01S00265.combcpr +++|          ITEM CPR8       U(07,00,60);  # FULL REFERENCE FOR WORD 8 #
00274  M01S00266.combcpr +++|          ITEM CPR$SRDE   U(07,00,30);  # NUMBER OF SOFT READ ERRORS #
00275  M01S00267.combcpr +++|          ITEM CPR$SWRE   U(07,30,30);  # NUMBER OF SOFT WRITE ERROR #
00276  M01S00268.combcpr +++|          ITEM CPR9       U(08,00,60);  # FULL REFERENCE FOR WORD 9 #
00277  M01S00269.combcpr +++|          ITEM CPR$HRDE   U(08,00,15);  # NUMBER OF HARD READ ERRORS #
00278  M01S00270.combcpr +++|          ITEM CPR$STDM   U(08,15,15);  # NUMBER OF DEMARKED STRIPES #
00279  M01S00271.combcpr +++|          ITEM CPR$CRLD   U(08,30,15);  # NUMBER OF CARTRIDGE LOADS #
00280  M01S00272.combcpr +++|          ITEM CPR$LDER   U(08,45,15);  # NUMBER OF LOAD ERRORS #
00281  M01S00273.combcpr +++|          ITEM CPR$MAPENT C(06,00,30);  # 3 WORD SMAMAP ENTRY #
00282  M01S00274.combcpr +++|          END
00283  M01S00275.combcpr +++|
00284  M01S00276.combcpr +++|        END  # BCPRCOM #
00285  M01S00277.combcpr +++|
00286  M01S00278.combcpr +++|      END  # COMBCPR #
00287  M01S00279.combcpr +++|
00288  M01S00280.combcpr +++|                                               CONTROL LIST;
00289  M01S00014.combcpr +++|COMBFET
00290  M01S60316.@061439 +++|7
Line S162240 Modification History
M01 (Yanked) (Updated by) @008398
M02 (Yanked) (Updated by) @053381
M03 (Yanked) (Added by) @019301
M04 (Yanked) (Updated by) @053454
M05 (Yanked) (Updated by) @058624
M06 (Yanked) (Updated by) @058604
M07 (Yanked) (Updated by) @008274
M08 (Yanked) (Updated by) @020780
M09 (Yanked) (Added by) @009344
M10 (Yanked) (Added by) @038124
M11 (Yanked) (Added by) @029267
M12 (Yanked) (Updated by) @053508
M13 (Yanked) (Updated by) @025165
M14 (Yanked) (Updated by) @038152
M15 (Yanked) (Updated by) @058604
M16 (Yanked) (Updated by) @061868
M17 (Yanked) (Updated by) @029060
M18 (Yanked) (Updated by) @031557
M19 (Yanked) (Updated by) @037195
M20 (Yanked) (Updated by) @017646
Seq #  *Modification Id* Act 
----------------------------+
00291  M20S162240.@017646 ---|6
Line S62381 Modification History
M01 (Yanked) (Added by) @029192
M02 (Yanked) (Updated by) @012844
M03 (Yanked) (Added by) @015188
M04 (Yanked) (Added by) @012611
M05 (Yanked) (Updated by) @053400
Seq #  *Modification Id* Act 
----------------------------+
00292  M05S62381.@053400 ---|+
00293  M01S00000.combcpr +++|
00294  M01S00016.combcpr +++|#
00295  M01S00017.combcpr +++|*     FET TYPE DEFINITIONS FOR USE IN LOGGING FSC ERRORS.
00296  M01S00018.combcpr +++|#
00297  M01S00019.combcpr +++|
00298  M01S00020.combcpr +++|      DEF DFET       #0#;            # DATA FET #
00299  M01S00021.combcpr +++|      DEF RFET       #1#;            # READ FET (MESSAGES FROM M860) #
00300  M01S00022.combcpr +++|      DEF WFET       #2#;            # WRITE FET (MESSAGES TO M860) #
00301  M01S00023.combcpr +++|
00302  M01S00024.combcpr +++|      COMMON BFETCOM;
00303  M01S00025.combcpr +++|
00304  M01S00026.combcpr +++|        BEGIN  # BFETCOM DESCRIPTION #
00305  M01S00027.combcpr +++|
00306  M01S00028.combcpr +++|#
00307  M01S00029.combcpr +++|*     BUFFER ADDRESSES.
00308  M01S00030.combcpr +++|#
00309  M01S00031.combcpr +++|
00310  M01S00032.combcpr +++|        ITEM MRDBADR    U;           # MESSAGE READ BUFFERS FWA #
00311  M01S00033.combcpr +++|        ITEM MWRBADR    U;           # MESSAGE WRITE BUFFERS FWA #
00312  M01S00034.combcpr +++|        ITEM SBTADR     U;           # STORAGE BUFFER TABLE FWA #
00313  M01S00035.combcpr +++|
00314  M01S00036.combcpr +++|        BASED
00315  M01S00037.combcpr +++|        ARRAY FETSET S(RFETL);       # *FET* DEFINITION #
00316  M01S00038.combcpr +++|          BEGIN
00317  M01S00039.combcpr +++|          ITEM FET$LFN    C(00,00,07);  # LOGICAL FILE NAME #
00318  M01S00040.combcpr +++|          ITEM FET$LN     U(00,42,04);  # LEVEL NUMBER #
00319  M01S00041.combcpr +++|          ITEM FET$AT     U(00,46,04);  # ABNORMAL TERMINATION CODES #
00320  M01S00042.combcpr +++|          ITEM FET$EOR    B(00,55,01);  # END-OF-RECORD BIT #
00321  M01S00043.combcpr +++|          ITEM FET$CODE   U(00,50,10);  # REQUEST/RETURN CODE #
00322  M01S00044.combcpr +++|          ITEM FET$EOI    B(00,50,01);  # END-OF-INFORMATION BIT #
00323  M01S00045.combcpr +++|          ITEM FET$LOCK   B(00,59,01);  # *FET* INTERLOCK BIT #
00324  M01S00046.combcpr +++|          ITEM FET$DT     U(01,00,12);  # DEVICE TYPE #
00325  M01S00047.combcpr +++|          ITEM FET$R      B(01,12,01);  # RANDOM ACCESS BIT #
00326  M01S00048.combcpr +++|          ITEM FET$UP     B(01,14,01);  # USER PROCESSING BIT #
00327  M01S00049.combcpr +++|          ITEM FET$EP     B(01,15,01);  # ERROR PROCESSING BIT #
00328  M01S00050.combcpr +++|          ITEM FET$SP     B(01,20,01);  # SECURITY PROCESSING BIT #
00329  M01S00051.combcpr +++|          ITEM FET$L      U(01,36,06);  # *FET* LENGTH (OVER 5 WORDS) #
00330  M01S00052.combcpr +++|          ITEM FET$FRST   U(01,42,18);  # *FWA* OF *CIO* BUFFER #
00331  M01S00053.combcpr +++|          ITEM FET$IN     U(02,42,18);  # IN POINTER FOR *CIO* BUFFER #
00332  M01S00054.combcpr +++|          ITEM FET$OUT    U(03,42,18);  # OUT POINTER FOR *CIO* BUFFER
00333  M01S00055.combcpr +++|                                        #
00334  M01S00056.combcpr +++|          ITEM FET$FNTP   U(04,00,12);  # *FNT* POINTER #
00335  M01S00057.combcpr +++|          ITEM FET$AL     U(04,12,12);  # ACCESS LEVEL #
00336  M01S00058.combcpr +++|          ITEM FET$PRU    U(04,24,18);  # PHYSICAL RECORD UNIT SIZE #
00337  M01S00059.combcpr +++|          ITEM FET$LIM    U(04,42,18);  # *LWA*+1 OF *CIO* BUFFER #
00338  M01S00060.combcpr +++|          ITEM FET$FWRK   U(05,12,18);  # *FWA* OF WORKING STORAGE #
00339  M01S00061.combcpr +++|          ITEM FET$LWRK   U(05,42,18);  # *LWA*+1 OF WORKING STORAGE #
00340  M01S00062.combcpr +++|          ITEM FET$LA     U(05,42,18);  # LIST ADDRESS #
00341  M01S00063.combcpr +++|          ITEM FET$CRI    U(06,00,30);  # CURRENT RANDOM INDEX #
00342  M01S00064.combcpr +++|          ITEM FET$W      B(06,30,01);  # RANDOM REWRITE INDEX #
00343  M01S00065.combcpr +++|          ITEM FET$RR     U(06,31,29);  # *RSA* FOR RANDOM *I/O*
00344  M01S00066.combcpr +++|                                          REQUEST #
00345  M01S00067.combcpr +++|          ITEM FET$DEC    U(06,31,29);  # DETAIL ERROR CODE #
00346  M01S00068.combcpr +++|          ITEM FET$IL     U(07,24,18);  # INDEX LENGTH #
00347  M01S00069.combcpr +++|          ITEM FET$IF     U(07,42,18);  # *FWA* OF INDEX BUFFER #
00348  M01S00070.combcpr +++|          END
00349  M01S00071.combcpr +++|
00350  M01S00072.combcpr +++|        BASED
00351  M01S00073.combcpr +++|        ARRAY FETFHB   S(RFHBL);       # *DRIVER* LARGE BUFFER *FET* #
00352  M01S00074.combcpr +++|          BEGIN
00353  M01S00075.combcpr +++|          ITEM FHB$AT     U(00,42,08);  # ABNORMAL TERMINATION CODES #
00354  M01S00076.combcpr +++|          ITEM FHB$CODE   U(00,50,10);  # REQUEST/RETURN CODE #
00355  M01S00077.combcpr +++|          ITEM FHB$EOI    B(00,50,01);  # END-OF-INFORMATION BIT #
00356  M01S00078.combcpr +++|          ITEM FHB$LOCK   B(00,59,01);  # *FET* INTERLOCK BIT #
00357  M01S00079.combcpr +++|          ITEM FHB$ESTO   U(01,00,12);  # EST ORDINAL #
00358  M01S00080.combcpr +++|          ITEM FHB$RBADDR U(01,12,18);  # READ BUFFER ADDRESS #
00359  M01S00081.combcpr +++|          ITEM FHB$FRST   U(01,42,18);  # *FWA* OF *CIO* BUFFER #
00360  M01S00082.combcpr +++|          ITEM FHB$IN     U(02,42,18);  # IN POINTER FOR *CIO* BUFFER
00361  M01S00083.combcpr +++|                                        #
00362  M01S00084.combcpr +++|          ITEM FHB$OUT    U(03,42,18);  # OUT POINTER FOR *CIO* BUFFER
00363  M01S00085.combcpr +++|                                        #
00364  M01S00086.combcpr +++|          ITEM FHB$UNIT   U(04,00,12);  # DRD UNIT NUMBER #
00365  M01S00087.combcpr +++|          ITEM FHB$SMUN   U(04,00,11);  # SM UNIT NUMBER #
00366  M01S00088.combcpr +++|          ITEM FHB$ST$SS  B(04,41,01);  # STOP *1SS* FLAG #
00367  M01S00089.combcpr +++|          ITEM FHB$LIM    U(04,42,18);  # *LWA*+1 OF *CIO* BUFFER #
00368  M01S00090.combcpr +++|          ITEM FHB$FSC    C(05,00,50);  # FSC STATUS WORDS #
00369  M01S00091.combcpr +++|          ITEM FHB$STST   U(05,00,60);  # START OF STATUS - 5 WORDS #
00370  M01S00092.combcpr +++|          ITEM FHB$GST    U(05,00,36);  # GENERAL STATUS #
00371  M01S00093.combcpr +++|          ITEM FHB$ALERT  U(05,00,01);  # ALERT STATUS #
00372  M01S00094.combcpr +++|          ITEM FHB$CONNT  U(05,02,01);  # UNIT CONNECTED TO CONTROLLER
00373  M01S00095.combcpr +++|                                        #
00374  M01S00096.combcpr +++|          ITEM FHB$WTRNG  U(05,04,01);  # WRITE PIN IN CARTRIDGE #
00375  M01S00097.combcpr +++|          ITEM FHB$FMARK  U(05,07,01);  # FILE MARK #
00376  M01S00098.combcpr +++|          ITEM FHB$EOT    U(05,08,01);  # END OF TAPE #
00377  M01S00099.combcpr +++|          ITEM FHB$BOT    U(05,09,01);  # BEGINNING OF TAPE #
00378  M01S00100.combcpr +++|          ITEM FHB$UTBY   U(05,10,01);  # UNIT BUSY #
00379  M01S00101.combcpr +++|          ITEM FHB$UTRY   U(05,11,01);  # UNIT READY #
00380  M01S00102.combcpr +++|          ITEM FHB$LDATA  U(05,24,01);  # LOST DATA #
00381  M01S00103.combcpr +++|          ITEM FHB$UTCK   U(05,25,01);  # UNIT CHECK #
00382  M01S00104.combcpr +++|          ITEM FHB$PYERR  U(05,26,01);  # TAPE PARITY ERROR #
00383  M01S00105.combcpr +++|          ITEM FHB$CPYER  U(05,27,01);  # CHANNEL PARITY ERROR #
00384  M01S00106.combcpr +++|          ITEM FHB$APYER  U(05,28,01);  # A DAPTER PARITY ERROR #
00385  M01S00107.combcpr +++|          ITEM FHB$ERRCD  U(05,29,07);  # ERROR CODE #
00386  M01S00108.combcpr +++|          ITEM FHB$MSB0   U(05,36,08);  # M860 SENSE BYTE 0 #
00387  M01S00109.combcpr +++|          ITEM FHB$MSB00  U(05,36,01);  # COMMAND REJECT #
00388  M01S00110.combcpr +++|          ITEM FHB$MSB01  U(05,37,01);  # INTERVENTION REQUIRED #
00389  M01S00111.combcpr +++|          ITEM FHB$MSB02  U(05,38,01);  # BUFOUT CHECK #
00390  M01S00112.combcpr +++|          ITEM FHB$MSB04  U(05,40,01);  # DATA CHECK #
00391  M01S00113.combcpr +++|          ITEM FHB$MSB1   U(05,44,08);  # M860 SENSE BYTE 1 #
00392  M01S00114.combcpr +++|          ITEM FHB$MSB11  U(05,45,02);  # DRD STATUS #
00393  M01S00115.combcpr +++|          ITEM FHB$MSB14  U(05,47,01);  # LOAD POINT #
00394  M01S00116.combcpr +++|          ITEM FHB$MSB15  U(05,48,01);  # WRITE STATUS #
00395  M01S00117.combcpr +++|          ITEM FHB$MSB16  U(05,49,01);  # FILE PROTECT #
00396  M01S00118.combcpr +++|          ITEM FHB$MSB2   U(05,52,08);  # M860 SENSE BYTE 2 #
00397  M01S00119.combcpr +++|          ITEM FHB$MSB3   U(06,00,08);  # M860 SENSE BYTE 3 #
00398  M01S00120.combcpr +++|          ITEM FHB$MSB33  U(06,03,01);  # CRC ERROR #
00399  M01S00121.combcpr +++|          ITEM FHB$MSB36  U(06,06,01);  # BACKWARD TAPE MOVEMENT #
00400  M01S00122.combcpr +++|          ITEM FHB$MSB37  U(06,07,01);  # PARITY ERROR #
00401  M01S00123.combcpr +++|          ITEM FHB$MSB4   U(06,08,08);  # M860 SENSE BYTE 4 #
00402  M01S00124.combcpr +++|          ITEM FHB$MSB41  U(06,09,01);  # REJECT TAPE UNIT #
00403  M01S00125.combcpr +++|          ITEM FHB$MSB42  U(06,10,01);  # TAPE INDICATER #
00404  M01S00126.combcpr +++|          ITEM FHB$MSB46  U(06,14,01);  # DRD UNIT CHECK #
00405  M01S00127.combcpr +++|          ITEM FHB$MSB5   U(06,16,08);  # M860 SENSE BYTE 5 #
00406  M01S00128.combcpr +++|          ITEM FHB$MSB6   U(06,24,08);  # M860 SENSE BYTE 6 #
00407  M01S00129.combcpr +++|          ITEM FHB$MSBMOD U(06,28,04);  # MODEL INDENIFICATION *D* #
00408  M01S00130.combcpr +++|          ITEM FHB$MSB7   U(06,32,08);  # M860 SENSE BYTE 7 #
00409  M01S00131.combcpr +++|          ITEM FHB$MSB72  U(06,34,01);  # READ BEYOND VALID DATA #
00410  M01S00132.combcpr +++|          ITEM FHB$MSB8   U(06,40,08);  # M860 SENSE BYTE 8 #
00411  M01S00133.combcpr +++|          ITEM FHB$MSB9   U(06,48,08);  # M860 SENSE BYTE 9 #
00412  M01S00134.combcpr +++|          ITEM FHB$MSB10A U(06,56,04);  # M860 SENSE BYTE 10 #
00413  M01S00135.combcpr +++|          ITEM FHB$MSB10B U(07,00,04);  # M860 SENSE BYTE 10 #
00414  M01S00136.combcpr +++|          ITEM FHB$MSBA1  U(07,04,08);  # M860 SENSE BYTE 11 #
00415  M01S00137.combcpr +++|          ITEM FHB$MSBA2  U(07,12,08);  # M860 SENSE BYTE 12 #
00416  M01S00138.combcpr +++|          ITEM FHB$MSBA3  U(07,20,08);  # M860 SENSE BYTE 13 #
00417  M01S00139.combcpr +++|          ITEM FHB$MSBA4  U(07,28,08);  # M860 SENSE BYTE 14 #
00418  M01S00140.combcpr +++|          ITEM FHB$MSBA5  U(07,36,08);  # M860 SENSE BYTE 15 #
00419  M01S00141.combcpr +++|          ITEM FHB$MSBA6  U(07,44,08);  # SENSE BYTE 16 #
00420  M01S00142.combcpr +++|          ITEM FHB$MSBA7  U(07,52,08);  # SENSE BYTE 17 #
00421  M01S00143.combcpr +++|          ITEM FHB$MSBA8  U(08,00,08);  # SENSE BYTE 18 #
00422  M01S00144.combcpr +++|          ITEM FHB$MSBA9  U(08,08,08);  # SENSE BYTE 19 #
00423  M01S00145.combcpr +++|          ITEM FHB$MSB20  U(08,16,08);  # SENSE BYTE 20 #
00424  M01S00146.combcpr +++|          ITEM FHB$MSB21  U(08,24,08);  # SENSE BYTE 21 #
00425  M01S00147.combcpr +++|          ITEM FHB$MSB22  U(08,32,08);  # SENSE BYTE 22 #
00426  M01S00148.combcpr +++|          ITEM FHB$MSB23  U(08,40,08);  # SENSE BYTE 23 #
00427  M01S00149.combcpr +++|          ITEM FHB$REV$FN U(08,48,12);  # REV NUMBER/FUNCTION #
00428  M01S00150.combcpr +++|          ITEM FHB$170$ST U(09,00,12);  # C170 DI STATUS #
00429  M01S00151.combcpr +++|          ITEM FHB$FSCST  U(09,12,12);  # FSC DI STATUS #
00430  M01S00152.combcpr +++|          ITEM FHB$ADAP   U(09,24,12);  # ADAPTER NUMBER #
00431  M01S00153.combcpr +++|          ITEM FHB$CHAN   U(09,36,12);  # CHANNEL USED #
00432  M01S00154.combcpr +++|          ITEM FHB$DSTS   U(09,48,12);  # DIAGNOSTIC STATUS #
00433  M01S00155.combcpr +++|          ITEM FHB$SHDWD  U(10,00,60);  # START OF STRIPE LABEL #
00434  M01S00156.combcpr +++|          ITEM FHB$E      U(10,01,01);  # EOT ON TRAILER LABEL #
00435  M01S00157.combcpr +++|          ITEM FHB$PVLN   U(10,02,10);  # PREVIOUS VOLUME LENGTH #
00436  M01S00158.combcpr +++|          ITEM FHB$PVSN   U(10,12,12);  # PREVIOUS VOLUME NUMBER #
00437  M01S00159.combcpr +++|          ITEM FHB$CVSN   U(10,24,12);  # VOLUME NUMBER #
00438  M01S00160.combcpr +++|          ITEM FHB$RSIF   U(10,36,24);  # RELATIVE STRIPE NUMBER #
00439  M01S00161.combcpr +++|          ITEM FHB$RSIV   U(11,48,12);  # VOLUME RELATIVE STRIPE #
00440  M01S00162.combcpr +++|          ITEM FHB$SMIF   U(12,00,09);  # FULL SMA INTERFACE WORD #
00441  M01S00163.combcpr +++|          ITEM FHB$SM     U(12,00,06);  # SM-IF #
00442  M01S00164.combcpr +++|          ITEM FHB$D$SM   U(12,06,06);  # DRD AND SM ORDINALS #
00443  M01S00165.combcpr +++|          ITEM FHB$CIF    U(12,12,03);  # CHANNEL INTERFACE #
00444  M01S00166.combcpr +++|          ITEM FHB$TIME   U(12,24,36);  # PACKED DATE/TIME #
00445  M01S00167.combcpr +++|          ITEM FHB$CCSN   C(13,00,10);  # CURRENT CSN #
00446  M01S00168.combcpr +++|          ITEM FHB$PCSN   C(14,00,10);  # CSN OF PREVIOUS VOLUME #
00447  M01S00169.combcpr +++|          ITEM FHB$PFC    C(15,00,160); # COPY OF FILE *PFC* #
00448  M01S00170.combcpr +++|          ITEM FHB$PFC$FN C(15,00,07);  # FILE NAME #
00449  M01S00171.combcpr +++|          ITEM FHB$PFC$UI U(15,42,18);  # USER INDEX #
00450  M01S00172.combcpr +++|          ITEM FHB$PFC$DT U(17,24,36);  # CREATION DATE AND TIME #
00451  M01S00173.combcpr +++|          END
00452  M01S00174.combcpr +++|
00453  M01S00175.combcpr +++|
00454  M01S00176.combcpr +++|        BASED
00455  M01S00177.combcpr +++|        ARRAY FETRDB [0:0] S(RWDATA); ;  # RAW DATA BUFFER #
00456  M01S00178.combcpr +++|
00457  M01S00179.combcpr +++|        BASED
00458  M01S00180.combcpr +++|        ARRAY FETMRA [0:0] S(1);     # MESSAGE READ BUFFER ADDRESS #
00459  M01S00181.combcpr +++|          BEGIN
00460  M01S00182.combcpr +++|          ITEM FRA$MRBADR U(00,42,18);
00461  M01S00183.combcpr +++|          END
00462  M01S00184.combcpr +++|
00463  M01S00185.combcpr +++|        BASED
00464  M01S00186.combcpr +++|        ARRAY FETMWB [0:0] S(SFMWL);  # MESSAGE WRITE BUFFER FET #
00465  M01S00187.combcpr +++|          BEGIN
00466  M01S00188.combcpr +++|          ITEM FMW$AT     U(00,42,08);  # ABNORMAL TERMINATION CODE #
Line S00189 Modification History
M01 (Added by) combcpr
M02 (Updated by) mse3
Seq #  *Modification Id* Act 
----------------------------+
00467  M02S00189.mse3    ---|          ITEM FMW$CODE   U(00,50,10);  # REQUEST/RETURN CODE #
00468  M01S00190.combcpr +++|          ITEM FMW$CMPL   B(00,59,01);  # COMPLETE FLAG #
00469  M01S00001.common1 +++|          ITEM FMW$RTIME  U(01,00,24);  # ERROR RETRY TIME #
00470  M01S00002.common1 +++|          ITEM FMW$RCNT   U(01,24,06);  # ERROR RETRY COUNT #
00471  M01S00191.combcpr +++|          ITEM FMW$FIRST  U(01,42,18);  # FWA OF CIRCULAR BUFFER #
00472  M01S00192.combcpr +++|          ITEM FMW$IN     U(02,42,18);  # IN POINTER #
00473  M01S00193.combcpr +++|          ITEM FMW$OUT    U(03,42,18);  # OUT POINTER #
00474  M01S00194.combcpr +++|          ITEM FMW$CHAN   U(04,00,12);  # CHANNEL NUMBER #
00475  M01S00003.common1 +++|          ITEM FMW$ERROR  B(04,13,01);  # CHANNEL (NOT DRD) ERROR #
00476  M01S00195.combcpr +++|          ITEM FMW$CHON   B(04,14,01);  # CHANNEL ON/OFF BIT #
00477  M01S00196.combcpr +++|          ITEM FMW$LIMIT  U(04,42,18);  # LWA+1 OF CIRCULAR BUFFER #
00478  M01S00197.combcpr +++|          ITEM FMW$FSC    C(05,00,50);  # *FSC* STATUS WORDS #
00479  M01S00198.combcpr +++|          END
00480  M01S00199.combcpr +++|
00481  M01S00200.combcpr +++|        BASED
00482  M01S00201.combcpr +++|        ARRAY FETMRB [0:0] S(SFMRL);  # MESSAGE READ BUFFER FET #
00483  M01S00202.combcpr +++|          BEGIN
00484  M01S00203.combcpr +++|          ITEM FMR$AT     U(00,42,08);  # ABNORMAL TERMINATION CODE #
Line S00204 Modification History
M01 (Added by) combcpr
M02 (Updated by) mse3
Seq #  *Modification Id* Act 
----------------------------+
00485  M02S00204.mse3    ---|          ITEM FMR$CODE   U(00,50,10);  # REQUEST/RETURN CODE #
00486  M01S00205.combcpr +++|          ITEM FMR$CU     U(01,00,12);  # CONTROLLER ORDINAL #
00487  M01S00206.combcpr +++|          ITEM FMR$ELCNT  U(01,12,12);  # ERROR LOG MSG COUNT #
00488  M01S00207.combcpr +++|          ITEM FMR$FIRST  U(01,42,18);  # FWA OF CIRCULAR BUFFER #
00489  M01S00208.combcpr +++|          ITEM FMR$IN     U(02,42,18);  # IN POINTER #
00490  M01S00209.combcpr +++|          ITEM FMR$OUT    U(03,42,18);  # OUT POINTER #
00491  M01S00210.combcpr +++|          ITEM FMR$CHAN   U(04,00,12);  # CHANNEL NUMBER #
00492  M01S00211.combcpr +++|          ITEM FMR$CIF    U(04,12,03);  # CU CHANNEL INTERFACE #
00493  M01S00212.combcpr +++|          ITEM FMR$RDBA   U(04,18,18);  # RAW DATA BUFFER ADDRESS #
00494  M01S00213.combcpr +++|          ITEM FMR$LIMIT  U(04,42,18);  # LWA+1 OF CIRCULAR BUFFER #
00495  M01S00214.combcpr +++|          ITEM FMR$FSC    C(05,00,50);  # *FSC* STATUS WORDS #
00496  M01S00215.combcpr +++|          ITEM FMR$KWORDS C(10,00,20);  # K-DISPLAY WORDS #
00497  M01S00216.combcpr +++|          END
00498  M01S00217.combcpr +++|
00499  M01S00218.combcpr +++|        END  # BFETCOM DESCRIPTION #
00500  M01S00219.combcpr +++|
00501  M01S00220.combcpr +++|      END  # COMBFET #
00502  M01S00221.combcpr +++|
00503  M01S00222.combcpr +++|                                               CONTROL LIST;
cdc/nos2.source/opl.opl871/common/combcpr.txt ยท Last modified: by 127.0.0.1