Deck PFLOAD Part 008

34 Modifications

Source

Seq #  *Modification Id* Act 
----------------------------+
09172  M01S04999.ns22000 ---| INCF     BSSZ   1
09173  M01S05000.ns22000 ---|
09174  M01S05001.ns22000 ---|
09175  M01S05002.ns22000 ---|*         ARGUMENT TABLE
09176  M01S05003.ns22000 ---|
09177  M01S05004.ns22000 ---|
09178  M01S05005.ns22000 ---| ARGT     BSS    0
09179  M01S05006.ns22000 ---| L        ARG    -KBIC,LTPR
09180  M01S05007.ns22000 ---| E        ARG    -KBIC,ENPR
09181  M01S05008.ns22000 ---|          BSSZ   1
09182  M01S05009.ns22000 ---|
09183  M01S05010.ns22000 ---| KBIC     CON    1
09184  M01S05011.ns22000 ---|          TITLE  SUBROUTINES - INCREMENTAL LOAD
Line S02231 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
09185  M01S02231.ns22000 +++|          TITLE  INCREMENTAL LOAD SUBROUTINES.
Line S00050 Modification History
M01 (Added by) pfloa19
Seq #  *Modification Id* Act 
----------------------------+
09186  M01S00050.pfloa19 +++| AAT      SPACE  4,20
09187  M01S00051.pfloa19 +++|**        AAT - ASSIGN NEXT ARCHIVE TAPE.
09188  M01S00052.pfloa19 +++|*
09189  M01S00053.pfloa19 +++|*         ENTRY  (X1) = VSN LEFT JUSTIFIED.
09190  M01S00054.pfloa19 +++|*
09191  M01S00055.pfloa19 +++|*         EXIT   (X6) = 0 IF NEW ARCHIVE TAPE ASSIGNED.
09192  M01S00056.pfloa19 +++|*                (X6) .NE. 0 IF ARCHIVE FILE LABEL BAD OR MISSING ON
09193  M01S00057.pfloa19 +++|*                  SELECTED TAPE.
09194  M01S00058.pfloa19 +++|*                OLD ARCHIVE FILE UNLOADED.
09195  M01S00059.pfloa19 +++|*                ARCHIVE FILE LABEL PROCESSED IF LABEL GOOD.
09196  M01S00060.pfloa19 +++|*
09197  M01S00061.pfloa19 +++|*         USES   X - 1, 4, 5, 6, 7.
09198  M01S00062.pfloa19 +++|*                A - 1, 4, 6, 7.
09199  M01S00063.pfloa19 +++|*
09200  M01S00064.pfloa19 +++|*         CALLS  PAL, ZTB.
09201  M01S00065.pfloa19 +++|*
09202  M01S00066.pfloa19 +++|*         MACROS LABEL, READCW, UNLOAD.
09203  M01S00067.pfloa19 +++|
09204  M01S00068.pfloa19 +++|
09205  M01S00069.pfloa19 +++| AAT      SUBR               ENTRY/EXIT
09206  M01S00070.pfloa19 +++|          RJ     ZTB         SPACE FILL VSN
09207  M01S00071.pfloa19 +++|          MX7    36
09208  M01S00072.pfloa19 +++|          BX7    X7*X6
09209  M01S00073.pfloa19 +++|          SX6    B0
09210  M01S00074.pfloa19 +++|          SA7    TAPE+11B    SET VSN IN FET
09211  M01S00075.pfloa19 +++|          SA6    A7+B1       CLEAR TAPE LABEL PARAMETERS
09212  M01S00076.pfloa19 +++|          SA6    A6+B1
09213  M01S00077.pfloa19 +++|          SA6    A6+B1
09214  M01S00078.pfloa19 +++|          SA6    A6+B1
09215  M01S00079.pfloa19 +++|          UNLOAD TAPE,R      UNLOAD OLD ARCHIVE FILE
09216  M01S00080.pfloa19 +++|          SA4    X2+B1       CLEAR DEVICE TYPE
09217  M01S00081.pfloa19 +++|          MX6    -48
09218  M01S00082.pfloa19 +++|          SX5    1           CLEAR ERROR PROCESSING BIT
09219  M01S00083.pfloa19 +++|          BX4    -X6*X4
09220  M01S00084.pfloa19 +++|          LX5    44
09221  M01S00085.pfloa19 +++|          BX6    -X5*X4
09222  M01S00086.pfloa19 +++|          SA6    A4
09223  M01S00087.pfloa19 +++|          LABEL  TAPE        REQUEST ARCHIVE TAPE
09224  M01S00088.pfloa19 +++|          SA4    X2+B1       SET ERROR PROCESSING BIT
09225  M01S00089.pfloa19 +++|          BX6    X5+X4
09226  M01S00090.pfloa19 +++|          SA6    A4
09227  M01S00091.pfloa19 +++|          SA1    X2+B1       SET IN=OUT=FIRST
09228  M01S00092.pfloa19 +++|          SX6    X1
09229  M01S00093.pfloa19 +++|          SA6    A1+B1
09230  M01S00094.pfloa19 +++|          SA6    A6+B1
09231  M01S00095.pfloa19 +++|          READCW X2,17B      INITIATE CONTROL WORD READ
09232  M01S00096.pfloa19 +++|          SX6    B0+         CLEAR CONTROL WORD STATUS WORD
09233  M01S00097.pfloa19 +++|          SA6    TAPE+CWSW
09234  M01S00098.pfloa19 +++|          RJ     PAL         CHECK ARCHIVE LABEL
09235  M01S00099.pfloa19 +++|          ZR     X6,AATX     IF GOOD ARCHIVE FILE LABEL
09236  M01S00100.pfloa19 +++|          UNLOAD TAPE,R      UNLOAD TAPE
09237  M01S00101.pfloa19 +++|          SX6    B1          SET ASSIGNMENT NOT MADE
09238  M01S00102.pfloa19 +++|          EQ     AATX        RETURN
09239  M00S05012.pfload  +++| ART      SPACE  4,20
09240  M00S05013.pfload  +++|**        ART - ARCHIVE FILE TRANSITION PROCESSOR.
09241  M00S05014.pfload  +++|*
09242  M00S05015.pfload  +++|*         ENTRY  END OF INCREMENTAL LOAD FILE DETECTED.
09243  M00S05016.pfload  +++|*
09244  M00S05017.pfload  +++|*         EXIT   (X6) = 0 IF NOT END OF INCREMENTAL LOAD.
09245  M00S05018.pfload  +++|*                     = NON-ZERO IF END OF INCREMENTAL LOAD.
09246  M00S05019.pfload  +++|*                UTILITY PROCESSOR INACTIVE.
09247  M00S05020.pfload  +++|*                UTILITY INTERLOCK CLEAR.
09248  M00S05021.pfload  +++|*                FILES REMAINING ON CATALOG IMAGE RECORD LISTED IF
09249  M00S05022.pfload  +++|*                SELECTED BY OPERATOR.
09250  M00S05023.pfload  +++|*                NEW ARCHIVE FILE ASSIGNED IF NOT END OF LOAD.
09251  M00S05024.pfload  +++|*
Line S05025 Modification History
M01 (Removed by) pfloa19
Seq #  *Modification Id* Act 
----------------------------+
09252  M01S05025.pfloa19 ---|*         CALLS  COD, SFN.
Line S00103 Modification History
M01 (Added by) pfloa19
Seq #  *Modification Id* Act 
----------------------------+
09253  M01S00103.pfloa19 +++|*         USES   X - 1, 2, 4, 5, 6, 7.
09254  M01S00104.pfloa19 +++|*                A - 1, 2, 4, 5, 7.
09255  M01S00105.pfloa19 +++|*                B - 2, 3, 4, 5.
09256  M00S05026.pfload  +++|*
Line S05027 Modification History
M01 (Removed by) pfloa19
Seq #  *Modification Id* Act 
----------------------------+
09257  M01S05027.pfloa19 ---|*         USES   X - 1, 4, 5, 6, 7.
09258  M01S05028.pfloa19 ---|*                A - 1, 4, 5, 7.
09259  M01S05029.pfloa19 ---|*                B - 2, 3, 4, 5.
09260  M01S05030.pfloa19 ---|*
09261  M01S05031.pfloa19 ---|*         CALLS  AAF, ARG, CCI, CIN, CMA, DUP, KIP, LFS.
Line S00106 Modification History
M01 (Added by) pfloa19
M02 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
09262  M02S00106.286l859 ---|*         CALLS  AAT, ARG, CCI, CIN, CMA, DUP, KIP, LFS, SRS, ZTB.
Line S00758 Modification History
M01 (Added by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
09263  M01S00758.286l859 +++|*         CALLS  AAT, ARM, CCI, CIN, CMA, DUP, KIP, LFS, SRS, USB, ZTB.
09264  M00S05032.pfload  +++|*
09265  M00S05033.pfload  +++|*         MACROS MOVE.
09266  M00S05034.pfload  +++|
09267  M00S05035.pfload  +++|
09268  M00S05036.pfload  +++| ART      SUBR               ENTRY/EXIT
Line S00107 Modification History
M01 (Added by) pfloa19
Seq #  *Modification Id* Act 
----------------------------+
09269  M01S00107.pfloa19 +++|
09270  M01S00108.pfloa19 +++|*         DROP *PFU* AND FLUSH CIR BUFFER.
09271  M01S00109.pfloa19 +++|
09272  M00S05037.pfload  +++|          RJ     DUP         DROP UTILITY PROCESSOR
Line S05038 Modification History
M01 (Removed by) pfloa19
Seq #  *Modification Id* Act 
----------------------------+
09273  M01S05038.pfloa19 ---|          RJ     CIN         CLEAR UTILITY INTERLOCK.
09274  M01S05039.pfloa19 ---| ART1     BX7    X7-X7       CLEAR OPERATOR PARAMETERS
Line S00110 Modification History
M01 (Added by) pfloa19
Seq #  *Modification Id* Act 
----------------------------+
09275  M01S00110.pfloa19 +++|          RJ     CIN         CLEAR UTILITY INTERLOCK
09276  M01S00111.pfloa19 +++|          SX7    B0+         SET FLAG TO FLUSH CIR BUFFER
09277  M01S00112.pfloa19 +++|          SA7    TCBF+FCUI
09278  M01S00113.pfloa19 +++|          RJ     CCI         FLUSH CIR BUFFER
09279  M01S00114.pfloa19 +++|
09280  M01S00115.pfloa19 +++|*         PROCESS *OP=V* SELECTED.
09281  M01S00116.pfloa19 +++|
09282  M01S00117.pfloa19 +++|          SA1    CPAR+/COMSPFS/CPOP
09283  M01S00118.pfloa19 +++|          LX1    59-51
09284  M01S00119.pfloa19 +++|          PL     X1,ART1     IF *OP=V* NOT SELECTED
09285  M01S00120.pfloa19 +++|          SA1    TLBF+/COMSPFS/PVAL  CHECK FOR NEXT VSN
09286  M01S00121.pfloa19 +++|          SA2    =10H
09287  M01S00122.pfloa19 +++|          MX6    36
09288  M01S00123.pfloa19 +++|          BX2    X1-X2
09289  M01S00124.pfloa19 +++|          BX1    X6*X1
09290  M01S00125.pfloa19 +++|          BX2    X6*X2
09291  M01S00126.pfloa19 +++|          ZR     X1,ARTX     IF NEXT VSN NOT PRESENT
09292  M01S00127.pfloa19 +++|          ZR     X2,ARTX     IF NEXT VSN NOT PRESENT
09293  M01S00128.pfloa19 +++|          RJ     AAT         ASSIGN ARCHIVE TAPE
09294  M01S00129.pfloa19 +++|          ZR     X6,ARTX     IF TAPE ASSIGNED
Line S00130 Modification History
M01 (Added by) pfloa19
M02 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
09295  M02S00130.286l859 ---|          SX5    MSGU        * ERROR IN ACHIVE FILE LABEL.*
09296  M02S00131.286l859 ---|          RJ     SEM
Line S00759 Modification History
M01 (Added by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
09297  M01S00759.286l859 +++|          SB2    ERAL        * ERROR IN ACHIVE FILE LABEL.*
Line S00132 Modification History
M01 (Added by) pfloa19
Seq #  *Modification Id* Act 
----------------------------+
09298  M01S00132.pfloa19 +++|          EQ     ABT         ABORT
09299  M01S00133.pfloa19 +++|
09300  M01S00134.pfloa19 +++|*         SET *K* DISPLAY RIGHT SCREEN FOR INPUT.
09301  M01S00135.pfloa19 +++|
09302  M01S00136.pfloa19 +++| ART1     SA5    IDSA+/COMSPFS/ADM2
09303  M01S00137.pfloa19 +++|          MOVE   4,MSGH,X5   *END OF LOAD FILE - SEE RIGHT SCREEN.*
09304  M01S00138.pfloa19 +++|          SX6    ARTA
09305  M01S00139.pfloa19 +++|          RJ     SRS         SELECT RIGHT SCREEN
09306  M01S00140.pfloa19 +++|
09307  M01S00141.pfloa19 +++|*         CLEAR VSN SELECTION.
09308  M01S00142.pfloa19 +++|
09309  M01S00143.pfloa19 +++| ART2     SA1    =10H
09310  M01S00144.pfloa19 +++|          SX6    B0
09311  M01S00145.pfloa19 +++|          BX7    X1
09312  M01S00146.pfloa19 +++|          SA6    VSPR        CLEAR *VSN* PARAMETER
09313  M01S00147.pfloa19 +++|          SA7    ARTB+1      CLEAR VSN IN DISPLAY
09314  M01S00148.pfloa19 +++|
09315  M01S00149.pfloa19 +++|*         GET OPERATOR INPUT.
09316  M01S00150.pfloa19 +++|
09317  M01S00151.pfloa19 +++| ART3     SX7    B0+         CLEAR *LIST* AND *END* INDICATORS
09318  M00S05040.pfload  +++|          SA7    LTPR
Line S05041 Modification History
M01 (Removed by) pfloa19
Seq #  *Modification Id* Act 
----------------------------+
09319  M01S05041.pfloa19 ---|          SA7    A7+B1
09320  M01S05042.pfloa19 ---|          SA7    TCBF+FCUI
09321  M01S05043.pfloa19 ---|          RJ     CCI         FLUSH CATALOG INDEX
Line S05044 Modification History
M01 (Removed by) ns2223
M02 (Removed by) pfloa19
Seq #  *Modification Id* Act 
----------------------------+
09322  M02S05044.pfloa19 ---|          SA5    IDSA+/COMSPFS/ADE1
Line S00024 Modification History
M01 (Added by) ns2223
M02 (Removed by) pfloa19
Seq #  *Modification Id* Act 
----------------------------+
09323  M02S00024.pfloa19 ---|          SA1    CPAR+/COMSPFS/CPOP
09324  M02S00025.pfloa19 ---|          LX1    59-51
09325  M02S00026.pfloa19 ---|          PL     X1,ART1.1   IF *OP=V* NOT SELECTED
09326  M02S00027.pfloa19 ---|          SA1    VSNP        CHECK FOR NEXT VSN
09327  M02S00028.pfloa19 ---|          NZ     X1,ART7     IF NEXT VSN FOUND
Line S00152 Modification History
M01 (Added by) pfloa19
Seq #  *Modification Id* Act 
----------------------------+
09328  M01S00152.pfloa19 +++|          SA7    ENPR
09329  M01S00153.pfloa19 +++|          SB2    ART4        SET ARGUMENT PROCESSOR ADDRESS
09330  M01S00154.pfloa19 +++|          SB3    ART9        SET FUNCTION PROCESSOR ADDRESS
09331  M01S00155.pfloa19 +++|          EQ     /COMSPFS/KIP  PROCESS KEYBOARD INPUT
09332  M01S00156.pfloa19 +++|
09333  M01S00157.pfloa19 +++|*         PROCESS ARGUMENT ENTRY.
09334  M01S00158.pfloa19 +++|
Line S00159 Modification History
M01 (Added by) pfloa19
M02 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
09335  M02S00159.286l859 ---| ART4     SA4    /COMSPFS/PMT+1  SET FIRST ARGUMENT ADDRESS
09336  M02S00160.286l859 ---|          SB4    B6+         SET ARGUMENT COUNT
09337  M02S00161.286l859 ---|          SB5    ARGT        SET ARGUMENT TABLE ADDRESS
09338  M02S00162.286l859 ---|          RJ     ARG         PROCESS ARGUMENTS
Line S00760 Modification History
M01 (Added by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
09339  M01S00760.286l859 +++| ART4     SB2    /COMSPFS/KIN  SET PARAMETERS ADDRESS
09340  M01S00761.286l859 +++|          RJ     USB         UNPACK PARAMETERS
09341  M01S00762.286l859 +++|          SB3    ARGT        SET ARGUMENT TABLE ADRESS
09342  M01S00763.286l859 +++|          RJ     ARM         PROCESS ARGUMENTS
Line S00163 Modification History
M01 (Added by) pfloa19
Seq #  *Modification Id* Act 
----------------------------+
09343  M01S00163.pfloa19 +++|          ZR     X1,ART5     IF NO ERROR
09344  M01S00164.pfloa19 +++|          SA5    IDSA+/COMSPFS/ADER
09345  M01S00165.pfloa19 +++|          MOVE   4,MSGT,X5   *INCORRECT OPTION.*
09346  M01S00166.pfloa19 +++|          EQ     ART3        PROCESS KEYBOARD INPUT
09347  M01S00167.pfloa19 +++|
09348  M01S00168.pfloa19 +++| ART5     SA1    ENPR
09349  M01S00169.pfloa19 +++|          ZR     X1,ART6     IF NOT END OF LOAD
09350  M01S00170.pfloa19 +++|          RJ     CMA         CLEAR MESSAGE AREA
Line S00029 Modification History
M01 (Added by) ns2223
Seq #  *Modification Id* Act 
----------------------------+
09351  M01S00029.ns2223  +++|          SX6    B1          SET END OF LOAD STATUS
09352  M01S00030.ns2223  +++|          EQ     ARTX        RETURN
09353  M01S00031.ns2223  +++|
Line S00032 Modification History
M01 (Added by) ns2223
M02 (Removed by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
09354  M02S00032.241l630 ---| ART1.1   SA5    IDSA+/COMSPFS/ADE1
Line S05045 Modification History
M01 (Removed by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
09355  M01S05045.241l630 ---|          MOVE   4,INLM,X5
09356  M01S05046.241l630 ---|          SA5    IDSA+/COMSPFS/ADE2
09357  M01S05047.241l630 ---|          MOVE   4,INLM1,X5
09358  M01S05048.241l630 ---|          SA5    IDSA+/COMSPFS/ADE3
09359  M01S05049.241l630 ---|          MOVE   4,INLM2,X5
Line S00028 Modification History
M01 (Added by) 241l630
M02 (Removed by) pfloa19
Seq #  *Modification Id* Act 
----------------------------+
09360  M02S00028.pfloa19 ---| ART1.1   SA5    IDSA+/COMSPFS/ADM2
09361  M02S00029.pfloa19 ---|          MOVE   4,MSGH,X5   *END OF INCREMENTAL LOAD FILE.*
09362  M02S00030.pfloa19 ---|          SX6    ARTA
09363  M02S00031.pfloa19 ---|          RJ     SRS         SELECT RIGHT SCREEN
Line S05050 Modification History
M01 (Removed by) pfloa19
Seq #  *Modification Id* Act 
----------------------------+
09364  M01S05050.pfloa19 ---| ART2     SB2    ART3        SET ARGUMENT PROCESSOR ADDRESS
09365  M01S05051.pfloa19 ---|          SB3    ART7        SET FUNCTION PROCESSOR ADDRESS
09366  M01S05052.pfloa19 ---|          EQ     /COMSPFS/KIP  PROCESS KEYBOARD INPUT
09367  M01S05053.pfloa19 ---|
Line S05054 Modification History
M01 (Removed by) ns22000
M02 (Removed by) pfloa19
Seq #  *Modification Id* Act 
----------------------------+
09368  M02S05054.pfloa19 ---|*         ARGUMENT PROCESSOR
Line S02232 Modification History
M01 (Added by) ns22000
M02 (Removed by) pfloa19
Seq #  *Modification Id* Act 
----------------------------+
09369  M02S02232.pfloa19 ---|*         ARGUMENT PROCESSOR.
Line S05055 Modification History
M01 (Removed by) pfloa19
Seq #  *Modification Id* Act 
----------------------------+
09370  M01S05055.pfloa19 ---|
09371  M01S05056.pfloa19 ---| ART3     SB4    B6
09372  M01S05057.pfloa19 ---|          SA4    /COMSPFS/PMT+1
09373  M01S05058.pfloa19 ---|          SB5    ARGT
09374  M01S05059.pfloa19 ---|          RJ     ARG
09375  M01S05060.pfloa19 ---|          ZR     X1,ART5     IF NO ERROR
Line S05061 Modification History
M01 (Removed by) 241l630
M02 (Removed by) pfloa19
Seq #  *Modification Id* Act 
----------------------------+
09376  M02S05061.pfloa19 ---| ART4     SA5    IDSA+/COMSPFS/ADE4
Line S05062 Modification History
M01 (Removed by) ns22000
M02 (Removed by) 241l630
M03 (Removed by) pfloa19
Seq #  *Modification Id* Act 
----------------------------+
09377  M03S05062.pfloa19 ---|          MOVE   4,ERROR,X5
09378  M03S05063.pfloa19 ---|          EQ     ART2
Line S02233 Modification History
M01 (Added by) ns22000
M02 (Removed by) 241l630
M03 (Removed by) pfloa19
Seq #  *Modification Id* Act 
----------------------------+
09379  M03S02233.pfloa19 ---|          MOVE   4,INLM3,X5
Line S00032 Modification History
M01 (Added by) 241l630
M02 (Removed by) pfloa19
Seq #  *Modification Id* Act 
----------------------------+
09380  M02S00032.pfloa19 ---| ART4     SA5    IDSA+/COMSPFS/ADER
09381  M02S00033.pfloa19 ---|          MOVE   4,MSGT,X5
Line S02234 Modification History
M01 (Added by) ns22000
M02 (Removed by) pfloa19
Seq #  *Modification Id* Act 
----------------------------+
09382  M02S02234.pfloa19 ---|          EQ     ART2        PROCESS KEYBOARD INPUT
Line S05064 Modification History
M01 (Removed by) pfloa19
Seq #  *Modification Id* Act 
----------------------------+
09383  M01S05064.pfloa19 ---|
09384  M01S05065.pfloa19 ---| ART5     SA1    ENPR
09385  M01S05066.pfloa19 ---|          ZR     X1,ART6     IF NOT END OF LOAD
09386  M01S05067.pfloa19 ---|          RJ     CMA         CLEAR MESSAGE AREA
09387  M01S05068.pfloa19 ---|          SX6    B1          SET END OF LOAD STATUS
Line S05069 Modification History
M01 (Removed by) ns22000
M02 (Removed by) pfloa19
Seq #  *Modification Id* Act 
----------------------------+
09388  M02S05069.pfloa19 ---|          EQ     ARTX        EXIT
Line S02235 Modification History
M01 (Added by) ns22000
M02 (Removed by) pfloa19
Seq #  *Modification Id* Act 
----------------------------+
09389  M02S02235.pfloa19 ---|          EQ     ARTX        RETURN
Line S05070 Modification History
M01 (Removed by) pfloa19
Seq #  *Modification Id* Act 
----------------------------+
09390  M01S05070.pfloa19 ---|
09391  M00S05071.pfload  +++| ART6     SA1    LTPR
Line S05072 Modification History
M01 (Removed by) pfloa19
Seq #  *Modification Id* Act 
----------------------------+
09392  M01S05072.pfloa19 ---|          ZR     X1,ART4     IF ERROR
Line S00171 Modification History
M01 (Added by) pfloa19
Seq #  *Modification Id* Act 
----------------------------+
09393  M01S00171.pfloa19 +++|          ZR     X1,ART7     IF NOT LIST FILES
09394  M00S05073.pfload  +++|          RJ     CMA         CLEAR MESSAGE AREA
09395  M00S05074.pfload  +++|          RJ     LFS         LIST FILES
Line S05075 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
09396  M01S05075.ns22000 ---|          EQ     ART1
Line S02236 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
09397  M01S02236.ns22000 +++|          EQ     ART1        PROCESS KEYBOARD INPUT
09398  M00S05076.pfload  +++|
Line S05077 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
09399  M01S05077.ns22000 ---|*         FUNCTION PROCESSOR
Line S02237 Modification History
M01 (Added by) ns22000
M02 (Removed by) pfloa19
Seq #  *Modification Id* Act 
----------------------------+
09400  M02S02237.pfloa19 ---|*         FUNCTION PROCESSOR.
Line S00172 Modification History
M01 (Added by) pfloa19
Seq #  *Modification Id* Act 
----------------------------+
09401  M01S00172.pfloa19 +++| ART7     SA1    VSPR
09402  M01S00173.pfloa19 +++|          MX7    42
09403  M01S00174.pfloa19 +++|          MX6    -24
09404  M01S00175.pfloa19 +++|          ZR     X1,ART3     IF VSN NOT ENTERED
09405  M01S00176.pfloa19 +++|          BX1    X7*X1
09406  M01S00177.pfloa19 +++|          BX7    -X6*X1
09407  M01S00178.pfloa19 +++|          ZR     X7,ART8     IF VALID VSN
09408  M01S00179.pfloa19 +++|          SA5    IDSA+/COMSPFS/ADER
09409  M01S00180.pfloa19 +++|          MOVE   4,MSGP,X5   *ENTERED VSN TOO LONG.*
09410  M01S00181.pfloa19 +++|          EQ     ART2        CLEAR VSN SELECTION
09411  M00S05078.pfload  +++|
Line S05079 Modification History
M01 (Removed by) pfloa19
Seq #  *Modification Id* Act 
----------------------------+
09412  M01S05079.pfloa19 ---| ART7     RJ     CMA         CLEAR MESSAGE AREA
09413  M01S05080.pfloa19 ---|          RJ     AAF         ASSIGN ARCHIVE FILE
09414  M01S05081.pfloa19 ---|          BX6    X6-X6       CLEAR END OF LOAD STATUS
Line S00182 Modification History
M01 (Added by) pfloa19
Seq #  *Modification Id* Act 
----------------------------+
09415  M01S00182.pfloa19 +++| ART8     RJ     ZTB         SPACE FILL VSN
09416  M01S00183.pfloa19 +++|          SA6    ARTB+1      SET VSN IN DISPLAY
09417  M01S00184.pfloa19 +++|          EQ     ART3        PROCESS KEYBOARD INPUT
09418  M01S00185.pfloa19 +++|
09419  M01S00186.pfloa19 +++|*         PROCESS *GO* ENTRY.
09420  M01S00187.pfloa19 +++|
09421  M01S00188.pfloa19 +++| ART9     SA1    VSPR
09422  M01S00189.pfloa19 +++|          NZ     X1,ART10    IF VSN ENTERED
09423  M01S00190.pfloa19 +++|          SA5    IDSA+/COMSPFS/ADER DISPLAY BAD LABEL MESSAGE
09424  M01S00191.pfloa19 +++|          MOVE   4,MSGQ,X5   *NO VSN ENTERED.*
09425  M01S00192.pfloa19 +++|          EQ     ART3        GET OPERATOR INPUT
09426  M01S00193.pfloa19 +++|
09427  M01S00194.pfloa19 +++| ART10    RJ     AAT         ASSIGN ARCHIVE TAPE
09428  M01S00195.pfloa19 +++|          ZR     X6,ART12    IF TAPE ASSIGNED
09429  M01S00196.pfloa19 +++|          SA5    IDSA+/COMSPFS/ADER DISPLAY BAD LABEL MESSAGE
09430  M01S00197.pfloa19 +++|          MOVE   4,MSGV,X5   *ARCHIVE LABEL BAD, SELECT NEW VSN.*
09431  M01S00198.pfloa19 +++|          EQ     ART2        CLEAR VSN SELECTION
09432  M01S00199.pfloa19 +++|
09433  M01S00200.pfloa19 +++|*         PROCESS TAPE ASSIGNED.
09434  M01S00201.pfloa19 +++|
09435  M01S00202.pfloa19 +++| ART12    RJ     CMA         CLEAR MESSAGE AREA
09436  M01S00203.pfloa19 +++|          SX6    B0          SET TAPE ASSIGNED
Line S05082 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
09437  M01S05082.ns22000 ---|          EQ     ARTX        EXIT
Line S02238 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
09438  M01S02238.ns22000 +++|          EQ     ARTX        RETURN
09439  M01S02239.ns22000 +++|
Line S02240 Modification History
M01 (Added by) ns22000
M02 (Removed by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
09440  M02S02240.241l630 ---|*         INCREMENTAL LOAD OPERATOR MESSAGES.
Line S02241 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
09441  M01S02241.ns22000 +++|
Line S02242 Modification History
M01 (Added by) ns22000
M02 (Removed by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
09442  M02S02242.241l630 ---| INLM     DIS    4,ENTER   E     TO TERMINATE LOADING.
09443  M02S02243.241l630 ---| INLM1    DIS    4,        L     TO LIST REMAINING FILES.
09444  M02S02244.241l630 ---| INLM2    DIS    4,        GO    TO RESUME INCREMENTAL LOAD.
Line S02245 Modification History
M01 (Added by) ns22000
M02 (Removed by) v23l617
M03 (Removed by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
09445  M03S02245.241l630 ---| INLM3    DATA   40H ILLEGAL OPTION - REENTER.
Line S00026 Modification History
M01 (Added by) v23l617
M02 (Removed by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
09446  M02S00026.241l630 ---| INLM3    DATA   40H INCORRECT OPTION - REENTER.
Line S00034 Modification History
M01 (Added by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
09447  M01S00034.241l630 +++|*         RIGHT SCREEN BUFFER FOR TAPE TRANSITION.
09448  M01S00035.241l630 +++|
09449  M01S00036.241l630 +++| ARTA     VFD    12/0,36/0,12/0  DISPLAY CONTROL WORD
09450  M01S00037.241l630 +++|
Line S00038 Modification History
M01 (Added by) 241l630
M02 (Removed by) pfloa19
Seq #  *Modification Id* Act 
----------------------------+
09451  M02S00038.pfloa19 ---|          KDL    25,T,(TRANSITION OPTIONS)
09452  M02S00039.pfloa19 ---|          KDL    13,H,(ENTER K.TO.)
09453  M02S00040.pfloa19 ---|          KDL    13,,(TO)
09454  M02S00041.pfloa19 ---|          KDL    26,H,(DESCRIPTION)
09455  M02S00042.pfloa19 ---|          KDL    13,K,(E         TERMINATE LOADING.)
09456  M02S00043.pfloa19 ---|          KDL    13,K,(L         LIST REMAINING FILES.)
09457  M02S00044.pfloa19 ---|          KDL    13,K,(GO        RESUME INCREMENTAL LOAD.)
Line S00204 Modification History
M01 (Added by) pfloa19
Seq #  *Modification Id* Act 
----------------------------+
09458  M01S00204.pfloa19 +++|          KDL    10,T,(INCREMENTAL LOAD FILE TRANSITION OPTIONS.)
09459  M01S00205.pfloa19 +++|          KDL    13,H,(ENTER K.OPTION.)
09460  M01S00206.pfloa19 +++|          KDL    13,,(OPTION)
09461  M01S00207.pfloa19 +++|          KDL    30,H,(DESCRIPTION)
09462  M01S00208.pfloa19 +++|          KDL    13,K,(END              TERMINATE LOAD.)
09463  M01S00209.pfloa19 +++|          KDL    13,K,(LIST             LIST REMAINING FILES.)
09464  M01S00210.pfloa19 +++| ARTB     KDL    13,K,(VSN =            VSN OF NEXT TAPE.)
09465  M01S00211.pfloa19 +++|          KDL    13,K,(GO               RESUME LOAD AFTER VSN ENTERED.)
Line S00045 Modification History
M01 (Added by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
09466  M01S00045.241l630 +++|          CON    0           END OF BUFFER
Line S02246 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
09467  M01S02246.ns22000 +++|
09468  M01S02247.ns22000 +++|
Line S02248 Modification History
M01 (Added by) ns22000
M02 (Removed by) pfloa19
Seq #  *Modification Id* Act 
----------------------------+
09469  M02S02248.pfloa19 ---|*         PARAMETER TABLE.
Line S00212 Modification History
M01 (Added by) pfloa19
Seq #  *Modification Id* Act 
----------------------------+
09470  M01S00212.pfloa19 +++|*         ENTERED PARAMETERS.
Line S02249 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
09471  M01S02249.ns22000 +++|
Line S02250 Modification History
M01 (Added by) ns22000
M02 (Removed by) pfloa19
Seq #  *Modification Id* Act 
----------------------------+
09472  M02S02250.pfloa19 ---| LTPR     CON    0
09473  M02S02251.pfloa19 ---| ENPR     CON    0
Line S00213 Modification History
M01 (Added by) pfloa19
Seq #  *Modification Id* Act 
----------------------------+
09474  M01S00213.pfloa19 +++| LTPR     CON    0           *LIST*
09475  M01S00214.pfloa19 +++| ENPR     CON    0           *END*
09476  M01S00215.pfloa19 +++| VSPR     CON    0           *VSN*
Line S02252 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
09477  M01S02252.ns22000 +++|
09478  M01S02253.ns22000 +++|
09479  M01S02254.ns22000 +++|*         ARGUMENT TABLE.
09480  M01S02255.ns22000 +++|
09481  M01S02256.ns22000 +++| ARGT     BSS    0
Line S02257 Modification History
M01 (Added by) ns22000
M02 (Removed by) pfloa19
Seq #  *Modification Id* Act 
----------------------------+
09482  M02S02257.pfloa19 ---| L        ARG    -NZ,LTPR
09483  M02S02258.pfloa19 ---| E        ARG    -NZ,ENPR
Line S00216 Modification History
M01 (Added by) pfloa19
M02 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
09484  M02S00216.286l859 ---| LIST     ARG    -NZ,LTPR
09485  M02S00217.286l859 ---| END      ARG    -NZ,ENPR
09486  M02S00218.286l859 ---| VSN      ARG    NZ,VSPR
Line S00764 Modification History
M01 (Added by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
09487  M01S00764.286l859 +++| LIST     ARG    -NZ,LTPR,,1
09488  M01S00765.286l859 +++| END      ARG    -NZ,ENPR,,1
09489  M01S00766.286l859 +++| VSN      ARG    NZ,VSPR,,1
Line S02259 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
09490  M01S02259.ns22000 +++|          CON    0
09491  M01S02260.ns22000 +++|
09492  M01S02261.ns22000 +++| NZ       CON    1           NON-ZERO VALUE
09493  M00S05083.pfload  +++| CCI      SPACE  4,20
09494  M00S05084.pfload  +++|**        CCI - CHECK CATALOG IMAGE.
09495  M00S05085.pfload  +++|*
09496  M00S05086.pfload  +++|*         ENTRY  (TCBF) = CATALOG ENTRY BEING PROCESSED.
09497  M00S05087.pfload  +++|*                (TCBF+FCUI) = 0, IF INDEX TO BE FLUSHED.
09498  M00S05088.pfload  +++|*                (INCF) = INCREMENTAL LOAD FLAG.
Line S05089 Modification History
M01 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
09499  M01S05089.286l859 ---|*                (CIRD) = FILE COUNT FOR CATALOG IMAGE RECORD.
Line S00767 Modification History
M01 (Added by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
09500  M01S00767.286l859 +++|*                (CIFC) = FILE COUNT FOR CATALOG IMAGE RECORD.
09501  M00S05090.pfload  +++|*                (CIRT) = CATALOG IMAGE RECORD DIRECTORY.
09502  M00S05091.pfload  +++|*
09503  M00S05092.pfload  +++|*         EXIT   (X6) = 0 IF FILE TO BE LOADED (OR NOT INCREMENTAL
09504  M00S05093.pfload  +++|*                       LOAD).
09505  M00S05094.pfload  +++|*                     .NE. 0 OTHERWISE.
09506  M00S05095.pfload  +++|*                (TCBF) = UPDATED WITH ACCESS INFORMATION FROM THE CIR
09507  M00S05096.pfload  +++|*                         IF AN INCREMENTAL LOAD AND FILE TO BE LOADED.
09508  M00S05097.pfload  +++|*
09509  M00S05098.pfload  +++|*         USES   X - ALL.
09510  M00S05099.pfload  +++|*                A - 1, 2, 3, 4, 5, 6, 7.
09511  M00S05100.pfload  +++|*                B - 2, 3, 4.
09512  M00S05101.pfload  +++|*
09513  M00S05102.pfload  +++|*         MACROS READ, REWRITE, REWRITER.
09514  M00S05103.pfload  +++|
09515  M00S05104.pfload  +++|
09516  M00S05105.pfload  +++| CCI      SUBR               ENTRY/EXIT
09517  M00S05106.pfload  +++|          SA1    INCF
09518  M00S05107.pfload  +++|          BX6    X6-X6       PRESET TO LOAD FILE
09519  M00S05108.pfload  +++|          MX0    42
09520  M00S05109.pfload  +++|          ZR     X1,CCIX     IF NOT AN INCREMENTAL LOAD
09521  M00S05110.pfload  +++|          SA1    TCBF+FCUI   GET USER INDEX OF FILE
09522  M00S05111.pfload  +++|          ZR     X1,CCI10    IF CATALOG BUFFER TO BE FLUSHED TO DISK
09523  M00S05112.pfload  +++|          BX1    -X0*X1
09524  M00S05113.pfload  +++|          MX0    -3          SAVE DEVICE MAP BITS
09525  M00S05114.pfload  +++|          BX3    -X0*X1
09526  M00S05115.pfload  +++|          SB2    X3
09527  M00S05116.pfload  +++|          SX5    B0          SET INDEX
09528  M00S05117.pfload  +++| CCI1     SX6    NWCD
09529  M00S05118.pfload  +++|          IX4    X5*X6
09530  M00S05119.pfload  +++|          SX5    X5+B1
09531  M00S05120.pfload  +++|          SA4    CIRT+X4     READ HEADER WORD
09532  M00S05121.pfload  +++|          NZ     X4,CCI2     IF DEVICE THERE
09533  M00S05122.pfload  +++|          SX6    B1          EXIT - DEVICE NOT FOUND
Line S05123 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
09534  M01S05123.ns22000 ---|          EQ     CCIX
Line S02262 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
09535  M01S02262.ns22000 +++|          EQ     CCIX        RETURN
09536  M00S05124.pfload  +++|
09537  M00S05125.pfload  +++| CCI2     AX4    X4,B2
09538  M00S05126.pfload  +++|          MX0    -1
09539  M00S05127.pfload  +++|          BX4    -X0*X4
09540  M00S05128.pfload  +++|          ZR     X4,CCI1     IF NOT CORRECT DEVICE
09541  M00S05129.pfload  +++|          SA4    A4          GET NUMBER CATALOG TRACKS
09542  M00S05130.pfload  +++|          AX4    12
09543  M00S05131.pfload  +++|          SX4    X4-1        SET MASK
09544  M00S05132.pfload  +++|          AX1    3
09545  M00S05133.pfload  +++|          BX1    X4*X1
09546  M00S05134.pfload  +++|          SB2    X1
09547  M00S05135.pfload  +++|          SA4    A4+B1
09548  M00S05136.pfload  +++|          SA5    A4+B2
09549  M00S05137.pfload  +++|          SX6    B1
09550  M00S05138.pfload  +++|          ZR     X5,CCIX     IF NO ENTRIES
09551  M00S05139.pfload  +++| CCI3     SA1    CCIA        FETCH LAST RANDOM INDEX
09552  M00S05140.pfload  +++|          SX6    B1          SET RANDOM REWRITE REQUEST
09553  M00S05141.pfload  +++|          MX2    -29
09554  M00S05142.pfload  +++|          LX6    29
09555  M00S05143.pfload  +++|          BX5    X6+X5
09556  M00S05144.pfload  +++|          NG     X1,CCI5     IF NO DATA IN BUFFER
09557  M00S05145.pfload  +++|          BX4    -X2*X5      EXTRACT RANDOM INDEX
09558  M00S05146.pfload  +++|          IX4    X4-X1
09559  M00S05147.pfload  +++|          ZR     X4,CCI6     IF NO RANDOM INDEX CHANGE
09560  M00S05148.pfload  +++|          SA4    CCIB        FETCH INDEX MODIFICATION FLAG
09561  M00S05149.pfload  +++|          BX6    X6+X1
09562  M00S05150.pfload  +++|          NZ     X4,CCI5     IF INDEX NOT MODIFIED
09563  M00S05151.pfload  +++|          SA1    CIRF        CHECK END STATUS
09564  M00S05152.pfload  +++|          SA6    CIRF+6      SET RANDOM INDEX FOR WRITE
09565  M00S05153.pfload  +++|          LX1    59-4
09566  M00S05154.pfload  +++|          PL     X1,CCI4     IF NOT END OF RECORD
09567  M00S05155.pfload  +++|          REWRITER  CIRF,R
09568  M00S05156.pfload  +++|          EQ     CCI5        PROCESS NEXT INDEX
09569  M00S05157.pfload  +++|
09570  M00S05158.pfload  +++| CCI4     REWRITE CIRF,R
Line S05159 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
09571  M01S05159.ns22000 ---|
09572  M00S05160.pfload  +++| CCI5     SA1    CIRF+1      FETCH FIRST
09573  M00S05161.pfload  +++|          BX6    X5
09574  M00S05162.pfload  +++|          SX7    X1
09575  M00S05163.pfload  +++|          SA6    CIRF+6      SET NEW RANDOM INDEX
09576  M00S05164.pfload  +++|          MX2    -29
09577  M00S05165.pfload  +++|          SA7    A1+B1       SET IN=FIRST
09578  M00S05166.pfload  +++|          SA7    A7+B1       SET OUT=FIRST
09579  M00S05167.pfload  +++|          SA7    CCIB        CLEAR BUFFER MODIFIED FLAG (SET NONZERO)
09580  M00S05168.pfload  +++|          BX6    -X2*X6
09581  M00S05169.pfload  +++|          SA6    CCIA        SAVE RANDOM INDEX
09582  M00S05170.pfload  +++|          READ   CIRF,R      LOAD IMAGE BUFFER
09583  M00S05171.pfload  +++| CCI6     SA1    CIRF
09584  M00S05172.pfload  +++|          SA4    TCBF+FCUI   FETCH USER INDEX AND FILE
09585  M00S05173.pfload  +++|          LX1    17-4
09586  M00S05174.pfload  +++|          SB4    X1          END OF RECORD INDICATOR
09587  M00S05175.pfload  +++|          SA1    CIRF+2      FETCH IN
09588  M00S05176.pfload  +++|          SA2    A1+B1       FETCH OUT
09589  M00S05177.pfload  +++|          IX7    X1-X2
09590  M00S05178.pfload  +++|          SX6    B1
09591  M00S05179.pfload  +++|          ZR     X7,CCIX     IF END OF RECORD AND BUFFER EMPTY
09592  M00S05180.pfload  +++|          SB2    X1          SET LAST BUFFER ADDRESS
09593  M00S05181.pfload  +++|          SB3    X2          SET ADDRESS OF FIRST ENTRY
09594  M00S05182.pfload  +++| CCI7     SA1    B3          FETCH NEXT ENTRY
09595  M00S05183.pfload  +++|          IX1    X1-X4
09596  M00S05184.pfload  +++|          ZR     X1,CCI8     IF CATALOG ENTRY FOUND
09597  M00S05185.pfload  +++|          SB3    B3+2
09598  M00S05186.pfload  +++|          LT     B3,B2,CCI7  IF MORE ENTRIES IN BUFFER
09599  M00S05187.pfload  +++|          NG     B4,CCIX     IF END OF RECORD
09600  M00S05188.pfload  +++|          SA1    CIRF+6      FETCH RANDOM INDEX
09601  M00S05189.pfload  +++|          SA4    CCIB        FETCH BUFFER MODIFICATION FLAG
09602  M00S05190.pfload  +++|          MX2    -29
09603  M00S05191.pfload  +++|          LX1    30          CURRENT RANDOM INDEX
09604  M00S05192.pfload  +++|          BX5    X2*X5       PREVIOUS INDEX
09605  M00S05193.pfload  +++|          BX6    -X2*X1
09606  M00S05194.pfload  +++|          BX5    X5+X6
09607  M00S05195.pfload  +++|          ZR     X4,CCI3     IF BUFFER MODIFIED
09608  M00S05196.pfload  +++|          EQ     CCI5        PROCESS NEXT BUFFER LOAD
09609  M00S05197.pfload  +++|
09610  M00S05198.pfload  +++|*         UPDATE CATALOG ENTRY WITH INFORMATION FROM CIR.
09611  M00S05199.pfload  +++|
09612  M00S05200.pfload  +++| CCI8     BX6    X6-X6
09613  M00S05201.pfload  +++|          SA6    CCIB        SET BUFFER MODIFIED FLAG
09614  M00S05202.pfload  +++|          SA6    B3
09615  M00S05203.pfload  +++|          SA1    B3+B1       FETCH NEW ACCESS INFORMATION FROM CIR
09616  M00S05204.pfload  +++|          SA2    TCBF+FCAD
09617  M00S05205.pfload  +++|          MX0    18
09618  M00S05206.pfload  +++|          BX7    X0*X1       EXTRACT NEW ACCESS COUNT
09619  M00S05207.pfload  +++|          SA3    TCBF+FCAC
09620  M00S05208.pfload  +++|          BX1    -X0*X1      NEW DEVICE NUMBER AND LAST ACCESS DATE
Line S05209 Modification History
M01 (Removed by) ns2036
Seq #  *Modification Id* Act 
----------------------------+
09621  M01S05209.ns2036  ---|          AX7    6
Line S00001 Modification History
M01 (Added by) ns2036
Seq #  *Modification Id* Act 
----------------------------+
09622  M01S00001.ns2036  +++|          LX7    -6
09623  M00S05210.pfload  +++|          BX2    X0*X2       CLEAR OLD DEVICE NUMBER AND ACCESS DATE
09624  M00S05211.pfload  +++|          MX0    -36
09625  M00S05212.pfload  +++|          BX6    X1+X2       UPDATE DEVICE NUMBER AND ACCESS DATE
09626  M00S05213.pfload  +++|          SA6    A2
09627  M00S05214.pfload  +++|          BX3    -X0*X3      CLEAR OLD ACCESS COUNT
09628  M00S05215.pfload  +++|          BX7    X7+X3       UPDATE ACCESS COUNT
09629  M00S05216.pfload  +++|          SA7    A3
09630  M00S05217.pfload  +++|          BX6    X6-X6
09631  M00S05218.pfload  +++|          SA5    A5          UPDATE DIRECTORY ENTRY
09632  M00S05219.pfload  +++|          LX5    30
09633  M00S05220.pfload  +++|          SX1    B1
09634  M00S05221.pfload  +++|          IX7    X5-X1
09635  M00S05222.pfload  +++|          MX5    -30
09636  M00S05223.pfload  +++|          BX5    -X5*X7
09637  M00S05224.pfload  +++|          NZ     X5,CCI9     IF MORE ENTRIES LEFT
09638  M00S05225.pfload  +++|          BX7    X7-X7
09639  M00S05226.pfload  +++| CCI9     LX7    30
09640  M00S05227.pfload  +++|          SA7    A5
Line S05228 Modification History
M01 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
09641  M01S05228.286l859 ---|          SA4    CIRD        DECREMENT FILE COUNT
Line S00768 Modification History
M01 (Added by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
09642  M01S00768.286l859 +++|          SA4    CIFC        DECREMENT FILE COUNT
09643  M00S05229.pfload  +++|          IX7    X4-X1
09644  M00S05230.pfload  +++|          SA7    A4
09645  M00S05231.pfload  +++|          EQ     CCIX        RETURN
09646  M00S05232.pfload  +++|
09647  M00S05233.pfload  +++|*         CLEAN UP CATALOG BUFFER.
09648  M00S05234.pfload  +++|
09649  M00S05235.pfload  +++| CCI10    SA1    CCIA        FETCH CURRENT RENDOM INDEX
09650  M00S05236.pfload  +++|          SA2    CCIB        FETCH BUFFER MODIFICATION FLAG
09651  M00S05237.pfload  +++|          SA4    CIRF
09652  M00S05238.pfload  +++|          NG     X1,CCI12    IF NO DATA IN BUFFER
09653  M00S05239.pfload  +++|          NZ     X2,CCI12    IF BUFFER NOT MODIFIED
09654  M00S05240.pfload  +++|          SX6    B1
09655  M00S05241.pfload  +++|          SX7    -B1
09656  M00S05242.pfload  +++|          LX6    29
09657  M00S05243.pfload  +++|          SA7    A1          CLEAR CURRENT RANDOM INDEX
09658  M00S05244.pfload  +++|          LX4    59-4
09659  M00S05245.pfload  +++|          BX6    X6+X1
09660  M00S05246.pfload  +++|          SA7    A2          CLEAR BUFFER MODIFICATION FLAG
09661  M00S05247.pfload  +++|          SA6    CIRF+6      RESET RANDOM INDEX
09662  M00S05248.pfload  +++|          PL     X4,CCI11    IF NOT END OF RECORD
09663  M00S05249.pfload  +++|          REWRITER  CIRF,R
09664  M00S05250.pfload  +++|          EQ     CCI12       SET NO LOAD STATUS
09665  M00S05251.pfload  +++|
09666  M00S05252.pfload  +++| CCI11    REWRITE  CIRF,R
Line S05253 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
09667  M01S05253.ns22000 ---|
09668  M00S05254.pfload  +++| CCI12    SX6    B1
09669  M00S05255.pfload  +++|          EQ     CCIX        RETURN
09670  M00S05256.pfload  +++|
09671  M00S05257.pfload  +++|
09672  M00S05258.pfload  +++| CCIA     DATA   -1          CURRENT RANDOM INDEX
09673  M00S05259.pfload  +++| CCIB     DATA   -1          BUFFER MODIFICATION FLAG
09674  M00S05260.pfload  +++| CMA      SPACE  4,10
09675  M00S05261.pfload  +++|**        CMA - CLEAR MESSAGE AREA.
09676  M00S05262.pfload  +++|*
09677  M00S05263.pfload  +++|*         EXIT   *K* DISPLAY ERROR MESSAGE LINES CLEARED.
09678  M00S05264.pfload  +++|*
09679  M00S05265.pfload  +++|*         USES   X - 5.
09680  M00S05266.pfload  +++|*                A - 5.
09681  M00S05267.pfload  +++|*
09682  M00S05268.pfload  +++|*         MACROS MOVE.
09683  M00S05269.pfload  +++|
09684  M00S05270.pfload  +++|
09685  M00S05271.pfload  +++| CMA      SUBR               ENTRY/EXIT
09686  M00S05272.pfload  +++|          SA5    IDSA+/COMSPFS/ADM2
09687  M00S05273.pfload  +++|          MOVE   4,BLNK,X5
09688  M00S05274.pfload  +++|          SA5    A5+B1
09689  M00S05275.pfload  +++|          MOVE   4,BLNK,X5
Line S05276 Modification History
M01 (Removed by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
09690  M01S05276.241l630 ---|          SA5    A5+B1
09691  M01S05277.241l630 ---|          MOVE   4,BLNK,X5
09692  M01S05278.241l630 ---|          SA5    A5+B1
09693  M01S05279.241l630 ---|          MOVE   4,BLNK,X5
09694  M01S05280.241l630 ---|          SA5    A5+B1
09695  M01S05281.241l630 ---|          MOVE   4,BLNK,X5
09696  M00S05282.pfload  +++|          EQ     CMAX        RETURN
Line S02263 Modification History
M01 (Added by) ns22000
M02 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
09697  M02S02263.253l688 ---| FCO      SPACE  4,15
09698  M02S02264.253l688 ---|**        FCO - FORMAT CATALOG FOR OUTPUT.
09699  M02S02265.253l688 ---|*
09700  M02S02266.253l688 ---|*         ENTRY  (B2) = FWA OF CIR ENTRY.
09701  M02S02267.253l688 ---|*
09702  M02S02268.253l688 ---|*         EXIT   ENTRY WRITTEN TO OUTPUT FILE.
09703  M02S02269.253l688 ---|*
09704  M02S02270.253l688 ---|*         USES   X - 0, 1, 2, 5, 6.
09705  M02S02271.253l688 ---|*                A - 1, 6.
09706  M02S02272.253l688 ---|*
09707  M02S02273.253l688 ---|*         CALLS  CDD, COD, SFN.
09708  M02S02274.253l688 ---|*
09709  M02S02275.253l688 ---|*         MACROS EDATE, ETIME, WRITEH.
09710  M02S02276.253l688 ---|
09711  M02S02277.253l688 ---|
09712  M02S02278.253l688 ---| FCO      SUBR               ENTRY/EXIT
09713  M02S02279.253l688 ---|          SX6    B2          SAVE ENTRY ADDRESS
09714  M02S02280.253l688 ---|          SA6    FCOA
09715  M02S02281.253l688 ---|          SA1    LNAC        INCREMENT LINE NUMBER
09716  M02S02282.253l688 ---|          SX6    X1+B1
09717  M02S02283.253l688 ---|          SA6    A1
09718  M02S02284.253l688 ---|          SA1    LNPP        INCREMENT LINES / PAGE
09719  M02S02285.253l688 ---|          SX6    X1+2
09720  M02S02286.253l688 ---|          SA2    A1+B1
09721  M02S02287.253l688 ---|          IX2    X2-X6
09722  M02S02288.253l688 ---|          PL     X2,FCO1     IF NOT END OF PAGE
09723  M02S02289.253l688 ---|          SA1    PAGE        INCREMENT PAGE NUMBER
09724  M02S02290.253l688 ---|          SX6    X1+B1
09725  M02S02291.253l688 ---|          SA6    A1
09726  M02S02292.253l688 ---|          RJ     CDD
09727  M02S02293.253l688 ---|          SA6    HPGC
09728  M02S02294.253l688 ---|          WRITEH OUTPUT,HDR5,7
09729  M02S02295.253l688 ---|          WRITEH OUTPUT,HDR1B,7
09730  M02S02296.253l688 ---|          WRITEH OUTPUT,HDR2,1
09731  M02S02297.253l688 ---|          WRITEH OUTPUT,HDR6,7
09732  M02S02298.253l688 ---|          WRITEH OUTPUT,HDR7,7
09733  M02S02299.253l688 ---|          WRITEH OUTPUT,HDR2,1
09734  M02S02300.253l688 ---|          SX6    6+2
09735  M02S02301.253l688 ---| FCO1     SA6    LNPP
09736  M02S02302.253l688 ---|          SA1    LNAC        OUTPUT LINE NUMBER
09737  M02S02303.253l688 ---|          RJ     CDD
09738  M02S02304.253l688 ---|          LX6    12
09739  M02S02305.253l688 ---|          SA6    OUTL
09740  M02S02306.253l688 ---|          SA1    FCOA
09741  M02S02307.253l688 ---|          SA1    X1
09742  M02S02308.253l688 ---|          MX0    42          FORMAT FILENAME AND UI
09743  M02S02309.253l688 ---|          BX5    -X0*X1
09744  M02S02310.253l688 ---|          BX1    X0*X1
09745  M02S02311.253l688 ---|          RJ     SFN
09746  M02S02312.253l688 ---|          SA6    OUTL+B1
09747  M02S02313.253l688 ---|          BX1    X5
09748  M02S02314.253l688 ---|          RJ     COD
09749  M02S02315.253l688 ---|          LX6    12
09750  M02S02316.253l688 ---|          SA6    OUTL+2
09751  M02S02317.253l688 ---|          SA1    FCOA        GET DEVICE,COUNT AND DATE+TIME
09752  M02S02318.253l688 ---|          SA1    X1+B1
09753  M02S02319.253l688 ---|          MX2    -36
09754  M02S02320.253l688 ---|          BX0    -X2*X1
09755  M02S02321.253l688 ---|          MX2    18
09756  M02S02322.253l688 ---|          BX5    X2*X1
09757  M02S02323.253l688 ---|          LX5    18
09758  M02S02324.253l688 ---|          LX1    18
09759  M02S02325.253l688 ---|          MX2    6
09760  M02S02326.253l688 ---|          BX1    X2*X1
09761  M02S02327.253l688 ---|          LX1    6
09762  M02S02328.253l688 ---|          ZR     X1,FCO2     IF DEVICE NUMBER NOT AVAILABLE
09763  M02S02329.253l688 ---|          RJ     COD
09764  M02S02330.253l688 ---|          LX6    24
09765  M02S02331.253l688 ---|          SA6    OUTL+6
09766  M02S02332.253l688 ---|          EQ     FCO3
09767  M02S02333.253l688 ---|
09768  M02S02334.253l688 ---| FCO2     SA1    BLNK
09769  M02S02335.253l688 ---|          BX6    X1
09770  M02S02336.253l688 ---|          SA6    OUTL+6
09771  M02S02337.253l688 ---| FCO3     BX1    X5
09772  M02S02338.253l688 ---|          RJ     COD
09773  M02S02339.253l688 ---|          LX6    12
09774  M02S02340.253l688 ---|          SA6    OUTL+3
09775  M02S02341.253l688 ---|          MX2    -18
09776  M02S02342.253l688 ---|          BX5    -X2*X0
09777  M02S02343.253l688 ---|          AX0    18
09778  M02S02344.253l688 ---|          BX1    -X2*X0
09779  M02S02345.253l688 ---|          EDATE  X1
09780  M02S02346.253l688 ---|          SA6    OUTL+4
09781  M02S02347.253l688 ---|          BX1    X5
09782  M02S02348.253l688 ---|          ETIME  X1
09783  M02S02349.253l688 ---|          SA6    OUTL+5
09784  M02S02350.253l688 ---|          WRITEH OUTPUT,OUTL,7
09785  M02S02351.253l688 ---|          WRITEH OUTPUT,HDR2,1
09786  M02S02352.253l688 ---|          EQ     FCOX        RETURN
09787  M02S02353.253l688 ---|
09788  M02S02354.253l688 ---|
09789  M02S02355.253l688 ---| FCOA     CON    0           CIR ADDRESS
09790  M02S02356.253l688 ---|
09791  M02S02357.253l688 ---|*         CATALOG IMAGE LIST HEADERS.
09792  M02S02358.253l688 ---|
09793  M02S02359.253l688 ---| HDR5     DIS    5,1       PFLOAD CATALOG OF CATALOG IMAGES
09794  M02S02360.253l688 ---|          DIS    1,    PAGE
09795  M02S02361.253l688 ---| HPGC     DIS    1,
09796  M02S02362.253l688 ---| HDR6     DIS    5,             FILE      USER     ACCESS      LAST A
09797  M02S02363.253l688 ---|          DIS    2,CCESS       DEVICE
09798  M02S02364.253l688 ---| HDR7     DIS    5,             NAME      INDEX    COUNT     DATE
09799  M02S02365.253l688 ---|          DIS    2,   TIME     NUMBER
09800  M00S05283.pfload  +++| LFS      SPACE  4,20
09801  M00S05284.pfload  +++|**        LFS - LIST FILES ON CATALOG IMAGE RECORD.
09802  M00S05285.pfload  +++|*
Line S05286 Modification History
M01 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
09803  M01S05286.286l859 ---|*         ENTRY  (CIRD) = REMAINING FILE COUNT.
Line S00769 Modification History
M01 (Added by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
09804  M01S00769.286l859 +++|*         ENTRY  (CIFC) = REMAINING FILE COUNT.
09805  M00S05287.pfload  +++|*                (CIRT - CIRT+NWCD*NDEV) = DIRECTORY OF CATALOG IMAGE
09806  M00S05288.pfload  +++|*                RECORD FILE.
09807  M00S05289.pfload  +++|*
09808  M00S05290.pfload  +++|*         EXIT   FILE LIST CREATED AND RELEASED FOR PRINTING.
09809  M00S05291.pfload  +++|*
09810  M00S05292.pfload  +++|*         USES   X - 1, 2, 5, 6.
09811  M00S05293.pfload  +++|*                A - 1, 5, 6.
09812  M00S05294.pfload  +++|*                B - 2.
09813  M00S05295.pfload  +++|*
Line S05296 Modification History
M01 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
09814  M01S05296.253l688 ---|*         CALLS  CDD, FCO.
Line S00165 Modification History
M01 (Added by) 253l688
M02 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
09815  M02S00165.286l859 ---|*         CALLS  CDD, FCI, ICI.
Line S00770 Modification History
M01 (Added by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
09816  M01S00770.286l859 +++|*         CALLS  CDD, FCI, RPP.
09817  M00S05297.pfload  +++|*
09818  M00S05298.pfload  +++|*         MACROS MESSAGE, MOVE, READ, READW, RECALL, ROUTE, WRITEF,
09819  M00S05299.pfload  +++|*                WRITEH.
09820  M00S05300.pfload  +++|
09821  M00S05301.pfload  +++|
09822  M00S05302.pfload  +++| LFS      SUBR               ENTRY/EXIT
Line S05303 Modification History
M01 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
09823  M01S05303.253l688 ---|          SX6    B1
09824  M01S05304.253l688 ---|          SA6    PAGE
09825  M01S05305.253l688 ---|          BX6    X6-X6
09826  M01S05306.253l688 ---|          SA6    LNAC
Line S05307 Modification History
M01 (Removed by) ns22000
M02 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
09827  M02S05307.253l688 ---|          SX6    PGLM
Line S02366 Modification History
M01 (Added by) ns22000
M02 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
09828  M02S02366.253l688 ---|          SX6    99999       FORCE PAGE EJECT
Line S05308 Modification History
M01 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
09829  M01S05308.253l688 ---|          SA6    LNPP
Line S00166 Modification History
M01 (Added by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
09830  M01S00166.253l688 +++|          SA1    PAGE
09831  M01S00167.253l688 +++|          SX7    B1+
09832  M01S00168.253l688 +++|          BX6    X1
09833  M01S00169.253l688 +++|          SA7    A1          RESET PAGE NUMBER
09834  M01S00170.253l688 +++|          SA6    LFSK        SAVE OUTPUT FILE PAGE NUMBER
Line S00171 Modification History
M01 (Added by) 253l688
M02 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
09835  M02S00171.286l859 ---|          RJ     ICI         INITIALIZE FOR CIR DATA OUTPUT
09836  M02S00172.286l859 ---|          MOVE   PGTXL,LFSL,PGTX  REPLACE TITLE TEXT
Line S00771 Modification History
M01 (Added by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
09837  M01S00771.286l859 +++|          SX6    LCIR
09838  M01S00772.286l859 +++|          SA6    OFFA        SET OUTPUT FILE FET ADDRESS
09839  M01S00773.286l859 +++|          SX2    LFSL        SET TITLE TEXT
09840  M01S00774.286l859 +++|          SX6    CIS         SET CIR SUBHEADER PROCESSOR
09841  M01S00775.286l859 +++|          RJ     RPP         RESET PAGE PARAMETERS
09842  M00S05309.pfload  +++|          SX6    -1
09843  M00S05310.pfload  +++|          SA6    LFSA
Line S05311 Modification History
M01 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
09844  M01S05311.253l688 ---|          SA1    LFSC        SET HEADER
09845  M01S05312.253l688 ---|          BX6    X1
09846  M01S05313.253l688 ---|          SA6    HDR5+4
09847  M00S05314.pfload  +++|          SA5    IDSA+/COMSPFS/ADMS
09848  M00S05315.pfload  +++|          MOVE   3,LFSB,X5   DISPLAY *LISTING FILES* MESSAGE
09849  M00S05316.pfload  +++|          MESSAGE  LFSB,1
Line S05317 Modification History
M01 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
09850  M01S05317.286l859 ---|          SA5    CIRD        SET TOTAL FILE COUNT
Line S00776 Modification History
M01 (Added by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
09851  M01S00776.286l859 +++|          SA5    CIFC        SET TOTAL FILE COUNT
09852  M00S05318.pfload  +++|          ZR     X5,LFS4     IF NO FILES
09853  M00S05319.pfload  +++| LFS1     SA1    LFSA        SET DEVICE INDEX
09854  M00S05320.pfload  +++|          SX2    NWCD
09855  M00S05321.pfload  +++|          SX6    X1+B1
09856  M00S05322.pfload  +++|          SA6    A1
09857  M00S05323.pfload  +++|          IX6    X6*X2
09858  M00S05324.pfload  +++|          SA5    CIRT+X6
09859  M00S05325.pfload  +++|          ZR     X5,LFS4     IF NO DEVICES LEFT
09860  M00S05326.pfload  +++|          AX5    12
09861  M00S05327.pfload  +++|          BX6    X5          SAVE CATALOG TRACK COUNT
09862  M00S05328.pfload  +++|          SA6    LFSD
09863  M00S05329.pfload  +++|          SX6    A5          SAVE DIRECTORY ADDRESS
09864  M00S05330.pfload  +++|          SA6    LFSF
09865  M00S05331.pfload  +++| LFS2     SA1    LFSF        GET DIRECTORY ADDRESS
09866  M00S05332.pfload  +++|          SA5    X1+B1
09867  M00S05333.pfload  +++|          SX6    A5          SAVE DIRECTORY ADDRESS
09868  M00S05334.pfload  +++|          SA6    LFSF
09869  M00S05335.pfload  +++|          SA1    LFSD
09870  M00S05336.pfload  +++|          SX6    X1-1
09871  M00S05337.pfload  +++|          SA6    LFSD
09872  M00S05338.pfload  +++|          NG     X6,LFS1     IF END OF CATALOGS
09873  M00S05339.pfload  +++|          ZR     X5,LFS2     IF NO FILES LEFT ON THIS TRACK
09874  M00S05340.pfload  +++|          RECALL CIRF
09875  M00S05341.pfload  +++|          SA1    X2+B1       REWIND BUFFER
09876  M00S05342.pfload  +++|          SX6    X1
09877  M00S05343.pfload  +++|          SA6    A1+B1
09878  M00S05344.pfload  +++|          SA6    A6+B1
09879  M00S05345.pfload  +++|          MX6    -30
09880  M00S05346.pfload  +++|          BX6    -X6*X5
09881  M00S05347.pfload  +++|          SA6    CIRF+6
09882  M00S05348.pfload  +++|          AX5    30
09883  M00S05349.pfload  +++|          READ   CIRF        INITIATE RANDOM READ
09884  M00S05350.pfload  +++| LFS3     READW  CIRF,LFSG,2 READ CATALOG IMAGE ENTRY
09885  M00S05351.pfload  +++|          NZ     X1,LFS2     IF END OF CATALOG TRACK
09886  M00S05352.pfload  +++|          SA1    LFSG
09887  M00S05353.pfload  +++|          ZR     X1,LFS3     IF NULL ENTRY
09888  M00S05354.pfload  +++|          BX6    X5          SAVE FILE COUNT
Line S05355 Modification History
M01 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
09889  M01S05355.253l688 ---|          SB2    A1          SET CATALOG IMAGE ADDRESS
09890  M00S05356.pfload  +++|          SA6    LFSE
Line S05357 Modification History
M01 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
09891  M01S05357.253l688 ---|          RJ     FCO         FORMAT CATALOG FOR OUTPUT
Line S00173 Modification History
M01 (Added by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
09892  M01S00173.253l688 +++|          SX6    A1+         SET CATALOG IMAGE ADDRESS
Line S00174 Modification History
M01 (Added by) 253l688
M02 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
09893  M02S00174.286l859 ---|          SX0    LCIR        SET FET ADDRESS
Line S00175 Modification History
M01 (Added by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
09894  M01S00175.253l688 +++|          RJ     FCI         FORMAT CIR ENTRY FOR OUTPUT
09895  M00S05358.pfload  +++|          SA5    LFSE        RESTORE FILE COUNT
09896  M00S05359.pfload  +++|          SX1    B1
09897  M00S05360.pfload  +++|          IX5    X5-X1       DECREMENT FILE COUNT
09898  M00S05361.pfload  +++|          NZ     X5,LFS3     IF MORE FILES
09899  M00S05362.pfload  +++|          EQ     LFS2        PROCESS NEXT CATALOG TRACK
09900  M00S05363.pfload  +++|
Line S05364 Modification History
M01 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
09901  M01S05364.286l859 ---| LFS4     SA1    CIRD        CONVERT FILE COUNT
Line S00777 Modification History
M01 (Added by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
09902  M01S00777.286l859 +++| LFS4     SA1    CIFC        CONVERT FILE COUNT
09903  M00S05365.pfload  +++|          RJ     CDD
09904  M00S05366.pfload  +++|          SA6    LFSH+2
Line S05367 Modification History
M01 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
09905  M01S05367.253l688 ---|          WRITEH OUTPUT,LFSH,3
09906  M01S05368.253l688 ---|          WRITEF OUTPUT,R
Line S00176 Modification History
M01 (Added by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
09907  M01S00176.253l688 +++|          WRITEH LCIR,LFSH,3
09908  M01S00177.253l688 +++|          WRITEF LCIR,R
09909  M00S05369.pfload  +++|          SX6    B0+         CLEAR PARAMETER BLOCK
09910  M00S05370.pfload  +++|          SB2    DSPBL-1
09911  M00S05371.pfload  +++| LFS5     SA6    DSPB+B2
09912  M00S05372.pfload  +++|          SB2    B2-1
09913  M00S05373.pfload  +++|          PL     B2,LFS5     IF NOT END OF BLOCK
Line S05374 Modification History
M01 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
09914  M01S05374.253l688 ---|          SA5    OUTPUT      SET UP *DSP* PARAMETER BLOCK
Line S00178 Modification History
M01 (Added by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
09915  M01S00178.253l688 +++|          SA5    LCIR        SET UP *DSP* PARAMETER BLOCK
09916  M00S05375.pfload  +++|          MX2    42
09917  M00S05376.pfload  +++|          BX6    X2*X5
09918  M00S05377.pfload  +++|          SA6    DSPB
09919  M00S05378.pfload  +++|          SA5    LFSJ        SET FLAG BITS
09920  M00S05379.pfload  +++|          BX6    X5
09921  M00S05380.pfload  +++|          SA6    A6+B1
09922  M00S05381.pfload  +++|          ROUTE  DSPB,RECALL
Line S05382 Modification History
M01 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
09923  M01S05382.253l688 ---|          SX6    B1          RESET PAGE
09924  M01S05383.253l688 ---|          SA6    PAGE
09925  M01S05384.253l688 ---|          BX6    X6-X6       RESET LINE NUMBER ACCUMULATOR
09926  M01S05385.253l688 ---|          SA6    LNAC
Line S05386 Modification History
M01 (Removed by) ns22000
M02 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
09927  M02S05386.253l688 ---|          SX6    PGLM        RESET INITIAL LINES PER PAGE
Line S02367 Modification History
M01 (Added by) ns22000
M02 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
09928  M02S02367.253l688 ---|          SX6    99999       FORCE PAGE EJECT
Line S05387 Modification History
M01 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
09929  M01S05387.253l688 ---|          SA6    LNPP
09930  M00S05388.pfload  +++|          SA5    IDSA+/COMSPFS/ADMS
09931  M00S05389.pfload  +++|          MOVE   3,BLNK,X5
09932  M00S05390.pfload  +++|          MESSAGE (=C**),1
Line S00179 Modification History
M01 (Added by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
09933  M01S00179.253l688 +++|          SA1    LFSK        RESET OUTPUT FILE PAGE NUMBER
09934  M01S00180.253l688 +++|          BX6    X1
09935  M01S00181.253l688 +++|          SA6    PAGE
Line S00778 Modification History
M01 (Added by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
09936  M01S00778.286l859 +++|          SX6    O
09937  M01S00779.286l859 +++|          SA6    OFFA        RESET OUTPUT FILE FET ADDRESS
09938  M00S05391.pfload  +++|          EQ     LFSX        RETURN
09939  M00S05392.pfload  +++|
09940  M00S05393.pfload  +++|
Line S05394 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
09941  M01S05394.ns22000 ---| LFSA     BSS    1           DEVICE INDEX
Line S02368 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
09942  M01S02368.ns22000 +++| LFSA     CON    0           DEVICE INDEX
09943  M00S05395.pfload  +++| LFSB     DATA   30C LISTING REMAINING FILES.
Line S05396 Modification History
M01 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
09944  M01S05396.253l688 ---| LFSC     DATA   10H LEFT.
Line S05397 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
09945  M01S05397.ns22000 ---| LFSD     BSS    1           CATALOG TRACK COUNT
09946  M01S05398.ns22000 ---| LFSE     BSS    1           FILE COUNT
09947  M01S05399.ns22000 ---| LFSF     BSS    1           DIRECTORY ADDRESS
09948  M01S05400.ns22000 ---| LFSG     BSS    2           SCRATCH CATALOG IMAGE ENTRY
Line S02369 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
09949  M01S02369.ns22000 +++| LFSD     CON    0           CATALOG TRACK COUNT
09950  M01S02370.ns22000 +++| LFSE     CON    0           FILE COUNT
09951  M01S02371.ns22000 +++| LFSF     CON    0           DIRECTORY ADDRESS
09952  M01S02372.ns22000 +++| LFSG     BSSZ   2           SCRATCH CATALOG IMAGE ENTRY
09953  M00S05401.pfload  +++| LFSH     DATA   30H0   TOTAL FILE COUNT
09954  M00S05402.pfload  +++| LFSJ     VFD    24/0,12/2HPR,6/0,18/FRDC
Line S00046 Modification History
M01 (Added by) 241l630
M02 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
09955  M02S00046.253l688 ---| SRS      SPACE  4,10
Line S00182 Modification History
M01 (Added by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
09956  M01S00182.253l688 +++| LFSK     CON    1           OUTPUT FILE PAGE NUMBER
09957  M01S00183.253l688 +++| LFSL     DATA   50H1FILES REMAINING ON CATALOG IMAGE RECORD.
09958  M01S00184.253l688 +++| SRS      SPACE  4,15
Line S00047 Modification History
M01 (Added by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
09959  M01S00047.241l630 +++|**        SRS - SELECT RIGHT SCREEN.
09960  M01S00048.241l630 +++|*
09961  M01S00049.241l630 +++|*         *SRS* REPLACES THE CURRENT RIGHT SCREEN WITH THE REQUESTED
09962  M01S00050.241l630 +++|*         ONE AND ALERTS THE OPERATOR TO ENTER AN OPTION.
09963  M01S00051.241l630 +++|*
09964  M01S00052.241l630 +++|*         ENTRY  (X6) = FWA OF THE REQUESTED RIGHT SCREEN BUFFER.
09965  M01S00053.241l630 +++|*
09966  M01S00054.241l630 +++|*         USES   X - 0, 5, 6.
09967  M01S00055.241l630 +++|*                A - 5, 6.
09968  M01S00056.241l630 +++|*
Line S00057 Modification History
M01 (Added by) 241l630
M02 (Removed by) pfloa19
Seq #  *Modification Id* Act 
----------------------------+
09969  M02S00057.pfloa19 ---|*         MACROS MOVE.
Line S00219 Modification History
M01 (Added by) pfloa19
Seq #  *Modification Id* Act 
----------------------------+
09970  M01S00219.pfloa19 +++|*         MACROS MESSAGE.
Line S00058 Modification History
M01 (Added by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
09971  M01S00058.241l630 +++|
09972  M01S00059.241l630 +++|
09973  M01S00060.241l630 +++| SRS      SUBR               ENTRY/EXIT
09974  M01S00061.241l630 +++|          SA5    IDSA+/COMSPFS/KDCW  CHANGE *K* DISPLAY CONTROL WORD
09975  M01S00062.241l630 +++|          MX0    42
09976  M01S00063.241l630 +++|          LX6    18
09977  M01S00064.241l630 +++|          LX0    18
09978  M01S00065.241l630 +++|          BX5    X0*X5
09979  M01S00066.241l630 +++|          BX6    X5+X6
09980  M01S00067.241l630 +++|          SA6    A5
Line S00068 Modification History
M01 (Added by) 241l630
M02 (Removed by) pfloa19
Seq #  *Modification Id* Act 
----------------------------+
09981  M02S00068.pfloa19 ---|          SA5    IDSA+/COMSPFS/ADER  ALERT THE OPERATOR
09982  M02S00069.pfloa19 ---|          MOVE   4,MSGS,X5
Line S00220 Modification History
M01 (Added by) pfloa19
Seq #  *Modification Id* Act 
----------------------------+
09983  M01S00220.pfloa19 +++|          MESSAGE  MSGW,2    * REQUEST K DISPLAY.*
Line S00070 Modification History
M01 (Added by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
09984  M01S00070.241l630 +++|          EQ     SRSX        RETURN
Line S05403 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
09985  M01S05403.ns22000 ---| FCO      SPACE  4,15
09986  M01S05404.ns22000 ---|**        FCO - FORMAT CATALOG FOR OUTPUT.
09987  M01S05405.ns22000 ---|*
09988  M01S05406.ns22000 ---|*         ENTRY  (B2) = FWA OF CIR ENTRY.
09989  M01S05407.ns22000 ---|*
09990  M01S05408.ns22000 ---|*         EXIT   ENTRY WRITTEN TO OUTPUT FILE.
09991  M01S05409.ns22000 ---|*
09992  M01S05410.ns22000 ---|*         USES   X - 0, 1, 2, 5, 6.
09993  M01S05411.ns22000 ---|*                A - 1, 6.
09994  M01S05412.ns22000 ---|*
09995  M01S05413.ns22000 ---|*         CALLS  CDD, COD, SFN.
09996  M01S05414.ns22000 ---|*
09997  M01S05415.ns22000 ---|*         MACROS EDATE, ETIME, WRITEH.
09998  M01S05416.ns22000 ---|
09999  M01S05417.ns22000 ---|
10000  M01S05418.ns22000 ---| FCO      SUBR               ENTRY/EXIT
10001  M01S05419.ns22000 ---|          SX6    B2          SAVE ENTRY ADDRESS
10002  M01S05420.ns22000 ---|          SA6    FCOA
10003  M01S05421.ns22000 ---|          SA1    LNAC        INCREMENT LINE NUMBER
10004  M01S05422.ns22000 ---|          SX6    X1+B1
10005  M01S05423.ns22000 ---|          SA6    A1
10006  M01S05424.ns22000 ---|          SA1    LNPP        INCREMENT LINES / PAGE
10007  M01S05425.ns22000 ---|          SX6    X1+2
10008  M01S05426.ns22000 ---|          SX2    PGLM
10009  M01S05427.ns22000 ---|          IX2    X2-X6
10010  M01S05428.ns22000 ---|          PL     X2,FCO1     IF NOT END OF PAGE
10011  M01S05429.ns22000 ---|          SA1    PAGE        INCREMENT PAGE NUMBER
10012  M01S05430.ns22000 ---|          SX6    X1+B1
10013  M01S05431.ns22000 ---|          SA6    A1
10014  M01S05432.ns22000 ---|          RJ     CDD
10015  M01S05433.ns22000 ---|          SA6    HPGC
10016  M01S05434.ns22000 ---|          WRITEH OUTPUT,HDR5,7
10017  M01S05435.ns22000 ---|          WRITEH OUTPUT,HDR1B,7
10018  M01S05436.ns22000 ---|          WRITEH OUTPUT,HDR2,1
10019  M01S05437.ns22000 ---|          WRITEH OUTPUT,HDR6,7
10020  M01S05438.ns22000 ---|          WRITEH OUTPUT,HDR7,7
10021  M01S05439.ns22000 ---|          WRITEH OUTPUT,HDR2,1
10022  M01S05440.ns22000 ---|          SX6    B1
10023  M01S05441.ns22000 ---| FCO1     SA6    LNPP
10024  M01S05442.ns22000 ---|          SA1    LNAC        OUTPUT LINE NUMBER
10025  M01S05443.ns22000 ---|          RJ     CDD
10026  M01S05444.ns22000 ---|          LX6    12
10027  M01S05445.ns22000 ---|          SA6    OUTL
10028  M01S05446.ns22000 ---|          SA1    FCOA
10029  M01S05447.ns22000 ---|          SA1    X1
10030  M01S05448.ns22000 ---|          MX0    42          FORMAT FILENAME AND UI
10031  M01S05449.ns22000 ---|          BX5    -X0*X1
10032  M01S05450.ns22000 ---|          BX1    X0*X1
10033  M01S05451.ns22000 ---|          RJ     SFN
10034  M01S05452.ns22000 ---|          SA6    OUTL+B1
10035  M01S05453.ns22000 ---|          BX1    X5
10036  M01S05454.ns22000 ---|          RJ     COD
10037  M01S05455.ns22000 ---|          LX6    12
10038  M01S05456.ns22000 ---|          SA6    OUTL+2
10039  M01S05457.ns22000 ---|          SA1    FCOA        GET DEVICE,COUNT AND DATE+TIME
10040  M01S05458.ns22000 ---|          SA1    X1+B1
10041  M01S05459.ns22000 ---|          MX2    -36
10042  M01S05460.ns22000 ---|          BX0    -X2*X1
10043  M01S05461.ns22000 ---|          MX2    18
10044  M01S05462.ns22000 ---|          BX5    X2*X1
10045  M01S05463.ns22000 ---|          LX5    18
10046  M01S05464.ns22000 ---|          LX1    18
10047  M01S05465.ns22000 ---|          MX2    6
10048  M01S05466.ns22000 ---|          BX1    X2*X1
10049  M01S05467.ns22000 ---|          LX1    6
10050  M01S05468.ns22000 ---|          ZR     X1,FCO2     IF DEVICE NUMBER NOT AVAILABLE
10051  M01S05469.ns22000 ---|          RJ     COD
10052  M01S05470.ns22000 ---|          LX6    24
10053  M01S05471.ns22000 ---|          SA6    OUTL+6
10054  M01S05472.ns22000 ---|          EQ     FCO3
10055  M01S05473.ns22000 ---| FCO2     SA1    BLNK
10056  M01S05474.ns22000 ---|          BX6    X1
10057  M01S05475.ns22000 ---|          SA6    OUTL+6
10058  M01S05476.ns22000 ---| FCO3     BX1    X5
10059  M01S05477.ns22000 ---|          RJ     COD
10060  M01S05478.ns22000 ---|          LX6    12
10061  M01S05479.ns22000 ---|          SA6    OUTL+3
10062  M01S05480.ns22000 ---|          MX2    -18
10063  M01S05481.ns22000 ---|          BX5    -X2*X0
10064  M01S05482.ns22000 ---|          AX0    18
10065  M01S05483.ns22000 ---|          BX1    -X2*X0
10066  M01S05484.ns22000 ---|          EDATE  X1
10067  M01S05485.ns22000 ---|          SA6    OUTL+4
10068  M01S05486.ns22000 ---|          BX1    X5
10069  M01S05487.ns22000 ---|          ETIME  X1
10070  M01S05488.ns22000 ---|          SA6    OUTL+5
10071  M01S05489.ns22000 ---|          WRITEH OUTPUT,OUTL,7
10072  M01S05490.ns22000 ---|          WRITEH OUTPUT,HDR2,1
10073  M01S05491.ns22000 ---|          EQ     FCOX
10074  M01S05492.ns22000 ---|
10075  M01S05493.ns22000 ---|
10076  M01S05494.ns22000 ---| FCOA     BSS    1
10077  M01S05495.ns22000 ---| HDR5     DIS    5,1       PFLOAD CATALOG OF CATALOG IMAGES
10078  M01S05496.ns22000 ---|          DIS    1,    PAGE
10079  M01S05497.ns22000 ---| HPGC     DIS    1,
10080  M01S05498.ns22000 ---| HDR6     DIS    5,             FILE      USER     ACCESS      LAST A
10081  M01S05499.ns22000 ---|          DIS    2,CCESS       DEVICE
10082  M01S05500.ns22000 ---| HDR7     DIS    5,             NAME      INDEX    COUNT     DATE
10083  M01S05501.ns22000 ---|          DIS    2,   TIME     NUMBER
10084  M01S05502.ns22000 ---|          TITLE  COMMON DECKS AND BUFFERS
10085  M01S05503.ns22000 ---|**        COMMON DECKS
Line S02373 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
10086  M01S02373.ns22000 +++|          TITLE  COMMON DECKS.
10087  M01S02374.ns22000 +++|*         COMMON DECKS.
10088  M00S05504.pfload  +++|
10089  M00S05505.pfload  +++|
Line S05506 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
10090  M01S05506.ns22000 ---| FCE$     EQU    0
Line S05507 Modification History
M01 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
10091  M01S05507.286l859 ---|*CALL     COMCARG
Line S00780 Modification History
M01 (Added by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
10092  M01S00780.286l859 +++|*CALL     COMCARM
10093  M00S05508.pfload  +++|*CALL     COMCCCE
10094  M00S05509.pfload  +++|*CALL     COMCCDD
Line S02375 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
10095  M01S02375.ns22000 +++| ERP1$    EQU    1           SELECT *COMCCIO* ERROR PROCESSING OPTION
10096  M00S05510.pfload  +++|*CALL     COMCCIO
10097  M00S05511.pfload  +++|*CALL     COMCCOD
10098  M00S05512.pfload  +++|*CALL     COMCCPM
10099  M00S05513.pfload  +++|*CALL     COMCDXB
10100  M00S05514.pfload  +++|*CALL     COMCEDT
Line S02376 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
10101  M01S02376.ns22000 +++| FCE$     EQU    0
10102  M00S05515.pfload  +++|*CALL     COMCFCE
Line S00781 Modification History
M01 (Added by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
10103  M01S00781.286l859 +++| GMS$     EQU    1           USE SORT KEY MASK
10104  M01S00782.286l859 +++| MWK$     EQU    1           ALLOW MULTIPLE WORD SORT KEYS
10105  M01S00783.286l859 +++|*CALL     COMCGMS
10106  M01S00784.286l859 +++|*CALL     COMCJCR
Line S05516 Modification History
M01 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
10107  M01S05516.253l688 ---| FCELL    EQU    /COMCFCE/FCELL
Line S00027 Modification History
M01 (Added by) v23l617
M02 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
10108  M02S00027.253l688 ---| FCELB    EQU    /COMCFCE/FCELB  SIZE OF FOURTH LINE
Line S05517 Modification History
M01 (Removed by) ns22000
M02 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
10109  M02S05517.253l688 ---| HDR8     EQU    /COMCFCE/CHDR3
Line S05518 Modification History
M01 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
10110  M01S05518.253l688 ---| OUTL     BSSZ   FCELL
10111  M01S05519.253l688 ---| OUTM     BSSZ   FCELL
10112  M01S05520.253l688 ---| OUTN     BSSZ   FCELL       LINE BUFFER FOR FORMATTED CATALOG ENTRIES
Line S05521 Modification History
M01 (Removed by) v23l617
M02 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
10113  M02S05521.253l688 ---| AMSG     BSSZ   1           APPENDED MESSAGE BUFFER
Line S00028 Modification History
M01 (Added by) v23l617
M02 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
10114  M02S00028.253l688 ---| OUTO     BSSZ   FCELB
10115  M02S00029.253l688 ---| COLN     BSSZ   FCELL       COPIED OUTPUT BUFFER WITH APPENDED MESSAGE
10116  M02S00030.253l688 ---| AMSG     BSSZ   1           APPEND MESSAGE BUFFER
Line S05522 Modification History
M01 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
10117  M01S05522.253l688 ---| HDR3     EQU    /COMCFCE/CHDR1
10118  M01S05523.253l688 ---| HDR4     EQU    /COMCFCE/CHDR2
Line S05524 Modification History
M01 (Removed by) ns22000
M02 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
10119  M02S05524.253l688 ---|*CALL     COMCPFS
Line S02377 Modification History
M01 (Added by) ns22000
M02 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
10120  M02S02377.253l688 ---| HDR8     EQU    /COMCFCE/CHDR3
Line S00031 Modification History
M01 (Added by) v23l617
M02 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
10121  M02S00031.253l688 ---| HDR9     EQU    /COMCFCE/CHDR4
10122  M00S05525.pfload  +++|*CALL     COMCLFM
Line S00785 Modification History
M01 (Added by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
10123  M01S00785.286l859 +++|*CALL     COMCMSF
10124  M00S05526.pfload  +++|*CALL     COMCMVE
10125  M00S05527.pfload  +++|*CALL     COMCPFM
Line S00185 Modification History
M01 (Added by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
10126  M01S00185.253l688 +++| COM$     EQU    1           ASSEMBLE COMMON ROUTINES
10127  M01S00186.253l688 +++| PFA$     EQU    1           ASSEMBLE COMMON ARCHIVE FILE ROUTINES
Line S00786 Modification History
M01 (Added by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
10128  M01S00786.286l859 +++| DVA$     EQU    1           ASSEMBLE DEVICE ACCESS ROUTINES
10129  M01S00787.286l859 +++| PFR$     EQU    1           ASSEMBLE ARCIVE FILE READ ROUTINES
Line S00187 Modification History
M01 (Added by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
10130  M01S00187.253l688 +++|          LIST   X
Line S02378 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
10131  M01S02378.ns22000 +++|*CALL     COMCPFS
Line S00188 Modification History
M01 (Added by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
10132  M01S00188.253l688 +++|          LIST   *
10133  M00S05528.pfload  +++|*CALL     COMCPFU
Line S00788 Modification History
M01 (Added by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
10134  M01S00788.286l859 +++|*CALL     COMCPOP
10135  M00S05529.pfload  +++|*CALL     COMCRDW
10136  M00S05530.pfload  +++|*CALL     COMCSCB
10137  M00S05531.pfload  +++|*CALL     COMCSFN
Line S02379 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
10138  M01S02379.ns22000 +++|*CALL     COMCSNM
10139  M00S05532.pfload  +++|*CALL     COMCSYS
Line S00789 Modification History
M01 (Added by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
10140  M01S00789.286l859 +++|*CALL     COMCUSB
Line S00189 Modification History
M01 (Added by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
10141  M01S00189.253l688 +++|*CALL     COMCVDT
10142  M00S05533.pfload  +++|*CALL     COMCWTC
Line S02380 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
10143  M01S02380.ns22000 +++|*CALL     COMCWTH
Line S00190 Modification History
M01 (Added by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
10144  M01S00190.253l688 +++|*CALL     COMCWTO
10145  M00S05534.pfload  +++|*CALL     COMCWTW
Line S05535 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
10146  M01S05535.ns22000 ---|*CALL     COMCWTH
10147  M00S05536.pfload  +++|*CALL     COMCZTB
Line S05537 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
10148  M01S05537.ns22000 ---|          EJECT
10149  M01S05538.ns22000 ---|
Line S02381 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
10150  M01S02381.ns22000 +++|          TITLE  BUFFERS.
10151  M00S05539.pfload  +++|
10152  M00S05540.pfload  +++|          USE    LITERALS
10153  M00S05541.pfload  +++|
10154  M00S05542.pfload  +++|
Line S05543 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
10155  M01S05543.ns22000 ---|**        BUFFERS
10156  M01S05544.ns22000 ---|*
Line S02382 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
10157  M01S02382.ns22000 +++|*         BUFFERS.
10158  M00S05545.pfload  +++|
10159  M00S05546.pfload  +++|
10160  M00S05547.pfload  +++| PBUF     EQU    *           PERMIT BUFFER
10161  M00S05548.pfload  +++| DBUF     EQU    PBUF+PBUFL  DATA BUFFER
10162  M00S05549.pfload  +++| TCBF     EQU    DBUF+DBUFL  TEMPORARY CATALOG BUFFER
10163  M00S05550.pfload  +++| CWBF     EQU    TCBF+NWCE   CONTROL WORD BUFFER
10164  M00S05551.pfload  +++| MBUF     EQU    CWBF+CWBFL  MAIN INPUT BUFFER
10165  M00S05552.pfload  +++| CBUF     EQU    MBUF+MBUFL  CATALOG BUFFER
10166  M00S05553.pfload  +++| TLBF     EQU    CBUF+CBUFL  TAPE LABEL BUFFER
Line S00033 Modification History
M01 (Added by) ns2223
M02 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
10167  M02S00033.253l688 ---| PVSN     EQU    TLBF+NWTL-4 PREVIOUS ARCHIVE TAPE VSN
Line S02383 Modification History
M01 (Added by) ns22000
M02 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
10168  M02S02383.253l688 ---| DMCT     EQU    TLBF+NWTL-3 DEVICE MASK CATALOG TRACK TABLE
Line S05554 Modification History
M01 (Removed by) ns2697
Seq #  *Modification Id* Act 
----------------------------+
10169  M01S05554.ns2697  ---| DSPB     EQU    TLBF+TLBFL  *DSP* PARAMETER BLOCK
Line S00598 Modification History
M01 (Added by) ns2697
Seq #  *Modification Id* Act 
----------------------------+
10170  M01S00598.ns2697  +++| PFMB     EQU    TLBF+TLBFL  *PFM* CATLIST BUFFER
10171  M01S00599.ns2697  +++| DSPB     EQU    PFMB+PFMBL  *DSP* PARAMETER BLOCK
Line S05555 Modification History
M01 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
10172  M01S05555.286l859 ---| MSTT     SPACE  4,20
10173  M01S05556.286l859 ---|**        MSTT - TABLE OF MST INFORMATION.
10174  M01S05557.286l859 ---|*
10175  M01S05558.286l859 ---|*         2 WORD ENTRIES.
10176  M01S05559.286l859 ---|*
Line S05560 Modification History
M01 (Removed by) ns22000
M02 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
10177  M02S05560.286l859 ---|*T MSTT   12/  DATA,12/  CATS,12/  PETS,12/  NCTR,6/  EQ,6/  DN
Figure MSTT

0561112232429 DN EQ NCTR PETS303536474859 PETS CATS DATA


Line S02384 Modification History
M01 (Added by) ns22000
M02 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
10178  M02S02384.286l859 ---|*T MSTT   12/ DATA, 12/ CATS, 12/ PETS, 9/ NCTR, 9/ EQ, 6/ DN
Figure MSTT

0561415232429 DN EQ NCTR PETS303536474859 PETS CATS DATA


Line S05561 Modification History
M01 (Removed by) ns2047
M02 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
10179  M02S05561.286l859 ---|*T MSTT+1 24/  0,6/  UC,1/S,11/  MN,2/0,8/  SM,8/  DM
Figure MSTT+1

078151617182829 DM SM0 MNS30353659 UC 0


Line S00161 Modification History
M01 (Added by) ns2047
M02 (Removed by) ns22000
M03 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
10180  M03S00161.286l859 ---|*T MSTT+1 12/  MST,12/  SL,6/  UC,1/S,11/  MN,2/0,8/  SM,8/  DM
Figure MSTT+1

078151617182829 DM SM0 MNS303536474859 UC SL MST


Line S02385 Modification History
M01 (Added by) ns22000
M02 (Removed by) 252l678
M03 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
10181  M03S02385.286l859 ---|*T MSTT+1 12/  MST,12/  SL,6/  AL,1/S,11/  MN,2/0,8/  SM,8/  DM
Figure MSTT+1

078151617182829 DM SM0 MNS303536474859 AL SL MST


Line S00001 Modification History
M01 (Added by) 252l678
M02 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
10182  M02S00001.286l859 ---|*T MSTT+1 12/ MST,12/ SL,6/ AL,12/ MN,2/0,8/ SM,8/ DM
Figure MSTT+1

0781516171829 DM SM0 MN303536474859 AL SL MST


Line S05562 Modification History
M01 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
10183  M01S05562.286l859 ---|*
10184  M01S05563.286l859 ---|*         DATA = FIRST TRACK OF INDIRECT DATA CHAIN.
10185  M01S05564.286l859 ---|*         CATS = FIRST CATALOG TRACK.
10186  M01S05565.286l859 ---|*         PETS = FIRST TRACK OF PERMIT CHAIN.
10187  M01S05566.286l859 ---|*         NCTR = NUMBER OF CATALOG TRACKS.
Line S05567 Modification History
M01 (Removed by) ns22000
M02 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
10188  M02S05567.286l859 ---|*         EQ   = EQUIPMENT NUMBER OF DEVICE.
Line S02386 Modification History
M01 (Added by) ns22000
M02 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
10189  M02S02386.286l859 ---|*         EQ   = EST ORDINAL OF DEVICE.
Line S05568 Modification History
M01 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
10190  M01S05568.286l859 ---|*         DN   = DEVICE NUMBER.
Line S00162 Modification History
M01 (Added by) ns2047
M02 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
10191  M02S00162.286l859 ---|*         MST  = ADDRESS OF MST/10.
10192  M02S00163.286l859 ---|*         SL   = SECTOR LIMIT OF DEVICE.
Line S05569 Modification History
M01 (Removed by) ns22000
M02 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
10193  M02S05569.286l859 ---|*         UC   = UNIT COUNT - 1.
Line S02387 Modification History
M01 (Added by) ns22000
M02 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
10194  M02S02387.286l859 ---|*         AL   = DEVICE SECURITY ACCESS LEVEL LIMITS.
Line S05570 Modification History
M01 (Removed by) 252l678
M02 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
10195  M02S05570.286l859 ---|*         S    = ON/OFF STATUS.
Line S05571 Modification History
M01 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
10196  M01S05571.286l859 ---|*         MN   = EQUIPMENT MNEMONIC.
10197  M01S05572.286l859 ---|*         SM   = SECONDARY MASK (DIRECT ACCESS FILES).
10198  M01S05573.286l859 ---|*         DM   = DEVICE MASK (INDIRECT ACCESS FILES AND CATALOGS).
10199  M01S05574.286l859 ---|
10200  M01S05575.286l859 ---|
10201  M01S05576.286l859 ---| MSTT     EQU    DSPB+DSPBL  MST TABLE
10202  M01S05577.286l859 ---| TMDD     SPACE  4,20
10203  M01S05578.286l859 ---|**        TMDD - TABLE OF MASTER DEVICE DESCRIPTIONS.
10204  M01S05579.286l859 ---|*
10205  M01S05580.286l859 ---|*         1 WORD ENTRIES.
10206  M01S05581.286l859 ---|*
Line S05582 Modification History
M01 (Removed by) ns22000
M02 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
10207  M02S05582.286l859 ---|*T TMDD   12/  DATA,12/  DM,12/  PETS,12/  NCTR,6/  EQ,6/  DN
Figure TMDD

0561112232429 DN EQ NCTR PETS303536474859 PETS DM DATA


Line S02388 Modification History
M01 (Added by) ns22000
M02 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
10208  M02S02388.286l859 ---|*T TMDD   12/ DATA, 12/ CATS, 12/ PETS, 9/ NCTR, 9/ EQ, 6/ DN
Figure TMDD

0561415232429 DN EQ NCTR PETS303536474859 PETS CATS DATA


Line S05583 Modification History
M01 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
10209  M01S05583.286l859 ---|*
10210  M01S05584.286l859 ---|*         DATA = FIRST TRACK OF INDIRECT DATA CHAIN.
10211  M01S05585.286l859 ---|*         DM = DEVICE MASK (INDIRECT ACCESS FILES AND CATALOGS).
10212  M01S05586.286l859 ---|*         PETS = FIRST TRACK OF PERMIT CHAIN.
10213  M01S05587.286l859 ---|*         NCTR = NUMBER OF CATALOG TRACKS.
Line S05588 Modification History
M01 (Removed by) ns22000
M02 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
10214  M02S05588.286l859 ---|*         EQ = EQUIPMENT NUMBER OF DEVICE.
Line S02389 Modification History
M01 (Added by) ns22000
M02 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
10215  M02S02389.286l859 ---|*         EQ = EST ORDINAL OF DEVICE.
Line S05589 Modification History
M01 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
10216  M01S05589.286l859 ---|*         DN = DEVICE NUMBER.
10217  M01S05590.286l859 ---|
10218  M01S05591.286l859 ---|
10219  M01S05592.286l859 ---| TMDD     EQU    MSTT+MSTTL  TABLE OF MASTER DEVICE DESCRIPTIONS
10220  M00S05593.pfload  +++| LWRD     SPACE  4,20
Line S05594 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
10221  M01S05594.ns22000 ---|**        LWRD - PFU BUFFER LINKAGE WORD.
Line S02390 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
10222  M01S02390.ns22000 +++|**        LWRD - *PFU* BUFFER LINKAGE WORD.
10223  M00S05595.pfload  +++|*
10224  M00S05596.pfload  +++|*T LWRD   6/  TY,18/  CA,12/  0,12/  DN,12/  LN
Figure LWRD

01112232429 LN DN 0303536535459 0 CA TY

10225  M00S05597.pfload  +++|*
10226  M00S05598.pfload  +++|*         TY = SECTOR TYPE.
10227  M00S05599.pfload  +++|*              0 = FULL SECTOR OR EOR SECTOR.
10228  M00S05600.pfload  +++|*              1 = EOF SECTOR.
10229  M00S05601.pfload  +++|*              2 = EOI SECTOR.
10230  M00S05602.pfload  +++|*              4 = SYSTEM SECTOR.
10231  M00S05603.pfload  +++|*         CA = ADDRESS OF CATALOG ENTRY FOR FILE.
10232  M00S05604.pfload  +++|*         DN = 0 FOR INDIRECT ACCESS FILES.
10233  M00S05605.pfload  +++|*            = DEVICE NUMBER FOR DIRECT ACCESS FILES.
10234  M00S05606.pfload  +++|*            = 4000 FOR DIRECT ACCESS FILES ON AN AUXILIARY DEVICE.
10235  M00S05607.pfload  +++|*         LN = LENGTH OF SECTOR.
10236  M00S05608.pfload  +++|*
Line S05609 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
10237  M01S05609.ns22000 ---|*         LINKAGE WORD MUST IMMEDIATELY PRECEDE TDBF.
Line S02391 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
10238  M01S02391.ns22000 +++|*         LINKAGE WORD MUST IMMEDIATELY PRECEDE *TDBF*.
10239  M00S05610.pfload  +++|
10240  M00S05611.pfload  +++|
Line S05612 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
10241  M01S05612.ns22000 ---| LWRD     EQU    TMDD+8      PFU BUFFER LINKAGE WORD
Line S02392 Modification History
M01 (Added by) ns22000
M02 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
10242  M02S02392.286l859 ---| LWRD     EQU    TMDD+8      *PFU* BUFFER LINKAGE WORD
Line S00790 Modification History
M01 (Added by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
10243  M01S00790.286l859 +++| LWRD     EQU    DSPB+DSPBL  *PFU* BUFFER LINKAGE WORD
Line S05613 Modification History
M01 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
10244  M01S05613.286l859 ---|          SPACE  4,10
Line S00791 Modification History
M01 (Added by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
10245  M01S00791.286l859 +++|
10246  M01S00792.286l859 +++|
10247  M00S05614.pfload  +++| TDBF     EQU    LWRD+1      TEMPORARY DATA BUFFER
10248  M00S05615.pfload  +++| FLBF     EQU    TDBF+TDBFL  FILE LIST BUFFER
10249  M00S05616.pfload  +++| FLCB     EQU    FLBF+FLBFL  FILE LIST CIRCULAR BUFFER
Line S05617 Modification History
M01 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
10250  M01S05617.286l859 ---| OUTB     EQU    FLCB+FLCBL  OUTPUT BUFFER
Line S00793 Modification History
M01 (Added by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
10251  M01S00793.286l859 +++| OUTB     EQU    FLCB+FLCBL  OUTPUT FILE BUFFER
Line S05618 Modification History
M01 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
10252  M01S05618.253l688 ---| EDBF     EQU    OUTB+OUTBL  EDIT STRING BUFFER
10253  M01S05619.253l688 ---| ENDB     EQU    EDBF+EDBFL  END OF BUFFERS (NON-INCREMENTAL LOAD)
Line S00191 Modification History
M01 (Added by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
10254  M01S00191.253l688 +++| SUMB     EQU    OUTB+OUTBL  SUMMARY FILE BUFFER
Line S00192 Modification History
M01 (Added by) 253l688
M02 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
10255  M02S00192.286l859 ---| ENDB     EQU    SUMB+SUMBL  END OF BUFFERS (NON-INCREMENTAL LOAD)
Line S00794 Modification History
M01 (Added by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
10256  M01S00794.286l859 +++| PFLB     EQU    SUMB+SUMBL  PROCESSED FILES FILE BUFFER
10257  M01S00795.286l859 +++| MS1B     EQU    PFLB+PFLBL  SORT FILE 1
10258  M01S00796.286l859 +++| MS2B     EQU    MS1B+MSFBL  SORT FILE 2
10259  M01S00797.286l859 +++| MS3B     EQU    MS2B+MSFBL  SORT FILE 3
10260  M01S00798.286l859 +++| MS4B     EQU    MS3B+MSFBL  SORT FILE 4
10261  M01S00799.286l859 +++| SRTB     EQU    MS3B        SORT BUFFER (OVERLAYS *MS3B* AND *MS4B*)
10262  M01S00800.286l859 +++|          ERRNG  MSFBL*2-SRTBL  SORT BUFFER OVERFLOW
Line S05620 Modification History
M01 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
10263  M01S05620.286l859 ---|          SPACE  4,10
10264  M01S05621.286l859 ---|**        INCREMENTAL LOAD BUFFERS.
Line S00801 Modification History
M01 (Added by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
10265  M01S00801.286l859 +++| CIBF     EQU    MS4B+MSFBL  *CIR* SCRATCH FILE BUFFER
10266  M01S00802.286l859 +++| CIRT     SPACE  4,40
10267  M01S00803.286l859 +++|**        CIRT - *CIR* DIRECTORY TABLE.
10268  M00S05622.pfload  +++|*
Line S05623 Modification History
M01 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
10269  M01S05623.286l859 ---|*         FIELD LENGTH FOR THESE BUFFERS IS ONLY ALLOCATED IF AN
10270  M01S05624.286l859 ---|*         INCREMENTAL LOAD IS BEING PERFORMED.
10271  M01S05625.286l859 ---|
10272  M01S05626.286l859 ---|
10273  M01S05627.286l859 ---| CIBF     EQU    ENDB        *CIR* SCRATCH FILE BUFFER
10274  M01S05628.286l859 ---| CIRD     SPACE  4,40
10275  M01S05629.286l859 ---|**        CIRD - CATALOG IMAGE RECORD DIRECTORY.
10276  M01S05630.286l859 ---|*
10277  M01S05631.286l859 ---|*         *CIRD* IS A DIRECTORY TO THE CATALOG IMAGE RECORD (*CIR*)
Line S00804 Modification History
M01 (Added by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
10278  M01S00804.286l859 +++|*         *CIRT* IS A DIRECTORY TO THE CATALOG IMAGE RECORD (*CIR*)
10279  M00S05632.pfload  +++|*         WHICH IS COPIED FROM THE ARCHIVE FILE TO THE RANDOM FILE
Line S05633 Modification History
M01 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
10280  M01S05633.286l859 ---|*         *CIRF*.  *CIRD* IS INDEXED BY CATALOG TRACK NUMBER (*CT*)
Line S00805 Modification History
M01 (Added by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
10281  M01S00805.286l859 +++|*         *CIRF*.  *CIRT* IS INDEXED BY CATALOG TRACK NUMBER (*CT*)
10282  M00S05634.pfload  +++|*         AND THE RELATIVE DEVICE NUMBER WITHIN THE DIRECTORY (*RDEV*)
10283  M00S05635.pfload  +++|*         AS DEFINED BELOW.
10284  M00S05636.pfload  +++|*
Line S05637 Modification History
M01 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
10285  M01S05637.286l859 ---|*T CIRD     60/ *CIR* FILE COUNT
Figure CIRD

029 *CIR* FILE COUNT3059 *CIR* FILE COUNT

10286  M00S05638.pfload  +++|*T,CIRT+DI  36/,12/  NCT,12/  DM
Figure CIRT+DI

01112232429 DM NCT3059

10287  M00S05639.pfload  +++|*T,CIRT+TI  30/  FC,30/  RI
Figure CIRT+TI

029 RI3059 FC

10288  M00S05640.pfload  +++|*T,         60/  0
Figure

029 03059 0

10289  M00S05641.pfload  +++|*
10290  M00S05642.pfload  +++|*           CT = CATALOG TRACK NUMBER.
10291  M00S05643.pfload  +++|*           DI = DEVICE INDEX = NWCD*RDEV.
10292  M00S05644.pfload  +++|*           DM = DEVICE MASK.
10293  M00S05645.pfload  +++|*           FC = FILE COUNT FOR CATALOG TRACK.
10294  M00S05646.pfload  +++|*           NCT = NUMBER OF CATALOG TRACKS FOR DEVICE.
10295  M00S05647.pfload  +++|*           NWCD = NUMBER OF DIRECTORY WORDS PER DEVICE.  (ASSEMBLY
10296  M00S05648.pfload  +++|*                  CONSTANT.)
10297  M00S05649.pfload  +++|*           RDEV = RELATIVE DEVICE IN DIRECTORY.
10298  M00S05650.pfload  +++|*           RI = RANDOM INDEX IN *CIRF* FOR CATALOG TRACK FILE LIST.
10299  M00S05651.pfload  +++|*           TI = CATALOG TRACK INDEX = DI+1+CT.
10300  M00S05652.pfload  +++|*
10301  M00S05653.pfload  +++|*         EACH MASTER DEVICE HAS A RECORD ON *CIRF* FOR EACH NON-NULL
Line S05654 Modification History
M01 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
10302  M01S05654.286l859 ---|*         CATALOG TRACK.  THE RECORDS CONSIST OF TWO WORD ENTRIES FOR
10303  M01S05655.286l859 ---|*         EACH FILE CONTAINED ON THE ORIGINAL CATALOG TRACK.
10304  M01S05656.286l859 ---|*
10305  M01S05657.286l859 ---|*T        42/  FN,18/  UI
Figure

0171829 UI FN3059 FN

10306  M01S05658.286l859 ---|*T,       18/  AC,6/  DN,36/  LA
Figure

029 LA303536414259 LA DN AC

10307  M01S05659.286l859 ---|*
10308  M01S05660.286l859 ---|*         AC = ACCESS COUNT.
10309  M01S05661.286l859 ---|*         DN = DEVICE NUMBER.
10310  M01S05662.286l859 ---|*         FN = FILE NAME.
10311  M01S05663.286l859 ---|*         LA = LAST ACCESS DATE AND TIME.
10312  M01S05664.286l859 ---|*         UI = USER INDEX.
Line S00806 Modification History
M01 (Added by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
10313  M01S00806.286l859 +++|*         CATALOG TRACK CONTAINING THE *CIR* ENTRIES FOR THAT TRACK.
10314  M00S05665.pfload  +++|
10315  M00S05666.pfload  +++|
Line S05667 Modification History
M01 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
10316  M01S05667.286l859 ---| CIRD     EQU    CIBF+CIBFL  *CIR* FILE COUNT
10317  M01S05668.286l859 ---| CIRT     EQU    CIRD+1      *CIR* CATALOG TRACK DIRECTORY
10318  M01S05669.286l859 ---| CIRTL    EQU    NWCD*NDEV+1 *CIR* CATALOG TRACK DIRECTORY LENGTH
Line S00807 Modification History
M01 (Added by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
10319  M01S00807.286l859 +++| CIRT     EQU    CIBF+CIBFL  *CIR* DIRECTORY TABLE
Line S05670 Modification History
M01 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
10320  M01S05670.253l688 ---| ILBE     EQU    CIRT+CIRTL  INCREMENTAL LOAD BUFFER END
Line S00193 Modification History
M01 (Added by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
10321  M01S00193.253l688 +++| LBUF     EQU    CIRT+CIRTL  LIST *CIR* ENTRIES OUTPUT BUFFER
Line S00194 Modification History
M01 (Added by) 253l688
M02 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
10322  M02S00194.286l859 ---| ILBE     EQU    LBUF+LBUFL  INCREMENTAL LOAD BUFFER END
Line S00808 Modification History
M01 (Added by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
10323  M01S00808.286l859 +++| ENDB     EQU    LBUF+LBUFL+5  END OF BUFFERS
10324  M00S05671.pfload  +++|          TITLE  PRESET.
10325  M00S05672.pfload  +++| PRE      SPACE  4,40
10326  M00S05673.pfload  +++|**        PRS - PRESET PROGRAM.
10327  M00S05674.pfload  +++|*
10328  M00S05675.pfload  +++|*         ENTRY  (CPAR) = CONVERTED PARAMETER ARRAY.
Line S00001 Modification History
M01 (Added by) ns2625
M02 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
10329  M02S00001.286l859 ---|*                FILES *ZZZZZG0* THROUGH ZZZZZG8 RETURNED BY *PFS*.
10330  M02S00002.286l859 ---|*                FILE *ZZZZZG9* RETURNED BY *PFS* IF NO FILE
Line S00809 Modification History
M01 (Added by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
10331  M01S00809.286l859 +++|*                FILES *ZZZZZG0* THROUGH ZZZZZG9 AND *ZZZZZGA* RETURNED
10332  M01S00810.286l859 +++|*                  BY *PFS*.
10333  M01S00811.286l859 +++|*                FILE *ZZZZZGB* RETURNED BY *PFS* IF NO FILE
Line S00003 Modification History
M01 (Added by) ns2625
Seq #  *Modification Id* Act 
----------------------------+
10334  M01S00003.ns2625  +++|*                  SELECTIONS.
Line S00004 Modification History
M01 (Added by) ns2625
M02 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
10335  M02S00004.286l859 ---|*                FILE *ZZZZZG9* CONTAINS FILE SELECTIONS IF PRESENT.
Line S00812 Modification History
M01 (Added by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
10336  M01S00812.286l859 +++|*                FILE *ZZZZZGB* CONTAINS FILE SELECTIONS IF PRESENT.
10337  M00S05676.pfload  +++|*
10338  M00S05677.pfload  +++|*         EXIT   (B1) = 1.
10339  M00S05678.pfload  +++|*                (MSTT) = TABLE OF DEVICES IN FAMILY BEING LOADED.
10340  M00S05679.pfload  +++|*                (MASK) = MASK FOR MASTER DEVICES BEING LOADED.
Line S05680 Modification History
M01 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
10341  M01S05680.286l859 ---|*                (TMDD) = TABLE OF MASTER DEVICE DESCRIPTIONS.
Line S00813 Modification History
M01 (Added by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
10342  M01S00813.286l859 +++|*                (TMDA) = TABLE OF MASTER DEVICE ADDRESSES.
10343  M00S05681.pfload  +++|*                (PDWD) = PF DESCRIPTION WORD FOR FAMILY OR AUXILIARY
10344  M00S05682.pfload  +++|*                         DEVICE BEING LOADED.
Line S05683 Modification History
M01 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
10345  M01S05683.286l859 ---|*                (FSAD) = ALTERNATE DEVICE SELECTION PARAMETER.
10346  M01S05684.286l859 ---|*                (FSSA) = SECONDARY ALTERNATE DEVICE SELECTION
10347  M01S05685.286l859 ---|*                         PARAMETER.
10348  M01S05686.286l859 ---|*                (FSSD) = SINGLE DEVICE SELECTION PARAMETER.
10349  M00S05687.pfload  +++|*                (MPFM) = FAMILY NAME PARAMETER.
10350  M00S05688.pfload  +++|*                (MPPN) = PACK NAME PARAMETER.
Line S05689 Modification History
M01 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
10351  M01S05689.286l859 ---|*                (SACD) = SKELETON ADDRESS FOR CATALOG DESCRIPTION.
10352  M01S05690.286l859 ---|*                (SADD) = SKELETON ADDRESS FOR DEVICE DESCRIPTION
Line S05691 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
10353  M01S05691.v23l617 ---|*                EXIT TO *ABT* FOR ILLEGAL EXTRACT OPTION.
Line S00032 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
10354  M01S00032.v23l617 +++|*                EXIT TO *ABT* FOR EXTRACT OPTION WITHOUT CIR.
10355  M00S05692.pfload  +++|*                ARCHIVE FILE ASSIGNED.
10356  M00S05693.pfload  +++|*                CATALOG IMAGE RECORD PROCESSED.
10357  M00S05694.pfload  +++|*                DEVICE SELECTION PERFORMED.
10358  M00S05695.pfload  +++|*                SELECTION PARAMETERS PUT IN ACCOUNTING MESSAGES.
10359  M00S05696.pfload  +++|*                APPROPRIATE ACCOUNTING MESSAGES ISSUED TO DAYFILE AND
10360  M00S05697.pfload  +++|*                OUTPUT FILE.
Line S00071 Modification History
M01 (Added by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
10361  M01S00071.241l630 +++|*                *K* DISPLAY COORDINATES INITIALIZED.
10362  M00S05698.pfload  +++|*
10363  M00S05699.pfload  +++|*         USES   X - 0, 1, 2, 5, 6, 7.
Line S05700 Modification History
M01 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
10364  M01S05700.253l688 ---|*                A - 1, 2, 6, 7.
Line S00195 Modification History
M01 (Added by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
10365  M01S00195.253l688 +++|*                A - 1, 2, 5, 6, 7.
10366  M00S05701.pfload  +++|*                B - 1.
10367  M00S05702.pfload  +++|*
Line S05703 Modification History
M01 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
10368  M01S05703.253l688 ---|*         CALLS  AAF, BMT, CAS, GAM, PCI, PDATE, SBS, SEM, SFP
10369  M01S05704.253l688 ---|*                SMP, SSP, STC.
Line S00196 Modification History
M01 (Added by) 253l688
M02 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
10370  M02S00196.274l797 ---|*         CALLS  AAF, BMT, CAS, GAM, IFL, IOF, PCI, SBS, SEM, SFP, SMP,
10371  M02S00197.274l797 ---|*                SSP, SSS, STC.
Line S00005 Modification History
M01 (Added by) 274l797
M02 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
10372  M02S00005.286l859 ---|*         CALLS  AAF, BMT, CAS, GAM, IFL, IOF, PCI, PRK, RPS, SBS, SEM,
10373  M02S00006.286l859 ---|*                SFP, SMP, SOE, SSP, SSS, STC.
Line S00814 Modification History
M01 (Added by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
10374  M01S00814.286l859 +++|*         CALLS  AAF, BMT, CAS, GAM, IFL, IOF, PCI, SBS, SFP, SMP, SSP,
10375  M01S00815.286l859 +++|*                SSS, STC.
10376  M00S05705.pfload  +++|*
Line S05706 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
10377  M01S05706.ns22000 ---|*         MACROS MEMORY, REPRIEVE, SETFS, SKIPFF.
Line S02393 Modification History
M01 (Added by) ns22000
M02 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
10378  M02S02393.253l688 ---|*         MACROS GETSSM, MEMORY, REPRIEVE, SETFS, SKIPFF.
Line S00198 Modification History
M01 (Added by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
10379  M01S00198.253l688 +++|*         MACROS MEMORY, REPRIEVE, SKIPFF.
Proceed to Part 9