User Tools

Site Tools


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

Deck SYSEDIT

31 Modifications

Listing Sections

Source

Seq #  *Modification Id* Act 
----------------------------+
00001  M01S00001.sysedit +++|          IDENT  SYSEDIT,DSL
00002  M01S00002.sysedit +++|          ABS
00003  M01S00003.sysedit +++|          SST    T1,T2,T3,T4
00004  M01S00004.sysedit +++|          ENTRY  SYSEDIT
00005  M01S00005.sysedit +++|          ENTRY  RFL=
00006  M01S00006.sysedit +++|          ENTRY  SSJ=
00007  M01S00007.sysedit +++|          SYSCOM B1
00008  M01S00008.sysedit +++| QUAL$    EQU    1           DEFINE UNQUALIFIED COMMON DECKS
00009  M01S00009.sysedit +++|*COMMENT  SYSEDIT - SYSTEM LIBRARY FILE MANAGER.
Line S00010 Modification History
M01 (Added by) sysedit
M02 (Updated by) 281l803
Seq #  *Modification Id* Act 
----------------------------+
00010  M02S00010.281l803 ---|          COMMENT COPYRIGHT CONTROL DATA CORP. 1970.
00011  M01S00001.281l803 +++|          COMMENT  COPYRIGHT CONTROL DATA SYSTEMS INC.  1992.
00012  M01S00011.sysedit +++|          TITLE  SYSEDIT - SYSTEM LIBRARY FILE MANAGER.
00013  M01S00012.sysedit +++|          SPACE  4
00014  M01S00013.sysedit +++|***       SYSEDIT - SYSTEM LIBRARY FILE MANAGER.
00015  M01S00014.sysedit +++|*         G. R. MANSFIELD.  70/12/19.
00016  M01S00015.sysedit +++|*         P. D. HAAS.       73/02/09.
00017  M01S00016.sysedit +++|          SPACE  4
00018  M01S00017.sysedit +++|***              SYSEDIT PERFORMS MODIFICATIONS AND INITIALIZATION
00019  M01S00018.sysedit +++|*         OF THE SYSTEM LIBRARY.
00020  M01S00019.sysedit +++|          SPACE  4
00021  M01S00020.sysedit +++|***       CONTROL CARD CALL.
00022  M01S00021.sysedit +++|*
00023  M01S00022.sysedit +++|*
00024  M01S00023.sysedit +++|*         SYSEDIT (P1,P2,...,PN)
00025  M01S00024.sysedit +++|*
00026  M01S00025.sysedit +++|*         PN                 ACTION
00027  M01S00026.sysedit +++|*
00028  M01S00027.sysedit +++|*         I                  DIRECTIVE INPUT FROM FILE *INPUT*
00029  M01S00028.sysedit +++|*         I=LFN              DIRECTIVE INPUT FROM FILE *LFN*
00030  M01S00029.sysedit +++|*         I=0                NO DIRECTIVE INPUT
00031  M01S00030.sysedit +++|*
00032  M01S00031.sysedit +++|*         B                  BINARY CHANGE RECORDS FROM FILE *LGO*
00033  M01S00032.sysedit +++|*         B=LFN              BINARY CHANGE RECORDS FROM FILE *LFN*
00034  M01S00033.sysedit +++|*         B=0                NO BINARY CHANGE RECORDS
00035  M01S00034.sysedit +++|*
00036  M01S00035.sysedit +++|*         L                  LIST OUTPUT ON FILE *OUTPUT*
00037  M01S00036.sysedit +++|*         L=LFN              LIST OUTPUT ON FILE *LFN*
00038  M01S00037.sysedit +++|*         L=0                NO LIST OUTPUT
00039  M01S00038.sysedit +++|*
00040  M01S00039.sysedit +++|*         R                  RESTORE TO INITIAL DEAD START SYSTEM.
00041  M01S00040.sysedit +++|*         R=N                RESTORE TO COPY N OF SYSTEM
00042  M01S00041.sysedit +++|*                            THE SYSTEM COPY NUMBER IS PRINTED ON THE
00043  M01S00042.sysedit +++|*                            OUTPUT LISTING.
00044  M01S00043.sysedit +++|*         R=0                NO SYSTEM FILE RESTORATION
00045  M01S00044.sysedit +++|*
00046  M01S00045.sysedit +++|*         C                  CHECKPOINT SYSTEM AT JOB COMPLETION
00047  M01S00046.sysedit +++|*
00048  M01S00047.sysedit +++|*         Z                  READ DIRECTIVES FROM THE SYSEDIT CARD.
00049  M01S00048.sysedit +++|*                            THIS OVERRIDES ANY *I* PARAMETER.
00050  M01S00049.sysedit +++|*
00051  M01S00050.sysedit +++|*         NA                 NO ABORT TAKEN IF SYSTEM FILE IS BUSY.
00052  M01S00051.sysedit +++|*
00053  M01S00052.sysedit +++|*
00054  M01S00053.sysedit +++|*         DEFAULT PARAMETERS.
00055  M01S00054.sysedit +++|*
00056  M01S00055.sysedit +++|*         I=INPUT
00057  M01S00056.sysedit +++|*         L=0
00058  M01S00057.sysedit +++|*         B=LGO
00059  M01S00058.sysedit +++|*         R=0
00060  M01S00059.sysedit +++|*         C                  SELECTED IF ALTERNATE LIBRARY PRESENT
Line S00060 Modification History
M01 (Added by) sysedit
M02 (Updated by) sysed7
Seq #  *Modification Id* Act 
----------------------------+
00061  M02S00060.sysed7  ---|          SPACE  4
00062  M01S00001.sysed7  +++|          SPACE  4,10
00063  M01S00002.sysed7  +++|***       DAYFILE MESSAGES.
00064  M01S00003.sysed7  +++|*
00065  M01S00004.sysed7  +++|*         *DIRECTIVE ERRORS.*
00066  M01S00005.sysed7  +++|*
00067  M01S00006.sysed7  +++|*         * ERROR IN LIBDNN*
00068  M01S00007.sysed7  +++|*
00069  M01S00008.sysed7  +++|*         *MEMORY OVERFLOW.*
00070  M01S00009.sysed7  +++|*
00071  M01S00010.sysed7  +++|*         *RECORD NOT FOUND.*
00072  M01S00011.sysed7  +++|*
00073  M01S00012.sysed7  +++|*         *REQUESTED RESTORATION NOT FOUND.*
00074  M01S00013.sysed7  +++|*
00075  M01S00014.sysed7  +++|*         *SYSEDIT ARGUMENT ERROR.*
00076  M01S00015.sysed7  +++|*
00077  M01S00016.sysed7  +++|*         *SYSTEM BUILT WITH LIBDNN.*
00078  M01S00017.sysed7  +++|*
00079  M01S00018.sysed7  +++|*         *SYSTEM BUILT WITH LIBDNN (UNDEFINED).*
00080  M01S00019.sysed7  +++|*
00081  M01S00020.sysed7  +++|*         *SYSTEM EDIT COMPLETE - CHANGE NN.*
00082  M01S00021.sysed7  +++|*
00083  M01S00022.sysed7  +++|*         *SYSTEM FILE ERROR IN CLD.*
00084  M01S00023.sysed7  +++|*
00085  M01S00024.sysed7  +++|*         *SYSTEM FILE ERROR IN DIRECTORY.*
00086  M01S00025.sysed7  +++|*
00087  M01S00026.sysed7  +++|*         *SYSTEM FILE ERROR IN PLD.*
00088  M01S00027.sysed7  +++|*
00089  M01S00028.sysed7  +++|*         *SYSTEM FILE ERROR IN RCL.*
00090  M01S00029.sysed7  +++|*
00091  M01S00030.sysed7  +++|*         *SYSTEM FILE ERROR IN RPL.*
00092  M01S00031.sysed7  +++|*
00093  M01S00032.sysed7  +++|*         *SYSTEM FILE FORMAT ERROR.*
00094  M01S00033.sysed7  +++|*
00095  M01S00034.sysed7  +++|*         / TERMINAL INPUT NOT VALID. USE *I* OR *Z* OPTION./
00096  M01S00035.sysed7  +++|          SPACE  4,10
00097  M01S00036.sysed7  +++|***       OPERATOR MESSAGES.
00098  M01S00037.sysed7  +++|*
00099  M01S00038.sysed7  +++|*         * COPYING XXXXXXX*
00100  M01S00039.sysed7  +++|*
00101  M01S00040.sysed7  +++|*         *SKIPPING XXXXXXX*
00102  M01S00041.sysed7  +++|*
00103  M01S00042.sysed7  +++|*         *GENERATING LIBRARY DIRECTORY.*
00104  M01S00043.sysed7  +++|*
00105  M01S00044.sysed7  +++|*         *LIBDECK NOT FOUND - (NAME)*
00106  M01S00045.sysed7  +++|          SPACE  4,10
00107  M01S00061.sysedit +++|****      ASSEMBLY CONSTANTS.
00108  M01S00062.sysedit +++|
00109  M01S00063.sysedit +++|
00110  M01S00064.sysedit +++| IBUFL    EQU    101B        INPUT BUFFER LENGTH
00111  M01S00065.sysedit +++| LBUFL    EQU    80          LINE BUFFER LENGTH
00112  M01S00066.sysedit +++| OBUFL    EQU    2001B       OUTPUT FILE BUFFER
00113  M01S00067.sysedit +++| FBUFL    EQU    10001B      FILE BUFFER
00114  M01S00068.sysedit +++| SBUFL    EQU    30001B      SYSTEM BUFFER
00115  M01S00069.sysedit +++| MINC     EQU    400B        MEMORY INCREMENT
00116  M01S00070.sysedit +++|****
00117  M01S00071.sysedit +++|          SPACE  4
00118  M01S00001.251l664 +++|**        COMMON DECKS.
00119  M01S00002.251l664 +++|
00120  M01S00003.251l664 +++|
00121  M01S00072.sysedit +++|*CALL     COMCMAC
00122  M01S00001.ns22000 +++|*CALL     COMCCMD
00123  M01S00073.sysedit +++|*CALL     COMCMTM
00124  M01S00001.253l688 +++|*CALL     COMSMSC
00125  M01S00074.sysedit +++|*CALL     COMSPRD
00126  M01S00004.251l664 +++|*CALL     COMSSRT
00127  M01S00075.sysedit +++|*CALL     COMSSSD
00128  M01S00076.sysedit +++|*CALL     COMSSSJ
00129  M01S00077.sysedit +++|          TITLE  MACRO DEFINITIONS.
00130  M01S00078.sysedit +++| KEYWD    SPACE  4
00131  M01S00079.sysedit +++|**        KEYWD - PROCESS KEYWORD.
00132  M01S00080.sysedit +++|*
00133  M01S00081.sysedit +++|*
00134  M01S00082.sysedit +++|*         KEYWD  NAME,ADDRESS
00135  M01S00083.sysedit +++|*         GENERATE LIST AND CALL FOR DIRECTIVE TRANSLATION.
00136  M01S00084.sysedit +++|*         ENTRY  *NAME* = KEYWORD NAME.
00137  M01S00085.sysedit +++|*                *ADDRESS* = PROCESSOR ADDRESS.
00138  M01S00086.sysedit +++|*
00139  M01S00087.sysedit +++|*         CALLS  CKW.
00140  M01S00088.sysedit +++|
00141  M01S00089.sysedit +++|
00142  M01S00090.sysedit +++|          NOREF  .X
00143  M01S00091.sysedit +++| KEYWD    MACRO  NAM,ADR
00144  M01S00092.sysedit +++|          LOCAL  A,B,C
00145  M01S00093.sysedit +++|          IF     DEF,.X,1
00146  M01S00094.sysedit +++| .1       IFNE   .X,*,
00147  M01S00095.sysedit +++| KEYWD    RMT
Line S00096 Modification History
M01 (Added by) sysedit
M02 (Updated by) sysed9
Seq #  *Modification Id* Act 
----------------------------+
00148  M02S00096.sysed9  ---|          CON    0
00149  M01S00097.sysedit +++| A        BSS    0
00150  M01S00098.sysedit +++| KEYWD    RMT
00151  M01S00099.sysedit +++|          SA0    A
00152  M01S00100.sysedit +++|          RJ     CKW
00153  M01S00101.sysedit +++| B        BSS    0
00154  M01S00102.sysedit +++| .X       SET    B
00155  M01S00103.sysedit +++| .1       ENDIF
00156  M01S00104.sysedit +++| KEYWD    RMT
00157  M01S00105.sysedit +++| C        SET    ADR NAM
00158  M01S00106.sysedit +++|          CON    0L_NAM+C
00159  M01S00107.sysedit +++| KEYWD    RMT
00160  M01S00108.sysedit +++|          ENDM
00161  M01S00109.sysedit +++| PRINT    SPACE  4
00162  M01S00110.sysedit +++|**        PRINT - PRINT LINE ON OUTPUT FILE.
00163  M01S00111.sysedit +++|*
00164  M01S00112.sysedit +++|*
00165  M01S00113.sysedit +++|*         PRINT  FWA,N
00166  M01S00114.sysedit +++|*         ENTRY  *FWA* = FWA OF LINE.
00167  M01S00115.sysedit +++|*                *F* = FORMAT.
00168  M01S00116.sysedit +++|*                IF *F* IS MISSING, LINE IS IN *C* FORMAT.
00169  M01S00117.sysedit +++|*                IF *F* IS PRESENT, LINE IS IN *S* FORMAT.
00170  M01S00118.sysedit +++|*
00171  M01S00119.sysedit +++|*         CALLS  WOF.
00172  M01S00120.sysedit +++|
00173  M01S00121.sysedit +++|
00174  M01S00122.sysedit +++| PRINT    MACRO  FWA,N
00175  M01S00123.sysedit +++|          R=     X1,FWA
00176  M01S00124.sysedit +++|          IFC    NE,*N**,1
00177  M01S00125.sysedit +++|          R=     X2,N
00178  M01S00126.sysedit +++|          IFC    EQ,*N**,1
00179  M01S00127.sysedit +++|          SX2    B0
00180  M01S00128.sysedit +++|          RJ     WOF
00181  M01S00129.sysedit +++|          ENDM
00182  M01S00130.sysedit +++|          TITLE  DEAD START LOAD.
00183  M01S00131.sysedit +++| DSL      SPACE  4
00184  M01S00132.sysedit +++|**        DSL - DEAD START LOAD.
00185  M01S00133.sysedit +++|
00186  M01S00134.sysedit +++|
00187  M01S00135.sysedit +++|          ORG    104B
00188  M01S00136.sysedit +++| DSL      SB1    1           (B1) = 1
00189  M01S00137.sysedit +++|          EQ     DSL1
00190  M01S00138.sysedit +++|          TITLE  FILE DEFINITIONS.
00191  M01S00139.sysedit +++| FETS     SPACE  4
00192  M01S00140.sysedit +++|**        FETS.
00193  M01S00141.sysedit +++|
00194  M01S00142.sysedit +++|
00195  M01S00143.sysedit +++| O        BSS    0
00196  M01S00144.sysedit +++| OUTPUT   FILEC  OBUF,OBUFL,(FET=8)
00197  M01S00145.sysedit +++|          ORG    O
00198  M01S00146.sysedit +++|          CON    15B
00199  M01S00147.sysedit +++|          ORG    O+8
00200  M01S00148.sysedit +++|
00201  M01S00149.sysedit +++| F        BSS    0
00202  M01S00150.sysedit +++| SYSTEM   RFILEB FBUF,FBUFL,(FET=8)
00203  M01S00151.sysedit +++|          ORG    F+7
00204  M01S00152.sysedit +++|          CON    0LSYSTEM+3
00205  M01S00153.sysedit +++|
00206  M01S00154.sysedit +++| S        BSS    0
00207  M01S00155.sysedit +++| PPULIB   RFILEB SBUF,SBUFL,(FET=9)
00208  M01S00156.sysedit +++|          ORG    S+7
00209  M01S00157.sysedit +++|          CON    0LSYSTEM
00210  M01S00158.sysedit +++|          CON    0LPPULIB
00211  M01S00159.sysedit +++|          CON    0LALTSYS
00212  M01S00160.sysedit +++|          TITLE  MANAGED TABLES.
00213  M01S00161.sysedit +++| TABLES   SPACE  4
00214  M01S00162.sysedit +++|**        MANAGED TABLES ARE USED TO CONTAIN ALL VARIABLE LOAD DATA.
00215  M01S00163.sysedit +++|*         THE TABLES ARE CONTROLED BY 2 POINTERS, F.TNAM AND L.TNAM.
00216  M01S00164.sysedit +++|*         (F.TNAM) = FWA OF TABLE *TNAM*.
00217  M01S00165.sysedit +++|*         (L.TNAM) = LENGTH OF TABLE *TNAM*.
00218  M01S00166.sysedit +++|*         THE TABLES ARE MANAGED BY ROUTINE *ATS*.
00219  M01S00167.sysedit +++|
00220  M01S00168.sysedit +++| TLIB     SPACE  4
00221  M01S00169.sysedit +++|**        TLIB - LIBRARY AND DIRECTORIES.
00222  M01S00170.sysedit +++|*         THE FIRST WORD ADDRESS OF TLIB IS ASSUMED TO BE SBUF.
00223  M01S00171.sysedit +++|*         TLIB MUST BE THE FIRST TABLE.
00224  M01S00172.sysedit +++|*         TLIB CONTAINS THE RESIDENT LIBRARIES AND DIRECTORIES
00225  M01S00173.sysedit +++|*         IN THE SAME FORMAT AND ORDER AS IN LOW CORE.
00226  M01S00174.sysedit +++|
00227  M01S00175.sysedit +++|
00228  M01S00176.sysedit +++| TLIB     TABLE
00229  M01S00177.sysedit +++| TRCD     SPACE  4
00230  M01S00178.sysedit +++|**        TRCD - RECORD DIRECTORY.
00231  M01S00179.sysedit +++|*         ENTRY = 2 WORDS.
00232  M01S00180.sysedit +++|*
00233  M01S00181.sysedit +++|*T        42/  NAME,18/  TYPE
Figure

0171829 TYPE NAME3059 NAME

00234  M01S00182.sysedit +++|*T        30/,30/  RI
Figure

029 RI3059

00235  M01S00183.sysedit +++|*         NAME   RECORD NAME
00236  M01S00184.sysedit +++|*         TYPE   RECORD TYPE
00237  M01S00185.sysedit +++|*         RI     RANDOM INDEX
00238  M01S00186.sysedit +++|
00239  M01S00187.sysedit +++|
00240  M01S00188.sysedit +++| TRCD     TABLE  2
00241  M01S00189.sysedit +++| TDLT     SPACE  4
00242  M01S00190.sysedit +++|**        TDLT - DELETE RECORDS TABLE.
00243  M01S00191.sysedit +++|*         ENTRY = 1 WORD.
00244  M01S00192.sysedit +++|*
00245  M01S00193.sysedit +++|*T        42/  NAME,18/  TYPE
Figure

0171829 TYPE NAME3059 NAME

00246  M01S00194.sysedit +++|*         NAME   RECORD NAME
00247  M01S00195.sysedit +++|*         TYPE   RECORD TYPE
00248  M01S00196.sysedit +++|
00249  M01S00197.sysedit +++|
00250  M01S00198.sysedit +++| TDLT     TABLE
00251  M01S00199.sysedit +++| TFLO     SPACE  4
00252  M01S00200.sysedit +++|**        TFLO - FIELD LENGTH OVERRIDE TABLE.
00253  M01S00201.sysedit +++|*         ENTRY = 1 WORD.
00254  M01S00202.sysedit +++|*
00255  M01S00203.sysedit +++|*T        42/  NAME,12/  FL,6/  TYPE
Figure

056171829 TYPE FL NAME3059 NAME

00256  M01S00204.sysedit +++|*         NAME   RECORD NAME
00257  M01S00205.sysedit +++|*         FL     FIELD LENGTH / 100B
00258  M01S00206.sysedit +++|*         TYPE   RECORD TYPE
00259  M01S00207.sysedit +++|
00260  M01S00208.sysedit +++|
00261  M01S00209.sysedit +++| TFLO     TABLE
00262  M01S00210.sysedit +++| TINR     SPACE  4
00263  M01S00211.sysedit +++|**        TINR - IGNORE RECORDS TABLE.
00264  M01S00212.sysedit +++|*         ENTRY = 1 WORD.
00265  M01S00213.sysedit +++|*
00266  M01S00214.sysedit +++|*T        42/  NAME,6/  FI,12/  TYPE
Figure

01112171829 TYPE FI NAME3059 NAME

00267  M01S00215.sysedit +++|*         NAME   RECORD NAME
00268  M01S00216.sysedit +++|*         FI     FILE INDEX
00269  M01S00217.sysedit +++|*         TYPE   RECORD TYPE
00270  M01S00218.sysedit +++|
00271  M01S00219.sysedit +++|
00272  M01S00220.sysedit +++| TINR     TABLE
00273  M01S00221.sysedit +++| TRES     SPACE  4
00274  M01S00222.sysedit +++|**        TRES - RESIDENCY TABLE.
00275  M01S00223.sysedit +++|*         ENTRY = 1 WORD.
00276  M01S00224.sysedit +++|*
00277  M01S00225.sysedit +++|*T        42/  NAME,6/  RC,12/  TYPE
Figure

01112171829 TYPE RC NAME3059 NAME

00278  M01S00226.sysedit +++|*         NAME   PROGRAM NAME
00279  M01S00227.sysedit +++|*         RC     RESIDENCE CODE
00280  M01S00228.sysedit +++|*         TYPE   RECORD TYPE
00281  M01S00229.sysedit +++|
00282  M01S00230.sysedit +++|
00283  M01S00231.sysedit +++| TRES     TABLE
00284  M01S00232.sysedit +++| TADR     SPACE  4
00285  M01S00233.sysedit +++|**        TADR - ALTERNATE DEVICE RECORDS TABLE.
00286  M01S00234.sysedit +++|*         ENTRY = 2 WORDS.
00287  M01S00235.sysedit +++|*
00288  M01S00236.sysedit +++|*T        6/  DO,12/  TYPE,18/  RDO,24/  RI
Figure

0232429 RI RDO304142535459 RDO TYPE DO

00289  M01S00237.sysedit +++|*         DO     DEVICE EST ORDINAL
00290  M01S00238.sysedit +++|*         TYPE   RECORD TYPE
00291  M01S00239.sysedit +++|*         RDO    RECORDS DIRECTORY ORDINAL
00292  M01S00240.sysedit +++|*         RI     RANDOM INDEX
00293  M01S00241.sysedit +++|*
00294  M01S00242.sysedit +++|*         WORD 2 SAME AS WORD 1 UNTIL AFTER SORT
00295  M01S00243.sysedit +++|
00296  M01S00244.sysedit +++|
00297  M01S00245.sysedit +++| TADR     TABLE  2
00298  M01S00246.sysedit +++|          SPACE  4,10
00299  M01S00247.sysedit +++|**        TEPD - ENTRY POINT DIRECTORY TABLE
00300  M01S00248.sysedit +++|*         ENTRY = 1 WORD.
00301  M01S00249.sysedit +++|*
00302  M01S00250.sysedit +++|*T        42/  NAME,18/  PST
Figure

0171829 PST NAME3059 NAME

00303  M01S00251.sysedit +++|*         NAME   ENTRY POINT NAME
00304  M01S00252.sysedit +++|*         PST    PST ORDINAL
00305  M01S00253.sysedit +++|
00306  M01S00254.sysedit +++| TEPD     TABLE
00307  M01S00255.sysedit +++| TSCC     SPACE  4
00308  M01S00256.sysedit +++|**        TSCC - TABLE OF SCOPE CONTROL CARDS.
00309  M01S00257.sysedit +++|*         ENTRY = 1 WORD.
00310  M01S00258.sysedit +++|*
00311  M01S00259.sysedit +++|*T        42/  NAME,18/  TYPE
Figure

0171829 TYPE NAME3059 NAME

00312  M01S00260.sysedit +++|*         NAME   PROGRAM NAME
00313  M01S00261.sysedit +++|*         TYPE   RECORD TYPE
00314  M01S00262.sysedit +++|
00315  M01S00263.sysedit +++|
00316  M01S00264.sysedit +++| TSCC     TABLE
00317  M01S00265.sysedit +++| TSYN     SPACE  4
00318  M01S00266.sysedit +++|**        TSYN - PROGRAM NAME SYNONYMS.
00319  M01S00267.sysedit +++|*         ENTRY = 2 WORDS.
00320  M01S00268.sysedit +++|*
00321  M01S00269.sysedit +++|
00322  M01S00270.sysedit +++|
00323  M01S00271.sysedit +++| TSYN     TABLE  2
00324  M01S00272.sysedit +++| TFIL     SPACE  4
00325  M01S00273.sysedit +++|**        TFIL - FILE NAMES.
00326  M01S00274.sysedit +++|*         ENTRY = 1 WORD.
00327  M01S00275.sysedit +++|*
00328  M01S00276.sysedit +++|*T        42/  NAME,18/
Figure

0171829 NAME3059 NAME

00329  M01S00277.sysedit +++|*         NAME   FILE NAME
00330  M01S00278.sysedit +++|
00331  M01S00279.sysedit +++|
00332  M01S00280.sysedit +++| TFIL     TABLE
00333  M01S00001.ns2121  +++| TCMR     SPACE  4,10
00334  M01S00002.ns2121  +++|**        TCMR - TABLE OF RCL ADDRESSES FOR CM RESIDENT PROGRAMS.
00335  M01S00003.ns2121  +++|*         ENTRY = 1 WORD.
00336  M01S00004.ns2121  +++|*
00337  M01S00005.ns2121  +++|*T        42/0, 18/ RCL
Figure

0171829 RCL030590

00338  M01S00006.ns2121  +++|*
00339  M01S00007.ns2121  +++|*         RCL    ADDRESS OF ENTRY IN CM.
00340  M01S00008.ns2121  +++|
00341  M01S00009.ns2121  +++|
00342  M01S00010.ns2121  +++| TCMR     TABLE
00343  M01S00281.sysedit +++| TSCR     SPACE  4
00344  M01S00282.sysedit +++|**        TSCR - SCRATCH TABLE.
00345  M01S00283.sysedit +++|
00346  M01S00284.sysedit +++|
00347  M01S00285.sysedit +++| TSCR     TABLE  2
00348  M01S00286.sysedit +++| TLST     SPACE  4
00349  M01S00287.sysedit +++|**        TLST - LIST FOR PROGRAM READS.
00350  M01S00288.sysedit +++|*         MUST BE LAST TABLE.
00351  M01S00289.sysedit +++|*         ENTRY = 1 WORD.
00352  M01S00290.sysedit +++|*
00353  M01S00291.sysedit +++|*T        36/,24/  RI
Figure

0232429 RI3059

00354  M01S00292.sysedit +++|*         RI     RANDOM INDEX
00355  M01S00293.sysedit +++|
00356  M01S00294.sysedit +++|
00357  M01S00295.sysedit +++| TLST     TABLE
00358  M01S00296.sysedit +++| TABLES   SPACE  4
00359  M01S00297.sysedit +++|*         REMAINDER OF TABLE MANAGER STORAGE.
00360  M01S00298.sysedit +++|
00361  M01S00299.sysedit +++|
00362  M01S00300.sysedit +++|          LIST   G
00363  M01S00301.sysedit +++| TABLES   HERE
00364  M01S00302.sysedit +++|          LIST   *
00365  M01S00303.sysedit +++|          TITLE  COMMON DATA.
00366  M01S00304.sysedit +++| DATA     SPACE  4
00367  M01S00305.sysedit +++|**        *SLL* CONTROL.
00368  M01S00306.sysedit +++|
00369  M01S00307.sysedit +++|
00370  M01S00308.sysedit +++| SL       CON    10000B
Line S00309 Modification History
M01 (Added by) sysedit
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00371  M02S00309.ns22000 ---| LN       CON    0LLIBDECK
00372  M01S00002.ns22000 +++| LN       CON    0LLIBD00
00373  M01S00310.sysedit +++| RP       CON    0           FWA OF SYSTEM RPL (SET BY SLL)
00374  M01S00311.sysedit +++|
00375  M01S00312.sysedit +++|*         THE ORDER OF THE PREVIOUS WORDS CANNOT BE CHANGED WITHOUT
00376  M01S00313.sysedit +++|*         CHANGES TO *SLL*.
00377  M01S00314.sysedit +++|
00378  M01S00315.sysedit +++|
00379  M01S00316.sysedit +++| .ERD     VFD    12/1,18/,18/0,12/ ENTER RESIDENCE DATA
00380  M01S00317.sysedit +++| .CSN     VFD    12/2,18/,18/0,12/ CONVERT SECTOR NUMBERS (SYSTEM FILE)
00381  M01S00318.sysedit +++|          VFD    12/2,12/1,6/,18/0,12/ (PPU LIBRARY)
00382  M01S00319.sysedit +++| .WSF     VFD    12/3,18/,18/S,12/ WRITE SYSTEM FILE
00383  M01S00320.sysedit +++| .WPF     VFD    12/4,18/,18/S,12/ WRITE PPU LIBRARY FILE
00384  M01S00321.sysedit +++| .ELD     VFD    12/5,12/,6/,18/SBUF,12/  ENTER LIBRARY DIRECTORY
00385  M01S00322.sysedit +++| .EAD     VFD    12/6,18/L.TLST,18/0,12/ ENTER ALTERNATE DEVICE TABLE
00386  M01S00323.sysedit +++| .WAD     VFD    12/7,18/0,18/S,12/ WRITE ALTERNATE DEVICE
00387  M01S00324.sysedit +++| .RSE     VFD    12/8,18/0,18/EQ,12/0  RETURN SYSTEM EQUIPMENT
00388  M01S00001.ns2034  +++| .DPE     VFD    12/9,18/0,18/0,12/0  DROP PP FOR ERROR CONDITION
00389  M01S00325.sysedit +++|
00390  M01S00326.sysedit +++|*         COMMON DATA.
00391  M01S00327.sysedit +++|
00392  M01S00328.sysedit +++| T1       CON    0           TEMPORARY STORAGE
00393  M01S00329.sysedit +++| T2       CON    0
00394  M01S00330.sysedit +++|
Line S00331 Modification History
M01 (Added by) sysedit
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00395  M02S00331.ns22000 ---| EQ       CON    0           SYSTEM DEVICE EQUIPMENT NUMBER SHIFTED 36
00396  M01S00003.ns22000 +++| EQ       CON    0           SYSTEM DEVICE EST ORDINAL SHIFTED 36
00397  M01S00332.sysedit +++| SC       CON    0           SYSTEM CHANGE FLAG
Line S00001 Modification History
M01 (Added by) v23l617
M02 (Updated by) 261l700
Seq #  *Modification Id* Act 
----------------------------+
00398  M02S00001.261l700 ---| DN       VFD    18/0L9C,24/,1/1,17/1 *9CX* TEMPLATE FOR *DSD*
Line S00002 Modification History
M01 (Added by) v23l617
M02 (Updated by) 261l700
Seq #  *Modification Id* Act 
----------------------------+
00399  M02S00002.261l700 ---|          VFD    12/-0,42/0,6/-0      MASK FOR *9CX* CHECK
00400  M01S00001.261l700 +++| DN       VFD    18/0L9D,24/,1/1,17/1 *DSD* TEMPLATE FOR RESIDENT OVLS
00401  M01S00333.sysedit +++| FN       CON    0           FILE NUMBER
00402  M01S00334.sysedit +++| NM       CON    0           RECORD NAME AND TYPE
00403  M01S00335.sysedit +++| TY       CON    0           RECORD TYPE
00404  M01S00336.sysedit +++| SN       CON    1           SECTOR NUMBER
00405  M01S00337.sysedit +++| PE       CON    1           PPU LIBRARY FILE EOI
00406  M01S00338.sysedit +++| EC       CON    0           ERROR COUNT
00407  M01S00339.sysedit +++| ER       CON    PLR         ERROR RETURN
00408  M01S00340.sysedit +++| DL       CON    0           DEAD START LOAD FLAG
00409  M01S00341.sysedit +++| CN       CON    0           COPY NUMBER
00410  M01S00342.sysedit +++| LS       CON    1           LIBDECK STATUS
00411  M01S00343.sysedit +++| AD       CON    0           ALTERNATE LIBRARY FLAG
00412  M01S00344.sysedit +++| CF       CON    0           CHECKPOINT FLAG
00413  M01S00345.sysedit +++| SR       CON    0           SCOPE RECORD COUNT
00414  M01S00346.sysedit +++| NF       CON    0           NUMBER OF FL ENTRIES
00415  M01S00347.sysedit +++| PL       CON    0           NUMBER OF ALTERNATE SYSTEM PLD ENTRIES
00416  M01S00002.ns2034  +++| SP       CON    0           *SLL* PRESENT FLAG (FOR ON-LINE *SYSEDIT*)
00417  M01S00348.sysedit +++|
00418  M01S00349.sysedit +++|*         LIST DATA.
00419  M01S00350.sysedit +++|
00420  M01S00351.sysedit +++| PN       CON    1           PAGE NUMBER
Line S00352 Modification History
M01 (Added by) sysedit
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00421  M02S00352.ns22000 ---| LC       CON    LINP        LINE NUMBER
00422  M01S00004.ns22000 +++| LC       CON    99999,0     LINE NUMBER
00423  M01S00005.ns22000 +++| LL       EQU    LC+1        LINE LIMIT
00424  M01S00353.sysedit +++| TL       CON    CCDR        ADDRESS OF TITLE TEXT
00425  M01S00354.sysedit +++|          SPACE  4
00426  M01S00355.sysedit +++| SSJ=     BSS    0
00427  M01S00356.sysedit +++|          VFD    12/0,24/-0,12/SYCS,12/IRSI
00428  M01S00357.sysedit +++|          BSSZ   SSJL-1
00429  M01S00358.sysedit +++|          TITLE  SYSEDIT - MAIN PROGRAM.
00430  M01S00359.sysedit +++| SYSEDIT  SPACE  4
00431  M01S00360.sysedit +++|**        SYSEDIT - MAIN PROGRAM.
00432  M01S00361.sysedit +++|
00433  M01S00362.sysedit +++|
00434  M01S00363.sysedit +++| SYE      RJ     /RDC/RDC    READ DIRECTIVE CARDS
00435  M01S00364.sysedit +++|          SA1    EC
00436  M01S00365.sysedit +++|          ZR     X1,SYE1     IF NO ERRORS
00437  M01S00366.sysedit +++|          SX0    =C*DIRECTIVE ERRORS.*
00438  M01S00367.sysedit +++|          EQ     ABT
00439  M01S00368.sysedit +++|
00440  M01S00369.sysedit +++|*         ADD CHANGE FILES TO SYSTEM LIBRARY.
00441  M01S00370.sysedit +++|
00442  M01S00371.sysedit +++| SYE1     SA1    SC
00443  M01S00372.sysedit +++|          ZR     X1,SYE2     IF NO SYSTEM CHANGES
00444  M01S00373.sysedit +++|          SA2    S+7         SET SYSTEM FILE NAME
00445  M01S00374.sysedit +++|          SA3    .WSF        SET WRITE SYSTEM REQUEST
00446  M01S00375.sysedit +++|          BX6    X2
00447  M01S00376.sysedit +++|          MX7    0           CLEAR SECTOR COUNT
00448  M01S00377.sysedit +++|          SA6    S
00449  M01S00378.sysedit +++|          SA7    S+6
00450  M01S00379.sysedit +++|          BX6    X3
00451  M01S00380.sysedit +++|          SA6    SL
00452  M01S00381.sysedit +++|          RJ     CCF         COPY CHANGE FILES
00453  M01S00382.sysedit +++|          RJ     DLR         PROCESS DELETIONS
00454  M01S00383.sysedit +++|          RJ     WDR         WRITE DIRECTORY
00455  M01S00384.sysedit +++|          SA1    S+6         SET EOF
00456  M01S00385.sysedit +++|          PX6    X1
00457  M01S00386.sysedit +++|          SA6    A1
00458  M01S00387.sysedit +++|          RECALL SL
00459  M01S00388.sysedit +++|
00460  M01S00389.sysedit +++|*         GENERATE LIBRARY DIRECTORY.
00461  M01S00390.sysedit +++|
00462  M01S00391.sysedit +++| SYE2     MESSAGE (=C*GENERATING LIBRARY DIRECTORY.*),1
Line S00392 Modification History
M01 (Added by) sysedit
M02 (Updated by) sysed1
Seq #  *Modification Id* Act 
----------------------------+
00463  M02S00392.sysed1  ---|          RJ     SLR         SET LIBRARY RESIDENCE
00464  M01S00001.sysed1  +++|          SA1    LS
00465  M01S00002.sysed1  +++|          ZR     X1,SYE2.1   IF LIBDECK FOUND
00466  M01S00003.sysed1  +++|          MESSAGE  SYEC,2    *LIBDECK NOT FOUND - (NAME)*
00467  M01S00004.sysed1  +++| SYE2.1   RJ     SLR         SET LIBRARY RESIDENCE
00468  M01S00393.sysedit +++|          SA1    F+7         SET SYSTEM FILE NAME
00469  M01S00394.sysedit +++|          SA2    S+8         SET PPU LIBRARY FILE NAME
00470  M01S00395.sysedit +++|          BX6    X1
00471  M01S00396.sysedit +++|          SA3    F+1         SET IN = OUT = FIRST
00472  M01S00397.sysedit +++|          LX7    X2
00473  M01S00398.sysedit +++|          SA6    F
00474  M01S00399.sysedit +++|          SA7    S
00475  M01S00400.sysedit +++|          SX6    X3
00476  M01S00401.sysedit +++|          SX1    B1          SET RANDOM BIT
00477  M01S00402.sysedit +++|          MX0    -48
00478  M01S00403.sysedit +++|          LX1    47
00479  M01S00404.sysedit +++|          BX3    -X0*X3      CLEAR DEVICE TYPE
00480  M01S00405.sysedit +++|          SA6    A3+B1
00481  M01S00406.sysedit +++|          BX7    X1+X3
00482  M01S00407.sysedit +++|          SA6    A6+B1
00483  M01S00408.sysedit +++|          SA7    A3
00484  M01S00409.sysedit +++|          RJ     /LIB/LIB    PROCESS LIBRARY TABLES
00485  M01S00410.sysedit +++|          SA3    L.TLIB      DECREASE FIELD LENGTH
00486  M01S00411.sysedit +++|          SX1    X3+SBUF
00487  M01S00412.sysedit +++|          SX6    B1
00488  M01S00413.sysedit +++|          LX6    17
00489  M01S00414.sysedit +++|          BX1    X1+X6
00490  M01S00415.sysedit +++|          MEMORY ,,,X1
00491  M01S00416.sysedit +++|          SA3    CF          READ CHECKPOINT FLAG
00492  M01S00417.sysedit +++|          SA2    PL          NUMBER OF ALTERNATE SYSTEM PLD ENTRIES
00493  M01S00418.sysedit +++|          LX3    12+18
00494  M01S00419.sysedit +++|          SA1    .ELD        REQUEST LIBRARY DIRECTORY SETUP
00495  M01S00420.sysedit +++|          LX2    36
00496  M01S00421.sysedit +++|          IX2    X3+X2
00497  M01S00422.sysedit +++|          BX6    X1+X2
00498  M01S00423.sysedit +++|          SA6    SL
00499  M01S00424.sysedit +++|          RECALL A6
00500  M01S00425.sysedit +++|          RJ     CMF         COMPLETE FILES
00501  M01S00426.sysedit +++|          SA1    CN          SET CHANGE NUMBER
00502  M01S00427.sysedit +++|          RJ     CDD
00503  M01S00428.sysedit +++|          SX1    1R.-1R
00504  M01S00429.sysedit +++|          SB3    60
00505  M01S00430.sysedit +++|          LX1    54
00506  M01S00431.sysedit +++|          IX2    X6+X1
00507  M01S00432.sysedit +++|          SB4    B3-B2
00508  M01S00433.sysedit +++|          LX6    X2,B4
00509  M01S00434.sysedit +++|          SA6    SYEB
00510  M01S00435.sysedit +++|          MESSAGE SYEA
00511  M01S00436.sysedit +++| SYE3     ENDRUN
00512  M01S00437.sysedit +++|
00513  M01S00438.sysedit +++| SYEA     DATA   30HSYSTEM EDIT COMPLETE - CHANGE
00514  M01S00439.sysedit +++| SYEB     CON    0,0
00515  M01S00005.sysed1  +++| SYEC     DATA   C*LIBDECK NOT FOUND - (NAME)*
00516  M01S00440.sysedit +++|          TITLE  MAIN PROCESSING ROUTINES.
00517  M01S00441.sysedit +++| CCF      SPACE  4,5
00518  M01S00442.sysedit +++|**        CCF - COPY CHANGE FILES.
00519  M01S00443.sysedit +++|*         CHANGE FILES ARE COPIED TO SYSTEM FILE.
00520  M01S00444.sysedit +++|
00521  M01S00445.sysedit +++|
00522  M01S00446.sysedit +++| CCF      PS                 ENTRY/EXIT
Line S00447 Modification History
M01 (Added by) sysedit
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00523  M02S00447.ns22000 ---|          SX6    LINP        FORCE EJECT
00524  M01S00006.ns22000 +++|          SX6    99999       FORCE EJECT
00525  M01S00448.sysedit +++|          SX7    =40HSYSTEM FILE CHANGES.
00526  M01S00449.sysedit +++|          SA6    LC
00527  M01S00450.sysedit +++|          SA7    TL
00528  M01S00451.sysedit +++| CCF1     SA1    L.TFIL      CHECK FILE TABLE
00529  M01S00452.sysedit +++|          SA2    FN
00530  M01S00453.sysedit +++|          IX6    X1-X2
00531  M01S00454.sysedit +++|          SA3    F.TFIL
00532  M01S00455.sysedit +++|          SB2    X2
00533  M01S00456.sysedit +++|          ZR     X6,CCF      RETURN IF END OF FILES
00534  M01S00457.sysedit +++|          SA5    X3+B2       SET FILE NAME
00535  M01S00458.sysedit +++|          MX0    42
00536  M01S00459.sysedit +++|          BX4    X0*X5
00537  M01S00460.sysedit +++|          RECALL F
00538  M01S00461.sysedit +++| .DS1     SA3    X2+B1       SET IN = OUT = FIRST
00539  M01S00462.sysedit +++|*         EQ     CCF2        (DISK DEADSTART)
00540  M01S00463.sysedit +++|
00541  M01S00464.sysedit +++|          LX5    59          CHECK CONTROL BIT
00542  M01S00465.sysedit +++|          SX1    3           SET FILE NAME AND MODE
00543  M01S00466.sysedit +++|
00544  M01S00467.sysedit +++|*         SX1    0           (DEADSTART LOAD FROM TAPE)
00545  M01S00468.sysedit +++|
00546  M01S00469.sysedit +++|          SX7    X3
00547  M01S00470.sysedit +++|          BX6    X4+X1
00548  M01S00471.sysedit +++|          SA7    A3+B1
00549  M01S00472.sysedit +++|          SA6    X2
00550  M01S00473.sysedit +++|          SA7    A7+B1
00551  M01S00474.sysedit +++|          NG     X5,CCF2     IF *NO REWIND*
00552  M01S00475.sysedit +++|          REWIND X2,R
00553  M01S00476.sysedit +++| CCF2     RJ     CPF         COPY FILE
00554  M01S00477.sysedit +++|          SA1    F.TFIL      CHECK FILE CONTROL
00555  M01S00478.sysedit +++|          SA2    FN          ADVANCE FILE NUMBER
00556  M01S00479.sysedit +++|          IX7    X1+X2
00557  M01S00480.sysedit +++|          SX6    X2+B1
00558  M01S00481.sysedit +++|          SA3    X7
00559  M01S00482.sysedit +++|          SA6    A2
00560  M01S00483.sysedit +++|          LX3    59
00561  M01S00484.sysedit +++|          NG     X3,CCF1     IF NO REWIND
00562  M01S00485.sysedit +++|          REWIND F,R
00563  M01S00486.sysedit +++|          EQ     CCF1        LOOP
Line S00487 Modification History
M01 (Added by) sysedit
M02 (Updated by) ns2121
Seq #  *Modification Id* Act 
----------------------------+
00564  M02S00487.ns2121  ---| CMF      SPACE  4,5
00565  M01S00011.ns2121  +++| CMF      SPACE  4,10
00566  M01S00488.sysedit +++|**        CMF - COMPLETE FILES.
00567  M01S00489.sysedit +++|
00568  M01S00490.sysedit +++|
00569  M01S00491.sysedit +++| CMF3     SX6    0           CLEAR OUTPUT FET
00570  M01S00492.sysedit +++|          SA6    O
00571  M01S00493.sysedit +++|
00572  M01S00494.sysedit +++| CMF      SUBR               ENTRY/EXIT
00573  M01S00495.sysedit +++|          SA3    DL
00574  M01S00496.sysedit +++|          SA5    WOF
00575  M01S00497.sysedit +++|          NZ     X3,CMF1     IF DEADSTART LOAD
00576  M01S00498.sysedit +++|          ZR     X5,CMF3     IF NOTHING LISTED
00577  M01S00499.sysedit +++|          PRINT  (=2L  )
00578  M01S00500.sysedit +++|          PRINT  (=2L  )
00579  M01S00501.sysedit +++|          SA1    =1H         SET SPACES
00580  M01S00502.sysedit +++|          SA2    =10HCHANGE
00581  M01S00503.sysedit +++|          BX6    X1
00582  M01S00504.sysedit +++|          LX7    X2
00583  M01S00505.sysedit +++|          SA6    LBUF
00584  M01S00506.sysedit +++|          SA7    A6+B1
00585  M01S00507.sysedit +++|          SA1    CN
00586  M01S00508.sysedit +++|          RJ     CDD
00587  M01S00509.sysedit +++|          SX7    0
00588  M01S00510.sysedit +++|          SA6    A7+B1
00589  M01S00511.sysedit +++|          SA7    A6+B1
00590  M01S00512.sysedit +++|          PRINT  LBUF
00591  M01S00513.sysedit +++|          WRITER O
00592  M01S00514.sysedit +++|          SETFS  X2,0        CLEAR SPECIAL ID STATUS
00593  M01S00515.sysedit +++|          EQ     CMFX        RETURN
00594  M01S00516.sysedit +++|
00595  M01S00517.sysedit +++| CMF1     SA3    CMFB
00596  M01S00518.sysedit +++|          RETURN O           RETURN DEADSTART LISTING
00597  M01S00519.sysedit +++|          SA5    LS          GET LIBDECK STATUS
00598  M01S00520.sysedit +++|          SA1    LN          READ LIBDECK NAME
00599  M01S00521.sysedit +++|          NZ     X5,CMF2     IF LIBDECK NOT FOUND
00600  M01S00522.sysedit +++|          SX3    1R.
Line S00523 Modification History
M01 (Added by) sysedit
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00601  M02S00523.ns22000 ---| CMF2     MX0    30
00602  M01S00007.ns22000 +++| CMF2     MX0    24
00603  M01S00524.sysedit +++|          LX1    12
00604  M01S00525.sysedit +++|          BX1    X0*X1       ADD LIBDECK NAME TO MESSAGE
Line S00526 Modification History
M01 (Added by) sysedit
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00605  M02S00526.ns22000 ---|          LX3    24
00606  M01S00008.ns22000 +++|          LX3    30
00607  M01S00527.sysedit +++|          BX6    X1+X3
00608  M01S00528.sysedit +++|          SA6    A3
00609  M01S00529.sysedit +++|          MESSAGE CMFA
00610  M01S00530.sysedit +++|          EQ     SYE3        EXIT
00611  M01S00531.sysedit +++|
00612  M01S00532.sysedit +++| CMFA     DATA   20HSYSTEM BUILT WITH LI
Line S00533 Modification History
M01 (Added by) sysedit
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00613  M02S00533.ns22000 ---| CMFB     VFD    60/4L(UND+1R
Line S00534 Modification History
M01 (Added by) sysedit
M02 (Updated by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00614  M02S00534.ns22000 ---|          DATA   C*EFINED).*
00615  M01S00009.ns22000 +++| CMFB     VFD    60/5L(UNDE+1R
00616  M01S00010.ns22000 +++|          DATA   C*FINED).*
00617  M01S00535.sysedit +++| DLR      SPACE  4,5
00618  M01S00536.sysedit +++|**        DLR - DELETE RECORDS.
00619  M01S00537.sysedit +++|
00620  M01S00538.sysedit +++|
00621  M01S00539.sysedit +++| DLR      PS                 ENTRY/EXIT
00622  M01S00540.sysedit +++| DLR1     SA1    L.TDLT      CHECK DELETE TABLE
00623  M01S00541.sysedit +++|          SA2    F.TDLT
00624  M01S00542.sysedit +++|          ZR     X1,DLR      RETURN IF END OF TABLE
00625  M01S00543.sysedit +++|          SA3    X2
00626  M01S00544.sysedit +++|          SX6    X2+B1       DELETE ENTRY
00627  M01S00545.sysedit +++|          SX7    X1-1
00628  M01S00546.sysedit +++|          SA6    A2
00629  M01S00547.sysedit +++|          SA7    A1
00630  M01S00548.sysedit +++|          SEARCH TRCD,X3     SEARCH FOR ENTRY
00631  M01S00549.sysedit +++|          ZR     X2,DLR1     IF NOT FOUND
00632  M01S00550.sysedit +++|          SA1    F.TRCD      SET LWA
00633  M01S00551.sysedit +++|          SA4    L.TRCD
00634  M01S00552.sysedit +++|          IX1    X1+X4
00635  M01S00553.sysedit +++|          BX7    X2          SAVE NAME AND TYPE
00636  M01S00554.sysedit +++|          SX3    A2          SET DESTINATION
00637  M01S00555.sysedit +++|          SX2    A2+2        SET FWA
00638  M01S00556.sysedit +++|          IX1    X1-X2       SET WORD COUNT
00639  M01S00557.sysedit +++|          SX6    X4-2        DECREMENT TABLE LENGTH
00640  M01S00558.sysedit +++|          SA7    T1
00641  M01S00559.sysedit +++|          SA6    A4
00642  M01S00560.sysedit +++|          MOVE   X1,X2,X3
00643  M01S00561.sysedit +++|
00644  M01S00562.sysedit +++|*         LIST DELETION STATUS.
00645  M01S00563.sysedit +++|
00646  M01S00564.sysedit +++|          SA1    =1H         SET SPACES
00647  M01S00565.sysedit +++|          SA2    =10HDELETED
00648  M01S00566.sysedit +++|          BX6    X2          SET RECORD STATUS
00649  M01S00567.sysedit +++|          LX7    X1
00650  M01S00568.sysedit +++|          SA5    T1
00651  M01S00569.sysedit +++|          SA7    LBUF
00652  M01S00570.sysedit +++|          MX0    42
00653  M01S00571.sysedit +++|          SA6    A7+B1
00654  M01S00572.sysedit +++|          BX1    X0*X5       SPACE FILL NAME
00655  M01S00573.sysedit +++|          RJ     SFN
00656  M01S00574.sysedit +++|          SA2    TRCN+X5     SET RECORD TYPE
00657  M01S00575.sysedit +++|          BX1    X0*X2
00658  M01S00576.sysedit +++|          SA6    A6+B1
00659  M01S00577.sysedit +++|          RJ     SFN
00660  M01S00578.sysedit +++|          BX7    X7-X7       SET END OF BUFFER
00661  M01S00579.sysedit +++|          SA6    A6+B1
00662  M01S00580.sysedit +++|          SA7    A6+B1
00663  M01S00581.sysedit +++|          PRINT  LBUF
00664  M01S00582.sysedit +++|          EQ     DLR1        LOOP
00665  M01S00583.sysedit +++| WDR      SPACE  4,5
00666  M01S00584.sysedit +++|**        WDR - WRITE DIRECTORY.
00667  M01S00585.sysedit +++|
00668  M01S00586.sysedit +++|
00669  M01S00587.sysedit +++| WDR      PS                 ENTRY/EXIT
00670  M01S00588.sysedit +++|          SA2    WDRA+1      ENTER DIRECTORY NAME
00671  M01S00589.sysedit +++|          SX6    10B
00672  M01S00590.sysedit +++|          ADDWRD TRCD,X2+X6
00673  M01S00591.sysedit +++|          SA1    SN          ENTER SECTOR NUMBER
00674  M01S00592.sysedit +++|          ADDWRD TRCD,X1
00675  M01S00593.sysedit +++|          MX0    14B
00676  M01S00594.sysedit +++|          SA1    WDRA        ENTER 7700 TABLE
00677  M01S00595.sysedit +++|          SA2    A1+B1
00678  M01S00596.sysedit +++|          BX6    X1
00679  M01S00597.sysedit +++|          LX7    X2
00680  M01S00598.sysedit +++|          SA3    DATE        ENTER DATE
00681  M01S00599.sysedit +++|          SA4    A2+B1
00682  M01S00600.sysedit +++|          SA6    BUF
00683  M01S00601.sysedit +++|          SA7    A6+B1
00684  M01S00602.sysedit +++|          BX6    X3
00685  M01S00603.sysedit +++|          SA6    A7+B1
00686  M01S00604.sysedit +++|          MX6    0
00687  M01S00605.sysedit +++|          SA5    L.TRCD      SET DIRECTORY LENGTH
00688  M01S00606.sysedit +++|          BX7    X4+X5
00689  M01S00607.sysedit +++| +        SA6    A6+B1       CLEAR REMAINDER OF TABLE
00690  M01S00608.sysedit +++|          LX0    1
00691  M01S00609.sysedit +++|          NG     X0,*
00692  M01S00610.sysedit +++|          SA7    A6+B1
00693  M01S00611.sysedit +++|          SX1    60B         CHECK TABLE LENGTH
00694  M01S00612.sysedit +++|          IX5    X5-X1
00695  M01S00613.sysedit +++|          SX6    100B        SET WORD COUNT
00696  M01S00614.sysedit +++|          PL     X5,WDR1     IF FULL FIRST PART
00697  M01S00615.sysedit +++|          IX1    X5+X1       SET SHORT LENGTH
00698  M01S00616.sysedit +++|          SX6    20B+X5
00699  M01S00617.sysedit +++| WDR1     SA2    F.TRCD      MOVE FIRST PART OF DIRECTORY
00700  M01S00618.sysedit +++|          SA6    WC
00701  M01S00619.sysedit +++|          IX0    X2+X1       SET NEXT TABLE ADDRESS
Line S00620 Modification History
M01 (Added by) sysedit
M02 (Updated by) ns2037
Seq #  *Modification Id* Act 
----------------------------+
00702  M02S00620.ns2037  ---|          MOVE   X1,X2,BUF+20B
00703  M01S00001.ns2037  +++|          SX3    BUF+20B     ADDRESS TO MOVE TO
00704  M01S00002.ns2037  +++|          RJ     MVZ         MOVE DATA TO BUFFER
00705  M01S00621.sysedit +++| WDR2     RJ     WTB         WRITE BLOCK
00706  M01S00622.sysedit +++|          SA1    WC          CHECK WORD COUNT
00707  M01S00623.sysedit +++|          SB2    X1-100B
00708  M01S00624.sysedit +++|          NZ     B2,WDR      RETURN IF SHORT BLOCK WRITTEN
00709  M01S00625.sysedit +++|          IX5    X5-X1       DECREMENT LENGTH
Line S00626 Modification History
M01 (Added by) sysedit
M02 (Updated by) ns2037
Seq #  *Modification Id* Act 
----------------------------+
00710  M02S00626.ns2037  ---|          MOVE   X1,X0,BUF
00711  M01S00003.ns2037  +++|          SX2    X0          ADDRESS TO MOVE FROM
00712  M01S00004.ns2037  +++|          SX3    BUF         ADDRESS TO MOVE TO
00713  M01S00005.ns2037  +++|          RJ     MVZ         MOVE DATA
00714  M01S00627.sysedit +++|          SX0    X0+100B     ADVANCE FWA
00715  M01S00628.sysedit +++|          PL     X5,WDR2     LOOP IF NOT SHORT BLOCK
00716  M01S00629.sysedit +++|          SX6    X5+100B     SET SHORT WORD COUNT
00717  M01S00630.sysedit +++|          SA6    WC
00718  M01S00631.sysedit +++|          EQ     WDR2
00719  M01S00632.sysedit +++|
00720  M01S00633.sysedit +++| WDRA     VFD    12/7700B,12/16B,36/0
00721  M01S00634.sysedit +++|          CON    0LSYSTEM
00722  M01S00635.sysedit +++|          VFD    12/7000B,48/0
00723  M01S00006.ns2037  +++| MVZ      SPACE  4,20
00724  M01S00007.ns2037  +++|**        MVZ - MOVE DATA, CHECKING FOR ZERO-LENGTH RECORD ENTRIES.
00725  M01S00008.ns2037  +++|*
00726  M01S00009.ns2037  +++|*         THIS ROUTINE MOVES THE DIRECTORY INTO THE WRITE BUFFER,
00727  M01S00010.ns2037  +++|*         CHECKING FOR ZERO-LENGTH RECORD ENTRIES *(00)*, CHANGING
00728  M01S00011.ns2037  +++|*         THEM TO THE PROPER RECORD NAME.  THIS MUST BE DONE AT
00729  M01S00012.ns2037  +++|*         THIS TIME, SINCE THE REST OF *SYSEDIT* REQUIRES THE TABLES
00730  M01S00013.ns2037  +++|*         TO BE ZERO-WORD TERMINATED, AND A PROPER ZERO-LENGTH RECORD
00731  M01S00014.ns2037  +++|*         ENTRY WOULD PREMATURELY TERMINATE THE TABLE.
00732  M01S00015.ns2037  +++|*
00733  M01S00016.ns2037  +++|*         ENTRY  (X1) = WORD COUNT.
00734  M01S00017.ns2037  +++|*                (X2) = ADDRESS TO MOVE FROM.
00735  M01S00018.ns2037  +++|*                (X3) = ADDRESS TO MOVE TO.
00736  M01S00019.ns2037  +++|*
00737  M01S00020.ns2037  +++|*         EXIT   ZERO-LENGTH RECORD ENTRIES CONVERTED DURING MOVE.
00738  M01S00021.ns2037  +++|*
00739  M01S00022.ns2037  +++|*         USES   X - 1, 2, 3, 4, 6, 7.
00740  M01S00023.ns2037  +++|*                A - 2, 3, 4, 6, 7.
00741  M01S00024.ns2037  +++|*                B - 2, 7.
00742  M01S00025.ns2037  +++|
00743  M01S00026.ns2037  +++|
00744  M01S00027.ns2037  +++| MVZ      SUBR               ENTRY/EXIT
00745  M01S00028.ns2037  +++|          IX3    X3-X2       DIFFERENCE
00746  M01S00029.ns2037  +++|          AX1    1           WORD COUNT / 2
00747  M01S00030.ns2037  +++|          SB2    X3
00748  M01S00031.ns2037  +++|          SB7    X2          ADDRESS TO MOVE FROM
00749  M01S00032.ns2037  +++|          ZR     X1,MVZX     IF NO DATA TO MOVE
00750  M01S00033.ns2037  +++|          SA3    =C*(00)*    ZERO LENGTH RECORD ENTRY
00751  M01S00034.ns2037  +++| MVZ1     SA4    B7+B1       MOVE TWO WORDS
00752  M01S00035.ns2037  +++|          SA2    B7
00753  M01S00036.ns2037  +++|          LX7    X4
00754  M01S00037.ns2037  +++|          BX6    X2-X3
00755  M01S00038.ns2037  +++|          SA7    A4+B2       STORE SECOND WORD
00756  M01S00039.ns2037  +++|          ZR     X6,MVZ2     IF ZERO LENGTH RECORD ENTRY
00757  M01S00040.ns2037  +++|          BX6    X2          USE RECORD NAME / TYPE
00758  M01S00041.ns2037  +++| MVZ2     SB7    A4+B1       INCREMENT INDEX
00759  M01S00042.ns2037  +++|          SX1    X1-1
00760  M01S00043.ns2037  +++|          SA6    A2+B2       STORE FIRST WORD
00761  M01S00044.ns2037  +++|          NZ     X1,MVZ1     IF NOT COMPLETE
00762  M01S00045.ns2037  +++|          EQ     MVZX        RETURN
Line S00636 Modification History
M01 (Added by) sysedit
M02 (Updated by) 251l664
Seq #  *Modification Id* Act 
----------------------------+
00763  M02S00636.251l664 ---| SLR      SPACE  4,5
00764  M01S00005.251l664 +++| SLR      SPACE  4,20
00765  M01S00637.sysedit +++|**        SLR - SET LIBRARY RESIDENCE.
00766  M01S00006.251l664 +++|*
00767  M01S00007.251l664 +++|*         *SLR* PERFORMS THE FINAL MODIFICATIONS TO THE MANAGED TABLES
00768  M01S00008.251l664 +++|*         BEFORE ACTUALLY GENERATING THE LIBRARY DIRECTORIES.  IT -
00769  M01S00009.251l664 +++|*
00770  M01S00010.251l664 +++|*         *  CREATES THE ENTRY FOR *1PR* FROM THE ENTRY FOR *PPR*.
00771  M01S00011.251l664 +++|*         *  DEFINES *1VN* AND *1VO* AS SYNONYMS FOR *1VP*.
00772  M01S00012.251l664 +++|*         *  REQUESTS PROGRAM RESIDENCY INFORMATION FROM *SLL* AND
00773  M01S00013.251l664 +++|*                UPDATES *TRES*.
00774  M01S00014.251l664 +++|*         *  DETERMINES THE FIRST RECORD OF THE RUNNING SYSTEM.
00775  M01S00015.251l664 +++|*
00776  M01S00016.251l664 +++|*         USES   X - ALL.
00777  M01S00017.251l664 +++|*                A - ALL.
00778  M01S00018.251l664 +++|*
00779  M01S00019.251l664 +++|*         CALLS  ERT.
00780  M01S00020.251l664 +++|*
00781  M01S00021.251l664 +++|*         MACROS ADDWRD, RECALL, SEARCH.
00782  M01S00638.sysedit +++|
00783  M01S00639.sysedit +++|
Line S00640 Modification History
M01 (Added by) sysedit
M02 (Updated by) 251l664
Seq #  *Modification Id* Act 
----------------------------+
00784  M02S00640.251l664 ---| SLR      PS                 ENTRY/EXIT
00785  M01S00022.251l664 +++| SLR      SUBR               ENTRY/EXIT
Line S00641 Modification History
M01 (Added by) sysedit
M02 (Updated by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
00786  M02S00641.ns21000 ---|          ADDWRD TRCD,X6-X6  TERMINATE RECORD TABLE
Line S00001 Modification History
M01 (Added by) ns21000
M02 (Updated by) 251l664
Seq #  *Modification Id* Act 
----------------------------+
00787  M02S00001.251l664 ---|          SA5    SLRB        FIND ENTRY FOR *PPR*
00788  M01S00023.251l664 +++|          SA5    SLRA        FIND ENTRY FOR *PPR*
00789  M01S00002.ns21000 +++|          SEARCH TRCD,X5
Line S00003 Modification History
M01 (Added by) ns21000
M02 (Updated by) 251l664
Seq #  *Modification Id* Act 
----------------------------+
00790  M02S00003.251l664 ---|          ZR     X2,SLR1     IF NOT FOUND
Line S00024 Modification History
M01 (Added by) 251l664
M02 (Updated by) sysed11
Seq #  *Modification Id* Act 
----------------------------+
00791  M02S00024.sysed11 ---|          ZR     X2,SLR0     IF NOT FOUND
00792  M01S00001.sysed11 +++|          ZR     X2,SLR3     IF NOT FOUND
00793  M01S00004.ns21000 +++|          SA1    A5+B1       GET NEW ENTRY FIRST WORD
00794  M01S00005.ns21000 +++|          SA5    A2+B1       GET SECOND WORD
00795  M01S00006.ns21000 +++|          ADDWRD A0,X1       ADD ENTRY TO END OF TABLE
00796  M01S00025.251l664 +++|          ADDWRD A0,X5
00797  M01S00026.251l664 +++| SLR0     SA5    SLRB        FIND ENTRY FOR *9TA*
00798  M01S00027.251l664 +++|          SEARCH TRCD,X5
Line S00028 Modification History
M01 (Added by) 251l664
M02 (Updated by) sysed11
Seq #  *Modification Id* Act 
----------------------------+
00799  M02S00028.sysed11 ---|          ZR     X2,SLR1     IF NOT FOUND
00800  M01S00002.sysed11 +++|          ZR     X2,SLR3     IF NOT FOUND
00801  M01S00029.251l664 +++|          SA5    A2+B1       GET SECOND WORD
00802  M01S00030.251l664 +++|          ADDWRD A0,X2       ENSURE *9TA* WILL BE IN THE RUNNING SYSTEM
00803  M01S00007.ns21000 +++|          ADDWRD A0,X5
00804  M01S00008.ns21000 +++| SLR1     ADDWRD TRCD,X6-X6  TERMINATE RECORD TABLE
00805  M01S00642.sysedit +++|          ADDWRD TRCD,X6-X6
00806  M01S00031.251l664 +++|          SA1    SLRC        CREATE SYNONYMS FOR *1VP*
00807  M01S00032.251l664 +++|          SA5    A1+B1
00808  M01S00033.251l664 +++|          ADDWRD TSYN,X1
00809  M01S00034.251l664 +++|          ADDWRD A0,X5
00810  M01S00035.251l664 +++|          SA1    SLRC
00811  M01S00036.251l664 +++|          SA5    SLRC+2
00812  M01S00037.251l664 +++|          ADDWRD A0,X1
00813  M01S00038.251l664 +++|          ADDWRD A0,X5
00814  M01S00643.sysedit +++|          SA1    .ERD        ENTER RESIDENCY DATA
00815  M01S00644.sysedit +++|          SX2    SBUF
00816  M01S00645.sysedit +++|          LX2    12
00817  M01S00646.sysedit +++|          BX6    X1+X2
00818  M01S00647.sysedit +++|          SA6    SL
00819  M01S00648.sysedit +++|          RECALL A6
00820  M01S00649.sysedit +++|          SA5    SBUF        FIRST ENTRY
Line S00650 Modification History
M01 (Added by) sysedit
M02 (Updated by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
00821  M02S00650.ns21000 ---| SLR1     BX1    X5          ENTER RESIDENCY TABLE
00822  M01S00009.ns21000 +++| SLR2     BX1    X5          ENTER RESIDENCY TABLE
00823  M01S00651.sysedit +++|          RJ     ERT
00824  M01S00652.sysedit +++|          SA5    A5+B1       NEXT ENTRY
Line S00653 Modification History
M01 (Added by) sysedit
M02 (Updated by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
00825  M02S00653.ns21000 ---|          NZ     X5,SLR1     LOOP TO END OF LIST
00826  M01S00010.ns21000 +++|          NZ     X5,SLR2     IF NOT END OF LIST
Line S00654 Modification History
M01 (Added by) sysedit
M02 (Updated by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
00827  M02S00654.v23l617 ---|          ADDWRD TRES,X6-X6  TERMINATE RESIDENCY TABLE
Line S00655 Modification History
M01 (Added by) sysedit
M02 (Updated by) 251l664
Seq #  *Modification Id* Act 
----------------------------+
00828  M02S00655.251l664 ---|          SA1    SLRA        ESTABLISH START OF RUNNING SYSTEM LIBRARY
00829  M01S00039.251l664 +++|          SA1    SLRD        ESTABLISH START OF RUNNING SYSTEM LIBRARY
00830  M01S00656.sysedit +++|          SEARCH TRCD,X1
Line S00657 Modification History
M01 (Added by) sysedit
M02 (Updated by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
00831  M02S00657.ns21000 ---|          SB2    2
Line S00658 Modification History
M01 (Added by) sysedit
M02 (Updated by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
00832  M02S00658.ns21000 ---|          ZR     X2,SLR5     IF NOT FOUND
Line S00659 Modification History
M01 (Added by) sysedit
M02 (Updated by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
00833  M02S00659.ns21000 ---|
Line S00660 Modification History
M01 (Added by) sysedit
M02 (Updated by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
00834  M02S00660.ns21000 ---|*         SEARCH FOR TYPES *ABS* AND *OVL* BEFORE *REC*.
Line S00661 Modification History
M01 (Added by) sysedit
M02 (Updated by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
00835  M02S00661.ns21000 ---|
00836  M01S00011.ns21000 +++|          ZR     X2,SLR3     IF NOT FOUND
00837  M01S00662.sysedit +++|          SA1    F.TRCD      GET FWA OF TRCD
Line S00663 Modification History
M01 (Added by) sysedit
M02 (Updated by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
00838  M02S00663.ns21000 ---|          SB7    X1+
Line S00664 Modification History
M01 (Added by) sysedit
M02 (Updated by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
00839  M02S00664.ns21000 ---|          SB6    A2+B2       POSITION OF REC + 2
Line S00665 Modification History
M01 (Added by) sysedit
M02 (Updated by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
00840  M02S00665.ns21000 ---|          SB7    B6-B7       NEW FWA INDEX
Line S00666 Modification History
M01 (Added by) sysedit
M02 (Updated by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
00841  M02S00666.ns21000 ---|          SB6    B7-2        INITIAL SEARCH INDEX
Line S00667 Modification History
M01 (Added by) sysedit
M02 (Updated by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
00842  M02S00667.ns21000 ---| SLR2     SB6    B6-B2       DECREMENT INDEX TO NEXT ENTRY
Line S00668 Modification History
M01 (Added by) sysedit
M02 (Updated by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
00843  M02S00668.ns21000 ---|          MI     B6,SLR4     IF BEFORE FIRST ENTRY
Line S00669 Modification History
M01 (Added by) sysedit
M02 (Updated by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
00844  M02S00669.ns21000 ---|          SA3    X1+B6       GET TYPE
Line S00670 Modification History
M01 (Added by) sysedit
M02 (Updated by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
00845  M02S00670.ns21000 ---|          SX7    X3-4
Line S00671 Modification History
M01 (Added by) sysedit
M02 (Updated by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
00846  M02S00671.ns21000 ---|          ZR     X7,SLR3     IF TYPE *OVL*
Line S00672 Modification History
M01 (Added by) sysedit
M02 (Updated by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
00847  M02S00672.ns21000 ---|          SX7    X3-9
Line S00673 Modification History
M01 (Added by) sysedit
M02 (Updated by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
00848  M02S00673.ns21000 ---|          NZ     X7,SLR2     IF NOT TYPE *ABS*
Line S00674 Modification History
M01 (Added by) sysedit
M02 (Updated by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
00849  M02S00674.ns21000 ---|
Line S00675 Modification History
M01 (Added by) sysedit
M02 (Updated by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
00850  M02S00675.ns21000 ---|*         PLACE *ABS* AND *OVL* TYPES BEFORE *REC* IN TRCD.
Line S00676 Modification History
M01 (Added by) sysedit
M02 (Updated by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
00851  M02S00676.ns21000 ---|
Line S00677 Modification History
M01 (Added by) sysedit
M02 (Updated by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
00852  M02S00677.ns21000 ---| SLR3     SB7    B7-B2       MOVE ENTRY TO NEW FIRST
Line S00678 Modification History
M01 (Added by) sysedit
M02 (Updated by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
00853  M02S00678.ns21000 ---|          BX6    X3
Line S00679 Modification History
M01 (Added by) sysedit
M02 (Updated by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
00854  M02S00679.ns21000 ---|          SA4    A3+B1
Line S00680 Modification History
M01 (Added by) sysedit
M02 (Updated by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
00855  M02S00680.ns21000 ---|          BX7    X4
Line S00681 Modification History
M01 (Added by) sysedit
M02 (Updated by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
00856  M02S00681.ns21000 ---|          SA6    X1+B7
Line S00682 Modification History
M01 (Added by) sysedit
M02 (Updated by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
00857  M02S00682.ns21000 ---|          SA7    A6+B1
Line S00683 Modification History
M01 (Added by) sysedit
M02 (Updated by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
00858  M02S00683.ns21000 ---|          EQ     SLR2        LOOP FOR NEXT ENTRY
Line S00684 Modification History
M01 (Added by) sysedit
M02 (Updated by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
00859  M02S00684.ns21000 ---|
Line S00685 Modification History
M01 (Added by) sysedit
M02 (Updated by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
00860  M02S00685.ns21000 ---| SLR4     SA3    L.TRCD      SET NEW LENGTH
Line S00686 Modification History
M01 (Added by) sysedit
M02 (Updated by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
00861  M02S00686.ns21000 ---|          SX4    B7
Line S00687 Modification History
M01 (Added by) sysedit
M02 (Updated by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
00862  M02S00687.ns21000 ---|          SX7    X1+B7       SET NEW FIRST
Line S00688 Modification History
M01 (Added by) sysedit
M02 (Updated by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
00863  M02S00688.ns21000 ---|          IX6    X3-X4
Line S00689 Modification History
M01 (Added by) sysedit
M02 (Updated by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
00864  M02S00689.ns21000 ---|          SA7    A1
00865  M01S00012.ns21000 +++|          SX7    A2+B7
00866  M01S00013.ns21000 +++|          IX2    X7-X1
00867  M01S00014.ns21000 +++|          SA3    L.TRCD
00868  M01S00015.ns21000 +++|          SA7    A1
00869  M01S00016.ns21000 +++|          IX6    X3-X2
00870  M01S00690.sysedit +++|          SA4    X7+B1       FIRST RANDOM INDEX
00871  M01S00691.sysedit +++|          SA6    A3
00872  M01S00692.sysedit +++| +        BX3    X4          DUPLICATE RANDOM INDEX
00873  M01S00693.sysedit +++|          LX4    24
00874  M01S00694.sysedit +++|          BX6    X4+X3
Line S00695 Modification History
M01 (Added by) sysedit
M02 (Updated by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
00875  M02S00695.ns21000 ---|          SA4    A4+B2       NEXT RANDOM INDEX
Line S00696 Modification History
M01 (Added by) sysedit
M02 (Updated by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
00876  M02S00696.ns21000 ---|          SA6    A4-B2
00877  M01S00017.ns21000 +++|          SA4    A4+B7
00878  M01S00018.ns21000 +++|          SA6    A4-B7
00879  M01S00697.sysedit +++|          NZ     X4,*-1
00880  M01S00698.sysedit +++|          SA3    .CSN        REQUEST SECTOR COUNT CONVERSION
00881  M01S00699.sysedit +++|          LX7    12
00882  M01S00700.sysedit +++|          BX6    X3+X7
00883  M01S00701.sysedit +++|          SA6    SL
00884  M01S00702.sysedit +++|          RECALL A6
00885  M01S00703.sysedit +++|          EQ     SLR         RETURN
00886  M01S00704.sysedit +++|
Line S00705 Modification History
M01 (Added by) sysedit
M02 (Updated by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
00887  M02S00705.ns21000 ---| SLR5     SX0    =C*DETECTED IN DIRECTORY.*
Line S00019 Modification History
M01 (Added by) ns21000
M02 (Updated by) sysed2
Seq #  *Modification Id* Act 
----------------------------+
00888  M02S00019.sysed2  ---| SLR3     SX0    =C*DETECTED IN DIRECTORY.*
00889  M01S00001.sysed2  +++| SLR3     SX0    =10H DIRECTORY
00890  M01S00706.sysedit +++|          EQ     SFE
00891  M01S00707.sysedit +++|
Line S00708 Modification History
M01 (Added by) sysedit
M02 (Updated by) 251l664
Seq #  *Modification Id* Act 
----------------------------+
00892  M02S00708.251l664 ---| SLRA     CON    0LREC+1
Line S00020 Modification History
M01 (Added by) ns21000
M02 (Updated by) 251l664
Seq #  *Modification Id* Act 
----------------------------+
00893  M02S00020.251l664 ---| SLRB     CON    0LPPR+1
Line S00021 Modification History
M01 (Added by) ns21000
M02 (Updated by) 251l664
Seq #  *Modification Id* Act 
----------------------------+
00894  M02S00021.251l664 ---|          CON    0L1PR+1
00895  M01S00040.251l664 +++| SLRA     CON    0LPPR+PPRT
00896  M01S00041.251l664 +++|          CON    0L1PR+PPRT
00897  M01S00042.251l664 +++| SLRB     CON    0L9TA+PPRT
00898  M01S00043.251l664 +++| SLRC     CON    0L1VP+PPRT
00899  M01S00044.251l664 +++|          CON    0L1VN+PPRT
00900  M01S00045.251l664 +++|          CON    0L1VO+PPRT
00901  M01S00046.251l664 +++| SLRD     CON    0LREC+PPRT
00902  M01S00709.sysedit +++|          TITLE  LIBRARY TABLE PROCESSING.
00903  M01S00710.sysedit +++|          QUAL   LIB
00904  M01S00711.sysedit +++| LIB      SPACE  4,5
00905  M01S00712.sysedit +++|**        LIB - PROCESS LIBRARY TABLES.
00906  M01S00713.sysedit +++|
00907  M01S00714.sysedit +++|
00908  M01S00715.sysedit +++| LIB      PS                 ENTRY/EXIT
00909  M01S00716.sysedit +++|          RJ     MSP         PROCESS MS RESIDENT PPU PROGRAMS
00910  M01S00717.sysedit +++|          SA1    AD
00911  M01S00718.sysedit +++|          ZR     X1,LIB1     IF NO ALTERNATE DEVICE ENTRIES
00912  M01S00719.sysedit +++|          SA3    F.TRES
00913  M01S00720.sysedit +++|          RJ     ASR         PROCESS ALTERNATE SYSTEM RESIDENT PROGRAMS
00914  M01S00721.sysedit +++| LIB1     SX6    SBUF        RESET LOW MEMORY LIMIT
00915  M01S00722.sysedit +++|          SA6    LM
00916  M01S00723.sysedit +++|          SA6    F.TLIB
00917  M01S00724.sysedit +++|          RJ     CMP         PROCESS CM RESIDENT PPU PROGRAMS
00918  M01S00725.sysedit +++|          ADDWRD TLIB,X6-X6  TERMINATE RPL
00919  M01S00726.sysedit +++|          RJ     CMC         PROCESS CM RESIDENT CPU PROGRAMS
00920  M01S00727.sysedit +++|          ADDWRD TLIB,X6-X6  TERMINATE RCL
00921  M01S00728.sysedit +++|          RJ     PLD         GENERATE PLD
00922  M01S00729.sysedit +++|          SA3    L.TLIB
00923  M01S00730.sysedit +++|          SA2    L.TFLO
00924  M01S00731.sysedit +++|          BX7    X3
00925  M01S00732.sysedit +++|          SX6    B0
00926  M01S00733.sysedit +++|          SA7    T2
00927  M01S00734.sysedit +++|          ZR     X2,PFL1     IF NO FL ENTRIES
00928  M01S00735.sysedit +++|          SX1    0
00929  M01S00736.sysedit +++|          ADDWRD TFLO,X1     TERMINATE FL TABLE
00930  M01S00737.sysedit +++|          SX7    X3-1        SET NUMBER OF FL ENTRIES
00931  M01S00738.sysedit +++|          SA7    NF
00932  M01S00739.sysedit +++| LIB2     RJ     CLD         GENERATE CLD
00933  M01S00740.sysedit +++|          ADDWRD TLIB,X6-X6  TERMINATE CLD
00934  M01S00741.sysedit +++|          SA6    L.TADR      CLEAR ALTERNATE DEVICE RECORDS TABLE
00935  M01S00742.sysedit +++|          RJ     LBD         GENERATE LBD
00936  M01S00743.sysedit +++|          ADDWRD TLIB,X6-X6  TERMINATE LBD
00937  M01S00744.sysedit +++|          ADDWRD TLIB,X6-X6  TERMINATE DIRECTORY
00938  M01S00745.sysedit +++|          EQ     LIB         RETURN
00939  M01S00746.sysedit +++| CLD      SPACE  4,5
00940  M01S00747.sysedit +++|**        CLD - GENERATE CLD.
00941  M01S00748.sysedit +++|
00942  M01S00749.sysedit +++|
Line S00750 Modification History
M01 (Added by) sysedit
M02 (Updated by) ns2121
Seq #  *Modification Id* Act 
----------------------------+
00943  M02S00750.ns2121  ---| CLD10    ADDWRD TLIB,X6-X6  TERMINATE PST
00944  M01S00012.ns2121  +++| CLD10    SX7    B0          EMPTY TCMR
00945  M01S00013.ns2121  +++|          SA7    L.TCMR
00946  M01S00014.ns2121  +++|          ADDWRD TLIB,X6-X6  TERMINATE PST
00947  M01S00751.sysedit +++|          SA1    L.TEPD      GET LAST WORD ADDRESS OF EPD
00948  M01S00752.sysedit +++|          SA3    F.TEPD      GET FIRST WORD ADDRESS EPD
00949  M01S00753.sysedit +++|          SB7    X3
00950  M01S00754.sysedit +++|          RJ     SST         SHELL SORT EPD TABLE
00951  M01S00755.sysedit +++|          SA5    L.TLIB      GET LENGTH OF TLIB
00952  M01S00756.sysedit +++|          SA1    L.TEPD
00953  M01S00757.sysedit +++|          ALLOC  TLIB,X1
00954  M01S00758.sysedit +++|          IX3    X2+X5       DESTINATION ADDRESS
00955  M01S00759.sysedit +++|          BX6    X6-X6
00956  M01S00760.sysedit +++|          SA2    F.TEPD      SOURCE ADDRESS
00957  M01S00761.sysedit +++|          SA6    L.TEPD
00958  M01S00762.sysedit +++|          MOVE   X1,X2,X3
00959  M01S00763.sysedit +++|
00960  M01S00764.sysedit +++| CLD      PS                 ENTRY/EXIT
00961  M01S00765.sysedit +++|          SA2    L.TSCC
00962  M01S00766.sysedit +++|          ZR     X2,CLD1     IF NO SCOPE RECORDS
00963  M01S00767.sysedit +++|          ADDWRD TSCC,X6-X6  TERMINATE TABLE
00964  M01S00768.sysedit +++|          SX6    X3-1        SET LENGTH OF TABLE
00965  M01S00769.sysedit +++|          SA6    SR
00966  M01S00770.sysedit +++| CLD1     SA1    CLDA        (B3) = START INDEX
00967  M01S00771.sysedit +++|          SB2    B1+B1
00968  M01S00772.sysedit +++|          SB3    X1
00969  M01S00773.sysedit +++|          SA2    F.TRCD
Line S00774 Modification History
M01 (Added by) sysedit
M02 (Updated by) 251l664
Seq #  *Modification Id* Act 
----------------------------+
00970  M02S00774.251l664 ---|          SX4    203071B     MASK FOR TYPES 0, 3, 4, 5, 11, 12, 20
00971  M01S00047.251l664 +++|          SX4    CLDE        MASK FOR PERMISSIBLE CLD TYPES
00972  M01S00775.sysedit +++| CLD2     SA3    X2+B3       NEXT ENTRY
00973  M01S00776.sysedit +++|          SB7    X3          CHECK TYPE
00974  M01S00777.sysedit +++|          AX1    X4,B7
00975  M01S00778.sysedit +++|          SB3    B3+B2       ADVANCE INDEX
00976  M01S00779.sysedit +++|          LX1    59
00977  M01S00780.sysedit +++|          ZR     X3,CLD10    IF END OF DIRECTORY
00978  M01S00781.sysedit +++|          CX7    X1
00979  M01S00782.sysedit +++|          PL     X1,CLD2     IF WRONG TYPE
00980  M01S00783.sysedit +++|          SX6    B3          SAVE (B3)
00981  M01S00784.sysedit +++|          SB7    X7          JUMP ON TYPE
00982  M01S00785.sysedit +++|          SA6    CLDA
00983  M01S00786.sysedit +++|          BX6    X3          SAVE NAME AND TYPE
00984  M01S00787.sysedit +++|          SX7    X3          SAVE RECORD TYPE
00985  M01S00788.sysedit +++|          SA6    NM
00986  M01S00789.sysedit +++|          SA7    TY
00987  M01S00790.sysedit +++|          JP     CLDA+B7
00988  M01S00791.sysedit +++|
00989  M01S00792.sysedit +++| CLDA     CON    0
00990  M01S00793.sysedit +++|
00991  M01S00794.sysedit +++| +        SA5    A3+B1
00992  M01S00795.sysedit +++|          BX0    X3
00993  M01S00796.sysedit +++|          EQ     PRC         PROCESS PROCEDURE RECORD
00994  M01S00797.sysedit +++|
00995  M01S00798.sysedit +++| +        SA5    A3+B1
00996  M01S00799.sysedit +++|          MX0    42
00997  M01S00800.sysedit +++|          EQ     PPU
00998  M01S00801.sysedit +++|
00999  M01S00802.sysedit +++| +        SA5    A3+1
01000  M01S00803.sysedit +++|          EQ     ABS
01001  M01S00804.sysedit +++|
01002  M01S00805.sysedit +++| +        SA5    A3+B1
01003  M01S00806.sysedit +++|          MX0    42
01004  M01S00807.sysedit +++|          EQ     ULB
01005  M01S00808.sysedit +++|
01006  M01S00809.sysedit +++| +        SA5    A3+B1
01007  M01S00810.sysedit +++|          MX0    42
01008  M01S00811.sysedit +++|          EQ     OVL
01009  M01S00812.sysedit +++|
01010  M01S00813.sysedit +++| +        SA5    A3+B1
01011  M01S00814.sysedit +++|          MX0    42
01012  M01S00815.sysedit +++|          EQ     REL
01013  M01S00816.sysedit +++|
01014  M01S00817.sysedit +++| +        SA5    A3+B1
01015  M01S00818.sysedit +++|          BX0    X3
01016  M01S00819.sysedit +++|          EQ     PRC
01017  M01S00820.sysedit +++|
Line S00821 Modification History
M01 (Added by) sysedit
M02 (Updated by) sysed2
Seq #  *Modification Id* Act 
----------------------------+
01018  M02S00821.sysed2  ---| CLD3     SX0    =C*DETECTED IN CLD.*
01019  M01S00002.sysed2  +++| CLD3     SX0    =C* CLD.*
01020  M01S00822.sysedit +++|          EQ     SFE
01021  M01S00823.sysedit +++|
01022  M01S00824.sysedit +++| CLD4     BSS    0
01023  M01S00825.sysedit +++| CLDB     RJ     PFL         PROCESS FIELD LENGTH
01024  M01S00826.sysedit +++|-         EQ     CLDC        IF DONE WITH PFL PROCESSING
01025  M01S00827.sysedit +++|
01026  M01S00828.sysedit +++| CLD5     BSS    0
01027  M01S00829.sysedit +++| CLDC     SA3    SR          GET NUMBER OF SCOPE RECORDS
01028  M01S00830.sysedit +++|          SA1    NM
01029  M01S00831.sysedit +++|*         EQ     CLD8        WHEN END OF SCOPE RECORDS TABLE
01030  M01S00832.sysedit +++|          ZR     X3,CLD7     IF NO SCOPE RECORDS
01031  M01S00833.sysedit +++|          SEARCH TSCC,X1
01032  M01S00834.sysedit +++|          ZR     X2,CLD8     IF NOT SCOPE RECORD
01033  M01S00835.sysedit +++|          SA3    SR
01034  M01S00836.sysedit +++|          SA4    PSTA        FETCH PST ENTRY
01035  M01S00837.sysedit +++|          SX6    X3-1
01036  M01S00838.sysedit +++|          MX7    1
01037  M01S00839.sysedit +++|          SA6    A3          DECREMENT COUNT
01038  M01S00840.sysedit +++|          LX7    45-59
01039  M01S00841.sysedit +++|          BX7    X4+X7
01040  M01S00842.sysedit +++|          SA7    PSTA
01041  M01S00843.sysedit +++|          NZ     X6,CLD8     IF NOT THRU WITH SCOPE RECORDS
01042  M01S00844.sysedit +++|          SA6    L.TSCC      SET TABLE EMPTY
01043  M01S00845.sysedit +++| CLD7     SA3    CLDD
01044  M01S00846.sysedit +++|          BX6    X3
01045  M01S00847.sysedit +++|          LX6    30          CHANGE TRANSFER
01046  M01S00848.sysedit +++| CLDD     SA6    CLDC
01047  M01S00849.sysedit +++|          EQ     CLD8        CONTINUE PROCESSING
01048  M01S00850.sysedit +++|
01049  M01S00851.sysedit +++| CLD8     SA5    SEPA        GET SPECIAL ENTRY POINT WORD
01050  M01S00852.sysedit +++|          SA3    PSTA        GET PST ADDRESS
01051  M01S00853.sysedit +++|          SA1    TY          GET RECORD TYPE
01052  M01S00854.sysedit +++|          BX6    X6-X6
01053  M01S00855.sysedit +++|          LX1    36
01054  M01S00856.sysedit +++|          ZR     X5,CLD9     IF NO SPECIAL ENTRY POINTS
01055  M01S00857.sysedit +++|          SA6    A5
01056  M01S00858.sysedit +++|          MX6    1
01057  M01S00859.sysedit +++| CLD9     LX6    44-59       POSITION SPECIAL ENTRY POINT FLAG
01058  M01S00860.sysedit +++|          BX3    X3+X6
01059  M01S00861.sysedit +++|          ADDWRD TLIB,X3+X1
01060  M01S00862.sysedit +++|          ZR     X5,CLD1     IF NO SPECIAL ENTRY POINTS
01061  M01S00863.sysedit +++|          MX7    1
01062  M01S00864.sysedit +++|          ADDWRD A0,X5+X7
01063  M01S00865.sysedit +++|          EQ     CLD1        CONTINUE PROCESSING
01064  M01S00866.sysedit +++|
01065  M01S00048.251l664 +++|
01066  M01S00049.251l664 +++|*         PERMISSIBLE CLD RECORD TYPES.
01067  M01S00050.251l664 +++|
01068  M01S00051.251l664 +++| CLDE     EQURT  (TXRT,RLRT,OVRT,ULRT,ABRT,PURT,PRRT)
01069  M01S00052.251l664 +++|
01070  M01S00867.sysedit +++|*         LOCATION USED TO ASSEMBLE PST ENTRY.
01071  M01S00868.sysedit +++|
01072  M01S00869.sysedit +++| PSTA     CON    0
01073  M01S00015.ns2121  +++| REL      SPACE  4,10
01074  M01S00016.ns2121  +++|**        REL - PROCESS RELOCATABLE FORMAT.
01075  M01S00870.sysedit +++|
Line S00871 Modification History
M01 (Added by) sysedit
M02 (Updated by) ns2121
Seq #  *Modification Id* Act 
----------------------------+
01076  M02S00871.ns2121  ---|
Line S00872 Modification History
M01 (Added by) sysedit
M02 (Updated by) ns2121
Seq #  *Modification Id* Act 
----------------------------+
01077  M02S00872.ns2121  ---|*         PROCESS *REL* FORMAT.
01078  M01S00873.sysedit +++|
01079  M01S00874.sysedit +++| REL      RECALL F
01080  M01S00875.sysedit +++|          RJ     INC         INTIALIZE COPY
01081  M01S00876.sysedit +++|          NZ     X7,CLD3     IF NO 77 TABLE, ERROR
01082  M01S00877.sysedit +++| REL1     SA3    B6-B1
01083  M01S00878.sysedit +++|          LX3    12
01084  M01S00879.sysedit +++|          SB4    X3-3600B    CHECK FOR *ENTR* (36) TABLE
01085  M01S00880.sysedit +++|          ZR     B4,REL2     IF 36 TABLE
01086  M01S00881.sysedit +++|          READW  X2,BUF,B1
01087  M01S00882.sysedit +++|          ZR     X1,REL1
01088  M01S00883.sysedit +++|          JP     CLD3        ERROR NO 36 TABLE
01089  M01S00884.sysedit +++|
01090  M01S00885.sysedit +++| REL2     LX3    12
01091  M01S00886.sysedit +++|          SX0    X3
01092  M01S00887.sysedit +++|          READW  F,BUF,1     READ ENTRY POINT NAME
01093  M01S00888.sysedit +++|          AX0    1
01094  M01S00889.sysedit +++|          SX6    X0
01095  M01S00890.sysedit +++|          BX5    -X0
01096  M01S00891.sysedit +++|          AX6    6
01097  M01S00892.sysedit +++|          ZR     X0,CLD3     IF ILLEGAL ENTRY POINT COUNT
01098  M01S00893.sysedit +++|          NZ     X6,CLD3     IF TOO MANY ENTRY POINTS
01099  M01S00894.sysedit +++|          RJ     CPR         CHECK PROGRAM RESIDENCE
01100  M01S00895.sysedit +++|
01101  M01S00896.sysedit +++| REL3     SA3    B6-B1       FETCH ENTRY POINT NAME
01102  M01S00897.sysedit +++|          MX2    24
01103  M01S00898.sysedit +++|          SB3    B0
01104  M01S00899.sysedit +++|          SX5    X5+B1       DECREMENT ENTRY COUNT
01105  M01S00900.sysedit +++| REL4     ZR     X6,REL5     IF SPECIAL ENTRY POINT NAME
01106  M01S00901.sysedit +++|          SA4    TSEP+B3
01107  M01S00902.sysedit +++|          BX4    X2*X4
01108  M01S00903.sysedit +++|          SB3    B3+B1
01109  M01S00904.sysedit +++|          BX6    X3-X4
01110  M01S00905.sysedit +++|          AX6    18
01111  M01S00906.sysedit +++|          NZ     X4,REL4     IF NOT END OF SPECIAL ENTRY POINTS
01112  M01S00907.sysedit +++|          RJ     AEP         ADD ENTRY POINT
01113  M01S00908.sysedit +++| REL5     ZR     X5,CLD8     IF NO MORE ENTRY POINTS
01114  M01S00909.sysedit +++|          READW  F,BUF,2
01115  M01S00910.sysedit +++|          ZR     X1,REL3     IF NOT EOR
01116  M01S00911.sysedit +++|          JP     CLD3        PROCESS ERROR
01117  M01S00017.ns2121  +++| OVL      SPACE  4,10
01118  M01S00018.ns2121  +++|**        OVL - PROCESS OVERLAY FORMAT.
01119  M01S00912.sysedit +++|
Line S00913 Modification History
M01 (Added by) sysedit
M02 (Updated by) ns2121
Seq #  *Modification Id* Act 
----------------------------+
01120  M02S00913.ns2121  ---|*         PROCESS *OVL* FORMAT.
01121  M01S00914.sysedit +++|
01122  M01S00915.sysedit +++| OVL      RJ     CPR         CHECK RESIDENCE
Line S00916 Modification History
M01 (Added by) sysedit
M02 (Updated by) sysed4
Seq #  *Modification Id* Act 
----------------------------+
01123  M02S00916.sysed4  ---|          SA3    A5-B1
01124  M01S00001.sysed4  +++|          SA3    NM          GET ENTRY POINT NAME
01125  M01S00917.sysedit +++|          RJ     AEP         ADD ENTRY POINT
01126  M01S00918.sysedit +++|          EQ     CLD5
01127  M01S00019.ns2121  +++| ULB      SPACE  4,10
01128  M01S00020.ns2121  +++|**        ULB - PROCESS USER LIBRARY FORMAT.
01129  M01S00919.sysedit +++|
Line S00920 Modification History
M01 (Added by) sysedit
M02 (Updated by) ns2121
Seq #  *Modification Id* Act 
----------------------------+
01130  M02S00920.ns2121  ---|*         PROCESS *ULIB* FORMAT.
01131  M01S00921.sysedit +++|
01132  M01S00922.sysedit +++| ULB      BX3    X0*X3       ENTER NAME AND TAG
01133  M01S00923.sysedit +++|          SX2    10000B
01134  M01S00924.sysedit +++|          ADDWRD TSCR,X3+X2
01135  M01S00925.sysedit +++|          AX5    24
01136  M01S00926.sysedit +++|          ADDWRD A0,X5
01137  M01S00927.sysedit +++|          EQ     CLD1
01138  M01S00021.ns2121  +++| PRC      SPACE  4,10
01139  M01S00022.ns2121  +++|**        PRC - PROCESS PROCEDURE FORMAT.
01140  M01S00928.sysedit +++|
Line S00929 Modification History
M01 (Added by) sysedit
M02 (Updated by) ns2121
Seq #  *Modification Id* Act 
----------------------------+
01141  M02S00929.ns2121  ---|*         PROCESS PROCEDURE RECORD.
01142  M01S00930.sysedit +++|
Line S00931 Modification History
M01 (Added by) sysedit
M02 (Updated by) 251l664
Seq #  *Modification Id* Act 
----------------------------+
01143  M02S00931.251l664 ---| PRC      SX2    20B         SEARCH FOR PROCEDURE RESIDENCY
Line S00053 Modification History
M01 (Added by) 251l664
M02 (Updated by) sysed14
Seq #  *Modification Id* Act 
----------------------------+
01144  M02S00053.sysed14 ---| PRC      SX2    PRRT        SEARCH FOR PROCEDURE RESIDENCY
Line S00932 Modification History
M01 (Added by) sysedit
M02 (Updated by) sysed14
Seq #  *Modification Id* Act 
----------------------------+
01145  M02S00932.sysed14 ---|          SEARCH TRES,X3+X2
Line S00933 Modification History
M01 (Added by) sysedit
M02 (Updated by) sysed14
Seq #  *Modification Id* Act 
----------------------------+
01146  M02S00933.sysed14 ---|          ZR     X2,CLD1     IF NOT FOUND
Line S00934 Modification History
M01 (Added by) sysedit
M02 (Updated by) sysed14
Seq #  *Modification Id* Act 
----------------------------+
01147  M02S00934.sysed14 ---|          RECALL F
01148  M01S00001.sysed14 +++| PRC      RECALL F
01149  M01S00935.sysedit +++|          RJ     INC         INITIALIZE COPY
01150  M01S00936.sysedit +++|          LX3    42
01151  M01S00937.sysedit +++|          SA2    PRCA        CHECK FOR *.PROC,*
01152  M01S00938.sysedit +++|          BX6    X3-X2
01153  M01S00939.sysedit +++|          SA3    A5-B1       GET ENTRY POINT NAME
01154  M01S00940.sysedit +++|          AX6    24
01155  M01S00941.sysedit +++|          SA5    A5
01156  M01S00942.sysedit +++|          AX5    24
Line S00943 Modification History
M01 (Added by) sysedit
M02 (Updated by) ns2050
Seq #  *Modification Id* Act 
----------------------------+
01157  M02S00943.ns2050  ---|          NZ     X6,PRC1     IF NOT *.PROC.*
Line S00001 Modification History
M01 (Added by) ns2050
M02 (Updated by) sysed14
Seq #  *Modification Id* Act 
----------------------------+
01158  M02S00001.sysed14 ---|          NZ     X6,PRC2     IF NOT *.PROC*
01159  M01S00002.sysed14 +++|          NZ     X6,CLD1     IF NOT *.PROC*
Line S00944 Modification History
M01 (Added by) sysedit
M02 (Updated by) 251l664
Seq #  *Modification Id* Act 
----------------------------+
01160  M02S00944.251l664 ---|          SX6    20B         SET *PROC* FILE TYPE
01161  M01S00054.251l664 +++|          SX6    PRRT        SET *PROC* FILE TYPE
01162  M01S00945.sysedit +++|          SA6    TY
Line S00946 Modification History
M01 (Added by) sysedit
M02 (Updated by) ns2050
Seq #  *Modification Id* Act 
----------------------------+
01163  M02S00946.ns2050  ---| PRC1     MX0    -18
Line S00002 Modification History
M01 (Added by) ns2050
M02 (Updated by) ns2121
Seq #  *Modification Id* Act 
----------------------------+
01164  M02S00002.ns2121  ---|          MX0    -18
01165  M01S00023.ns2121  +++|          MX0    -24
01166  M01S00947.sysedit +++|          BX7    -X0*X5
01167  M01S00948.sysedit +++|          SA7    PSTA
01168  M01S00949.sysedit +++|          RJ     AEP         ADD ENTRY POINT
01169  M01S00950.sysedit +++|          EQ     CLD8        CONTINUE PROCESSING
01170  M01S00951.sysedit +++|
Line S00003 Modification History
M01 (Added by) ns2050
M02 (Updated by) sysed14
Seq #  *Modification Id* Act 
----------------------------+
01171  M02S00003.sysed14 ---| PRC2     BX6    X3          SET RECORD NAME IN MESSAGE
Line S00004 Modification History
M01 (Added by) ns2050
M02 (Updated by) sysed14
Seq #  *Modification Id* Act 
----------------------------+
01172  M02S00004.sysed14 ---|          SA6    PRCC
Line S00005 Modification History
M01 (Added by) ns2050
M02 (Updated by) sysed14
Seq #  *Modification Id* Act 
----------------------------+
01173  M02S00005.sysed14 ---|          PRINT  PRCB
Line S00006 Modification History
M01 (Added by) ns2050
M02 (Updated by) sysed14
Seq #  *Modification Id* Act 
----------------------------+
01174  M02S00006.sysed14 ---|          EQ     CLD1        PROCESS NEXT ENTRY
Line S00007 Modification History
M01 (Added by) ns2050
M02 (Updated by) sysed14
Seq #  *Modification Id* Act 
----------------------------+
01175  M02S00007.sysed14 ---|
01176  M01S00952.sysedit +++| PRCA     CON    6L.PROC,
Line S00008 Modification History
M01 (Added by) ns2050
M02 (Updated by) sysed14
Seq #  *Modification Id* Act 
----------------------------+
01177  M02S00008.sysed14 ---| PRCB     DATA   H$  *** CLD ENTRY NOT GENERATED FOR - $
Line S00009 Modification History
M01 (Added by) ns2050
M02 (Updated by) sysed14
Seq #  *Modification Id* Act 
----------------------------+
01178  M02S00009.sysed14 ---| PRCC     BSSZ   1           RECORD NAME
01179  M01S00024.ns2121  +++| ABS      SPACE  4,10
01180  M01S00025.ns2121  +++|**        ABS - PROCESS ABSOLUTE FORMAT.
01181  M01S00953.sysedit +++|
Line S00954 Modification History
M01 (Added by) sysedit
M02 (Updated by) ns2121
Seq #  *Modification Id* Act 
----------------------------+
01182  M02S00954.ns2121  ---|*         PROCESS *ABS* FORMAT.
01183  M01S00955.sysedit +++|
01184  M01S00956.sysedit +++| ABS      RECALL F
01185  M01S00957.sysedit +++|          RJ     INC         INITIALIZE COPY
01186  M01S00958.sysedit +++|          NZ     X7,CLD3     IF ERROR
01187  M01S00959.sysedit +++|          SA3    X2+3        READ *OUT* POINTER
01188  M01S00960.sysedit +++|          NZ     B7,ABS1     IF NOT 5400 TABLE
01189  M01S00961.sysedit +++|          SX7    7
01190  M01S00962.sysedit +++| ABS1     SB2    X7+B1
01191  M01S00963.sysedit +++|          SX6    X3+B2       ADVANCE *OUT* OVER PROGRAM HEADER
01192  M01S00964.sysedit +++|          MX0    42
01193  M01S00965.sysedit +++|          SA6    A3
01194  M01S00966.sysedit +++|          NZ     B4,ABS2     IF NOT SCOPE *ACPM* RECORD
01195  M01S00967.sysedit +++|          SX5    B7-B1       SET ENTRY COUNT
01196  M01S00968.sysedit +++| ABS2     ZR     X5,CLD3     IF NO ENTRY POINTS
01197  M01S00969.sysedit +++|          BX1    X5
01198  M01S00970.sysedit +++|          AX1    6
01199  M01S00971.sysedit +++|          NZ     X1,CLD3     IF TOO MANY ENTRY POINTS
01200  M01S00972.sysedit +++|          RJ     CPR         CHECK RESIDENCE
01201  M01S00973.sysedit +++|          SA1    INCA        SET 5400 TABLE FL
01202  M01S00974.sysedit +++|          SA2    PSTA
01203  M01S00975.sysedit +++|          BX6    X1+X2
01204  M01S00976.sysedit +++|          SB7    B1
01205  M01S00977.sysedit +++|          BX5    -X5
01206  M01S00978.sysedit +++|          SA6    A2
01207  M01S00979.sysedit +++|          READW  F,BUF,B7    READ ENTRY POINT NAME
01208  M01S00980.sysedit +++| ABS3     SA3    B6-B1
01209  M01S00981.sysedit +++|          SX5    X5+B1
01210  M01S00982.sysedit +++|          RJ     AEP         ADD ENTRY POINT NAME
01211  M01S00983.sysedit +++| ABS4     ZR     X5,CLD4     IF NO MORE ENTRY POINTS
01212  M01S00984.sysedit +++|          READW  F,BUF,1     READ ENTRY POINT NAME
01213  M01S00985.sysedit +++|          NZ     X1,CLD3     IF EOR
01214  M01S00986.sysedit +++|          SA2    B6-B1       (X2) = ENTRY
01215  M01S00987.sysedit +++|          SB2    B0
01216  M01S00988.sysedit +++| ABS5     SA1    TSEP+B2
01217  M01S00989.sysedit +++|          ZR     X1,ABS3     IF NOT A SPECIAL ENTRY POINT
01218  M01S00990.sysedit +++|          MX4    24
01219  M01S00991.sysedit +++|          BX3    X2-X1
01220  M01S00992.sysedit +++|          SB2    B2+B1
01221  M01S00993.sysedit +++|          BX4    X4*X3
01222  M01S00994.sysedit +++|          NZ     X4,ABS5     IF NO MATCH
01223  M01S00995.sysedit +++|          SB4    X1          (B4) = SHIFT COUNT
01224  M01S00996.sysedit +++|          AX1    18
01225  M01S00997.sysedit +++|          SB7    X1
01226  M01S00998.sysedit +++|          SX5    X5+B1       DECREMENT ENTRY POINT COUNT
01227  M01S00999.sysedit +++|          SA1    PSTA
01228  M01S01000.sysedit +++|          SA4    SEPA
01229  M01S00001.ns2055  +++|          SX7    B1
01230  M01S01001.sysedit +++|          JP     B7          PROCESS SPECIAL ENTRY POINT
Line S01002 Modification History
M01 (Added by) sysedit
M02 (Updated by) ns2121
Seq #  *Modification Id* Act 
----------------------------+
01231  M02S01002.ns2121  ---|          SPACE  4,5
Line S01003 Modification History
M01 (Added by) sysedit
M02 (Updated by) ns2121
Seq #  *Modification Id* Act 
----------------------------+
01232  M02S01003.ns2121  ---|*         PROCESS *PPU* FORMAT.
01233  M01S00026.ns2121  +++| PPU      SPACE  4,10
01234  M01S00027.ns2121  +++|**        PPU - PROCESS PERIPHERAL PROCESSOR FORMAT.
01235  M01S00028.ns2121  +++|
01236  M01S01004.sysedit +++|
01237  M01S01005.sysedit +++| PPU      RJ     SPR         CHECK PROGRAM RESIDENCE
01238  M01S01006.sysedit +++|          RJ     AEP         ADD ENTRY POINT NAME
01239  M01S01007.sysedit +++|          EQ     CLD8        CONTINUE PROCESSING
01240  M01S01008.sysedit +++| LBD      SPACE  4,5
01241  M01S01009.sysedit +++|**        LBD - GENERATE LDB.
01242  M01S01010.sysedit +++|
01243  M01S01011.sysedit +++|
01244  M01S01012.sysedit +++| LBD      PS                 ENTRY/EXIT
01245  M01S01013.sysedit +++|          SA1    L.TSCR      ALLOCATE SPACE
01246  M01S01014.sysedit +++|          SA5    L.TLIB
01247  M01S01015.sysedit +++|          ALLOC  TLIB,X1
01248  M01S01016.sysedit +++|          IX3    X2+X5
01249  M01S01017.sysedit +++|          BX6    X6-X6
01250  M01S01018.sysedit +++|          SA2    F.TSCR      MOVE TSCR TO TLIB
01251  M01S01019.sysedit +++|          SA6    L.TSCR      CLEAR TSCR
01252  M01S01020.sysedit +++|          MOVE   X1,X2,X3
01253  M01S01021.sysedit +++|          EQ     LBD         RETURN
01254  M01S01022.sysedit +++| CPR      SPACE  4,15
01255  M01S01023.sysedit +++|**        CPR - CHECK PROGRAM RESIDENCE.
01256  M01S01024.sysedit +++|*
01257  M01S01025.sysedit +++|*         ENTRY  (A5) = ADDRESS OF *TRCD* ENTRY.
01258  M01S01026.sysedit +++|*
01259  M01S01027.sysedit +++|*         EXIT   (X0) = 42 BIT MASK.
01260  M01S01028.sysedit +++|*                (X6) = PROGRAM RESIDENCE ON SYSTEM DEVICE.
01261  M01S01029.sysedit +++|*                (PSTA) = RESIDENCE OF PROGRAM.
01262  M01S01030.sysedit +++|*
01263  M01S01031.sysedit +++|*         USES   A - 2, 3, 7.
01264  M01S01032.sysedit +++|*                B - NONE.
01265  M01S01033.sysedit +++|*                X - 0, 1, 2, 3, 6, 7.
01266  M01S01034.sysedit +++|*
01267  M01S01035.sysedit +++|*         CALLS  SPR.
01268  M01S01036.sysedit +++|
01269  M01S01037.sysedit +++|
01270  M01S01038.sysedit +++| CPR1     RJ     SPR         SET PROGRAM RESIDENCE
01271  M01S01039.sysedit +++|
01272  M01S01040.sysedit +++| CPR      SUBR               ENTRY/EXIT
Line S01041 Modification History
M01 (Added by) sysedit
M02 (Updated by) sysed4
Seq #  *Modification Id* Act 
----------------------------+
01273  M02S01041.sysed4  ---|          SA3    A5-B1       GET ENTRY POINT NAME
01274  M01S00002.sysed4  +++|          SA3    NM          GET ENTRY POINT NAME
01275  M01S01042.sysedit +++|          MX0    42
01276  M01S01043.sysedit +++|          SEARCH TADR,X3,X0
01277  M01S01044.sysedit +++|          ZR     X2,CPR1     IF NO MATCH FOUND
01278  M01S01045.sysedit +++|          MX1    -6
01279  M01S01046.sysedit +++|          LX2    -6
01280  M01S01047.sysedit +++|          BX7    -X1*X2
01281  M01S01048.sysedit +++|          MX6    -24
01282  M01S01049.sysedit +++|          SA2    A2+B1
01283  M01S01050.sysedit +++|          LX7    24
01284  M01S01051.sysedit +++|          BX2    -X6*X2
01285  M01S01052.sysedit +++|          MX1    1
01286  M01S01053.sysedit +++|          BX7    X7+X2
01287  M01S01054.sysedit +++|          LX1    47-59
01288  M01S01055.sysedit +++|          SA2    A5
01289  M01S01056.sysedit +++|          BX7    X7+X1
01290  M01S01057.sysedit +++|          SA7    PSTA
01291  M01S01058.sysedit +++|          ADDWRD TLIB,-X6*X2
01292  M01S01059.sysedit +++|          EQ     CPRX        RETURN
01293  M01S01060.sysedit +++| SPR      SPACE  4,10
Line S01061 Modification History
M01 (Added by) sysedit
M02 (Updated by) ns2121
Seq #  *Modification Id* Act 
----------------------------+
01294  M02S01061.ns2121  ---|**        SPR - SET PROGRAM RESIDENCE
01295  M01S00029.ns2121  +++|**        SPR - SET PROGRAM RESIDENCE.
01296  M01S01062.sysedit +++|*
01297  M01S01063.sysedit +++|*         ENTRY  (A5) = ADDRESS OF *TRCD* ENTRY.
01298  M01S01064.sysedit +++|*
Line S01065 Modification History
M01 (Added by) sysedit
M02 (Updated by) ns2121
Seq #  *Modification Id* Act 
----------------------------+
01299  M02S01065.ns2121  ---|*         EXIT   (X6) = (PSTA) = PROGRAM RESIDENCE SET
01300  M01S00030.ns2121  +++|*         EXIT   (X6) = (PSTA) = PROGRAM RESIDENCE SET.
01301  M01S01066.sysedit +++|*
Line S01067 Modification History
M01 (Added by) sysedit
M02 (Updated by) ns2121
Seq #  *Modification Id* Act 
----------------------------+
01302  M02S01067.ns2121  ---|*         USES   A - 1, 6.
01303  M01S00031.ns2121  +++|*         USES   A - 1, 2, 6.
01304  M01S01068.sysedit +++|*                B - NONE.
Line S01069 Modification History
M01 (Added by) sysedit
M02 (Updated by) ns2121
Seq #  *Modification Id* Act 
----------------------------+
01305  M02S01069.ns2121  ---|*                X - 1, 6, 7.
01306  M01S00032.ns2121  +++|*                X - 1, 2, 6, 7.
01307  M01S01070.sysedit +++|
01308  M01S01071.sysedit +++|
01309  M01S01072.sysedit +++| SPR1     MX7    -24
01310  M01S01073.sysedit +++|          BX6    -X7*X1
01311  M01S01074.sysedit +++|          SA6    PSTA        STORE RESIDENCE
01312  M01S01075.sysedit +++|
01313  M01S01076.sysedit +++| SPR      SUBR               ENTRY/EXIT
Line S01077 Modification History
M01 (Added by) sysedit
M02 (Updated by) ns2121
Seq #  *Modification Id* Act 
----------------------------+
01314  M02S01077.ns2121  ---|          SA1    A5          GET ENTRY POINT NAME
01315  M01S00033.ns2121  +++|          SA1    A5          GET TRCD ENTRY
01316  M01S00034.ns2121  +++|          SA2    F.TCMR
01317  M01S00035.ns2121  +++|          MX7    1           SET CM RESIDENT BIT
01318  M01S01078.sysedit +++|          BX6    X1
Line S01079 Modification History
M01 (Added by) sysedit
M02 (Updated by) ns2121
Seq #  *Modification Id* Act 
----------------------------+
01319  M02S01079.ns2121  ---|          MX7    1
Line S01080 Modification History
M01 (Added by) sysedit
M02 (Updated by) ns2121
Seq #  *Modification Id* Act 
----------------------------+
01320  M02S01080.ns2121  ---|          AX6    42
01321  M01S00036.ns2121  +++|          LX7    46-59
01322  M01S00037.ns2121  +++|          AX6    48
01323  M01S00038.ns2121  +++|          IX2    X2+X6
01324  M01S01081.sysedit +++|          ZR     X6,SPR1     IF NOT CM RESIDENT
Line S01082 Modification History
M01 (Added by) sysedit
M02 (Updated by) ns2121
Seq #  *Modification Id* Act 
----------------------------+
01325  M02S01082.ns2121  ---|          LX7    46-59
Line S01083 Modification History
M01 (Added by) sysedit
M02 (Updated by) ns2121
Seq #  *Modification Id* Act 
----------------------------+
01326  M02S01083.ns2121  ---|          BX6    X6+X7
01327  M01S00039.ns2121  +++|          SA1    X2
01328  M01S00040.ns2121  +++|          BX6    X1+X7
01329  M01S01084.sysedit +++|          SA6    PSTA        SET RESIDENCE
01330  M01S01085.sysedit +++|          EQ     SPRX        RETURN
01331  M01S01086.sysedit +++| AEP      SPACE  4,10
01332  M01S01087.sysedit +++|**        AEP - ADD ENTRY POINT.
01333  M01S01088.sysedit +++|*
01334  M01S01089.sysedit +++|*         ENTRY  (X3) = ENTRY POINT NAME.
01335  M01S01090.sysedit +++|*
01336  M01S01091.sysedit +++|*         USES   A - 1, 2.
01337  M01S01092.sysedit +++|*                B - NONE.
01338  M01S01093.sysedit +++|*                X - 0, 1, 2, 3.
01339  M01S01094.sysedit +++|
01340  M01S01095.sysedit +++|
01341  M01S01096.sysedit +++| AEP      SUBR               ENTRY/EXIT
01342  M01S01097.sysedit +++|          SA1    L.TLIB
01343  M01S01098.sysedit +++|          SA2    T2
01344  M01S01099.sysedit +++|          MX0    42
01345  M01S01100.sysedit +++|          IX2    X1-X2
01346  M01S01101.sysedit +++|          BX3    X0*X3
01347  M01S01102.sysedit +++|          ADDWRD TEPD,X3+X2
01348  M01S01103.sysedit +++|          EQ     AEPX        RETURN
Line S01104 Modification History
M01 (Added by) sysedit
M02 (Updated by) ns2121
Seq #  *Modification Id* Act 
----------------------------+
01349  M02S01104.ns2121  ---|
01350  M01S01105.sysedit +++| PFL      SPACE  4,10
01351  M01S01106.sysedit +++|**        PFL - PROCESS FIELD LENGTH OVERRIDE.
01352  M01S01107.sysedit +++|*
01353  M01S01108.sysedit +++|*         ENTRY  (NM) = RECORD NAME TO PROCESS.
01354  M01S01109.sysedit +++|*
01355  M01S01110.sysedit +++|*         USES   A - 1, 3, 4, 6, 7.
01356  M01S01111.sysedit +++|*                B - NONE.
01357  M01S01112.sysedit +++|*                X - 0, 1, 2, 3, 4, 6, 7.
01358  M01S01113.sysedit +++|*
01359  M01S01114.sysedit +++|*         MACROS SEARCH.
01360  M01S01115.sysedit +++|
01361  M01S01116.sysedit +++|
01362  M01S01117.sysedit +++| PFL      EQ     LIB2        ENTRY/EXIT
01363  M01S01118.sysedit +++|          BSS    0
01364  M01S01119.sysedit +++|          MX0    42+6
01365  M01S01120.sysedit +++|          SA1    NM
01366  M01S01121.sysedit +++|          LX0    6
01367  M01S01122.sysedit +++|          SEARCH TFLO,X1,X0  SEARCH FOR FIELD LENGH OVERRIDE
01368  M01S01123.sysedit +++|          ZR     X2,PFL      IF NO CHANGE
01369  M01S01124.sysedit +++|          MX7    1
01370  M01S01125.sysedit +++|          LX7    43-59
01371  M01S01126.sysedit +++|          SA4    PSTA        FETCH PST ENTRY
01372  M01S01127.sysedit +++|          MX0    12
01373  M01S01128.sysedit +++|          BX4    -X7*X4      CLEAR 5400 TABLE FLAG
01374  M01S01129.sysedit +++|          LX2    42
01375  M01S01130.sysedit +++|          BX2    X0*X2
01376  M01S01131.sysedit +++|          BX4    -X0*X4
01377  M01S01132.sysedit +++|          BX7    X2+X4
01378  M01S01133.sysedit +++|          SA1    NF          DECREMENT COUNT OF FL ENTRIES
01379  M01S01134.sysedit +++|          SX6    X1-1
01380  M01S01135.sysedit +++|          SA7    A4          STORE CLD ENTRY
01381  M01S01136.sysedit +++|          SA6    A1
01382  M01S01137.sysedit +++| PFL1     NZ     X6,PFL      IF NOT END OF FL PROCESSING
01383  M01S01138.sysedit +++|          SA3    CLDB
01384  M01S01139.sysedit +++|          BX7    X3
01385  M01S01140.sysedit +++|          SA6    L.TFLO      SET TABLE EMPTY
01386  M01S01141.sysedit +++|          LX7    30          CHANGE TRANSFER
01387  M01S01142.sysedit +++|          SA7    CLDB
01388  M01S01143.sysedit +++|          EQ     PFL         RETURN
01389  M01S01144.sysedit +++| TSEP     SPACE  4,25
01390  M01S01145.sysedit +++|**        SPECIAL ENTRY POINT DIRECTORY ENTRY.
01391  M01S01146.sysedit +++|*
Line S01147 Modification History
M01 (Added by) sysedit
M02 (Updated by) ns2055
Seq #  *Modification Id* Act 
----------------------------+
01392  M02S01147.ns2055  ---|*T SEPA   1/A,4/0,1/H,1/B,1/C,1/D,1/E,1/F,1/G,12/0,18/DA,18/SA
Figure SEPA

0171829SADA3035364748495051525354555859DA0GFEDCBH0A


Line S00002 Modification History
M01 (Added by) ns2055
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
01393  M02S00002.242l642 ---|*T SEPA   1/A,3/0,1/I,1/H,1/B,1/C,1/D,1/E,1/F,1/G,12/0,18/DA,18/SA
Figure SEPA

0171829SADA303536474849505152535455565859DA0GFEDCBHI0A


Line S00001 Modification History
M01 (Added by) 242l642
M02 (Updated by) ns2578
Seq #  *Modification Id* Act 
----------------------------+
01394  M02S00001.ns2578  ---|*T SEPA   1/A,1/J,2/0,1/I,1/H,1/B,1/C,1/D,1/E,1/F,1/G,12/0,18/DA,18/SA
Figure SEPA

0171829SADA30353647484950515253545556575859DA0GFEDCBHI0JA

01395  M01S00001.ns2578  +++|*T SEPA   1/A,1/J,2/0,1/I,1/H,1/B,1/C,1/D,1/E,1/F,1/G,1/K,11/0,18/DA,
Figure SEPA

Bitfield Rendering Failure
======== ========= =======
The field description 
[
{ "name": "", "bits": , "type": 1 },
{ "name": "DA", "bits": 18, "type": 0 },
{ "name": "0", "bits": 11, "type": 6 },
{ "name": "K", "bits": 1, "type": 5 },
{ "name": "G", "bits": 1, "type": 4 },
{ "name": "F", "bits": 1, "type": 3 },
{ "name": "E", "bits": 1, "type": 2 },
{ "name": "D", "bits": 1, "type": 1 },
{ "name": "C", "bits": 1, "type": 0 },
{ "name": "B", "bits": 1, "type": 6 },
{ "name": "H", "bits": 1, "type": 5 },
{ "name": "I", "bits": 1, "type": 4 },
{ "name": "0", "bits": 2, "type": 3 },
{ "name": "J", "bits": 1, "type": 2 },
{ "name": "A", "bits": 1, "type": 1 }
]


 is invalid.

Please check your syntax and try again.

01396  M01S00002.ns2578  +++|*         18/SA
01397  M01S01148.sysedit +++|*
01398  M01S01149.sysedit +++|*         WHERE-
01399  M01S01150.sysedit +++|*         A      SET TO INDICATE SPECIAL ENTRY POINT TABLE ENTRY.
01400  M01S01151.sysedit +++|*         B      SET IF ARG= ENTRY POINT PRESENT.
01401  M01S01152.sysedit +++|*         C      SET IF DMP= ENTRY POINT PRESENT.
01402  M01S01153.sysedit +++|*                (*DA* IS ASSOCIATED PARAMETER.)
01403  M01S01154.sysedit +++|*         D      SET IF SDM= ENTRY POINT PRESENT.
01404  M01S01155.sysedit +++|*         E      SET IF SSJ= ENTRY POINT PRESENT.
01405  M01S01156.sysedit +++|*                (*SA* IS ASSOCIATED ADDRESS.)
01406  M01S01157.sysedit +++|*         F      SET IF VAL= ENTRY POINT PRESENT.
01407  M01S01158.sysedit +++|*         G      SET IF SSM= ENTRY POINT PRESENT.
01408  M01S01159.sysedit +++|*         H      SET IF CLB= ENTRY POINT PRESENT.
01409  M01S00003.ns2055  +++|*         I      SET IF LDR= ENTRY POINT PRESENT.
01410  M01S00002.242l642 +++|*         J      SET IF UTL= ENTRY POINT PRESENT.
Line S01160 Modification History
M01 (Added by) sysedit
M02 (Updated by) ns2578
Seq #  *Modification Id* Act 
----------------------------+
01411  M02S01160.ns2578  ---|*         DA     = VFD  2/0,1/S,1/C,1/F,1/U,12/FL
Line S01161 Modification History
M01 (Added by) sysedit
M02 (Updated by) ns2578
Seq #  *Modification Id* Act 
----------------------------+
01412  M02S01161.ns2578  ---|*                WHERE, S = SUPPRESS DMP= ON CONTROL CARD CALL.
01413  M01S00003.ns2578  +++|*         K      SET IF DPA= ENTRY POINT PRESENT.
01414  M01S00004.ns2578  +++|*         DA     =  1/R,1/T,1/S,1/C,1/F,1/U,12/FL
01415  M01S00005.ns2578  +++|*                WHERE, R = RESTART FLAG.
01416  M01S00006.ns2578  +++|*                       T = SET OVERRIDE REQUIRED STATUS.
01417  M01S00007.ns2578  +++|*                       S = SUPPRESS DMP= ON CONTROL CARD CALL.
01418  M01S01162.sysedit +++|*                       C = ONLY CREATE DM* WITH NOTHING ON IT.
01419  M01S01163.sysedit +++|*                       F = DUMP FNT ENTRIES TO FILE DM*.
01420  M01S01164.sysedit +++|*                       U = CREATE FILE DM* AS AN UNLOCKED FILE.
01421  M01S01165.sysedit +++|*                       FL = 0, FOR DUMP OF FULL FL.
01422  M01S01166.sysedit +++|*                          " 0, FOR DUMP OF FL*100B OF FL.
01423  M01S01167.sysedit +++|*         SA     SSJ= PARAMETER AREA ADDRESS.
01424  M01S01168.sysedit +++|
01425  M01S01169.sysedit +++|
01426  M01S01170.sysedit +++| SEPA     CON    0           SPECIAL ENTRY POINT WORD
01427  M01S01171.sysedit +++| TSEP     SPACE  4,5
01428  M01S01172.sysedit +++|**        TSEP - TABLE OF SPECIAL ENTRY POINTS.
01429  M01S01173.sysedit +++|
01430  M01S01174.sysedit +++|
01431  M01S01175.sysedit +++| TSEP     VFD    24/0LARG=,18/SEP9,18/53  CONTROL STMT CONTROL
01432  M01S01176.sysedit +++|          VFD    24/0LDMP=,18/SEP1,18/52  DUMP CONTROL
01433  M01S00008.ns2578  +++|          VFD    24/0LDPA=,18/SEP9,18/47  *DMP=* ARGUMENT CONTROL
01434  M01S01177.sysedit +++|          VFD    24/0LMFL=,18/SEP5,18/48  MINIMUM FL CONTROL
01435  M01S01178.sysedit +++|          VFD    24/0LRFL=,18/SEP6,18/48  FIELD LENGTH CONTROL
01436  M01S01179.sysedit +++|          VFD    24/0LSDM=,18/SEP9,18/51  SUPPRESS DAYFILE CONTROL
01437  M01S01180.sysedit +++|          VFD    24/0LSSJ=,18/SEP2,18/50  SPECIAL SYSTEM JOB CONTROL
01438  M01S01181.sysedit +++|          VFD    24/0LVAL=,18/SEP9,18/49  VALIDATION JOB CONTROL
01439  M01S01182.sysedit +++|          VFD    24/0LSSM=,18/SEP9,18/48  FL DUMP PROHIBITED
01440  M01S01183.sysedit +++|          VFD    24/0LCLB=,18/SEP8,18/54  COMMAND LINE BUFFER FET
01441  M01S00004.ns2055  +++|          VFD    24/0LLDR=,18/SEP10,18/55 EXECUTE-ONLY READ CONTROL
01442  M01S00001.ns2055a +++|          VFD    24/0LLIB=,18/SEP9,18/55  EXECUTE-ONLY READ CONTROL
01443  M01S00003.242l642 +++|          VFD    24/0LUTL=,18/SEP9,18/56  PF UTILITIES CONTROL
01444  M01S01184.sysedit +++|          VFD    24/0LNPC=,18/ABS4,18/0   NOS CRACKING FORMAT FLAG
01445  M01S01185.sysedit +++|          CON    0
01446  M01S01186.sysedit +++|          SPACE  4,5
01447  M01S01187.sysedit +++|**        *ARG=* ENTRY POINT.
01448  M01S01188.sysedit +++|*         ARG= ENTRY POINT PREVENTS ARGUMENTS FROM BEING PASSED
01449  M01S01189.sysedit +++|*         TO RA + ARGR, AND SUPPRESSES ARGUMENT CHECKING.
01450  M01S01190.sysedit +++|
01451  M01S01191.sysedit +++|
01452  M01S01192.sysedit +++|**        *DMP=* ENTRY POINT.
01453  M01S01193.sysedit +++|*         DMP= SPECIFIES AMOUNT/100B OF FIELD LENGTH TO DUMP BEFORE
01454  M01S01194.sysedit +++|*         LOADING PROGRAM WITH *DMP=* ENTRY POINT.
01455  M01S01195.sysedit +++|*         DMP=   = VFD  2/0,1/S,1/C,1/F,1/U,12/FL
01456  M01S01196.sysedit +++|*                WHERE, S = SUPPRESS DMP= ON CONTROL CARD CALL.
01457  M01S01197.sysedit +++|*                       C = ONLY CREATE DM* WITH NOTHING ON IT.
01458  M01S01198.sysedit +++|*                       F = DUMP FNT ENTRIES TO FILE DM*.
01459  M01S01199.sysedit +++|*                       U = CREATE FILE DM* AS AN UNLOCKED FILE.
01460  M01S01200.sysedit +++|*                       FL = 0, FOR DUMP OF FULL FL.
01461  M01S01201.sysedit +++|*                          " 0, FOR DUMP OF FL*100B OF FL.
01462  M01S00009.ns2578  +++|
01463  M01S00010.ns2578  +++|**        *DPA=* ENTRY POINT.
01464  M01S00011.ns2578  +++|*         *DPA=* SIGNIFIES THAT ARGUMENTS ARE PASSED TO A *DMP=*
01465  M01S00012.ns2578  +++|*         PROGRAM VIA *ARGR* AND *ACTR*.
01466  M01S00013.ns2578  +++|
01467  M01S01202.sysedit +++|
01468  M01S01203.sysedit +++|**        *RFL=* ENTRY POINT.
01469  M01S01204.sysedit +++|*         RFL= DESIGNATES THE AMOUNT OF FIELD LENGTH REQUIRED TO
01470  M01S01205.sysedit +++|*         LOAD THE JOB CONTAINING IT.
01471  M01S01206.sysedit +++|
01472  M01S01207.sysedit +++|**        *MFL=* ENTRY POINT.
01473  M01S01208.sysedit +++|*         MFL= DESIGNATES THE MINIMUM FIELD LENGTH REQUIRED BY
01474  M01S01209.sysedit +++|*         THE JOB.  FIELD LENGTH WILL BE INCREASED TO THIS VALUE
01475  M01S01210.sysedit +++|*         IF LESS THAN THIS VALUE.
01476  M01S01211.sysedit +++|
01477  M01S01212.sysedit +++|**        *SDM=* ENTRY POINT.
01478  M01S01213.sysedit +++|*         SDM= ENTRY POINT CAUSES NO DAYFILE MESSAGE TO BE
01479  M01S01214.sysedit +++|*         GENERATED FOR THE CONTROL CARD CALL.
01480  M01S01215.sysedit +++|
01481  M01S01216.sysedit +++|**        *SSJ=* ENTRY POINT.
01482  M01S01217.sysedit +++|*         SSJ= ENTRY POINT MUST BE PRESENT FOR A JOB TO BE ENTERED
01483  M01S01218.sysedit +++|*         AS A SPECIAL SYSTEM JOB.
01484  M01S01219.sysedit +++|*         (*RFL=* ENTRY POINT MUST PRECEDE *SSJ=* TO ALLOW
01485  M01S01220.sysedit +++|*         ADDRESS VALIDATION IF OTHER THAN ZERO.)
01486  M01S01221.sysedit +++|
01487  M01S01222.sysedit +++|**        *VAL=* ENTRY POINT.
01488  M01S01223.sysedit +++|*         JOBS CONTAINING VAL= ENTRY POINTS ARE THE ONLY JOBS
01489  M01S01224.sysedit +++|*         ALLOWED TO EXECUTE WHEN VALIDATION BITS ARE SET IN THE
01490  M01S01225.sysedit +++|*         CONTROL POINT AREA.
01491  M01S01226.sysedit +++|
01492  M01S01227.sysedit +++|**        *SSM=* ENTRY POINT.
01493  M01S01228.sysedit +++|*         SSM= ENTRY POINT PREVENTS DUMPS OF THE FIELD LENGTH
01494  M01S01229.sysedit +++|*                ASSOCIATED WITH THE JOBS CONTROL POINT.
01495  M01S01230.sysedit +++|
01496  M01S01231.sysedit +++|**        *CLB=* ENTRY POINT.
01497  M01S01232.sysedit +++|*         THE VALUE OF THE CLB= ENTRY POINT SPECIFIES THE ADDRESS
01498  M01S01233.sysedit +++|*         OF THE INPUT FET FOR A COMMAND LINE BUFFER.  THE COMMAND
01499  M01S01234.sysedit +++|*         LINE WILL BE TRANSFERRED TO THE BUFFER BEFORE THE PROGRAM
01500  M01S01235.sysedit +++|*         CONTAINING THE CLB= BEGINS EXECUTION.  THIS IS ONLY
01501  M01S01236.sysedit +++|*         VALID FOR TXOT JOBS.
01502  M01S01237.sysedit +++|
01503  M01S00005.ns2055  +++|**        *LDR=* ENTRY POINT.
01504  M01S00006.ns2055  +++|*         THE *LDR=* ENTRY POINT ALLOWS THE LOADED PROGRAM
01505  M01S00007.ns2055  +++|*         TO USE *CIO* CALLS TO READ AN *EXECUTE-ONLY* FILE.
01506  M01S00002.ns2055a +++|
01507  M01S00003.ns2055a +++|**        *LIB=* ENTRY POINT.
01508  M01S00004.ns2055a +++|*         THE *LIB=* ENTRY POINT IS DEFINED TO ALLOW THE GLOBAL
01509  M01S00005.ns2055a +++|*         LIBRARY UTILITY EXECUTE-ONLY FILE ACCESS.  THIS ENTRY
01510  M01S00006.ns2055a +++|*         POINT SHOULD NOT BE USED BY ANY OTHER PROGRAM IF
01511  M01S00007.ns2055a +++|*         SYSTEM EXECUTE-ONLY FILE SECURITY IS TO BE MAINTAINED.
01512  M01S01238.sysedit +++|
01513  M01S00004.242l642 +++|**        *UTL=* ENTRY POINT.
01514  M01S00005.242l642 +++|*         ALLOWS JOBS (PRIMARILY INTENDED FOR PF UTILITIES) TO
01515  M01S00006.242l642 +++|*         EXECUTE ON AN *OFF* DEVICE, WHEREAS JOBS WILL NORMALLY
01516  M01S00007.242l642 +++|*         ROLLOUT WHEN ATTEMPTING TO ACCESS SUCH A DEVICE UNTIL IT
01517  M01S00008.242l642 +++|*         HAS BEEN RETURNED TO SERVICE.
01518  M01S00009.242l642 +++|
01519  M01S01239.sysedit +++|**        *NPC=* ENTRY POINT.
01520  M01S01240.sysedit +++|*         SETS NOS CRACKING FORMAT WHEN PROGRAM IS EXECUTED
01521  M01S01241.sysedit +++|*         FROM A USER LIBRARY.  IT IS IGNORED BY *SYSEDIT*.
01522  M01S01242.sysedit +++|
01523  M01S01243.sysedit +++|*         PROCESS *DMP=* ENTRY.
01524  M01S01244.sysedit +++|
01525  M01S01245.sysedit +++| SEP1     MX3    -18
01526  M01S01246.sysedit +++|          BX2    -X0*X2
01527  M01S01247.sysedit +++|          SA1    SEPA
01528  M01S01248.sysedit +++|          LX3    18
01529  M01S01249.sysedit +++|          MX4    -1
01530  M01S01250.sysedit +++|          LX2    18
01531  M01S01251.sysedit +++|          BX1    X3*X1
01532  M01S01252.sysedit +++|          SX6    B1
01533  M01S01253.sysedit +++|          BX1    X2+X1
01534  M01S01254.sysedit +++|          EQ     SEP7
01535  M01S01255.sysedit +++|
01536  M01S01256.sysedit +++|*         PROCESS *SSJ=* ENTRY.
01537  M01S01257.sysedit +++|
01538  M01S01258.sysedit +++| SEP2     BX6    -X0*X2
01539  M01S01259.sysedit +++|          MX3    -17
01540  M01S01260.sysedit +++|          AX1    48
01541  M01S01261.sysedit +++|          BX2    -X3*X2
01542  M01S01262.sysedit +++|          SX4    X2+SSJL     ADD PARAMETER AREA BUFFER
01543  M01S01263.sysedit +++|          MX3    -11
01544  M01S01264.sysedit +++|          BX1    -X3*X1
01545  M01S01265.sysedit +++|          ZR     X2,SEP3     IF NO ADDRESS SPECIFIED
01546  M01S01266.sysedit +++|          LX1    6
01547  M01S01267.sysedit +++|          IX1    X1-X4
01548  M01S01268.sysedit +++|          NG     X1,ABS4     IF ILLEGAL ADDRESS
01549  M01S01269.sysedit +++| SEP3     SA1    SEPA        SET SSJ= ADDRESS IN WORD
01550  M01S01270.sysedit +++|          BX1    X0*X1
01551  M01S01271.sysedit +++|          BX1    X1+X6
01552  M01S01272.sysedit +++| SEP4     MX4    -1
01553  M01S01273.sysedit +++|          SX6    B1
01554  M01S01274.sysedit +++|          EQ     SEP7
01555  M01S01275.sysedit +++|
01556  M01S01276.sysedit +++|*         PROCESS *MFL=* ENTRY.
01557  M01S01277.sysedit +++|
01558  M01S01278.sysedit +++| SEP5     SX2    X2+400000B
01559  M01S01279.sysedit +++|
01560  M01S01280.sysedit +++|*         PROCESS *RFL=* ENTRY.
01561  M01S01281.sysedit +++|
01562  M01S01282.sysedit +++| SEP6     SX6    X2+77B      ROUND FIELD LENGTH
01563  M01S01283.sysedit +++|          MX4    -12
01564  M01S01284.sysedit +++|          AX6    6
01565  M01S01285.sysedit +++| SEP7     LX4    X4,B4       SHIFT COMPLEMENT MASK
01566  M01S01286.sysedit +++|          BX3    X4*X1       CLEAR FIELD
01567  M01S01287.sysedit +++|          LX6    X6,B4       SHIFT VALUE
Line S01288 Modification History
M01 (Added by) sysedit
M02 (Updated by) ns2055
Seq #  *Modification Id* Act 
----------------------------+
01568  M02S01288.ns2055  ---|          BX7    -X4*X6      MASK OFF VALUE
Line S01289 Modification History
M01 (Added by) sysedit
M02 (Updated by) ns2055
Seq #  *Modification Id* Act 
----------------------------+
01569  M02S01289.ns2055  ---|          BX6    X3+X7       ADD VALUE TO FIELD
01570  M01S00008.ns2055  +++|          BX6    -X4*X6      MASK OFF VALUE
01571  M01S00009.ns2055  +++|          BX6    X3+X6       ADD VALUE TO FIELD
01572  M01S01290.sysedit +++|          SA6    A1          ENTER PARAMETER
01573  M01S00010.ns2055  +++|          ZR     X7,ABS3     IF LDR= ENTRY
01574  M01S01291.sysedit +++|          EQ     ABS4        LOOP FOR NEXT ENTRY
01575  M01S01292.sysedit +++|
01576  M01S01293.sysedit +++|*         PROCESS *CLB=* ENTRY.
01577  M01S01294.sysedit +++|
01578  M01S01295.sysedit +++| SEP8     MX3    -17
01579  M01S01296.sysedit +++|          AX1    48
01580  M01S01297.sysedit +++|          BX2    -X3*X2      GET CLB= VALUE
01581  M01S01298.sysedit +++|          MX3    -11
01582  M01S01299.sysedit +++|          SX4    X2+105B
01583  M01S01300.sysedit +++|          BX1    -X3*X1      GET MFL= VALUE
01584  M01S01301.sysedit +++|          LX1    6
01585  M01S01302.sysedit +++|          IX1    X1-X4
01586  M01S01303.sysedit +++|          NG     X1,ABS4     IF ILLEGAL VALUE
01587  M01S01304.sysedit +++|
Line S01305 Modification History
M01 (Added by) sysedit
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
01588  M02S01305.242l642 ---|*         PROCESS *ARG=*, *SDM=*, *VAL=*, *SSM=* ENTRIES.
Line S00010 Modification History
M01 (Added by) 242l642
M02 (Updated by) ns2578
Seq #  *Modification Id* Act 
----------------------------+
01589  M02S00010.ns2578  ---|*         PROCESS *ARG=*, *SDM=*, *VAL=*, *SSM=*, *UTL=* ENTRIES.
01590  M01S00014.ns2578  +++|*         PROCESS *ARG=*, *DPA=*, *SDM=*, *SSM=*, *UTL=* AND *VAL=*
01591  M01S00015.ns2578  +++|*         ENTRIES.
01592  M01S01306.sysedit +++|
01593  M01S01307.sysedit +++| SEP9     SA1    SEPA
01594  M01S01308.sysedit +++|          EQ     SEP4
01595  M01S00011.ns2055  +++|
01596  M01S00012.ns2055  +++|*         PROCESS LDR= ENTRY.
01597  M01S00013.ns2055  +++|
01598  M01S00014.ns2055  +++| SEP10    SA1    SEPA
01599  M01S00015.ns2055  +++|          SX5    X5-1        ADJUST ENTRY POINT COUNT
01600  M01S00016.ns2055  +++|          BX7    X7-X7
01601  M01S00017.ns2055  +++|          EQ     SEP4        CONTINUE
01602  M01S01309.sysedit +++| ELD      SPACE  4,10
01603  M01S01310.sysedit +++|**        ELD - ENTER PERIPHERAL LIBRARY DIRECTORY.
01604  M01S01311.sysedit +++|*
01605  M01S01312.sysedit +++|*         ENTRY  (X0) = 18 BIT MASK.
01606  M01S01313.sysedit +++|*                (X5) = PLD ENTRY.
01607  M01S01314.sysedit +++|*
01608  M01S01315.sysedit +++|*         USES   A - 3, 6.
01609  M01S01316.sysedit +++|*                B - 4, 7.
01610  M01S01317.sysedit +++|*                X - 2, 3, 6, 7.
01611  M01S01318.sysedit +++|
01612  M01S01319.sysedit +++|
01613  M01S01320.sysedit +++| ELD      SUBR               ENTRY/EXIT
01614  M01S01321.sysedit +++|          ALLOC  TLIB,B1     ALLOCATE SPACE FOR ENTRY
01615  M01S01322.sysedit +++|          SB4    X2          SET START OF DIRECTORY
01616  M01S01323.sysedit +++|          SB7    B4+X3
01617  M01S01324.sysedit +++|          BX2    X0*X5
01618  M01S01325.sysedit +++|          SB7    B7-B1       SET END OF DIRECTORY
01619  M01S01326.sysedit +++| ELD1     EQ     B4,B7,ELD2  IF START OF DIRECTORY
01620  M01S01327.sysedit +++|          SA3    B7-B1       READ NEXT ENTRY
01621  M01S01328.sysedit +++|          BX7    X0*X3
01622  M01S01329.sysedit +++|          BX6    X3          MOVE ENTRY DOWN
01623  M01S01330.sysedit +++|          IX7    X2-X7
01624  M01S01331.sysedit +++|          SA6    A3+B1
Proceed to Part 1
cdc/nos2.source/opl.opl871/deck/sysedit.txt ยท Last modified: by 127.0.0.1