User Tools

Site Tools


cdc:nos2.source:opl.opl871:deck:catalog

Deck CATALOG

Library Member Format: MODIFY

Source

Seq #  *Modification Id* Act 
----------------------------+
00001  M00S00001.catalog +++|          IDENT  CATALOG,FETS
00002  M00S00002.catalog +++|          ABS
00003  M00S00003.catalog +++|          ENTRY  CATALOG
00004  M00S00004.catalog +++|          ENTRY  RFL=
00005  M00S00005.catalog +++|          ENTRY  SSM=
00006  M00S00006.catalog +++|          SST
00007  M00S00007.catalog +++|          SYSCOM B1          DEFINE (B1) = 1
00008  M00S00008.catalog +++|          TITLE  CATALOG - CATALOG FILE.
00009  M00S00009.catalog +++|*COMMENT  CATALOG - CATALOG FILE.
Line S00010 Modification History
M01 (Removed by) 281l803
Seq #  *Modification Id* Act 
----------------------------+
00010  M01S00010.281l803 ---|          COMMENT COPYRIGHT CONTROL DATA CORP. 1970.
Line S00001 Modification History
M01 (Added by) 281l803
Seq #  *Modification Id* Act 
----------------------------+
00011  M01S00001.281l803 +++|          COMMENT  COPYRIGHT CONTROL DATA SYSTEMS INC.  1992.
00012  M00S00011.catalog +++|          SPACE  4
00013  M00S00012.catalog +++|***       CATALOG - CATALOG FILES.
00014  M00S00013.catalog +++|*         G. R. MANSFIELD.  70/12/20.
00015  M00S00014.catalog +++|          SPACE  4
00016  M00S00015.catalog +++|***              CATALOG LISTS PERTINENT INFORMATION ABOUT EACH RECORD
00017  M00S00016.catalog +++|*         OF A BINARY MEDIUM.
00018  M00S00017.catalog +++|*
00019  M00S00018.catalog +++|*         THIS INFORMATION INCLUDES -
00020  M00S00019.catalog +++|*
00021  M00S00020.catalog +++|*         1)  THE RECORD NUMBER COUNTING FROM THE BEGINNING OF THE FILE.
00022  M00S00021.catalog +++|*         2)  THE NAME FROM THE FIRST WORD OF THE RECORD OR THE SECOND
00023  M00S00022.catalog +++|*                WORD OF THE  *77*  TABLE IF IT IS PRESENT.
00024  M00S00023.catalog +++|*         3)  THE RECORD TYPE.
00025  M00S00024.catalog +++|*         4)  LENGTH OF THE PARTICULAR RECORD ( EXCLUDING THE  *77*
00026  M00S00025.catalog +++|*                TABLE ).
00027  M00S00026.catalog +++|*         5)  CHECKSUM OF THE RECORD, EXCLUDING *77* TABLE, IF PRESENT.
00028  M00S00027.catalog +++|*         6)  CONTENTS OF THE  *77*  TABLE, IF ANY.
00029  M00S00028.catalog +++|*         7)  OTHER PERTINENT INFORMATION, ACCORDING TO RECORD TYPE.
00030  M00S00029.catalog +++|*
00031  M00S00030.catalog +++|*
00032  M00S00031.catalog +++|*         THE FOLLOWING RECORD TYPES ARE RECOGNIZED.
00033  M00S00032.catalog +++|*
00034  M00S00033.catalog +++|*         TYPE   DESCRIPTION
00035  M00S00034.catalog +++|*
00036  M00S00035.catalog +++|*         TEXT   UNIDENTIFIED AS ANY OTHER TYPE.
00037  M00S00036.catalog +++|*         PP     6000, CYBER 72/73/74, CYBER 170 PP PROGRAM.
00038  M00S00037.catalog +++|*         REL    RELOCATABLE CENTRAL PROGRAM.
00039  M00S00038.catalog +++|*         OVL    ABSOLUTE OVERLAY PROGRAM, NO ENTRY POINTS DEFINED.
00040  M00S00039.catalog +++|*         ULIB   USER LIBRARY TYPE RECORD.
00041  M00S00040.catalog +++|*         OPL    MODIFY PROGRAM LIBRARY DECK RECORD.
00042  M00S00041.catalog +++|*         OPLC   MODIFY PROGRAM LIBRARY COMMON DECK RECORD.
00043  M00S00042.catalog +++|*         OPLD   MODIFY PROGRAM LIBRARY DIRECTORY.
00044  M00S00043.catalog +++|*         ABS    ABSOULTE OVERLAY PROGRAM, WITH ENTRY POINTS DEFINED.
00045  M00S00044.catalog +++|*         PPU    7600, CYBER 76 TYPE PPU PROGRAM.
00046  M00S00045.catalog +++|*         CAP    FAST DYNAMIC LOAD CAPSULE.
00047  M00S00046.catalog +++|*         PROC   PROCEDURE TYPE RECORD.
Line S00001 Modification History
M01 (Added by) 251l664
Seq #  *Modification Id* Act 
----------------------------+
00048  M01S00001.251l664 +++|*         PPL    16-BIT PP PROGRAM.
00049  M00S00047.catalog +++|*
00050  M00S00048.catalog +++|*
00051  M00S00049.catalog +++|*         A RECORD OF *REL* FORMAT WILL HAVE THE ENTRY POINTS LISTED.
00052  M00S00050.catalog +++|*
Line S00051 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00053  M01S00051.ns22000 ---|*         A RECORD OF *TEXT* FORMAT WILL BE LISTED IF THE NAME
00054  M01S00052.ns22000 ---|*                OF THE RECORD BEGINS WITH *CMRDECK*, *IPRDECK*
00055  M01S00053.ns22000 ---|*                *LIBDECK*, *APR0*, *CMRDC*, *IPRDC*, OR
00056  M01S00054.ns22000 ---|*                *LIBDC* AND THE -T- OPTION IS USED.
00057  M01S00055.ns22000 ---|*         IF THE NAME OF THE RECORD IS *OVERLAY* THE FIRST LINE
00058  M01S00056.ns22000 ---|*         (AND ONLY THE FIRST LINE) IS LISTED, REGARDLESS OF
00059  M01S00057.ns22000 ---|*         WHETHER THE *T* OPTION WAS SPECIFIED.
Line S00001 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00060  M01S00001.ns22000 +++|*         A RECORD OF *TEXT* FORMAT WILL BE LISTED IN ITS ENTIRETY IF
00061  M01S00002.ns22000 +++|*                THE *T* OPTION IS ENABLED AND IT IS A DEADSTART RECORD
00062  M01S00003.ns22000 +++|*                (APRDECK, CMRDECK, EQPDECK, IPRDECK, OR LIBDECK).
00063  M01S00004.ns22000 +++|*
00064  M01S00005.ns22000 +++|*         A RECORD OF *TEXT* FORMAT WILL HAVE ITS FIRST LINE LISTED IF
00065  M01S00006.ns22000 +++|*                ITS NAME IS *OVERLAY*, REGARDLESS OF THE *T* OPTION.
00066  M00S00058.catalog +++|*
00067  M00S00059.catalog +++|*         A RECORD OF *OPL* OR *OPLC* FORMAT WILL HAVE THE MODIFIERS
00068  M00S00060.catalog +++|*                AND THEIR  *YANK*  STATUS LISTED.  IF SELECTED THE
00069  M00S00061.catalog +++|*                CHARACTER SET OF THE INDIVIDUAL OPL/OPLC WILL BE
00070  M00S00062.catalog +++|*                LISTED IMMEDIATELY FOLLOWING THE RECORD TYPE.
00071  M00S00063.catalog +++|*
00072  M00S00064.catalog +++|*         A RECORD OF *ULIB* FORMAT WILL SUPPRESS LISTING OF FOLLOWING
00073  M00S00065.catalog +++|*                RECORDS IN *REL* FORMAT UNLESS -U- OPTION IS USED.
00074  M00S00066.catalog +++|          SPACE  4
00075  M00S00067.catalog +++|***       CONTROL CARD CALL.
00076  M00S00068.catalog +++|*
00077  M00S00069.catalog +++|*
00078  M00S00070.catalog +++|*         CATALOG (FNAME,P1,P2,...,PN)
00079  M00S00071.catalog +++|*
00080  M00S00072.catalog +++|*         FNAME  NAME OF FILE TO BE CATALOGED.
00081  M00S00073.catalog +++|*
00082  M00S00074.catalog +++|*         *PN*  ONE OF THE FOLLOWING -
00083  M00S00075.catalog +++|*
00084  M00S00076.catalog +++|*         N      CATALOG TO EOI.
00085  M00S00077.catalog +++|*         N=0    CATALOG TO EMPTY FILE.
00086  M00S00078.catalog +++|*         N=X    CATALOG  *X*  FILES.
00087  M00S00079.catalog +++|*
00088  M00S00080.catalog +++|*         L=LFN  LIST OUTPUT ON FILE  *LFN*.
00089  M00S00081.catalog +++|*
00090  M00S00082.catalog +++|*         T      SELECT DETAILED *TEXT* RECORD LIST.
00091  M00S00083.catalog +++|*
00092  M00S00084.catalog +++|*         U      SELECT DETAILED USER LIBRARY LIST.
00093  M00S00085.catalog +++|*
Line S00086 Modification History
M01 (Removed by) catal4
Seq #  *Modification Id* Act 
----------------------------+
00094  M01S00086.catal4  ---|*         D      DESELECT DETAILED LIST, NORMALLY SELECTED FOR
00095  M01S00087.catal4  ---|*                *TXOT*  JOBS.
Line S00001 Modification History
M01 (Added by) catal4
Seq #  *Modification Id* Act 
----------------------------+
00096  M01S00001.catal4  +++|*         D      DESELECT DETAILED LIST.  THE DETAILED LIST IS
00097  M01S00002.catal4  +++|*                AUTOMATICALLY DESELECTED IF THE OUTPUT FILE IS
00098  M01S00003.catal4  +++|*                ASSIGNED TO A TERMINAL.
00099  M00S00088.catalog +++|*
00100  M00S00089.catalog +++|*         R      REWIND  *FNAME*  FILE BEFORE AND AFTER CATALOG.
00101  M00S00090.catalog +++|*
00102  M00S00091.catalog +++|*         CS     DE-SELECT CHARACTER SET LIST FOR OPL/OPLC RECORDS.
00103  M00S00092.catalog +++|*
00104  M00S00093.catalog +++|*
00105  M00S00094.catalog +++|*         ASSUMED OPTIONS -
00106  M00S00095.catalog +++|*
00107  M00S00096.catalog +++|*         OPT    VALUE
00108  M00S00097.catalog +++|*
00109  M00S00098.catalog +++|*         FNAME  FILE.
00110  M00S00099.catalog +++|*         N      1.
00111  M00S00100.catalog +++|*         L      OUTPUT.
00112  M00S00101.catalog +++|*         T      *NOT SELECTED*.
00113  M00S00102.catalog +++|*         U      *NOT SELECTED*.
00114  M00S00103.catalog +++|*         D      *NOT SELECTED*.
00115  M00S00104.catalog +++|*         R      *NOT SELECTED*.
00116  M00S00105.catalog +++|*         CS     *SELECTED*.
00117  M00S00106.catalog +++|          SPACE  4,10
00118  M00S00107.catalog +++|***       DAYFILE MESSAGES.
00119  M00S00108.catalog +++|*
00120  M00S00109.catalog +++|*
00121  M00S00110.catalog +++|*         * CATALOG ARGUMENT ERROR.* - THE CONTROL STATEMENT IS
00122  M00S00111.catalog +++|*         SYNTACTICALLY INCORRECT.
00123  M00S00112.catalog +++|*
00124  M00S00113.catalog +++|*         * CATALOG COMPLETE.* - INFORMATIVE MESSAGE INDICATING THAT
00125  M00S00114.catalog +++|*         CATALOGING IS COMPLETE.
00126  M00S00115.catalog +++|*
00127  M00S00116.catalog +++|*         * CATALOG FILE NAME CONFLICT.* - THE NAME OF THE FILE TO BE
00128  M00S00117.catalog +++|*         CATALOGED AND THE NAME OF THE FILE TO RECEIVE OUTPUT ARE
00129  M00S00118.catalog +++|*         THE SAME.
00130  M00S00119.catalog +++|          SPACE  4
00131  M00S00120.catalog +++|****      ASSEMBLY CONSTANTS.
00132  M00S00121.catalog +++|
00133  M00S00122.catalog +++|
Line S00001 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
00134  M01S00001.274l797 +++|FETODL    EQU    16
Line S00123 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
00135  M01S00123.274l797 ---| FBUFL    EQU    4011B       FILE BUFFER LENGTH
Line S00002 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
00136  M01S00002.274l797 +++| FBUFL    EQU    30061B      FILE BUFFER LENGTH
00137  M00S00124.catalog +++| OBUFL    EQU    2001B       OUTPUT BUFFER LENGTH
00138  M00S00125.catalog +++|****
00139  M00S00126.catalog +++|          SPACE  4,10
00140  M00S00127.catalog +++|**        SPECIAL ENTRY POINT.
00141  M00S00128.catalog +++|
00142  M00S00129.catalog +++|
00143  M00S00130.catalog +++| SSM=     EQU    0           SUPPRESS DUMPS OF FIELD LENGTH
00144  M00S00131.catalog +++| READW    SPACE  4
00145  M00S00132.catalog +++|**        READW - REDEFINE READ WORDS MACRO TO USE CONTROL WORDS.
00146  M00S00133.catalog +++|
00147  M00S00134.catalog +++|
00148  M00S00135.catalog +++|          PURGMAC READW
00149  M00S00136.catalog +++|
00150  M00S00137.catalog +++| READW    MACRO F,S,N
00151  M00S00138.catalog +++|          R=     B6,S
00152  M00S00139.catalog +++|          R=     B7,N
00153  M00S00140.catalog +++|          R=     X2,F
00154  M00S00141.catalog +++|          RJ     RDA
00155  M00S00142.catalog +++|          ENDM
00156  M00S00143.catalog +++|          SPACE  4
00157  M00S00144.catalog +++|*CALL     COMCCMD
00158  M00S00145.catalog +++|*CALL     COMCMAC
Line S00002 Modification History
M01 (Added by) 251l664
Seq #  *Modification Id* Act 
----------------------------+
00159  M01S00002.251l664 +++|*CALL     COMSSRT
00160  M00S00146.catalog +++|          TITLE  STORAGE ASSIGNMENT.
00161  M00S00147.catalog +++|**        FETS.
00162  M00S00148.catalog +++|
00163  M00S00149.catalog +++|
00164  M00S00150.catalog +++|          ORG    110B
00165  M00S00151.catalog +++| FETS     BSS    0
00166  M00S00152.catalog +++|
00167  M00S00153.catalog +++| O        BSS    0
00168  M00S00154.catalog +++| OUTPUT   FILEC  OBUF,OBUFL,FET=7,EPR
00169  M00S00155.catalog +++|
00170  M00S00156.catalog +++|          CON    0           WORDS REMAINING IN BLOCK (F)
00171  M00S00157.catalog +++|          CON    0           EOR FLAG
00172  M00S00158.catalog +++| F        BSS    0
Line S00159 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
00173  M01S00159.274l797 ---| FILE     FILEB  FBUF,FBUFL,FET=7
Line S00003 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
00174  M01S00003.274l797 +++|FILE      FILEB  FBUF,FBUFL,(FET=10)
00175  M01S00004.274l797 +++|FETOD     BSSZ   FETODL
00176  M00S00160.catalog +++|          SPACE  4
00177  M00S00161.catalog +++|*         COMMON DATA.
00178  M00S00162.catalog +++|
00179  M00S00163.catalog +++|
00180  M00S00164.catalog +++| RW       CON    0           REWIND FLAG
00181  M00S00165.catalog +++| CW       CON    0           CONTROL WORD FLAG (1 = CONTROL WORDS)
00182  M00S00166.catalog +++| FC       CON    0L1         FILE COUNT
00183  M00S00167.catalog +++| EF       CON    0           EMPTY FILE FLAG
00184  M00S00168.catalog +++| NSFF     CON    0           NONSTANDARD FILE FLAG
00185  M00S00169.catalog +++| RN       CON    0           RECORD NUMBER
00186  M00S00170.catalog +++| FN       CON    1           FILE NUMBER
00187  M00S00171.catalog +++| CS       CON    0           CHECKSUM
00188  M00S00172.catalog +++| RL       CON    0           RECORD LENGTH
00189  M00S00173.catalog +++|          CON    0           ZERO RECORD SUBTOTAL
00190  M00S00174.catalog +++|          CON    0           FILE LENGTH
00191  M00S00175.catalog +++| NM       CON    0           RECORD NAME
00192  M00S00176.catalog +++| TY       CON    0           RECORD TYPE
00193  M00S00177.catalog +++| UL       CON    0           USER LIBRARY LIST FLAG
00194  M00S00178.catalog +++| LN       CON    1           LIBRARY NUMBER
00195  M00S00179.catalog +++|
00196  M00S00180.catalog +++|*         LIST DATA.
00197  M00S00181.catalog +++|
00198  M00S00182.catalog +++| SL       CON    0           SHORT LIST FLAG
Line S00183 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00199  M01S00183.ns22000 ---| LC       CON    LINP+4      LINE COUNT
Line S00007 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00200  M01S00007.ns22000 +++| LC       CON    99999,0     LINE COUNT
00201  M01S00008.ns22000 +++| LL       EQU    LC+1        LINE LIMIT
00202  M01S00009.ns22000 +++| PD       CON    0           PRINT DENSITY FORMAT CONTROL
00203  M00S00184.catalog +++| PN       CON    1           PAGE NUMBER
00204  M00S00185.catalog +++| CSM      CON    1           OPL CHARACTER SET LIST FLAG
00205  M00S00186.catalog +++| TF       CON    0           TERMINAL FLAG
Line S00004 Modification History
M01 (Added by) catal4
Seq #  *Modification Id* Act 
----------------------------+
00206  M01S00004.catal4  +++|
00207  M01S00005.catal4  +++| PGEJ     DATA   1L1         PAGE EJECT
00208  M00S00187.catalog +++|
00209  M00S00188.catalog +++| TITL     DATA   1H1
00210  M00S00189.catalog +++|          DATA   10HCATALOG OF
00211  M00S00190.catalog +++|          DATA   1H
00212  M00S00191.catalog +++|          DATA   4AFILE
Line S00192 Modification History
M01 (Removed by) catal2
Seq #  *Modification Id* Act 
----------------------------+
00213  M01S00192.catal2  ---|          DATA   5A1
Line S00001 Modification History
M01 (Added by) catal2
Seq #  *Modification Id* Act 
----------------------------+
00214  M01S00001.catal2  +++|          DATA   6A1
00215  M00S00193.catalog +++|          DATA   10H
00216  M00S00194.catalog +++| TITLA    DATA   10H
00217  M00S00195.catalog +++| DATE     DATA   1H
00218  M00S00196.catalog +++| TIME     DATA   1H
00219  M00S00197.catalog +++|          DATA   4APAGE
00220  M00S00198.catalog +++| PAGE     DATA   8L
00221  M00S00199.catalog +++| TITLL    EQU    *-TITL
00222  M00S00200.catalog +++|
00223  M00S00201.catalog +++|
00224  M00S00202.catalog +++| SBTL     DATA   6AREC
00225  M00S00203.catalog +++|          DATA   4HNAME
00226  M00S00204.catalog +++|          DATA   5HTYPE
Line S00205 Modification History
M01 (Removed by) catal3
Seq #  *Modification Id* Act 
----------------------------+
00227  M01S00205.catal3  ---|          DATA   8ALENGTH
Line S00001 Modification History
M01 (Added by) catal3
Seq #  *Modification Id* Act 
----------------------------+
00228  M01S00001.catal3  +++|          DATA   6ALENGTH
00229  M00S00206.catalog +++|          DATA   7ACKSUM
00230  M00S00207.catalog +++|          DATA   7ADATE
00231  M00S00208.catalog +++| SBTLA    DATA   8ACOMMENTS
00232  M00S00209.catalog +++|          DATA   0
00233  M00S00210.catalog +++|          DATA   2L
00234  M00S00211.catalog +++| SBTLL    EQU    *-SBTL
00235  M00S00212.catalog +++|
00236  M00S00213.catalog +++| FLS      CON    3           AUTO-FLUSH TABLE
00237  M00S00214.catalog +++|          CON    0
00238  M00S00215.catalog +++|          CON    0
00239  M00S00216.catalog +++|          TITLE  MAIN PROGRAM.
00240  M00S00217.catalog +++| CATALOG  SPACE  4
00241  M00S00218.catalog +++|**        CATALOG - MAIN PROGRAM.
00242  M00S00219.catalog +++|
00243  M00S00220.catalog +++|
00244  M00S00221.catalog +++| CATALOG  SB1    1           (B1) = 1
00245  M00S00222.catalog +++|          RJ     PRS         PRESET PROGRAM
00246  M00S00223.catalog +++|          WRITE  O,*         PRESET *CIO* FUNCTION
Line S00010 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00247  M01S00010.ns22000 +++|          SA3    TF
00248  M01S00011.ns22000 +++|          WRITEW O,PD,X3     CONDITIONALLY WRITE FORMAT EFFECTOR
00249  M00S00224.catalog +++|          SA1    RW
00250  M00S00225.catalog +++|          ZR     X1,CAT0.1   IF NO REWIND
00251  M00S00226.catalog +++|          REWIND F
00252  M00S00227.catalog +++|
00253  M00S00228.catalog +++| CAT0.1   SA1    CW
00254  M00S00229.catalog +++|          ZR     X1,CAT1.1   IF NOT CONTROL WORDS
00255  M00S00230.catalog +++|          MX6    1           SET FIRST READ FLAG
00256  M00S00231.catalog +++|          SA6    F-2
00257  M00S00232.catalog +++|          READCW F,17B
00258  M00S00233.catalog +++|          JP     CAT1.2
00259  M00S00234.catalog +++|
00260  M00S00235.catalog +++| CAT1     SA1    CW
00261  M00S00236.catalog +++|          NZ     X1,CAT1.2   IF CONTROL WORDS
00262  M00S00237.catalog +++| CAT1.1   READ   F
00263  M00S00238.catalog +++| CAT1.2   BSS    0
00264  M00S00239.catalog +++|          SA1    RN          ADVANCE RECORD NUMBER
00265  M00S00240.catalog +++|          SX6    X1+B1
00266  M00S00241.catalog +++|          MX7    0           CLEAR LENGTH
00267  M00S00242.catalog +++|          SA6    A1
00268  M00S00243.catalog +++|          SA7    RL
00269  M00S00244.catalog +++|          SA7    CS          CLEAR CHECKSUM
00270  M00S00245.catalog +++|          RJ     RDR         READ RECORD
00271  M00S00246.catalog +++|          SA4    RL          ADVANCE SUBTOTAL
00272  M00S00247.catalog +++|          NZ     X4,CAT1.3   IF NONZERO RECORD
00273  M00S00248.catalog +++|          NG     X1,CAT3     IF EOF
00274  M00S00249.catalog +++| CAT1.3   SA2    A4+B1
00275  M00S00250.catalog +++|          SA3    A2+B1       ADVANCE FILE TOTAL
00276  M00S00251.catalog +++|          IX6    X2+X4
00277  M00S00252.catalog +++|          SA6    A2
00278  M00S00253.catalog +++|          IX7    X3+X4
00279  M00S00254.catalog +++|          SA7    A3+
00280  M00S00255.catalog +++|          BX6    X6-X6
00281  M00S00256.catalog +++|          SA2    TY          CHECK TYPE
Line S00257 Modification History
M01 (Removed by) 251l664
Seq #  *Modification Id* Act 
----------------------------+
00282  M01S00257.251l664 ---|          SB2    X2-10B
Line S00003 Modification History
M01 (Added by) 251l664
Seq #  *Modification Id* Act 
----------------------------+
00283  M01S00003.251l664 +++|          SB2    X2-ODRT
00284  M00S00258.catalog +++|          SA1    ULBA
00285  M00S00259.catalog +++|          NZ     B2,CAT1.4   IF NOT *OPLD*
00286  M00S00260.catalog +++|          SA6    ULBB        CLEAR *SEARCHING FOR OPLD* FLAG
00287  M00S00261.catalog +++|          ZR     X1,CAT2     IF LISTING USER LIBRARY
00288  M00S00262.catalog +++|          SA6    A1+         CLEAR USER LIBRARY FLAG
00289  M00S00263.catalog +++|          EQ     CAT1        READ NEXT RECORD
00290  M00S00264.catalog +++|
00291  M00S00265.catalog +++| CAT1.4   NZ     X1,CAT1     IF NO LIST OF USER LIBRARY SET
00292  M00S00266.catalog +++|
00293  M00S00267.catalog +++| CAT2     RJ     LRS         LIST RECORD STATUS
00294  M00S00268.catalog +++|          SA1    TY          PROCESS OTHER LIST
00295  M00S00269.catalog +++|          MX7    0           CLEAR EOF FLAG
00296  M00S00270.catalog +++|          SB7    X1
00297  M00S00271.catalog +++|          SA7    EF
00298  M00S00272.catalog +++|          JP     CATB+B7
00299  M00S00273.catalog +++|
00300  M00S00274.catalog +++| CAT3     SX1    X1+B1
00301  M00S00275.catalog +++|          BX5    -X1         PROCESS END OF FILE
00302  M00S00276.catalog +++|          RJ     EOF
Line S00001 Modification History
M01 (Added by) catal5
Seq #  *Modification Id* Act 
----------------------------+
00303  M01S00001.catal5  +++|          NZ     X5,CAT5     IF EOI
00304  M00S00277.catalog +++|          SA1    FC          CHECK FILE COUNT
00305  M00S00278.catalog +++|          NZ     X1,CAT4     IF NOT EMPTY FILE REQUEST
00306  M00S00279.catalog +++|          SA2    EF          CHECK EOF
00307  M00S00280.catalog +++|          NZ     X2,CAT5     IF EMPTY FILE
00308  M00S00281.catalog +++|          SX6    X2+B1       SET EOF FLAG
00309  M00S00282.catalog +++|          SA6    A2
00310  M00S00283.catalog +++|          JP     CAT0.1
00311  M00S00284.catalog +++|
00312  M00S00285.catalog +++| CAT4     SX2    1           DECREMENT FILE COUNT
00313  M00S00286.catalog +++|          IX6    X1-X2
00314  M00S00287.catalog +++|          SA6    A1
Line S00288 Modification History
M01 (Removed by) catal5
Seq #  *Modification Id* Act 
----------------------------+
00315  M01S00288.catal5  ---|          NZ     X5,CAT5     IF EOI
00316  M00S00289.catalog +++|          NZ     X6,CAT0.1   IF MORE FILES REQUESTED
00317  M00S00290.catalog +++|
00318  M00S00291.catalog +++| CAT5     SA1    PN          CHECK PAGE NUMBER
00319  M00S00292.catalog +++|          LX1    59
00320  M00S00293.catalog +++|          NG     X1,CAT6     IF PAGE NUMBER EVEN
Line S00294 Modification History
M01 (Removed by) catal4
Seq #  *Modification Id* Act 
----------------------------+
00321  M01S00294.catal4  ---|          WRITEC O,(=2L1 )
Line S00006 Modification History
M01 (Added by) catal4
Seq #  *Modification Id* Act 
----------------------------+
00322  M01S00006.catal4  +++|          WRITEC O,PGEJ      PAGE EJECT
00323  M00S00295.catalog +++| CAT6     WRITER O
00324  M00S00296.catalog +++|          SA1    RW
00325  M00S00297.catalog +++|          ZR     X1,CAT7     IF NO REWIND
00326  M00S00298.catalog +++|          REWIND F
00327  M00S00299.catalog +++| CAT7     MESSAGE (=C* CATALOG COMPLETE.*)
00328  M00S00300.catalog +++|          ENDRUN
00329  M00S00301.catalog +++|
00330  M00S00302.catalog +++| CATA     DATA   10HCATALOGING
00331  M00S00303.catalog +++|          DATA   0
00332  M00S00304.catalog +++|
00333  M00S00305.catalog +++| CATB     BSS    0
00334  M00S00306.catalog +++|          LOC    0
00335  M00S00307.catalog +++|          EQ     TXT         TEXT
00336  M00S00308.catalog +++|          EQ     CAT1        PP
00337  M00S00309.catalog +++|          EQ     TXT         UNDEFINED RECORD TYPE
00338  M00S00310.catalog +++|          EQ     REL         REL
00339  M00S00311.catalog +++|          EQ     CAT1        OVL
00340  M00S00312.catalog +++|          EQ     ULB         ULIB
00341  M00S00313.catalog +++|          EQ     OPL         OPL
00342  M00S00314.catalog +++|          EQ     OPL         OPLC
00343  M00S00315.catalog +++|          EQ     CAT1        OPLD
00344  M00S00316.catalog +++|          EQ     ABS         ABS
00345  M00S00317.catalog +++|          EQ     CAT1        PPU
00346  M00S00318.catalog +++|          EQ     TXT         UNDEFINED RECORD TYPE
00347  M00S00319.catalog +++|          EQ     TXT         UNDEFINED RECORD TYPE
00348  M00S00320.catalog +++|          EQ     TXT         UNDEFINED RECORD TYPE
00349  M00S00321.catalog +++|          EQ     CAP         CAP
00350  M00S00322.catalog +++|          EQ     TXT         UNDEFINED RECORD TYPE
00351  M00S00323.catalog +++|          EQ     TXT         PROC
Line S00004 Modification History
M01 (Added by) 251l664
Seq #  *Modification Id* Act 
----------------------------+
00352  M01S00004.251l664 +++|          EQ     TXT         UNDEFINED RECORD TYPE
00353  M01S00005.251l664 +++|          EQ     TXT         UNDEFINED RECORD TYPE
00354  M01S00006.251l664 +++|          EQ     TXT         UNDEFINED RECORD TYPE
00355  M01S00007.251l664 +++|          EQ     CAT1        PPL
00356  M00S00324.catalog +++|          LOC    *O
00357  M00S00325.catalog +++| EOF      SPACE  4
00358  M00S00326.catalog +++|**        EOF - PROCESS END OF FILE.
00359  M00S00327.catalog +++|
00360  M00S00328.catalog +++|
00361  M00S00329.catalog +++| EOF      PS                 ENTRY/EXIT
00362  M00S00330.catalog +++|          SA2    ULBB
00363  M00S00331.catalog +++|          ZR     X2,EOF0     IF *OPLD* FOUND
00364  M00S00332.catalog +++|          BX6    X6-X6
00365  M00S00333.catalog +++|          SA6    A2          CLEAR *SEARCHING FOR OPLD* FLAG
00366  M00S00334.catalog +++|          SX1    EOFC        LIST *OPLD MISSING* MESSAGE
00367  M00S00335.catalog +++|          SA6    ULBA        CLEAR USER LIBRARY FLAG
00368  M00S00336.catalog +++|          RJ     WOF
00369  M00S00337.catalog +++| EOF0     SA2    NSFF        CHECK FOR NONSTANDARD FILE
00370  M00S00338.catalog +++|          ZR     X2,EOF0.1   IF NOT NONSTANDARD FILE
00371  M00S00339.catalog +++|          BX6    X6-X6
00372  M00S00340.catalog +++|          SX1    EOFB        LIST *EOR MISSING* MESSAGE
00373  M00S00341.catalog +++|          SA6    A2
00374  M00S00342.catalog +++|          RJ     WOF
00375  M00S00343.catalog +++| EOF0.1   SX1    =C*  *      LIST BLANK LINE
00376  M00S00344.catalog +++|          RJ     WOF
00377  M00S00345.catalog +++|          ZR     X5,EOF1     IF EOF
00378  M00S00346.catalog +++|          SA1    =10H
00379  M00S00347.catalog +++|          BX6    X1
00380  M00S00348.catalog +++|          EQ     EOF2
00381  M00S00349.catalog +++|
00382  M00S00350.catalog +++| EOF1     SA1    RN          CONVERT RECORD NUMBER
00383  M00S00351.catalog +++|          RJ     CDD
00384  M00S00352.catalog +++| EOF2     LX6    18
00385  M00S00353.catalog +++|          SA6    SBUF
00386  M00S00354.catalog +++|          SA1    X5+EOFA
00387  M00S00355.catalog +++|          SA2    =6ASUM =
00388  M00S00356.catalog +++|          BX6    X1
00389  M00S00357.catalog +++|          LX7    X2
00390  M00S00358.catalog +++|          SA6    A6+B1
00391  M00S00359.catalog +++|          SA7    A6+B1
00392  M00S00360.catalog +++|          SA1    RL+2        CONVERT TOTAL LENGTH
00393  M00S00361.catalog +++|          RJ     COD
Line S00362 Modification History
M01 (Removed by) catal3
Seq #  *Modification Id* Act 
----------------------------+
00394  M01S00362.catal3  ---|          LX6    12
00395  M00S00363.catalog +++|          MX7    0
00396  M00S00364.catalog +++|          SA6    A7+B1
00397  M00S00365.catalog +++|          SA7    A6+B1
00398  M00S00366.catalog +++|          SX1    SBUF
00399  M00S00367.catalog +++|          RJ     WOF
00400  M00S00368.catalog +++|          SA1    FN          ADVANCE FILE NUMBER
Line S00369 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00401  M01S00369.ns22000 ---|          SX6    LINP        FORCE EJECT
Line S00012 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00402  M01S00012.ns22000 +++|          SX6    99999       FORCE PAGE EJECT
00403  M00S00370.catalog +++|          SX7    X1+B1
00404  M00S00371.catalog +++|          SA6    LC
00405  M00S00372.catalog +++|          SA7    A1
00406  M00S00373.catalog +++|          SX1    X1+B1       CONVERT NUMBER
00407  M00S00374.catalog +++|          RJ     CDD
00408  M00S00375.catalog +++|          LX6    5*6
00409  M00S00376.catalog +++|          SX7    B0          CLEAR LENGTHS
00410  M00S00377.catalog +++|          SA6    TITL+4
00411  M00S00378.catalog +++|          SA7    RL+1
00412  M00S00379.catalog +++|          SA7    A7+B1
00413  M00S00380.catalog +++|          SX6    B1          RESET LIBRARY NUMBER
00414  M00S00381.catalog +++|          SA7    RN          CLEAR RECORD NUMBER
00415  M00S00382.catalog +++|          SA6    LN
00416  M00S00383.catalog +++|          EQ     EOF         RETURN
00417  M00S00384.catalog +++|
00418  M00S00385.catalog +++|
00419  M00S00386.catalog +++| EOFA     DATA   10H* EOF *
00420  M00S00387.catalog +++|          DATA   10H* EOI *
00421  M00S00388.catalog +++|
00422  M00S00389.catalog +++| EOFB     DATA   C+          *EOR MISSING*+
00423  M00S00390.catalog +++| EOFC     DATA   C+          *OPLD MISSING*+
00424  M00S00391.catalog +++| LRS      SPACE  4,20
00425  M00S00392.catalog +++|**        LRS - LIST RECORD STATUS.
00426  M00S00393.catalog +++|*
00427  M00S00394.catalog +++|*         ENTRY  (BUF) = FIRST BLOCK OF RECORD.
00428  M00S00395.catalog +++|*                (NM) = RECORD NAME.
00429  M00S00396.catalog +++|*                (TY) = RECORD TYPE.
00430  M00S00397.catalog +++|*                (RN) = RECORD NUMBER.
00431  M00S00398.catalog +++|*                (RL) = RECORD LENGTH.
00432  M00S00399.catalog +++|*                (CS) = CHECK SUM.
00433  M00S00400.catalog +++|*                (LN) = LIBRARY NUMBER.
00434  M00S00401.catalog +++|*
00435  M00S00402.catalog +++|*         EXIT   (LN) = (LN)+1 IF ZERO LENGTH RECORD ENCOUNTERED.
00436  M00S00403.catalog +++|*
00437  M00S00404.catalog +++|*         USES   X - ALL.
00438  M00S00405.catalog +++|*                A - 1, 2, 3, 4, 5, 6, 7.
00439  M00S00406.catalog +++|*                B - 3, 6, 7.
00440  M00S00407.catalog +++|*
00441  M00S00408.catalog +++|*         CALLS  CDD, COD, CPT, WOF, ZTB.
00442  M00S00409.catalog +++|
00443  M00S00410.catalog +++|
00444  M00S00411.catalog +++| LRS      PS                 ENTRY/EXIT
00445  M00S00412.catalog +++|          SA1    RN          CONVERT RECORD NUMBER
00446  M00S00413.catalog +++|          RJ     CDD
00447  M00S00414.catalog +++|          LX6    18
00448  M00S00415.catalog +++|          SA6    SBUF
00449  M00S00416.catalog +++|          SA1    RL          CHECK RECORD LENGTH
00450  M00S00417.catalog +++|          NZ     X1,LRS1     IF NOT ZERO RECORD
00451  M00S00418.catalog +++|
00452  M00S00419.catalog +++|*         PROCESS ZERO LENGTH RECORD.
00453  M00S00420.catalog +++|
00454  M00S00421.catalog +++|          SA1    =4H(00)     ENTER ZERO RECORD
00455  M00S00422.catalog +++|          SA2    =6ASUM =
00456  M00S00423.catalog +++|          BX6    X1
00457  M00S00424.catalog +++|          LX7    X2
00458  M00S00425.catalog +++|          SA6    A6+B1
00459  M00S00426.catalog +++|          SA7    A6+B1
00460  M00S00427.catalog +++|          SA1    RL+1        ENTER SUBTOTAL
00461  M00S00428.catalog +++|          RJ     COD
Line S00429 Modification History
M01 (Removed by) catal3
Seq #  *Modification Id* Act 
----------------------------+
00462  M01S00429.catal3  ---|          LX6    12
00463  M00S00430.catalog +++|          SA6    A7+B1
00464  M00S00431.catalog +++|          MX7    0           CLEAR SUBTOTAL
00465  M00S00432.catalog +++|          SA7    A1
00466  M00S00433.catalog +++|          SA2    =9ALIBRARY =
00467  M00S00434.catalog +++|          SA1    LN          INCREMENT LIBRARY NUMBER
00468  M00S00435.catalog +++|          BX6    X2
00469  M00S00436.catalog +++|          SX7    X1+B1
00470  M00S00437.catalog +++|          SA6    A6+B1
00471  M00S00438.catalog +++|          SA7    A1
00472  M00S00439.catalog +++|          RJ     CDD         DISPLAY LIBRARY NUMBER
00473  M00S00440.catalog +++|          LX6    6
00474  M00S00441.catalog +++|          SA6    A6+B1
00475  M00S00442.catalog +++|          BX7    X7-X7       TERMINATE LINE
00476  M00S00443.catalog +++|          SA7    A6+B1
00477  M00S00444.catalog +++|          SX1    SBUF
00478  M00S00445.catalog +++|          RJ     WOF
00479  M00S00446.catalog +++|          SX1    =C*  *
00480  M00S00447.catalog +++|          RJ     WOF
00481  M00S00448.catalog +++|          EQ     LRS         RETURN
00482  M00S00449.catalog +++|
00483  M00S00450.catalog +++| LRS1     SA1    NM          SPACE FILL NAME
00484  M00S00451.catalog +++|          RJ     ZTB
00485  M00S00452.catalog +++|          SA6    A6+B1
00486  M00S00453.catalog +++|          SA1    TY          SET TYPE
00487  M00S00454.catalog +++|          SB7    X1
00488  M00S00455.catalog +++|          SA2    LRSA+X1
00489  M00S00456.catalog +++|          BX6    X2
00490  M00S00457.catalog +++|          SA6    A6+B1
00491  M00S00458.catalog +++|          SA1    RL          CONVERT LENGTH
00492  M00S00459.catalog +++|          RJ     COD
Line S00460 Modification History
M01 (Removed by) catal3
Seq #  *Modification Id* Act 
----------------------------+
00493  M01S00460.catal3  ---|          LX6    12
00494  M00S00461.catalog +++|          SA6    A6+B1
00495  M00S00462.catalog +++|
00496  M00S00463.catalog +++|*         PROCESS CHECKSUM.
00497  M00S00464.catalog +++|
00498  M00S00465.catalog +++|          SA2    CS          FOLD CHECKSUM
00499  M00S00466.catalog +++|          MX3    -12
00500  M00S00467.catalog +++|          BX1    -X3*X2
00501  M00S00468.catalog +++|          AX2    12
00502  M00S00469.catalog +++|          BX6    -X3*X2
00503  M00S00470.catalog +++|          IX1    X1+X6
00504  M00S00471.catalog +++|          AX2    12
00505  M00S00472.catalog +++|          BX6    -X3*X2
00506  M00S00473.catalog +++|          IX1    X1+X6
00507  M00S00474.catalog +++|          AX2    12
00508  M00S00475.catalog +++|          BX6    -X3*X2
00509  M00S00476.catalog +++|          IX1    X1+X6
00510  M00S00477.catalog +++|          AX2    12
00511  M00S00478.catalog +++|          BX6    -X3*X2
00512  M00S00479.catalog +++|          IX1    X1+X6
00513  M00S00480.catalog +++|          IX7    X1+X3
00514  M00S00481.catalog +++|          BX4    -X3*X7
00515  M00S00482.catalog +++|          SX1    X4+10000B
00516  M00S00483.catalog +++|          RJ     COD
00517  M00S00484.catalog +++|          SX2    1R -1R1
00518  M00S00485.catalog +++|          LX2    24
00519  M00S00486.catalog +++|          IX6    X6+X2
00520  M00S00487.catalog +++|          LX6    12
00521  M00S00488.catalog +++|          SA6    A6+B1
00522  M00S00489.catalog +++|
00523  M00S00490.catalog +++|*         COPY 7700 TABLE.
00524  M00S00491.catalog +++|
00525  M00S00492.catalog +++|          SA1    BUF
00526  M00S00493.catalog +++|          RJ     CPT
00527  M00S00494.catalog +++|          JP     B7+LRSB     PROCESS TYPE
00528  M00S00495.catalog +++|
00529  M00S00496.catalog +++| LRS4     SA1    SL          CHECK SHORT LIST FLAG
00530  M00S00497.catalog +++|          ZR     X1,LRS5     IF NOT SET
Line S00498 Modification History
M01 (Removed by) catal6
Seq #  *Modification Id* Act 
----------------------------+
00531  M01S00498.catal6  ---|          SX6    B0          TERMINATE LIST
Line S00001 Modification History
M01 (Added by) catal6
Seq #  *Modification Id* Act 
----------------------------+
00532  M01S00001.catal6  +++|          SX6    B0+         TERMINATE LIST
00533  M00S00499.catalog +++|          SA6    SBUF+6
Line S00500 Modification History
M01 (Removed by) catal6
Seq #  *Modification Id* Act 
----------------------------+
00534  M01S00500.catal6  ---| LRS5     SX1    SBUF
Line S00002 Modification History
M01 (Added by) catal6
Seq #  *Modification Id* Act 
----------------------------+
00535  M01S00002.catal6  +++|          EQ     LRS5.1      WRITE OUTPUT LINE
00536  M01S00003.catal6  +++|
00537  M01S00004.catal6  +++| LRS5     SA2    SBUF+13     INSURE END OF LINE
00538  M01S00005.catal6  +++|          MX0    2*6
00539  M01S00006.catal6  +++|          BX6    X0*X2
00540  M01S00007.catal6  +++|          SA6    A2+
00541  M01S00008.catal6  +++| LRS5.1   SX1    SBUF
00542  M00S00501.catalog +++|          RJ     WOF
00543  M00S00502.catalog +++|          EQ     LRS         RETURN
00544  M00S00503.catalog +++|
00545  M00S00504.catalog +++|
00546  M00S00505.catalog +++|*         PROCESS  *OPL*  AND  *OPLC*  RECORDS.
00547  M00S00506.catalog +++|
Line S00507 Modification History
M01 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00548  M01S00507.242l642 ---| LRS5.4   SA1    CSM         CHARACTER SET LIST MODE FLAG
Line S00001 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00549  M01S00001.242l642 +++| LRS5.2   SA1    CSM         CHARACTER SET LIST MODE FLAG
00550  M00S00508.catalog +++|          SA2    B7+LRSA     SET RECORD TYPE
00551  M00S00509.catalog +++|          SA4    =5R         PRESET LIST
Line S00510 Modification History
M01 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00552  M01S00510.242l642 ---|          ZR     X1,LRS5.5   IF NO CHARACTER SET LIST SET
Line S00002 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00553  M01S00002.242l642 +++|          ZR     X1,LRS5.4   IF NO CHARACTER SET LIST SET
00554  M00S00511.catalog +++|          SA3    BUF+16B     CHECK OPL/OPLC CHARACTER SET
Line S00512 Modification History
M01 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00555  M01S00512.242l642 ---|          MX7    -12
00556  M01S00513.242l642 ---|          BX3    -X7*X3      LOWER 12 BITS OF WORD 14 OF HEADER
00557  M01S00514.242l642 ---|          SA4    =5R(64)     PRESET FOR 64 CHARACTER SET
00558  M01S00515.242l642 ---|          SB3    X3-64B      CHECK PL CHARACTER SET
00559  M01S00516.242l642 ---|          ZR     B3,LRS5.5   IF 64 CHARACTER SET RECORD
00560  M01S00517.242l642 ---|          SA4    =5R(63)     SET 63 CHARACTER SET
00561  M01S00518.242l642 ---| LRS5.5   BX6    X2+X4
Line S00003 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00562  M01S00003.242l642 +++|          MX7    -6
00563  M01S00004.242l642 +++|          BX4    -X7*X3      LOWER 6 BITS OF HEADER+16B
00564  M01S00005.242l642 +++|          SB3    X4-63B      CHECK PL CHARACTER SET
00565  M01S00006.242l642 +++|          EQ     B3,B1,LRS5.3  IF 64 CHARACTER SET
00566  M01S00007.242l642 +++|          SB3    0           SET 63 CHARACTER SET ORDINAL
00567  M01S00008.242l642 +++| LRS5.3   AX3    5           EXTRACT ASCII FLAG * 2
00568  M01S00009.242l642 +++|          MX4    -6
00569  M01S00010.242l642 +++|          LX4    1
00570  M01S00011.242l642 +++|          BX3    -X4*X3
00571  M01S00012.242l642 +++|          SX3    X3+B3
00572  M01S00013.242l642 +++|          SA4    X3+LRSCS    LIST RECORD STATUS (CHARACTER SET)
00573  M01S00014.242l642 +++| LRS5.4   BX6    X2+X4
00574  M00S00519.catalog +++|          SA6    SBUF+2      SET IN OUTPUT LINE
00575  M00S00520.catalog +++|*         EQ     LRS6
00576  M00S00521.catalog +++|
00577  M00S00522.catalog +++| LRS6     SA1    LC          CHECK LINE COUNT
Line S00523 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00578  M01S00523.ns22000 ---|          SX7    X1-LINP+6
00579  M01S00524.ns22000 ---|          NG     X7,LRS4     IF NOT ROOM FOR 2 LINES
00580  M01S00525.ns22000 ---|          SX6    LINP        FORCE EJECT
Line S00013 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00581  M01S00013.ns22000 +++|          SX1    X1+2
00582  M01S00014.ns22000 +++|          SA2    A1+B1       GET LINE LIMIT
00583  M01S00015.ns22000 +++|          IX7    X1-X2
00584  M01S00016.ns22000 +++|          NG     X7,LRS4     IF ROOM FOR TWO LINES
00585  M01S00017.ns22000 +++|          SX6    99999       FORCE EJECT
00586  M00S00526.catalog +++|          SA6    A1
00587  M00S00527.catalog +++|          EQ     LRS4
00588  M00S00528.catalog +++|
00589  M00S00529.catalog +++|*         PROCESS PP LOAD ADDRESS.
00590  M00S00530.catalog +++|
00591  M00S00531.catalog +++| LRS7     SA2    BUF+B3      FIRST WORD OF PROGRAM
00592  M00S00532.catalog +++|          SX3    10000B
00593  M00S00533.catalog +++|          AX2    24          SET LOAD ADDRESS
00594  M00S00534.catalog +++|          SX4    X2
00595  M00S00535.catalog +++|          SA5    LRSA+B7
00596  M00S00536.catalog +++|          ZR     X4,LRS8     IF LOCATION FREE
00597  M00S00537.catalog +++|          SX4    X4+5
00598  M00S00538.catalog +++| LRS8     IX1    X4+X3       CONVERT LOAD ADDRESS
00599  M00S00539.catalog +++|          MX0    -24
00600  M00S00540.catalog +++|          RJ     COD
00601  M00S00541.catalog +++|          BX3    -X0*X6      MERGE WITH TYPE
00602  M00S00542.catalog +++|          LX3    12
00603  M00S00543.catalog +++|          BX6    X5+X3
00604  M00S00544.catalog +++|          SA6    SBUF+2
00605  M00S00545.catalog +++|          EQ     LRS4        LIST LINE
00606  M00S00546.catalog +++|
00607  M00S00547.catalog +++|*         PROCESS OVERLAY LEVEL NUMBERS.
00608  M00S00548.catalog +++|
00609  M00S00549.catalog +++| LRS9     SA2    BUF+B3      EXTRACT LEVEL NUMBERS FROM 5000 TABLE
00610  M00S00550.catalog +++|          LX2    24
00611  M00S00551.catalog +++|          MX0    -12
00612  M00S00552.catalog +++|          SX1    X2+10000B   CONVERT LEVEL NUMBERS
00613  M00S00553.catalog +++|          RJ     COD
00614  M00S00554.catalog +++|          SA1    LRSA+B7     MERGE LEVEL AND TYPE
00615  M00S00555.catalog +++|          BX2    -X0*X6
00616  M00S00556.catalog +++|          LX2    6
00617  M00S00557.catalog +++|          IX1    X1+X2
00618  M00S00558.catalog +++|          AX6    12
00619  M00S00559.catalog +++|          BX2    -X0*X6
00620  M00S00560.catalog +++|          LX2    24
00621  M00S00561.catalog +++|          IX6    X1+X2
00622  M00S00562.catalog +++|          SA6    SBUF+2
00623  M00S00563.catalog +++|          EQ     LRS4        LIST LINE
00624  M00S00564.catalog +++|
00625  M00S00565.catalog +++|*         PROCESS PPU NUMBER.
00626  M00S00566.catalog +++|
00627  M00S00567.catalog +++| LRS11    SA2    BUF+B3      FIRST WORD OF PROGRAM
00628  M00S00568.catalog +++|          LX2    24
00629  M00S00569.catalog +++|          SB6    X2-100B
00630  M00S00570.catalog +++|          SA5    LRSA+B7
00631  M00S00571.catalog +++|          NG     B6,LRS12    IF PPU ;77
00632  M00S00572.catalog +++|          SA5    LRSC
00633  M00S00573.catalog +++| LRS12    SX1    X2+10000B   CONVERT PPU NUMBER
00634  M00S00574.catalog +++|          RJ     COD
00635  M00S00575.catalog +++|          LX6    6
00636  M00S00576.catalog +++|          PL     B6,LRS13    IF PPU > 77
00637  M00S00577.catalog +++|          LX6    12
00638  M00S00578.catalog +++| LRS13    IX6    X6+X5
00639  M00S00579.catalog +++|          SA6    SBUF+2
00640  M00S00580.catalog +++|          EQ     LRS4        LIST LINE
00641  M00S00581.catalog +++|
00642  M00S00582.catalog +++|*         PROCESS USER LIBRARY.
00643  M00S00583.catalog +++|
00644  M00S00584.catalog +++| LRS14    SA1    UL
00645  M00S00585.catalog +++|          ZR     X1,LRS4     IF NO USER LIBRARY LIST
Line S00586 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00646  M01S00586.ns22000 ---|          SX6    LINP        FORCE EJECT
Line S00018 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00647  M01S00018.ns22000 +++|          SX6    99999       FORCE PAGE EJECT
00648  M00S00587.catalog +++|          SA6    LC
00649  M00S00588.catalog +++|          EQ     LRS4        LIST LINE
00650  M00S00589.catalog +++|
Line S00008 Modification History
M01 (Added by) 251l664
Seq #  *Modification Id* Act 
----------------------------+
00651  M01S00008.251l664 +++|*         PROCESS PPL LOAD ADDRESS.
00652  M01S00009.251l664 +++|
00653  M01S00010.251l664 +++| LRS15    SA2    BUF+B3      FIRST WORD OF PROGRAM
00654  M01S00011.251l664 +++|          SX3    B1+
00655  M01S00012.251l664 +++|          LX3    3*5
00656  M01S00013.251l664 +++|          MX4    -16
00657  M01S00014.251l664 +++|          AX2    16          SET LOAD ADDRESS
00658  M01S00015.251l664 +++|          BX4    -X4*X2
00659  M01S00016.251l664 +++|          SA5    LRSA+B7
00660  M01S00017.251l664 +++|          IX1    X4+X3       CONVERT LOAD ADDRESS
00661  M01S00018.251l664 +++|          MX0    -6*5
00662  M01S00019.251l664 +++|          RJ     COD
00663  M01S00020.251l664 +++|          SA1    SBUF+3      GET LENGTH
00664  M01S00021.251l664 +++|          BX3    -X0*X6      MERGE WITH TYPE
00665  M01S00022.251l664 +++|          BX6    X5+X3
00666  M01S00023.251l664 +++|          SX3    1R)&1R      INSERT RIGHT PAREN
00667  M01S00024.251l664 +++|          SA6    A1-B1
00668  M01S00025.251l664 +++|          LX3    -6
00669  M01S00026.251l664 +++|          BX6    X1-X3
00670  M01S00027.251l664 +++|          SA6    A1
00671  M01S00028.251l664 +++|          EQ     LRS4        LIST LINE
00672  M01S00029.251l664 +++|
00673  M00S00590.catalog +++| LRSA     BSS    0
00674  M00S00591.catalog +++|          LOC    0
00675  M00S00592.catalog +++|          CON    10HTEXT
00676  M00S00593.catalog +++|          VFD    24/4LPP (,24/0,12/2L)
00677  M00S00594.catalog +++|          CON    10H
00678  M00S00595.catalog +++|          CON    10HREL
00679  M00S00596.catalog +++|          VFD    24/4LOVL ,12/0,6/1L,,12/0,6/1L
00680  M00S00597.catalog +++|          CON    10HULIB
00681  M00S00598.catalog +++|          CON    5LOPL
00682  M00S00599.catalog +++|          CON    5LOPLC
00683  M00S00600.catalog +++|          CON    10HOPLD
00684  M00S00601.catalog +++|          CON    10HABS
00685  M00S00602.catalog +++|          CON    8HPPU (  )-8A100
00686  M00S00603.catalog +++|          CON    10H
00687  M00S00604.catalog +++|          CON    10H
00688  M00S00605.catalog +++|          CON    10H
00689  M00S00606.catalog +++|          CON    10HCAP
00690  M00S00607.catalog +++|          CON    10H
00691  M00S00608.catalog +++|          CON    10HPROC
Line S00030 Modification History
M01 (Added by) 251l664
Seq #  *Modification Id* Act 
----------------------------+
00692  M01S00030.251l664 +++|          CON    10H
00693  M01S00031.251l664 +++|          CON    10H
00694  M01S00032.251l664 +++|          CON    10H
00695  M01S00033.251l664 +++|          CON    5LPPL (
00696  M00S00609.catalog +++|          LOC    *O
00697  M00S00610.catalog +++|
00698  M00S00611.catalog +++| LRSB     BSS    0
00699  M00S00612.catalog +++|          LOC    0
00700  M00S00613.catalog +++|          EQ     LRS4        TEXT
00701  M00S00614.catalog +++|          EQ     LRS7        PP
00702  M00S00615.catalog +++|          EQ     LRS4        UNDEFINED RECORD TYPE
00703  M00S00616.catalog +++|          EQ     LRS6        REL
00704  M00S00617.catalog +++|          EQ     LRS9        OVL
00705  M00S00618.catalog +++|          EQ     LRS14       ULIB
Line S00619 Modification History
M01 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00706  M01S00619.242l642 ---|          EQ     LRS5.4      OPL
00707  M01S00620.242l642 ---|          EQ     LRS5.4      OPLC
Line S00015 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00708  M01S00015.242l642 +++|          EQ     LRS5.2      OPL
00709  M01S00016.242l642 +++|          EQ     LRS5.2      OPLC
00710  M00S00621.catalog +++|          EQ     LRS4        OPLD
00711  M00S00622.catalog +++|          EQ     LRS6        ABS
00712  M00S00623.catalog +++|          EQ     LRS11       PPU
00713  M00S00624.catalog +++|          EQ     LRS4        UNDEFINED RECORD TYPE
00714  M00S00625.catalog +++|          EQ     LRS4        UNDEFINED RECORD TYPE
00715  M00S00626.catalog +++|          EQ     LRS4        UNDEFINED RECORD TYPE
00716  M00S00627.catalog +++|          EQ     LRS6        CAP
00717  M00S00628.catalog +++|          EQ     LRS4        UNDEFINED RECORD TYPE
00718  M00S00629.catalog +++|          EQ     LRS4        PROC
Line S00034 Modification History
M01 (Added by) 251l664
Seq #  *Modification Id* Act 
----------------------------+
00719  M01S00034.251l664 +++|          EQ     LRS4        UNDEFINED RECORD TYPE
00720  M01S00035.251l664 +++|          EQ     LRS4        UNDEFINED RECORD TYPE
00721  M01S00036.251l664 +++|          EQ     LRS4        UNDEFINED RECORD TYPE
00722  M01S00037.251l664 +++|          EQ     LRS15       PPL
00723  M00S00630.catalog +++|          LOC    *O
00724  M00S00631.catalog +++|
00725  M00S00632.catalog +++| LRSC     CON    10HPPU (    )-6A1
Line S00017 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00726  M01S00017.242l642 +++|
00727  M01S00018.242l642 +++| LRSCS    CON    5R(63)      DISPLAY CODE        63 CHARACTER SET
00728  M01S00019.242l642 +++|          CON    5R(64)      DISPLAY CODE        64 CHARACTER SET
00729  M01S00020.242l642 +++|          CON    5R(A63)     6/12 ASCII CODE     63 CHARACTER SET
00730  M01S00021.242l642 +++|          CON    5R(A64)     6/12 ASCII CODE     64 CHARACTER SET
Line S00001 Modification History
M01 (Added by) catal7
Seq #  *Modification Id* Act 
----------------------------+
00731  M01S00001.catal7  +++| LRSD     CON    0
00732  M01S00002.catal7  +++|          DATA   C* MORE ENTRY POINTS NOT LISTED*
00733  M00S00633.catalog +++| ABS      SPACE  4,10
00734  M00S00634.catalog +++|**        ABS - PROCESS ABS ENTRY POINTS.
00735  M00S00635.catalog +++|*
00736  M00S00636.catalog +++|*         ENTRY  (BUF) = FIRST BLOCK OF RECORD.
00737  M00S00637.catalog +++|*
00738  M00S00638.catalog +++|*         USES   X - 0, 1, 2, 3, 5, 6, 7.
00739  M00S00639.catalog +++|*                A - 1, 2, 5, 6, 7.
00740  M00S00640.catalog +++|*                B - 2, 7.
00741  M00S00641.catalog +++|*
Line S00642 Modification History
M01 (Removed by) catal7
Seq #  *Modification Id* Act 
----------------------------+
00742  M01S00642.catal7  ---|*         CALLS  COD, WOF, ZTB.
Line S00003 Modification History
M01 (Added by) catal7
Seq #  *Modification Id* Act 
----------------------------+
00743  M01S00003.catal7  +++|*         CALLS  CDD, COD, WOF, ZTB.
00744  M00S00643.catalog +++|
00745  M00S00644.catalog +++|
00746  M00S00645.catalog +++| ABS      SA1    BUF         CHECK FIRST WORD
00747  M00S00646.catalog +++|          LX1    18
00748  M00S00647.catalog +++|          MX2    -12
00749  M00S00648.catalog +++|          SX6    X1-770000B
00750  M00S00649.catalog +++|          NZ     X6,CAT1     RETURN IF NO 7700 TABLE
00751  M00S00650.catalog +++|          LX1    6           SKIP 7700 TABLE
00752  M00S00651.catalog +++|          SB2    X1+B1
00753  M00S00652.catalog +++|          SA1    A1+B2
00754  M00S00653.catalog +++|          LX1    12
00755  M00S00654.catalog +++|          BX3    -X2*X1
00756  M00S00655.catalog +++|          SX6    X3-5100B
00757  M00S00656.catalog +++|          LX1    -12
00758  M00S00657.catalog +++|          SB7    B1+         SET INDEX TO ENTRY POINTS
00759  M00S00658.catalog +++|          ZR     X6,ABS1     IF 5100 TABLE
00760  M00S00659.catalog +++|          SX6    X3-5300B
00761  M00S00660.catalog +++|          BX1    -X1
00762  M00S00661.catalog +++|          ZR     X6,ABS1     IF 5300 TABLE
00763  M00S00662.catalog +++|          BX1    -X1
00764  M00S00663.catalog +++|          SX6    X3-5400B
00765  M00S00664.catalog +++|          SB7    8
00766  M00S00665.catalog +++|          NZ     X6,CAT1     IF NOT 5400 TABLE
00767  M00S00666.catalog +++| ABS1     SX0    X1          SET ENTRY COUNT
00768  M00S00667.catalog +++|          ZR     X0,CAT1     IF NO ENTRIES
00769  M00S00668.catalog +++|          SA5    A1+B7       FIRST ENTRY POINT NAME
00770  M00S00669.catalog +++|          SA2    =1H         CLEAR SCRATCH BUFFER
00771  M00S00670.catalog +++|          BX6    X2
00772  M00S00671.catalog +++|          MX7    0
00773  M00S00672.catalog +++|          SA6    SBUF
00774  M00S00673.catalog +++|          SA7    SBUF+3
Line S00004 Modification History
M01 (Added by) catal7
Seq #  *Modification Id* Act 
----------------------------+
00775  M01S00004.catal7  +++|          SX2    BUF+BUFL    CALCULATE MAXIMUM ENTRY POINT COUNT
00776  M01S00005.catal7  +++|          SX3    A5
00777  M01S00006.catal7  +++|          IX3    X2-X3
00778  M01S00007.catal7  +++|          IX2    X0-X3
00779  M01S00008.catal7  +++|          NG     X2,ABS2     IF NO EXCESS ENTRY POINTS
00780  M01S00009.catal7  +++|          BX0    X3          SET MAXIMUM ENTRY POINT COUNT
00781  M01S00010.catal7  +++|          BX1    X2          ADD UNLISTED ENTRY POINT COUNT TO MESSAGE
00782  M01S00011.catal7  +++|          RJ     CDD
00783  M01S00012.catal7  +++|          SA6    LRSD
00784  M00S00674.catalog +++| ABS2     MX2    42          SPACE FILL NAME
00785  M00S00675.catalog +++|          BX1    X2*X5
00786  M00S00676.catalog +++|          RJ     ZTB
00787  M00S00677.catalog +++|          LX6    -6
00788  M00S00678.catalog +++|          BX1    -X2*X5
00789  M00S00679.catalog +++|          SA6    SBUF+1
00790  M00S00680.catalog +++|          RJ     COD         CONVERT ENTRY POINT ADDRESS
00791  M00S00681.catalog +++|          LX6    18
00792  M00S00682.catalog +++|          SA6    SBUF+2
00793  M00S00683.catalog +++|          SX1    SBUF        LIST ENTRY
00794  M00S00684.catalog +++|          RJ     WOF
00795  M00S00685.catalog +++|          SA5    A5+B1       NEXT ENTRY
00796  M00S00686.catalog +++|          SX0    X0-1
00797  M00S00687.catalog +++|          NZ     X0,ABS2     IF NOT END OF ENTRIES
Line S00013 Modification History
M01 (Added by) catal7
Seq #  *Modification Id* Act 
----------------------------+
00798  M01S00013.catal7  +++|          SA1    LRSD
00799  M01S00014.catal7  +++|          ZR     X1,CAT1     IF NO EXCESS ENTRY POINTS
00800  M01S00015.catal7  +++|          SX1    LRSD        ISSUE EXCESS ENTRY POINT MESSAGE
00801  M01S00016.catal7  +++|          RJ     WOF
00802  M01S00017.catal7  +++|          SX6    B0+
00803  M01S00018.catal7  +++|          SA6    LRSD
00804  M00S00688.catalog +++|          EQ     CAT1        RETURN
00805  M00S00689.catalog +++| CAP      SPACE  4,10
00806  M00S00690.catalog +++|**        CAP - PROCESS CAPSULE GROUP NAMES.
00807  M00S00691.catalog +++|*
00808  M00S00692.catalog +++|*         ENTRY  (BUF) = FIRST BLOCK OF RECORD.
00809  M00S00693.catalog +++|*
00810  M00S00694.catalog +++|*         USES   X - 0, 1, 2, 6.
00811  M00S00695.catalog +++|*                A - 1, 6.
00812  M00S00696.catalog +++|*                B - 2.
00813  M00S00697.catalog +++|*
00814  M00S00698.catalog +++|*         CALLS  WOF, ZTB.
00815  M00S00699.catalog +++|
00816  M00S00700.catalog +++|
00817  M00S00701.catalog +++| CAP      SA1    BUF         CHECK FIRST WORD
00818  M00S00702.catalog +++|          LX1    18
00819  M00S00703.catalog +++|          MX2    -12
00820  M00S00704.catalog +++|          SX6    X1-770000B
00821  M00S00705.catalog +++|          NZ     X6,CAT1     IF NO 7700 TABLE
00822  M00S00706.catalog +++|          LX1    6           SKIP 7700 TABLE
00823  M00S00707.catalog +++|          SB2    X1+2
00824  M00S00708.catalog +++|          MX0    42
00825  M00S00709.catalog +++|          SA1    A1+B2
00826  M00S00710.catalog +++|          BX1    X0*X1
00827  M00S00711.catalog +++|          RJ     ZTB         SPACE FILL NAME
00828  M00S00712.catalog +++|          LX6    -6
00829  M00S00713.catalog +++|          SA6    CAPA+1
00830  M00S00714.catalog +++|          SX1    CAPA        LIST GROUP NAME
00831  M00S00715.catalog +++|          RJ     WOF
00832  M00S00716.catalog +++|          EQ     CAT1        RETURN
00833  M00S00717.catalog +++|
00834  M00S00718.catalog +++| CAPA     DIS    2,
00835  M00S00719.catalog +++|          DATA   C* (GROUP NAME)*
00836  M00S00720.catalog +++| OPL      SPACE  4,10
00837  M00S00721.catalog +++|**        OPL - PROCESS OPL LIST.
00838  M00S00722.catalog +++|*
00839  M00S00723.catalog +++|*         ENTRY  (BUF) = FIRST BLOCK OF RECORD.
00840  M00S00724.catalog +++|*                (TF) = TERMINAL FLAG.
00841  M00S00725.catalog +++|*
00842  M00S00726.catalog +++|*         USES   X - ALL.
00843  M00S00727.catalog +++|*                A - 0, 1, 2, 3, 4, 6.
00844  M00S00728.catalog +++|*                B - 2, 6, 7.
00845  M00S00729.catalog +++|*
00846  M00S00730.catalog +++|*         CALLS  WOF, ZTB.
00847  M00S00731.catalog +++|
00848  M00S00732.catalog +++|
00849  M00S00733.catalog +++| OPL      SA1    BUF         CHECK FIRST WORD
00850  M00S00734.catalog +++|          LX1    18
Line S00019 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00851  M01S00019.ns22000 +++|          SB7    B0
00852  M00S00735.catalog +++|          SB2    X1-770000B
00853  M00S00736.catalog +++|          NZ     B2,CAT1     RETURN IF NO 7700 TABLE
00854  M00S00737.catalog +++|          LX1    6           SKIP 7700 TABLE
00855  M00S00738.catalog +++|          SB2    X1+B1
00856  M00S00739.catalog +++|          SA1    A1+B2
00857  M00S00740.catalog +++|          SX5    X1
00858  M00S00741.catalog +++|          ZR     X5,CAT1     RETURN IF NO MODIFIERS
Line S00742 Modification History
M01 (Removed by) catal9
Seq #  *Modification Id* Act 
----------------------------+
00859  M01S00742.catal9  ---|          SA3    TF          CHECK FOR TERMINAL
Line S00743 Modification History
M01 (Removed by) ns22000
M02 (Removed by) catal9
Seq #  *Modification Id* Act 
----------------------------+
00860  M02S00743.catal9  ---|          SB7    B0          LINE LENGTH FOR NON - TERMINAL
00861  M02S00744.catal9  ---|          ZR     X3,OPL0     IF NOT TERMINAL FILE
Line S00020 Modification History
M01 (Added by) ns22000
M02 (Removed by) catal9
Seq #  *Modification Id* Act 
----------------------------+
00862  M02S00020.catal9  ---|          NZ     X3,OPL0     IF NOT TERMINAL FILE
Line S00001 Modification History
M01 (Added by) catal9
Seq #  *Modification Id* Act 
----------------------------+
00863  M01S00001.catal9  +++|          SB6    BUFL
00864  M01S00002.catal9  +++|          SB5    X5+20B
00865  M01S00003.catal9  +++|          LE     B5,B6,OPL1  IF BUFFER NOT FULL
00866  M01S00004.catal9  +++|          SX5    BUFL-20B    SET NUMBER OF MODIFIERS TO MAXIMUM
00867  M01S00005.catal9  +++|          SX7    B1+         SET BUFFER FULL FLAG
00868  M01S00006.catal9  +++|          SA7    OPLB
00869  M01S00007.catal9  +++| OPL1     SA3    TF          CHECK FOR TERMINAL
00870  M01S00008.catal9  +++|          NZ     X3,OPL2     IF NOT TERMINAL FILE
00871  M00S00745.catalog +++|          SB7    -6          CHANGE LINE LENGTH FOR TERMINAL FILE
Line S00746 Modification History
M01 (Removed by) catal9
Seq #  *Modification Id* Act 
----------------------------+
00872  M01S00746.catal9  ---| OPL0     SA2    =1H         CLEAR SCRATCH BUFFER
Line S00009 Modification History
M01 (Added by) catal9
Seq #  *Modification Id* Act 
----------------------------+
00873  M01S00009.catal9  +++| OPL2     SA2    =1H         CLEAR SCRATCH BUFFER
00874  M00S00747.catalog +++|          SA0    A1+B1       FIRST MODIFIER
00875  M00S00748.catalog +++|          BX6    X2
00876  M00S00749.catalog +++|          SA6    SBUF
00877  M00S00750.catalog +++|          MX0    42
Line S00751 Modification History
M01 (Removed by) catal9
Seq #  *Modification Id* Act 
----------------------------+
00878  M01S00751.catal9  ---| OPL1     SB6    -12
00879  M01S00752.catal9  ---|          ZR     X5,OPL5     IF END OF MODIFIERS
00880  M01S00753.catal9  ---| OPL2     ZR     X5,OPL4     IF END OF TABLE
Line S00010 Modification History
M01 (Added by) catal9
Seq #  *Modification Id* Act 
----------------------------+
00881  M01S00010.catal9  +++| OPL3     SB6    -12
00882  M01S00011.catal9  +++|          ZR     X5,OPL7     IF END OF MODIFIERS
00883  M01S00012.catal9  +++| OPL4     ZR     X5,OPL6     IF END OF TABLE
00884  M00S00754.catalog +++|          SA4    A0          SPACE FILL NAME
00885  M00S00755.catalog +++|          BX1    X0*X4
00886  M00S00756.catalog +++|          RJ     ZTB
00887  M00S00757.catalog +++|          LX4    59-16       CHECK YANK BIT
00888  M00S00758.catalog +++|          SA0    A0+B1
Line S00759 Modification History
M01 (Removed by) catal9
Seq #  *Modification Id* Act 
----------------------------+
00889  M01S00759.catal9  ---|          PL     X4,OPL3     IF NOT SET
Line S00013 Modification History
M01 (Added by) catal9
Seq #  *Modification Id* Act 
----------------------------+
00890  M01S00013.catal9  +++|          PL     X4,OPL5     IF NOT SET
00891  M00S00760.catalog +++|          SA1    OPLA        ADD ()
00892  M00S00761.catalog +++|          IX6    X6+X1
Line S00762 Modification History
M01 (Removed by) catal9
Seq #  *Modification Id* Act 
----------------------------+
00893  M01S00762.catal9  ---| OPL3     LX6    -6          STORE NAME
Line S00014 Modification History
M01 (Added by) catal9
Seq #  *Modification Id* Act 
----------------------------+
00894  M01S00014.catal9  +++| OPL5     LX6    -6          STORE NAME
00895  M00S00763.catalog +++|          SA6    SBUF+13+B6
00896  M00S00764.catalog +++|          SB6    B6+B1
00897  M00S00765.catalog +++|          SX5    X5-1        ADVANCE TABLE
Line S00766 Modification History
M01 (Removed by) catal9
Seq #  *Modification Id* Act 
----------------------------+
00898  M01S00766.catal9  ---|          NE     B6,B7,OPL2  LOOP TO END OF LINE
Line S00015 Modification History
M01 (Added by) catal9
Seq #  *Modification Id* Act 
----------------------------+
00899  M01S00015.catal9  +++|          NE     B6,B7,OPL4  IF NOT END OF LINE
00900  M00S00767.catalog +++|          MX6    0           LIST LINE
00901  M00S00768.catalog +++|          SA6    A6+B1
00902  M00S00769.catalog +++|          SX1    SBUF
00903  M00S00770.catalog +++|          RJ     WOF
Line S00771 Modification History
M01 (Removed by) catal9
Seq #  *Modification Id* Act 
----------------------------+
00904  M01S00771.catal9  ---|          EQ     OPL1        LOOP
Line S00016 Modification History
M01 (Added by) catal9
Seq #  *Modification Id* Act 
----------------------------+
00905  M01S00016.catal9  +++|          EQ     OPL3        LOOP
00906  M00S00772.catalog +++|
00907  M00S00773.catalog +++|
Line S00774 Modification History
M01 (Removed by) catal9
Seq #  *Modification Id* Act 
----------------------------+
00908  M01S00774.catal9  ---| OPL4     MX6    0           LIST PARTIAL LINE
Line S00017 Modification History
M01 (Added by) catal9
Seq #  *Modification Id* Act 
----------------------------+
00909  M01S00017.catal9  +++| OPL6     MX6    0           LIST PARTIAL LINE
00910  M00S00775.catalog +++|          SA6    A6+B1
00911  M00S00776.catalog +++|          SX1    SBUF
00912  M00S00777.catalog +++|          RJ     WOF
Line S00778 Modification History
M01 (Removed by) catal9
Seq #  *Modification Id* Act 
----------------------------+
00913  M01S00778.catal9  ---| OPL5     SA1    LC          CHECK LINE COUNT
Line S00018 Modification History
M01 (Added by) catal9
Seq #  *Modification Id* Act 
----------------------------+
00914  M01S00018.catal9  +++| OPL7     SA3    OPLB
00915  M01S00019.catal9  +++|          ZR     X3,OPL8     IF BUFFER NOT FULL
00916  M01S00020.catal9  +++|          SX1    =C*  *
00917  M01S00021.catal9  +++|          RJ     WOF
00918  M01S00022.catal9  +++|          SX1    OPLC        * ADDITIONAL MODIFIERS NOT LISTED *
00919  M01S00023.catal9  +++|          RJ     WOF
00920  M01S00024.catal9  +++|          SX7    B0+         CLEAR BUFFER FULL FLAG
00921  M01S00025.catal9  +++|          SA7    OPLB
00922  M01S00026.catal9  +++| OPL8     SA1    LC          CHECK LINE COUNT
Line S00779 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00923  M01S00779.ns22000 ---|          SX7    X1-LINP
Line S00021 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00924  M01S00021.ns22000 +++|          SA3    A1+B1
00925  M01S00022.ns22000 +++|          IX7    X1-X3
00926  M00S00780.catalog +++|          PL     X7,CAT1     IF BOTTOM OF PAGE REACHED
00927  M00S00781.catalog +++|          SX1    =2L
00928  M00S00782.catalog +++|          RJ     WOF
00929  M00S00783.catalog +++|          EQ     CAT1        RETURN
00930  M00S00784.catalog +++|
00931  M00S00785.catalog +++| OPLA     VFD    60/3A) (-1H
Line S00027 Modification History
M01 (Added by) catal9
Seq #  *Modification Id* Act 
----------------------------+
00932  M01S00027.catal9  +++| OPLB     CON    0           FULL BUFFER FLAG
00933  M01S00028.catal9  +++| OPLC     DATA   5H
00934  M01S00029.catal9  +++|          DATA   C$*** ADDITIONAL MODIFIERS NOT LISTED ***$
00935  M00S00786.catalog +++| RDA      SPACE  4
00936  M00S00787.catalog +++|**        RDA - READ DATA.
00937  M00S00788.catalog +++|*         PROCESSES CALLS TO READ WORDS (RDW=).
00938  M00S00789.catalog +++|*         DEBLOCKS DATA IF CONTROL WORD READS.
00939  M00S00790.catalog +++|
00940  M00S00791.catalog +++|*         ENTRY/EXIT CONDITIONS ARE IDENTICAL WITH THOSE FOR COMCRDW.
00941  M00S00792.catalog +++|
00942  M00S00793.catalog +++|
00943  M00S00794.catalog +++| RDA5     SX6    B5-B7       UPDATE WORDS REMAINING
00944  M00S00795.catalog +++|          SA6    A1
00945  M00S00796.catalog +++|
00946  M00S00797.catalog +++| RDA6     RJ     RDW=        READ WORDS
00947  M00S00798.catalog +++|
00948  M00S00799.catalog +++| RDA      PS                 ENTRY/EXIT
00949  M00S00800.catalog +++|          SA1    CW          CHECK IF CONTROL WORDS LEGAL
00950  M00S00801.catalog +++|          ZR     X1,RDA6     IF CONTROL WORD READS NOT LEGAL
00951  M00S00802.catalog +++|          SA0    B6
00952  M00S00803.catalog +++| RDA1     SA1    X2-2        GET NUMBER OF WORDS BEFORE CONTROL WORD
00953  M00S00804.catalog +++|          SB5    X1+
00954  M00S00805.catalog +++|          PL     X1,RDA2     IF NOT FIRST READ
00955  M00S00806.catalog +++|          SX7    B7+         SET WORDS NEEDED
00956  M00S00807.catalog +++|          SA7    RDAA
00957  M00S00808.catalog +++|          JP     RDA4
00958  M00S00809.catalog +++|
00959  M00S00810.catalog +++| RDA2     GE     B5,B7,RDA5  IF ENOUGH DATA TO FILL BUFFER
00960  M00S00811.catalog +++|          SA3    X2-1        CHECK EOR FLAG
00961  M00S00812.catalog +++|          PL     X3,RDA3     IF NOT EOR ON FILE
00962  M00S00813.catalog +++|          MX6    1           SET NEW READ FLAG
00963  M00S00814.catalog +++|          SB7    B5+B1       SET WORDS TO READ
00964  M00S00815.catalog +++|          SA6    A3
00965  M00S00816.catalog +++|          SA6    A1
00966  M00S00817.catalog +++|          RJ     RDW=        READ WORDS
00967  M00S00818.catalog +++|          SA1    B6-B1       CHECK CONTROL WORD
00968  M00S00819.catalog +++|          AX1    48
00969  M00S00820.catalog +++|          SX6    X1-17B
00970  M00S00821.catalog +++|          MX1    -1
00971  M00S00822.catalog +++|          SB6    B6-B1       BACK UP LAST WORD ADDRESS
00972  M00S00823.catalog +++|          ZR     X6,RDA      IF *EOF* CONTROL WORD
00973  M00S00824.catalog +++|          SX1    B6          SET *EOR* INDICATION
00974  M00S00825.catalog +++|          JP     RDA         RETURN
00975  M00S00826.catalog +++|
00976  M00S00827.catalog +++| RDA3     SX6    B7-B5       SAVE ADDITIONAL WORDS NEEDED
00977  M00S00828.catalog +++|          SA6    RDAA
00978  M00S00829.catalog +++|          SB7    B5+B1       SET WORDS TO TRANSFER
00979  M00S00830.catalog +++|          RJ     RDW=        READ WORDS
00980  M00S00831.catalog +++|          SB7    A0-B6
00981  M00S00832.catalog +++|          ZR     B7,RDA      IF EOR, RETURN
00982  M00S00833.catalog +++|          SB6    B6-1        BACK UP OVER LAST CONTROL WORD
00983  M00S00834.catalog +++| RDA4     SB7    B1          READ CONTROL WORD
00984  M00S00835.catalog +++|          RJ     RDW=
00985  M00S00836.catalog +++|          NG     X1,RDA      IF EOF/EOI
00986  M00S00837.catalog +++|          SB6    B6-B1       BACK UP WORKING BUFFER
00987  M00S00838.catalog +++|          SA1    B6          CONTROL WORD
00988  M00S00839.catalog +++|          SX7    5
00989  M00S00840.catalog +++|          SX4    X1+4        ROUND UP
00990  M00S00841.catalog +++|          AX1    36          EXTRACT BLOCK SIZE
00991  M00S00842.catalog +++|          SX3    X1
00992  M00S00843.catalog +++|          IX7    X4/X7       WORDS IN BLOCK
00993  M00S00844.catalog +++|          IX6    X7-X3       SAVE EOR FLAG
00994  M00S00845.catalog +++|          SA7    X2-2        STORE WORD COUNT
00995  M00S00846.catalog +++|          SA6    X2-1        EOR FLAG
00996  M00S00847.catalog +++|          SA1    RDAA        RESET WORDS NEEDED
00997  M00S00848.catalog +++|          SB7    X1
00998  M00S00849.catalog +++|          JP     RDA1        LOOP
00999  M00S00850.catalog +++|
01000  M00S00851.catalog +++| RDAA     CON    0
01001  M00S00852.catalog +++| RDR      SPACE  4
01002  M00S00853.catalog +++|**        RDR - READ RECORD.
01003  M00S00854.catalog +++|*
01004  M00S00855.catalog +++|*         EXIT   (X1) = -1 IF EOF.
01005  M00S00856.catalog +++|*                (RL) = RECORD LENGTH.
01006  M00S00857.catalog +++|*                (CS) = CHECK SUM.
01007  M00S00858.catalog +++|*                (TY) = RECORD TYPE.
01008  M00S00859.catalog +++|*                (NM) = RECORD NAME.
01009  M00S00860.catalog +++|*                (NSFF) .NE. 0, IF NONSTANDARD RECORD ENCOUNTERED
01010  M00S00861.catalog +++|*                     (DATA WITH NO EOR).
01011  M00S00862.catalog +++|*
01012  M00S00863.catalog +++|*         USES   A - 1, 2, 3, 4, 6, 7.
01013  M00S00864.catalog +++|*                B - 2, 3, 4.
01014  M00S00865.catalog +++|*                X - 1, 2, 3, 4, 6, 7.
01015  M00S00866.catalog +++|*
01016  M00S00867.catalog +++|*         CALLS  SRT.
01017  M00S00868.catalog +++|*
01018  M00S00869.catalog +++|*         MACROS MESSAGE, READW.
01019  M00S00870.catalog +++|
01020  M00S00871.catalog +++|
01021  M00S00872.catalog +++| RDR      PS                 ENTRY/EXIT
01022  M00S00873.catalog +++|          READW  F,BUF,BUFL
01023  M00S00874.catalog +++|          BX6    X1          SAVE STATUS
01024  M00S00875.catalog +++|          SA6    RDRA
01025  M00S00876.catalog +++|          SB2    B6-BUF
01026  M00S00877.catalog +++|          SX1    B6          LWA+1 OF DATA FOR SRT CALL
01027  M00S00878.catalog +++|          NZ     B2,RDR0     IF DATA TRANSFERRED
01028  M00S00879.catalog +++|          PL     X6,RDR0     IF NOT EOF/EOI
01029  M00S00880.catalog +++|          SX1    BUF
01030  M00S00881.catalog +++| RDR0     SX2    BUF
01031  M00S00882.catalog +++|          RJ     SRT
01032  M00S00883.catalog +++|          SA6    TY          SET TYPE
01033  M00S00884.catalog +++|          SA7    NM          SET NAME
01034  M00S00885.catalog +++|          LX7    -6          ENTER NAME N MESSAGE
01035  M00S00886.catalog +++|          SX3    1R          ENTER NAME IN MESSAGE
01036  M00S00887.catalog +++|          LX3    59-5
01037  M00S00888.catalog +++|          BX7    X3+X7
01038  M00S00889.catalog +++|          SA7    RDRB+1
01039  M00S00890.catalog +++|          MESSAGE A7-B1,1    ISSUE CONSOLE MESSAGE
01040  M00S00891.catalog +++|          SA1    RDRA
01041  M00S00892.catalog +++|          SB2    BUFL
01042  M00S00893.catalog +++|          SB3    BUF
01043  M00S00894.catalog +++|          ZR     X1,RDR1     IF NOT EOR/EOF
01044  M00S00895.catalog +++|          SB2    B6-BUF
01045  M00S00896.catalog +++|          ZR     B2,RDR      RETURN IF ZERO LENGTH RECORD
01046  M00S00897.catalog +++|          PL     X1,RDR1     IF NOT NONSTANDARD RECORD
01047  M00S00898.catalog +++|          SX6    B1+         SET NONSTANDARD FILE FLAG
01048  M00S00899.catalog +++|          SA6    NSFF
01049  M00S00900.catalog +++| RDR1     SA2    TY          EXCLUDE RECORD TYPES WITHOUT 7700 TABLE
01050  M00S00901.catalog +++|          SX2    X2
Line S00038 Modification History
M01 (Added by) 251l664
Seq #  *Modification Id* Act 
----------------------------+
01051  M01S00038.251l664 +++|          ERRNZ  TXRT        CODE ASSUMES VALUE
01052  M00S00902.catalog +++|          ZR     X2,RDR2     IF RECORD TYPE *TEXT*
01053  M00S00903.catalog +++|          SA2    B3          CHECK FIRST WORD
01054  M00S00904.catalog +++|          LX2    18
01055  M00S00905.catalog +++|          SX6    X2-770000B
01056  M00S00906.catalog +++|          NZ     X6,RDR2     IF NO 7700 TABLE
01057  M00S00907.catalog +++|          LX2    6           SKIP 7700 TABLE
01058  M00S00908.catalog +++|          SB4    X2+B1
01059  M00S00909.catalog +++|          SB3    B3+B4
01060  M00S00910.catalog +++|          SB2    B2-B4
01061  M00S00911.catalog +++|          LE     B2,RDR      IF 77 TABLE ONLY OR ERROR IN LENGTH
01062  M00S00912.catalog +++|
01063  M00S00913.catalog +++| RDR2     SA2    RL          ADVANCE RECORD LENGTH
01064  M00S00914.catalog +++|          SA3    CS          ADVANCE CHECKSUM
01065  M00S00915.catalog +++|          SX7    B2
01066  M00S00916.catalog +++|          SA4    B3
01067  M00S00917.catalog +++|          BX6    X3
01068  M00S00918.catalog +++|          IX7    X2+X7
01069  M00S00919.catalog +++| RDR3     BX6    X6-X4
01070  M00S00920.catalog +++|          SB2    B2-B1
01071  M00S00921.catalog +++|          SA4    A4+B1
01072  M00S00922.catalog +++|          LX6    1
01073  M00S00923.catalog +++|          NZ     B2,RDR3
01074  M00S00924.catalog +++|          SA6    A3
01075  M00S00925.catalog +++|          SA7    A2
01076  M00S00926.catalog +++|          NZ     X1,RDR      RETURN IF EOR/EOF
01077  M00S00927.catalog +++|          READW  F,SBUF,SBUFL
01078  M00S00928.catalog +++|          SB2    SBUFL
01079  M00S00929.catalog +++|          SB3    SBUF
01080  M00S00930.catalog +++|          ZR     X1,RDR2     IF NOT EOR/EOF
01081  M00S00931.catalog +++|          SB2    B6-SBUF
01082  M00S00932.catalog +++|          PL     X1,RDR4     IF NOT NONSTANDARD RECORD
01083  M00S00933.catalog +++|          SX6    B1+         SET NONSTANDARD FILE FLAG
01084  M00S00934.catalog +++|          SA6    NSFF
01085  M00S00935.catalog +++| RDR4     NZ     B2,RDR2     IF NOT EMPTY BUFFER
01086  M00S00936.catalog +++|          EQ     RDR         RETURN
01087  M00S00937.catalog +++|
01088  M00S00938.catalog +++| RDRA     DATA   0
01089  M00S00939.catalog +++|
01090  M00S00940.catalog +++| RDRB     DATA   10HCATALOGING
01091  M00S00941.catalog +++|          DATA   0
01092  M00S00942.catalog +++| REL      SPACE  4,10
01093  M00S00943.catalog +++|**        REL - PROCESS RELOCATABLE LIST.
01094  M00S00944.catalog +++|*
01095  M00S00945.catalog +++|*         ENTRY  (BUF) = FIRST BLOCK OF RECORD.
01096  M00S00946.catalog +++|*
01097  M00S00947.catalog +++|*         USES   X - 0, 1, 2, 5, 6, 7.
01098  M00S00948.catalog +++|*                A - 1, 2, 5, 6, 7.
01099  M00S00949.catalog +++|*                B - 2.
01100  M00S00950.catalog +++|*
Line S00951 Modification History
M01 (Removed by) catal7
Seq #  *Modification Id* Act 
----------------------------+
01101  M01S00951.catal7  ---|*         CALLS  WOF, ZTB.
Line S00019 Modification History
M01 (Added by) catal7
Seq #  *Modification Id* Act 
----------------------------+
01102  M01S00019.catal7  +++|*         CALLS  CDD, WOF, ZTB.
01103  M00S00952.catalog +++|
01104  M00S00953.catalog +++|
01105  M00S00954.catalog +++| REL      SA1    BUF         CHECK FIRST WORD
01106  M00S00955.catalog +++|          LX1    18
01107  M00S00956.catalog +++|          SB2    X1-770000B
01108  M00S00957.catalog +++|          NZ     B2,CAT1     RETURN IF NO 7700 TABLE
01109  M00S00958.catalog +++|          LX1    6           SKIP 7700 TABLE
01110  M00S00959.catalog +++|          SB2    X1+B1
01111  M00S00960.catalog +++|          SA1    A1+B2
01112  M00S00961.catalog +++|          LX1    12
01113  M00S00962.catalog +++|          SB2    X1-7000B
01114  M00S00963.catalog +++|          NZ     B2,REL1     IF NOT 7000 TABLE
01115  M00S00964.catalog +++|          LX1    12          SKIP 7000 TABLE
01116  M00S00965.catalog +++|          SB2    X1+B1
01117  M00S00966.catalog +++|          SA1    A1+B2
01118  M00S00967.catalog +++|          LX1    12
01119  M00S00968.catalog +++| REL1     SB2    X1-3400B
01120  M00S00969.catalog +++|          NZ     B2,CAT1     RETURN IF NO 3400 TABLE
01121  M00S00970.catalog +++|          LX1    12          SKIP 3400 TABLE
01122  M00S00971.catalog +++|          SB2    X1+B1
01123  M00S00972.catalog +++|          SA1    A1+B2
01124  M00S00973.catalog +++|          LX1    12
01125  M00S00974.catalog +++|          SB2    X1-3600B
01126  M00S00975.catalog +++|          NZ     B2,CAT1     RETURN IF NO 3600 TABLE
01127  M00S00976.catalog +++|          LX1    12
01128  M00S00977.catalog +++|          SX0    X1-1
01129  M00S00978.catalog +++|          SA5    A1+B1       FIRST ENTRY POINT
01130  M00S00979.catalog +++|          SA2    =1H         CLEAR SCRATCH BUFFER
01131  M00S00980.catalog +++|          BX6    X2
01132  M00S00981.catalog +++|          MX7    0
01133  M00S00982.catalog +++|          SA6    SBUF
01134  M00S00983.catalog +++|          SA7    SBUF+2
Line S00020 Modification History
M01 (Added by) catal7
Seq #  *Modification Id* Act 
----------------------------+
01135  M01S00020.catal7  +++|          SX2    BUF+BUFL    CALCULATE MAXIMUM ENTRY POINT COUNT
01136  M01S00021.catal7  +++|          SX7    A5
01137  M01S00022.catal7  +++|          IX7    X2-X7
01138  M01S00023.catal7  +++|          IX2    X0-X7
01139  M01S00024.catal7  +++|          NG     X2,REL2     IF NO EXCESS ENTRY POINTS
01140  M01S00025.catal7  +++|          SX0    X7-1        SET MAXIMUM ENTRY POINT COUNT
01141  M01S00026.catal7  +++|          SX1    X2+1        ADD UNLISTED ENTRY POINT COUNT TO MESSAGE
01142  M01S00027.catal7  +++|          LX1    -1
01143  M01S00028.catal7  +++|          RJ     CDD
01144  M01S00029.catal7  +++|          SA6    LRSD
01145  M00S00984.catalog +++| REL2     BX1    X5          SPACE FILL NAME
01146  M00S00985.catalog +++|          RJ     ZTB
01147  M00S00986.catalog +++|          LX6    -6
01148  M00S00987.catalog +++|          SA6    SBUF+1
01149  M00S00988.catalog +++|          SX1    SBUF        LIST ENTRY POINT
01150  M00S00989.catalog +++|          RJ     WOF
01151  M00S00990.catalog +++|          SA5    A5+2        NEXT ENTRY POINT
01152  M00S00991.catalog +++|          SX0    X0-2
01153  M00S00992.catalog +++|          PL     X0,REL2     LOOP FOR ALL ENTRY POINTS
Line S00030 Modification History
M01 (Added by) catal7
Seq #  *Modification Id* Act 
----------------------------+
01154  M01S00030.catal7  +++|          SA1    LRSD
01155  M01S00031.catal7  +++|          ZR     X1,CAT1     IF NO EXCESS ENTRY POINTS
01156  M01S00032.catal7  +++|          SX1    LRSD        ISSUE EXCESS ENTRY POINT MESSAGE
01157  M01S00033.catal7  +++|          RJ     WOF
01158  M01S00034.catal7  +++|          SX6    B0+
01159  M01S00035.catal7  +++|          SA6    LRSD
01160  M00S00993.catalog +++|          EQ     CAT1        RETURN
01161  M00S00994.catalog +++| TXT      SPACE  4
01162  M00S00995.catalog +++|**        TXT - PROCESS TEXT LIST.
01163  M00S00996.catalog +++|
01164  M00S00997.catalog +++|
01165  M00S00998.catalog +++| TXT      SA1    NM          READ NAME
01166  M00S00999.catalog +++|          SA2    TXTB        SET TABLE ADDRESS FOR *OVERLAY* ONLY
01167  M00S01000.catalog +++|          SA3    TXTD
01168  M00S01001.catalog +++|          ZR     X3,TXT0     IF NOT LISTING *TEXT* RECORDS
01169  M00S01002.catalog +++|          SA2    TXTA        SET TABLE ADDRESS FOR ALL TEXT RECORDS
01170  M00S01003.catalog +++| TXT0     MX4    1
01171  M00S01004.catalog +++|          SB2    X2
01172  M00S01005.catalog +++|          MX0    42
01173  M00S01006.catalog +++|          BX6    X0*X2
01174  M00S01007.catalog +++| TXT1     AX3    X4,B2       SET MASK
01175  M00S01008.catalog +++|          BX7    X1-X6
01176  M00S01009.catalog +++|          BX6    X3*X7
01177  M00S01010.catalog +++|          SA2    A2+B1
01178  M00S01011.catalog +++|          ZR     X6,TXT2     IF MATCH ON NAME
01179  M00S01012.catalog +++|          ZR     X2,CAT1     IF END OF TABLE
01180  M00S01013.catalog +++|          SB2    X2
01181  M00S01014.catalog +++|          BX6    X0*X2
01182  M00S01015.catalog +++|          EQ     TXT1        LOOP
01183  M00S01016.catalog +++|
01184  M00S01017.catalog +++| TXT2     SA0    BUF
01185  M00S01018.catalog +++|          SX6    A2-TXTB-1   SET *OVERLAY* FLAG
01186  M00S01019.catalog +++|          SA6    TXTC
01187  M00S01020.catalog +++|          SA1    =1H
01188  M00S01021.catalog +++|          BX6    X1
01189  M00S01022.catalog +++|          SB2    B0
01190  M00S01023.catalog +++|          SA6    SBUF
01191  M00S01024.catalog +++|          MX0    -12
01192  M00S01025.catalog +++|          SA6    A6+B1
01193  M00S01026.catalog +++|          SA5    RL
01194  M00S01027.catalog +++|          SX7    X5-BUFL
Line S00001 Modification History
M01 (Added by) catal8
Seq #  *Modification Id* Act 
----------------------------+
01195  M01S00001.catal8  +++|          SA7    TXTE
01196  M00S01028.catalog +++|          MI     X7,TXT3     IF LESS THAN FULL BUFFER OF TEXT
01197  M00S01029.catalog +++|          SX5    BUFL        RESET LENGTH OF RECORD
01198  M00S01030.catalog +++| TXT3     SX5    X5-1
01199  M00S01031.catalog +++|          NG     X5,TXT4     IF END OF COPY
01200  M00S01032.catalog +++|          SA1    A0          MOVE WORD
01201  M00S01033.catalog +++|          LX6    X1
01202  M00S01034.catalog +++|          SA6    SBUF+2+B2
01203  M00S01035.catalog +++|          SA0    A0+B1
01204  M00S01036.catalog +++|          BX7    -X0*X1
01205  M00S01037.catalog +++|          SB2    B2+B1
01206  M00S01038.catalog +++|          NZ     X7,TXT3     LOOP TO END OF LINE
01207  M00S01039.catalog +++|          SX1    SBUF        LIST LINE
01208  M00S01040.catalog +++|          RJ     WOF
01209  M00S01041.catalog +++|          SA2    TXTC
01210  M00S01042.catalog +++|          ZR     X2,CAT1     IF *OVERLAY* RECORD
01211  M00S01043.catalog +++|          SB2    B0
01212  M00S01044.catalog +++|          EQ     TXT3        LOOP
01213  M00S01045.catalog +++|
Line S01046 Modification History
M01 (Removed by) catal8
Seq #  *Modification Id* Act 
----------------------------+
01214  M01S01046.catal8  ---| TXT4     SX1    =C*  *
Line S00002 Modification History
M01 (Added by) catal8
Seq #  *Modification Id* Act 
----------------------------+
01215  M01S00002.catal8  +++| TXT4     SA1    TXTE
01216  M01S00003.catal8  +++|          NG     X1,TXT5     IF NOT FULL BUFFER
01217  M01S00004.catal8  +++|          SX1    =C*  *
01218  M01S00005.catal8  +++|          RJ     WOF
01219  M01S00006.catal8  +++|          SX1    TXTF        * ADDITIONAL TEXT NOT LISTED *
01220  M01S00007.catal8  +++|          RJ     WOF
01221  M01S00008.catal8  +++| TXT5     SX1    =C*  *
01222  M00S01047.catalog +++|          RJ     WOF
01223  M00S01048.catalog +++|          EQ     CAT1        RETURN
01224  M00S01049.catalog +++|
Line S01050 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
01225  M01S01050.ns22000 ---|          SPACE  4,10
01226  M01S01051.ns22000 ---|*         TABLE OF SPECIAL TEXT RECORD NAMES.  THE CONTENTS
01227  M01S01052.ns22000 ---|*         OF THESE RECORDS ARE LISTED IF THE *T* PARAMETER
01228  M01S01053.ns22000 ---|*         IS SPECIFIED ON THE CONTROL STATEMENT.
01229  M01S01054.ns22000 ---|*
01230  M01S01055.ns22000 ---|*         NOTE - RECORDS NAMED *OVERLAY* WILL ALWAYS HAVE THE
01231  M01S01056.ns22000 ---|*         FIRST LINE (AND ONLY THE FIRST LINE) LISTED,
01232  M01S01057.ns22000 ---|*         REGARDLESS OF WHETHER THE *T* OPTION WAS SPECIFIED.
01233  M01S01058.ns22000 ---|
01234  M01S01059.ns22000 ---| TXTA     BSS    0
01235  M01S01060.ns22000 ---|          CON    5LCMRDC+29
01236  M01S01061.ns22000 ---|          CON    7LCMRDECK+41
01237  M01S01062.ns22000 ---|          CON    5LIPRDC+29
01238  M01S01063.ns22000 ---|          CON    7LIPRDECK+41
01239  M01S01064.ns22000 ---|          CON    5LLIBDC+29
01240  M01S01065.ns22000 ---|          CON    7LLIBDECK+41
01241  M01S01066.ns22000 ---|          CON    4LAPR0+23
Line S01067 Modification History
M01 (Removed by) catal1
M02 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
01242  M02S01067.ns22000 ---|          CON    5LDDSDC+29
01243  M02S01068.ns22000 ---|          CON    7LDDSDECK+41
Line S01069 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
01244  M01S01069.ns22000 ---| TXTB     CON    7LOVERLAY+41
01245  M01S01070.ns22000 ---|          CON    0
Line S00023 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
01246  M01S00023.ns22000 +++|
01247  M01S00024.ns22000 +++|
01248  M01S00025.ns22000 +++|****      TABLE OF SPECIAL *TEXT* RECORD NAMES.
01249  M01S00026.ns22000 +++|*
01250  M01S00027.ns22000 +++|*         IF THE *T* OPTION IS SELECTED, THE ENTIRE TABLE WILL BE
01251  M01S00028.ns22000 +++|*         SEARCHED.  OTHERWISE, ONLY *OVERLAY* WILL BE RECOGNIZED.
01252  M01S00029.ns22000 +++|*
01253  M01S00030.ns22000 +++|*         ENTRY FORMAT -
01254  M01S00031.ns22000 +++|*
01255  M01S00032.ns22000 +++|*T        42/ SPECIAL RECORD NAME SKELETON, 18/ BITS-1 IN MASK
Figure

0171829 BITS-1 IN MASK SPECIAL RECORD NAME SKELETON3059 SPECIAL RECORD NAME SKELETON

01256  M01S00033.ns22000 +++|*
01257  M01S00034.ns22000 +++|*         TABLE IS TERMINATED BY A ZERO WORD.
01258  M01S00035.ns22000 +++|
01259  M01S00036.ns22000 +++|
01260  M01S00037.ns22000 +++| TXTA     BSS    0
01261  M01S00038.ns22000 +++|
01262  M01S00039.ns22000 +++|*         PATTERNS SEARCHED IF *T* OPTION ENABLED.
01263  M01S00040.ns22000 +++|
01264  M01S00041.ns22000 +++|          VFD    42/0LAPRD,18/24-1     *APRDECK* PATTERNS
01265  M01S00042.ns22000 +++|          VFD    42/0LAPR0,18/24-1
01266  M01S00043.ns22000 +++|          VFD    42/0LCMRD,18/24-1     *CMRDECK* PATTERN
01267  M01S00044.ns22000 +++|          VFD    42/0LEQPD,18/24-1     *EQPDECK* PATTERN
01268  M01S00045.ns22000 +++|          VFD    42/0LIPRD,18/24-1     *IPRDECK* PATTERN
01269  M01S00046.ns22000 +++|          VFD    42/0LLIBD,18/24-1     *LIBDECK* PATTERN
01270  M01S00047.ns22000 +++|
01271  M01S00048.ns22000 +++|*         UNCONDITIONALLY SEARCHED PATTERNS.
01272  M01S00049.ns22000 +++|
01273  M01S00050.ns22000 +++| TXTB     VFD    42/0LOVERLAY,18/42-1  *OVERLAY* PATTERN
01274  M01S00051.ns22000 +++|
01275  M01S00052.ns22000 +++|          CON    0           END OF TABLE
01276  M01S00053.ns22000 +++|****
01277  M00S01071.catalog +++|
01278  M00S01072.catalog +++| TXTC     CON    0           *OVERLAY* RECORD FLAG
01279  M00S01073.catalog +++| TXTD     CON    0           LIST *TEXT* RECORDS FLAG
Line S00009 Modification History
M01 (Added by) catal8
Seq #  *Modification Id* Act 
----------------------------+
01280  M01S00009.catal8  +++| TXTE     CON    0           BUFFER FULL FLAG
01281  M01S00010.catal8  +++| TXTF     DATA   20H
01282  M01S00011.catal8  +++|          DATA   C$*** ADDITIONAL TEXT NOT LISTED ***$
01283  M00S01074.catalog +++| ULB      SPACE  4
01284  M00S01075.catalog +++|**        ULB - PROCESS USER LIBRARY.
01285  M00S01076.catalog +++|
01286  M00S01077.catalog +++|
01287  M00S01078.catalog +++| ULB      SA1    UL
01288  M00S01079.catalog +++|          SX6    B1+
01289  M00S01080.catalog +++|          SA6    ULBB        SET *SEARCHING FOR OPLD* FLAG
01290  M00S01081.catalog +++|          NZ     X1,CAT1     IF USER LIBRARY LIST REQUESTED
01291  M00S01082.catalog +++|          SA6    ULBA        SET NO LIST
01292  M00S01083.catalog +++|          EQ     CAT1        RETURN
01293  M00S01084.catalog +++|
01294  M00S01085.catalog +++| ULBA     CON    0           *USER LIBRARY FOUND AND NO ULIB LIST* FLAG
01295  M00S01086.catalog +++| ULBB     CON    0           *SEARCHING FOR OPLD* FLAG
01296  M00S01087.catalog +++|          TITLE  SUBROUTINES.
01297  M00S01088.catalog +++| WOF      SPACE  4
01298  M00S01089.catalog +++|**        WOF - WRITE LINE TO OUTPUT.
01299  M00S01090.catalog +++|*
01300  M00S01091.catalog +++|*         ENTRY  (X1) = FWA LINE.
01301  M00S01092.catalog +++|*
Line S01093 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
01302  M01S01093.ns22000 ---|*         USES ALL REGISTERS EXCEPT A0, X0, A5, X5.
Line S00054 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
01303  M01S00054.ns22000 +++|*         USES   X - 1, 2, 3, 6, 7.
01304  M01S00055.ns22000 +++|*                A - 1, 2, 3, 6, 7.
01305  M01S00056.ns22000 +++|*
01306  M01S00057.ns22000 +++|*         CALLS  CDD.
01307  M01S00058.ns22000 +++|*
01308  M01S00059.ns22000 +++|*         MACROS WRITEC.
01309  M00S01094.catalog +++|
01310  M00S01095.catalog +++|
01311  M00S01096.catalog +++| WOF      PS                 ENTRY/EXIT
01312  M00S01097.catalog +++|          SA3    LC          ADVANCE LINE COUNT
01313  M00S01098.catalog +++|          SX6    X3+B1
01314  M00S01099.catalog +++|          SA6    A3
Line S01100 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
01315  M01S01100.ns22000 ---|          SX7    X6-LINP+4
Line S00060 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
01316  M01S00060.ns22000 +++|          SA2    A3+B1       GET LINE LIMIT
01317  M01S00061.ns22000 +++|          IX7    X6-X2
01318  M00S01101.catalog +++|          NG     X7,WOF1     IF BOTTOM OF PAGE NOT REACHED
Line S01102 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
01319  M01S01102.ns22000 ---|          BX6    X1          SAVE REQUEST
01320  M01S01103.ns22000 ---|          SA6    WOFA
01321  M01S01104.ns22000 ---|          SA1    PN          ADVANCE PAGE NUMBER
01322  M01S01105.ns22000 ---|          SX6    B0          RESET LINE COUNT
01323  M01S01106.ns22000 ---|          SX7    X1+B1
01324  M01S01107.ns22000 ---|          SA6    A3
01325  M01S01108.ns22000 ---|          SA7    A1
Line S00062 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
01326  M01S00062.ns22000 +++|          SX6    3           RESET LINE COUNT
01327  M01S00063.ns22000 +++|          BX7    X1          SAVE REQUEST
01328  M01S00064.ns22000 +++|          SA6    A3
01329  M01S00065.ns22000 +++|          SA1    PN          ADVANCE PAGE NUMBER
01330  M01S00066.ns22000 +++|          SA7    WOFA
01331  M01S00067.ns22000 +++|          SX6    X1+B1
01332  M01S00068.ns22000 +++|          SA6    A1
01333  M00S01109.catalog +++|          RJ     CDD         CONVERT PAGE NUMBER
01334  M00S01110.catalog +++|          MX1    48
01335  M00S01111.catalog +++|          LX6    18          STORE PAGE NUMBER
01336  M00S01112.catalog +++|          BX6    X1*X6
01337  M00S01113.catalog +++|          SA6    PAGE
01338  M00S01114.catalog +++|          WRITEC O,TITL
01339  M00S01115.catalog +++|          WRITEC X2,SBTL
01340  M00S01116.catalog +++|          WRITEC X2,(=C*  *)
01341  M00S01117.catalog +++|          SA1    WOFA        RESTORE REQUEST
01342  M00S01118.catalog +++| WOF1     WRITEC O,X1
01343  M00S01119.catalog +++|          SA1    SL          CHECK LIST FLAG
01344  M00S01120.catalog +++|          ZR     X1,WOF      RETURN IF NOT SHORT LIST
01345  M00S01121.catalog +++|          MX6    0           CLEAR LINE COUNT
01346  M00S01122.catalog +++|          SA6    LC
01347  M00S01123.catalog +++|          EQ     WOF         RETURN
01348  M00S01124.catalog +++|
01349  M00S01125.catalog +++| WOFA     CON    0
01350  M00S01126.catalog +++|          SPACE  4
01351  M00S01127.catalog +++|*         COMMON DECKS.
01352  M00S01128.catalog +++|
01353  M00S01129.catalog +++|
01354  M00S01130.catalog +++|*CALL     COMCCDD
01355  M00S01131.catalog +++|*CALL     COMCCOD
01356  M00S01132.catalog +++|*CALL     COMCCPT
01357  M00S01133.catalog +++|*CALL     COMCSRT
01358  M00S01134.catalog +++|*CALL     COMCRDW
01359  M00S01135.catalog +++|*CALL     COMCWTC
01360  M00S01136.catalog +++|*CALL     COMCWTW
01361  M00S01137.catalog +++|*CALL     COMCCIO
01362  M00S01138.catalog +++|*CALL     COMCSYS
01363  M00S01139.catalog +++|*CALL COMCZTB
01364  M00S01140.catalog +++| BUFFERS  SPACE  4
01365  M00S01141.catalog +++|**        BUFFERS.
01366  M00S01142.catalog +++|
01367  M00S01143.catalog +++|
01368  M00S01144.catalog +++|          USE    //
01369  M00S01145.catalog +++|          SEG
Line S01146 Modification History
M01 (Removed by) catal8
Seq #  *Modification Id* Act 
----------------------------+
01370  M01S01146.catal8  ---| BUFL     EQU    1000B       WORKING BUFFER
Line S00012 Modification History
M01 (Added by) catal8
M02 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
01371  M02S00012.274l797 ---| BUFL     EQU    2000B       WORKING BUFFER
Line S00005 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
01372  M01S00005.274l797 +++| BUFL     EQU    10002B      WORKING BUFFER
01373  M00S01147.catalog +++| SBUFL    EQU    100B        SCRATCH BUFFER
01374  M00S01148.catalog +++|
01375  M00S01149.catalog +++| BUF      BSS    BUFL
01376  M00S01150.catalog +++| SBUF     BSS    SBUFL
01377  M00S01151.catalog +++| FBUF     BSS    FBUFL
01378  M00S01152.catalog +++| OBUF     BSS    OBUFL
01379  M00S01153.catalog +++| RFL=     BSS    0
01380  M00S01154.catalog +++| PRS      SPACE  4,10
01381  M00S01155.catalog +++|**        PRS - PRESET PROGRAM.
01382  M00S01156.catalog +++|*
01383  M00S01157.catalog +++|*         USES   X - ALL.
01384  M00S01158.catalog +++|*                A - 1, 2, 4, 5, 6, 7.
01385  M00S01159.catalog +++|*                B - 1, 4, 5, 7.
01386  M00S01160.catalog +++|*
01387  M00S01161.catalog +++|*         CALLS  ARG, CDT, DXB, STF, ZTB.
01388  M00S01162.catalog +++|*
Line S01163 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
01389  M01S01163.ns22000 ---|*         MACROS ABORT, CLOCK, DATE, MESSAGE, OPEN, SETLOF.
Line S00069 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
01390  M01S00069.ns22000 +++|*         MACROS ABORT, CLOCK, DATE, GETPP, MESSAGE, OPEN, SETLOF.
01391  M00S01164.catalog +++|
01392  M00S01165.catalog +++|
01393  M00S01166.catalog +++|          ORG    BUF
01394  M00S01167.catalog +++| PRS      PS                 ENTRY/EXIT
01395  M00S01168.catalog +++|          SB1    1
01396  M00S01169.catalog +++|          DATE   DATE
Line S00070 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
01397  M01S00070.ns22000 +++|          GETPP  OBUF,LL,PD  GET PAGE SIZE PARAMETERS
01398  M00S01170.catalog +++|          CLOCK  TIME
01399  M00S01171.catalog +++|          SA1    ACTR        CHECK ARGUMENT COUNT
01400  M00S01172.catalog +++|          SB4    X1
01401  M00S01173.catalog +++|          MX0    42
01402  M00S01174.catalog +++|          ZR     B4,PRS2     IF NO ARGUMENTS
01403  M00S01175.catalog +++|          SA4    ARGR        SET FILE NAME
01404  M00S01176.catalog +++|          BX6    X0*X4
01405  M00S01177.catalog +++|          ZR     X6,PRS1     IF FILE NAME BLANK
01406  M00S01178.catalog +++|          SX2    3
01407  M00S01179.catalog +++|          IX6    X6+X2
01408  M00S01180.catalog +++|          SA6    F
01409  M00S01181.catalog +++| PRS1     SB4    B4-B1
01410  M00S01182.catalog +++|          ZR     B4,PRS2     IF END OF ARGUMENTS
01411  M00S01183.catalog +++|          SA4    A4+B1       PROCESS SPECIAL ARGUMENTS
01412  M00S01184.catalog +++|          SB5    PRSA
01413  M00S01185.catalog +++|          RJ     ARG
01414  M00S01186.catalog +++|          NZ     X1,PRS4     IF ARGUMENT ERROR
01415  M00S01187.catalog +++| PRS2     SA5    FC          CHECK FILE COUNT
01416  M00S01188.catalog +++|          ZR     X5,PRS3     IF NO CONVERSION REQUIRED
01417  M00S01189.catalog +++|          SB7    B1
01418  M00S01190.catalog +++|          RJ     DXB
01419  M00S01191.catalog +++|          SA6    FC
01420  M00S01192.catalog +++|          NZ     X4,PRS4     IF CONVERSION ERROR
01421  M00S01193.catalog +++| PRS3     SA1    F           ENTER FILE NAME IN TITLE
01422  M00S01194.catalog +++|          MX0    42
01423  M00S01195.catalog +++|          BX1    X0*X1
01424  M00S01196.catalog +++|          RJ     ZTB
01425  M00S01197.catalog +++|          LX6    -6
01426  M00S01198.catalog +++|          SA6    TITL+2
01427  M00S01199.catalog +++|          MX1    1           SET FLUSH BIT IN FET
01428  M00S01200.catalog +++|          SA2    O           SET UP AUTO-FLUSH TABLE
01429  M00S01201.catalog +++|          LX1    36-59
01430  M00S01202.catalog +++|          SA4    A2+B1
01431  M00S01203.catalog +++|          SX3    O
01432  M00S01204.catalog +++|          BX7    X4+X1
01433  M00S01205.catalog +++|          SA7    A4
01434  M00S01206.catalog +++|          BX2    X0*X2
01435  M00S01207.catalog +++|          BX6    X2+X3
01436  M00S01208.catalog +++|          SA6    FLS+1
01437  M00S01209.catalog +++|          SETLOF PRSG
01438  M00S01210.catalog +++|          SA1    O           CHECK FILE NAMES
01439  M00S01211.catalog +++|          SA2    F
01440  M00S01212.catalog +++|          BX6    X1-X2
01441  M00S01213.catalog +++|          BX7    X0*X6
01442  M00S01214.catalog +++|          ZR     X7,PRS5     IF SAME NAME
01443  M00S01215.catalog +++|          SX2    O           CHECK IF TERMINAL FILE
01444  M00S01216.catalog +++|          RJ     STF
Line S00071 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
01445  M01S00071.ns22000 +++|          SA6    TF
01446  M00S01217.catalog +++|          NZ     X6,PRS3.1   IF NOT TERMINAL FILE
01447  M00S01218.catalog +++|          SX6    B1          SET SHORT LIST FLAG
01448  M00S01219.catalog +++|          SA6    SL
Line S01220 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
01449  M01S01220.ns22000 ---|          SA6    TF          SET TERMINAL FLAG
01450  M00S01221.catalog +++|          SA2    =1H         DELETE EJECT
01451  M00S01222.catalog +++|          BX7    X7-X7
01452  M00S01223.catalog +++|          BX6    X2
01453  M00S01224.catalog +++|          SA7    TITLA
01454  M00S01225.catalog +++|          SA7    SBTLA
Line S00007 Modification History
M01 (Added by) catal4
Seq #  *Modification Id* Act 
----------------------------+
01455  M01S00007.catal4  +++|          SA7    PGEJ
01456  M00S01226.catalog +++|          SA6    TITL
Line S01227 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
01457  M01S01227.274l797 ---| PRS3.1   OPEN   F,READNR,R  CHECK IF CONTROL WORDS MAY BE USED
Line S00006 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
01458  M01S00006.274l797 +++| PRS3.1   SX2    F           ADDRESS OF FET
01459  M01S00007.274l797 +++|          SA3    PRSH        ADDRESS OF OD FET EXTENSION AND LENGTH
01460  M01S00008.274l797 +++|          RJ     SOE         SET FET EXTENSION IF OPTICAL DISK FILE
01461  M01S00009.274l797 +++|          OPEN   X2,READNR,R CHECK IF CONTROL WORDS MAY BE USED
01462  M00S01228.catalog +++|          SA1    F+1
01463  M00S01229.catalog +++|          RJ     CDT         CHECK DEVICE TYPE
01464  M00S01230.catalog +++|          ZR     X7,PRS      IF CONTROL WORDS NOT ALLOWABLE
01465  M00S01231.catalog +++|          SX7    1           SET CONTROL WORDS LEGAL
01466  M00S01232.catalog +++|          SA7    CW          SET CONTROL WORD FLAG
01467  M00S01233.catalog +++|          EQ     PRS         RETURN
01468  M00S01234.catalog +++|
01469  M00S01235.catalog +++| PRS4     MESSAGE PRSB
01470  M00S01236.catalog +++|          ABORT
01471  M00S01237.catalog +++|
01472  M00S01238.catalog +++| PRS5     MESSAGE PRSC
01473  M00S01239.catalog +++|          ABORT
Line S00010 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
01474  M01S00010.274l797 +++|*CALL     COMCSOE
01475  M00S01240.catalog +++|
01476  M00S01241.catalog +++| PRSA     BSS    0
01477  M00S01242.catalog +++| L        ARG    O,O         OUTPUT FILE NAME
01478  M00S01243.catalog +++| N        ARG    PRSD,FC     NUMBER OF FILE TO CATALOG
01479  M00S01244.catalog +++| T        ARG    -*,TXTD     LIST *TEXT* RECORDS OPTION
01480  M00S01245.catalog +++| U        ARG    -*,UL       LIST  *ULIB*  OPTION
01481  M00S01246.catalog +++| D        ARG    PRSF,SL     DE-SELECT DETAILED LIST OPTION
01482  M00S01247.catalog +++| R        ARG    -*,RW       REWIND BEFORE AND AFTER
01483  M00S01248.catalog +++| CS       ARG    -=0,CSM     LIST CHARACTER SET FOR *OPL* AND *OPLC*
01484  M00S01249.catalog +++|          ARG
01485  M00S01250.catalog +++|
01486  M00S01251.catalog +++| PRSB     DATA   C* CATALOG ARGUMENT ERROR.*
01487  M00S01252.catalog +++| PRSC     DATA   C* CATALOG FILE NAME CONFLICT.*
01488  M00S01253.catalog +++|
01489  M00S01254.catalog +++| PRSD     CON    0L999999
01490  M00S01255.catalog +++| PRSF     CON    0L0
01491  M00S01256.catalog +++|
01492  M00S01257.catalog +++| PRSG     VFD    12/0,18/FLS,29/0,1/1  AUTO-FLUSH TABLE POINTER
Line S00011 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
01493  M01S00011.274l797 +++| PRSH     VFD    36/,6/FETODL,18/FETOD POINTER TO EXTENSION BUFFER
01494  M00S01258.catalog +++| CDT      SPACE  4,15
01495  M00S01259.catalog +++|**        CDT - CHECK DEVICE TYPE.
01496  M00S01260.catalog +++|*
01497  M00S01261.catalog +++|*         ENTRY  (X1) = (FET+1).
01498  M00S01262.catalog +++|*
01499  M00S01263.catalog +++|*         EXIT   (X7)= 0 IF CONTROL WORD READ/WRITE NOT SUPPORTED ON
01500  M00S01264.catalog +++|*                 DEVICE.
01501  M00S01265.catalog +++|*
01502  M00S01266.catalog +++|*         USES   B - NONE.
01503  M00S01267.catalog +++|*                A - 2.
01504  M00S01268.catalog +++|*                X - 0,1,2,6,7.
01505  M00S01269.catalog +++|*
01506  M00S01270.catalog +++|*         CALLS  NONE.
01507  M00S01271.catalog +++|
01508  M00S01272.catalog +++|
01509  M00S01273.catalog +++| CDT2     LX1    12          CHECK *TT*
01510  M00S01274.catalog +++|          BX6    -X0*X1
01511  M00S01275.catalog +++|          SX7    X6-2RTT
01512  M00S01276.catalog +++|
01513  M00S01277.catalog +++| CDT      PS                 ENTRY/EXIT
01514  M00S01278.catalog +++|          MX0    -12
01515  M00S01279.catalog +++|          PL     X1,CDT2     IF ALLOCATABLE
01516  M00S01280.catalog +++|          LX1    12
01517  M00S01281.catalog +++|          SA2    CDTA        SEARCH DEVICE TABLE
01518  M00S01282.catalog +++|          SX7    0           ASSUME NO FIND
01519  M00S01283.catalog +++| CDT1     ZR     X2,CDT      RETURN - IF NOT FOUND
01520  M00S01284.catalog +++|          BX6    X1-X2
01521  M00S01285.catalog +++|          AX2    12
01522  M00S01286.catalog +++|          BX6    X2*X6
01523  M00S01287.catalog +++|          SA2    A2+B1
01524  M00S01288.catalog +++|          NZ     X6,CDT1     IF NOT MATCH
01525  M00S01289.catalog +++|          SX7    1           INDICATE CONTROL WORD POSSIBLE
01526  M00S01290.catalog +++|          JP     CDT         RETURN
01527  M00S01291.catalog +++|
01528  M00S01292.catalog +++| CDTA     VFD    36/,12/7703B,12/4002B
01529  M00S01293.catalog +++|          VFD    36/,12/7703B,12/4102B
01530  M00S01294.catalog +++|          VFD    36/,12/7777B,12/2RMT+4000B
01531  M00S01295.catalog +++|          VFD    36/,12/7777B,12/2RNT+4000B
Line S00012 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
01532  M01S00012.274l797 +++|          VFD    36/,12/7777B,12/2RCT+4000B
01533  M01S00013.274l797 +++|          VFD    36/,12/7777B,12/2RAT+4000B
01534  M00S01296.catalog +++|          CON    0
01535  M00S01297.catalog +++|          SPACE  4
01536  M00S01298.catalog +++|*         COMMON DECKS.
01537  M00S01299.catalog +++|
01538  M00S01300.catalog +++|
01539  M00S01301.catalog +++|*CALL     COMCARG
01540  M00S01302.catalog +++|*CALL     COMCCPM
01541  M00S01303.catalog +++|*CALL     COMCDXB
01542  M00S01304.catalog +++|*CALL     COMCLFM
01543  M00S01305.catalog +++|*CALL     COMCSTF
01544  M00S01306.catalog +++|          SPACE  4
01545  M00S01307.catalog +++|          END
cdc/nos2.source/opl.opl871/deck/catalog.txt ยท Last modified: (external edit)