Deck LFM Part 005

48 Modifications

Listing Sections

Source

Seq #  *Modification Id* Act 
----------------------------+
07089  M01S00342.274l797 +++| RFE1.1   BSS    0
Line S05251 Modification History
M01 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
07090  M01S05251.242l642 ---|          LDD    FS+1        CHECK FOR BOI
Line S00132 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
07091  M01S00132.242l642 +++|*         LDD    FS          (SET UP BY *CMS*)
07092  M01S00133.242l642 +++|*         STD    T5
07093  M01S00134.242l642 +++|          SETMS  STATUS      DETERMINE DEVICE ACCESSIBILITY
Line S00135 Modification History
M01 (Added by) 242l642
M02 (Removed by) ns2776
Seq #  *Modification Id* Act 
----------------------------+
07094  M02S00135.ns2776  ---|          SHN    10-14
Line S00006 Modification History
M01 (Added by) ns2776
Seq #  *Modification Id* Act 
----------------------------+
07095  M01S00006.ns2776  +++|          LDM    MSD         RETURN STATUS TO CALLER
07096  M01S00007.ns2776  +++|          SHN    10-6
Line S00136 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
07097  M01S00136.242l642 +++|          LPC    400         SET FILE ACCESSIBILITY FLAG
07098  M01S00137.242l642 +++|          RAD    FS+4
07099  M01S00138.242l642 +++|          LDD    FS+1
07100  M00S05252.lfm     +++|          ZJN    RFE2        IF EMPTY FILE
07101  M00S05253.lfm     +++|          LMD    FS+2
07102  M00S05254.lfm     +++|          NJN    RFE2        IF FIRST TRACK .NE. CURRENT TRACK
07103  M00S05255.lfm     +++|          LDD    FS+3
07104  M00S05256.lfm     +++|          LMN    FSMS
07105  M00S05257.lfm     +++|          NJN    RFE2        IF CURRENT SECTOR .NE. *FSMS*
Line S05258 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
07106  M01S05258.274l797 ---|          LDD    FS+4        SET BOI STATUS
Line S00343 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
07107  M01S00343.274l797 +++| RFE1.2   LDD    FS+4        SET BOI STATUS
Line S05259 Modification History
M01 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
07108  M01S05259.242l642 ---|          LPN    1
Line S00139 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
07109  M01S00139.242l642 +++|          LPC    401
07110  M00S05260.lfm     +++|          ADN    10
07111  M00S05261.lfm     +++|          STD    FS+4
Line S05262 Modification History
M01 (Removed by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
07112  M01S05262.ns21000 ---| RFE2     LDD    FN+3        REFORMAT FILE ACCESS MODE
07113  M01S05263.ns21000 ---|          SCN    76          SAVE FILE NAME, WRITE LOCKOUT
07114  M01S05264.ns21000 ---|          STD    T3
07115  M01S05265.ns21000 ---|          LDN    0
Line S00017 Modification History
M01 (Added by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
07116  M01S00017.ns21000 +++| RFE2     LDN    0           REFORMAT FILE ACCESS MODE
07117  M00S05266.lfm     +++|          STD    T4
07118  M00S05267.lfm     +++| RFE3     LDM    TAFM,T4     CHECK TABLE
07119  M00S05268.lfm     +++|          LMD    FN+3
07120  M00S05269.lfm     +++|          LPN    35          IGNORE *DIAGNOSTIC*, *UATTACH* STATUS
07121  M00S05270.lfm     +++|          ZJN    RFE4        IF MATCH
07122  M00S05271.lfm     +++|          AOD    T4
07123  M00S05272.lfm     +++|          LMN    TAFML
07124  M00S05273.lfm     +++|          NJN    RFE3        IF NOT END OF TABLE
Line S05274 Modification History
M01 (Removed by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
07125  M01S05274.241l630 ---|          MONITOR  HNGM      HANG PP
Line S00088 Modification History
M01 (Added by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
07126  M01S00088.241l630 +++|          LDN    SWET        SET SYSTEM SOFTWARE ERROR FLAG
07127  M01S00089.241l630 +++|          STD    CM+2
07128  M01S00090.241l630 +++|          LDC    *           SET ADDRESS WHERE ERROR DETECTED
07129  M01S00091.241l630 +++|          STD    CM+1
07130  M01S00092.241l630 +++|          MONITOR  CHGM      CONDITIONALLY HANG PP
07131  M00S05275.lfm     +++|*         LDN    0
07132  M00S05276.lfm     +++|          UJN    RFE5        RETURN ZERO FOR FILE PERMISSION
07133  M00S05277.lfm     +++|
Line S05278 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
07134  M01S05278.v23l617 ---| RFE4     LDD    T4
Line S05279 Modification History
M01 (Removed by) ns21000
M02 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
07135  M02S05279.v23l617 ---|          SHN    3
07136  M02S05280.v23l617 ---| RFE5     LMD    T3
07137  M02S05281.v23l617 ---|          STD    FN+3
Line S00018 Modification History
M01 (Added by) ns21000
M02 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
07138  M02S00018.v23l617 ---|          SHN    4
Line S00151 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
07139  M01S00151.v23l617 +++| RFE4     LDM    TAFM,T4     GET EQUIVALENT MODE VALUE FROM TABLE
07140  M01S00152.v23l617 +++|          SHN    -6
07141  M01S00153.v23l617 +++|          SHN    4
Line S00019 Modification History
M01 (Added by) ns21000
Seq #  *Modification Id* Act 
----------------------------+
07142  M01S00019.ns21000 +++| RFE5     RAD    FS+4
07143  M01S00020.ns21000 +++|          LDD    FN+3        CLEAR FILE ACCESS MODE FROM FNT
07144  M01S00021.ns21000 +++|          SCN    76
07145  M01S00022.ns21000 +++|          STD    FN+3
07146  M00S05282.lfm     +++|          LJM    RFEX        RETURN
07147  M00S05283.lfm     +++| SDQ      SPACE  4,15
07148  M00S05284.lfm     +++|**        SQD - SEARCH QFT FOR DISPOSITION CODE.
07149  M00S05285.lfm     +++|*
07150  M00S05286.lfm     +++|*         ENTRY  (FS - FS+4) = FST ENTRY.
07151  M00S05287.lfm     +++|*
07152  M00S05288.lfm     +++|*         EXIT   (CFSA) = SHIFT COUNT FOR GETFNT SELECTIVITY BITS
07153  M00S05289.lfm     +++|*                IF TYPE PHQT OR PRQT.
07154  M00S05290.lfm     +++|*                (A) = 0 IF DISPOSITION CODE NOT PHQT OR PRQT.
07155  M00S05291.lfm     +++|*
07156  M00S05292.lfm     +++|*         USES   T1 - T6, CM - CM+4.
07157  M00S05293.lfm     +++|*
07158  M00S05294.lfm     +++|*         MACROS  SFA.
07159  M00S05295.lfm     +++|
07160  M00S05296.lfm     +++|
07161  M00S05297.lfm     +++| SDQ5     LDN    0           SET FLAG
07162  M00S05298.lfm     +++|
07163  M00S05299.lfm     +++| SDQ      SUBR               ENTRY/EXIT
07164  M00S05300.lfm     +++|          LDN    QFTP        GET NUMBER OF QFT ENTRIES
07165  M00S05301.lfm     +++|          CRD    CM
07166  M00S05302.lfm     +++|          LDN    0           SET COUNTER
07167  M00S05303.lfm     +++|          STD    CM
07168  M00S05304.lfm     +++|
07169  M00S05305.lfm     +++|*         SEARCH QFT TO DETERMINE DISPOSITION CODE.
07170  M00S05306.lfm     +++|
07171  M00S05307.lfm     +++| SDQ1     AOD    CM          INCREMENT QFT ORDINAL
07172  M00S05308.lfm     +++|          LMD    CM+2
07173  M00S05309.lfm     +++|          ZJN    SDQX        IF NO MORE ENTRIES
07174  M00S05310.lfm     +++| SDQ2     SFA    QFT,CM      ACCESS QFT ENTRIES
07175  M00S05311.lfm     +++|          CRD    T2
07176  M00S05312.lfm     +++|          ADN    ENTQ-JSNQ   GET EQUIPMENT AND FIRST TRACK
07177  M00S05313.lfm     +++|          CRD    T1          COMPARE EQUIPMENT
07178  M00S05314.lfm     +++|          LDD    FS
07179  M00S05315.lfm     +++|          SBD    T1
07180  M00S05316.lfm     +++|          NJN    SDQ1        IF NOT SAME EQUIPMENT
07181  M00S05317.lfm     +++|          LDD    FS+1        COMPARE FIRST TRACK
07182  M00S05318.lfm     +++|          SBD    T2
07183  M00S05319.lfm     +++|          NJN    SDQ1        IF NOT SAME FIRST TRACK
07184  M00S05320.lfm     +++|          LDD    T2+4        DETERMINE DISPOSITION CODE
07185  M00S05321.lfm     +++|          SHN    -11
07186  M00S05322.lfm     +++|          LMN    PHQT
07187  M00S05323.lfm     +++|          NJN    SDQ3        IF NOT PUNCH QUEUE TYPE
07188  M00S05324.lfm     +++|          LDC    SHNI+16
07189  M00S05325.lfm     +++|          UJN    SDQ4        STORE COUNT
07190  M00S05326.lfm     +++|
07191  M00S05327.lfm     +++| SDQ3     LMN    PRQT&PHQT
07192  M00S05328.lfm     +++|          NJN    SDQ5        IF NOT PRINT OR PUNCH QUEUE TYPE
07193  M00S05329.lfm     +++|          LDC    SHNI+17
07194  M00S05330.lfm     +++| SDQ4     STM    CFSB        SET SHIFT INSTRUCTION
07195  M00S05331.lfm     +++|          LJM    SDQX        RETURN
Line S00140 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
07196  M01S00140.242l642 +++| WDS      SPACE  4,10
07197  M01S00141.242l642 +++|**        WDS - WRITE MASS STORAGE.
07198  M01S00142.242l642 +++|*
07199  M01S00143.242l642 +++|*         ENTRY  (A) = BUFFER ADDRESS.
07200  M01S00144.242l642 +++|*                (T5 - T7) = MASS STORAGE PARAMETERS.
07201  M01S00145.242l642 +++|*
07202  M01S00146.242l642 +++|*         EXIT   (A) .GE. 0.
07203  M01S00147.242l642 +++|*
07204  M01S00148.242l642 +++|*         ERROR  TO *EER*.
07205  M01S00149.242l642 +++|*
07206  M01S00150.242l642 +++|*         CALLS  WDS.
07207  M01S00151.242l642 +++|
07208  M01S00152.242l642 +++|
07209  M01S00153.242l642 +++| WDS      SUBR               ENTRY/EXIT
07210  M01S00154.242l642 +++|          RJM    //WDS
07211  M01S00155.242l642 +++|          PJN    WDSX        IF SUCCESSFUL WRITE
07212  M01S00156.242l642 +++|          LJM    EER         EVALUATE ERROR RETURN
07213  M00S05332.lfm     +++| TAFM     SPACE  4,10
07214  M00S05333.lfm     +++|**        TAFM - TABLE OF FILE MODES.
07215  M00S05334.lfm     +++|*
07216  M00S05335.lfm     +++|*         TABLE IS IN THE FOLLOWING FORMAT.
07217  M00S05336.lfm     +++|*
Line S05337 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
07218  M01S05337.v23l617 ---|*         6/0,6/FM
Line S00154 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
07219  M01S00154.v23l617 +++|*         6/EV,6/FM
07220  M00S05338.lfm     +++|*
07221  M00S05339.lfm     +++|*         WHERE  FM = FILE ACCESS MODE OBTAINED FROM THE FNT.
07222  M01S00155.v23l617 +++|*                EV = EQUIVALENT MODE VALUE TO BE RETURNED TO CALLER.
07223  M00S05340.lfm     +++|
07224  M00S05341.lfm     +++| TAFM     BSS    0
07225  M00S05342.lfm     +++|          LOC    0
07226  M00S05343.lfm     +++|          VFD    6/0,6/1     READ
Line S05344 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
07227  M01S05344.v23l617 ---|          VFD    6/0,6/0     WRITE
07228  M01S05345.v23l617 ---|          VFD    6/0,6/30    MODIFY
07229  M01S05346.v23l617 ---|          VFD    6/0,6/20    APPEND
07230  M01S05347.v23l617 ---|          VFD    6/0,6/5     EXECUTE
07231  M01S05348.v23l617 ---|          VFD    6/0,6/31    READ/ALLOW MODIFY
07232  M01S05349.v23l617 ---|          VFD    6/0,6/21    READ/ALLOW APPEND
Line S00023 Modification History
M01 (Added by) ns21000
M02 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
07233  M02S00023.v23l617 ---|          VFD    6/0,6/10    UPDATE
07234  M02S00024.v23l617 ---|          VFD    6/0,6/11    READ/ALLOW UPDATE
Line S00156 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
07235  M01S00156.v23l617 +++|          VFD    6/1,6/0     WRITE
07236  M01S00157.v23l617 +++|          VFD    6/2,6/30    MODIFY
07237  M01S00158.v23l617 +++|          VFD    6/3,6/20    APPEND
07238  M01S00159.v23l617 +++|          VFD    6/4,6/4     EXECUTE (INDIRECT ACCESS PERMANENT FILE)
07239  M01S00160.v23l617 +++|          VFD    6/4,6/5     EXECUTE (DIRECT ACCESS PERMANENT FILE)
07240  M01S00161.v23l617 +++|          VFD    6/5,6/31    READ/ALLOW MODIFY
07241  M01S00162.v23l617 +++|          VFD    6/6,6/21    READ/ALLOW APPEND
07242  M01S00163.v23l617 +++|          VFD    6/7,6/10    UPDATE
07243  M01S00164.v23l617 +++|          VFD    6/10,6/11   READ/ALLOW UPDATE
07244  M00S05350.lfm     +++|          LOC    *O
07245  M00S05351.lfm     +++| TAFML    EQU    *-TAFM
07246  M00S05352.lfm     +++| TFTS     SPACE  4,10
07247  M00S05353.lfm     +++|**        TFTS - TABLE OF FILE TYPE SHIFTS.
07248  M00S05354.lfm     +++|
07249  M00S05355.lfm     +++|
07250  M00S05356.lfm     +++| TFTS     INDEX
07251  M00S05357.lfm     +++|          INDEX  ROFT,SHNI+20
07252  M00S05358.lfm     +++|          INDEX  LIFT,SHNI+11
07253  M00S05359.lfm     +++|          INDEX  PTFT,SHNI+10
07254  M00S05360.lfm     +++|          INDEX  PMFT,SHNI+7
07255  M00S05361.lfm     +++|          INDEX  FAFT,SHNI+6
07256  M00S05362.lfm     +++|          INDEX  SYFT,SHNI+5
07257  M00S05363.lfm     +++|          INDEX  LOFT,SHNI+4
07258  M00S05364.lfm     +++|          INDEX  INFT,SHNI+21
07259  M00S05365.lfm     +++|          INDEX  QFFT,SHNI+14
07260  M00S05366.lfm     +++|          INDEX  MXFT        END OF TABLE
07261  M00S05367.lfm     +++|          SPACE  4,10
07262  M00S05368.lfm     +++|**        COMMON DECKS.
07263  M00S05369.lfm     +++|
07264  M00S05370.lfm     +++|
07265  M00S05371.lfm     +++|*CALL     COMPWEI
Line S05372 Modification History
M01 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
07266  M01S05372.242l642 ---| WCS$     EQU    1           CONSECUTIVE SECTOR AFTER SYSTEM SECTOR
07267  M00S05373.lfm     ---|*CALL     COMPWSS
Line S05374 Modification History
M01 (Removed by) lfm17
Seq #  *Modification Id* Act 
----------------------------+
07268  M01S05374.lfm17   ---|
07269  M01S05375.lfm17   ---|          QUAL
07270  M01S05376.lfm17   ---| OVL0     EQU    5000        ZERO LEVEL OVERLAY LOAD ADDRESS
07271  M01S05377.lfm17   ---|          ERRNG  BFMS-OVL0-ZAVL CHECK LENGTH OF *0AV*
07272  M01S05378.lfm17   ---|          ERRNG  7777-OVL0-1-ZBFL      CHECK LENGTH OF *0BF*
07273  M01S05379.lfm17   ---|          ERRNG  BFMS-OVL0-1-ZDFL CHECK LENGTH OF *0DF*
Line S00023 Modification History
M01 (Added by) lfm17
Seq #  *Modification Id* Act 
----------------------------+
07274  M01S00023.lfm17   +++|          SPACE  4,10
07275  M01S00024.lfm17   +++|          ERRNG  OVL0-*      CODE OVERFLOWS INTO ZERO LEVEL OVERLAYS
07276  M01S00025.lfm17   +++|          OVERFLOW  OVL
07277  M00S05380.lfm     +++|          SPACE  4,10
07278  M00S05381.lfm     +++|          TTL    LFM - LOCAL FILE MANAGER.
07279  M00S05382.lfm     +++|          END