User Tools

Site Tools


cdc:nos2.source:opl.opl871:deck:pfm.015

Deck PFM Part 015

95 Modifications

Listing Sections

Source

Seq #  *Modification Id* Act 
----------------------------+
17387  M01S00092.ns2776  +++|          RJM    PDA         PROCESS DEVICE AVAILABILITY
17388  M01S01521.242l642 +++| CDA0.1   ERROR  DAD,CH      * DIRECT ACCESS DEVICE ERROR.*
17389  M01S12453.pfm     +++|
17390  M01S12454.pfm     +++| CDA1     LDD    T5          CHECK FILE EST ORDINAL
17391  M01S12455.pfm     +++|          LMD    FS
17392  M01S12456.pfm     +++|          ZJN    CDA3        IF FILE ON RIGHT EQUIPMENT
17393  M01S12457.pfm     +++| CDA2     ERROR  PVE,CH      *PFC VERIFICATION ERROR.*
17394  M01S12458.pfm     +++|
17395  M01S12459.pfm     +++| CDA3     LDM    FCBT,CI     CHECK FIRST TRACK
17396  M01S12460.pfm     +++|          LMD    FS+1
17397  M01S12461.pfm     +++|          NJN    CDA2        IF FILE ON WRONG TRACK
Line S12462 Modification History
M01 (Added by) pfm
M02 (Updated by) ns2670
Seq #  *Modification Id* Act 
----------------------------+
17398  M02S12462.ns2670  ---|          LDD    EQ          RESET TO MASTER DEVICE
Line S12463 Modification History
M01 (Added by) pfm
M02 (Updated by) ns2670
Seq #  *Modification Id* Act 
----------------------------+
17399  M02S12463.ns2670  ---|          STD    T5
17400  M01S00008.ns2670  +++|          RJM    RMD         RESET TO MASTER DEVICE
Line S12464 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
17401  M02S12464.242l642 ---|          UJN    CDAX        RETURN
17402  M01S01522.242l642 +++|          UJP    CDAX        RETURN
17403  M01S12465.pfm     +++| UAF      SPACE  4,10
Line S12466 Modification History
M01 (Added by) pfm
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
17404  M02S12466.253l688 ---|**        UAF - UPDATE ALTERNATE STORAGE FLAGS.
17405  M01S00578.253l688 +++|**        UAF - UPDATE CARTRIDGE ALTERNATE STORAGE FLAGS.
17406  M01S12467.pfm     +++|*
17407  M01S12468.pfm     +++|*         ENTRY  (CI) = ADDRESS OF CATALOG ENTRY.
17408  M01S12469.pfm     +++|*
17409  M01S12470.pfm     +++|*         EXIT   (FCAF) UPDATED.
17410  M01S00001.pfm57   +++|*                (FCAF/FCAT/FCAA) CLEARED IF SET REQUEST FOR *AFOBS*,
17411  M01S00002.pfm57   +++|*                OR IF SET REQUEST FOR *AFFRE* ON A DISK-RESIDENT FILE.
17412  M01S12471.pfm     +++|*
17413  M01S12472.pfm     +++|*         USES   T1, T2.
17414  M01S12473.pfm     +++|
17415  M01S12474.pfm     +++|
17416  M01S12475.pfm     +++| UAF      SUBR               ENTRY/EXIT
17417  M01S12476.pfm     +++|          LDM    PFES        SAVE SET/CLEAR FLAG
17418  M01S12477.pfm     +++|          SCN    77
17419  M01S12478.pfm     +++|          STD    T2
17420  M01S12479.pfm     +++|          LDM    PFES        GET PROCESSOR ADDRESS
17421  M01S12480.pfm     +++|          LPN    77
17422  M01S12481.pfm     +++|          STD    T1
17423  M01S12482.pfm     +++|          SBN    AFMAX+1
17424  M01S12483.pfm     +++|          PJN    UAF1        IF INVALID FLAG NUMBER
Line S12484 Modification History
M01 (Added by) pfm
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
17425  M02S12484.253l688 ---|          LDM    UAFB,T1
17426  M01S00579.253l688 +++|          LDM    UAFA,T1
17427  M01S12485.pfm     +++|          STD    T1
17428  M01S12486.pfm     +++|          LJM    0,T1        PROCESS FLAG
17429  M01S00580.253l688 +++|
17430  M01S00581.253l688 +++| UAFA     BSS    0           TABLE OF ERROR FLAG PROCESSORS
17431  M01S00582.253l688 +++|          LOC    0
17432  M01S00583.253l688 +++|          CON    UAF2        *AFOBS* PROCESSOR
17433  M01S00584.253l688 +++|          CON    UAF3        *AFPSE* PROCESSOR
17434  M01S00585.253l688 +++|          CON    UAF5        *AFPDE* PROCESSOR
17435  M01S00586.253l688 +++|          CON    UAF6        *AFPDR* PROCESSOR
17436  M01S00587.253l688 +++|          CON    UAF1        *AFVER* PROCESSOR
17437  M01S00588.253l688 +++|          CON    UAF8        *AFTMP* PROCESSOR
17438  M01S00589.253l688 +++|          CON    UAF10       *AFFRE* PROCESSOR
17439  M01S00590.253l688 +++|          LOC    *O
17440  M01S12487.pfm     +++|
17441  M01S12488.pfm     +++| UAF1     ERROR  ICU         *INVALID CATALOG UPDATE.*
17442  M01S12489.pfm     +++|
17443  M01S12490.pfm     +++|*         PROCESS *ALTERNATE STORAGE COPY OBSOLETE* FLAG.
17444  M01S12491.pfm     +++|
17445  M01S12492.pfm     +++| UAF2     LDD    T2          PROCESS *AFOBS*
17446  M01S12493.pfm     +++|          ZJN    UAF1        IF *CLEAR* REQUEST
17447  M01S12494.pfm     +++|          LDM    FCBT,CI
17448  M01S12495.pfm     +++|          ZJN    UAF1        IF NO DISK ADDRESS
17449  M01S12496.pfm     +++|          LDM    FCAF,CI
17450  M01S12497.pfm     +++|          LPN    AFPDRM
17451  M01S12498.pfm     +++|          NJN    UAF1        IF *PSEUDO-RELEASE* SET
Line S12499 Modification History
M01 (Added by) pfm
M02 (Updated by) pfm57
Seq #  *Modification Id* Act 
----------------------------+
17452  M02S12499.pfm57   ---|          LDN    FCAF        CLEAR *AF*, *AT*, AND *ASA* INFO
17453  M01S00003.pfm57   +++| UAF2.1   LDN    FCAF        CLEAR *AF*, *AT*, AND *ASA* INFO
17454  M01S12500.pfm     +++|          ADD    CI
17455  M01S12501.pfm     +++|          STM    UAFD
17456  M01S12502.pfm     +++|          LDN    ZERL
17457  M01S12503.pfm     +++|          CRM    *,ON
17458  M01S12504.pfm     +++| UAFD     EQU    *-1
17459  M01S12505.pfm     +++|          LJM    UAFX        RETURN
17460  M01S12506.pfm     +++|
17461  M01S12507.pfm     +++|*         PROCESS *ALTERNATE STORAGE COPY PERMANENT STATUS ERROR* FLAG
17462  M01S12508.pfm     +++|
17463  M01S12509.pfm     +++| UAF3     LDD    T2          PROCESS *AFPSE*
17464  M01S12510.pfm     +++|          ZJN    UAF1        IF *CLEAR* REQUEST
17465  M01S12511.pfm     +++|          LDM    FCAF,CI     SET *AFPSE* FLAG
17466  M01S12512.pfm     +++|          SCN    AFPSEM
17467  M01S12513.pfm     +++|          LMN    AFPSEM
17468  M01S12514.pfm     +++| UAF4     STM    FCAF,CI     UPDATE FLAGS IN CATALOG
17469  M01S12515.pfm     +++|          LJM    UAFX        RETURN
17470  M01S12516.pfm     +++|
17471  M01S12517.pfm     +++|*         PROCESS *ALTERNATE STORAGE COPY PERMANENT DATA ERROR* FLAG.
17472  M01S12518.pfm     +++|
17473  M01S12519.pfm     +++| UAF5     LDD    T2          PROCESS *AFPDE*
17474  M01S12520.pfm     +++|          ZJP    UAF1        IF CLEAR REQUEST
17475  M01S12521.pfm     +++|          LDM    FCAF,CI     SET *AFPDE* FLAG
17476  M01S12522.pfm     +++|          SCN    AFPDEM
17477  M01S12523.pfm     +++|          LMN    AFPDEM
17478  M01S12524.pfm     +++|          UJN    UAF4        RETURN
17479  M01S12525.pfm     +++|
17480  M01S12526.pfm     +++|*         PROCESS *ALTERNATE STORAGE COPY PSEUDO-RELEASED* FLAG.
17481  M01S12527.pfm     +++|
17482  M01S12528.pfm     +++| UAF6     LDD    T2          PROCESS *AFPDR*
17483  M01S12529.pfm     +++|          NJN    UAF7        IF *SET* REQUEST
Line S12530 Modification History
M01 (Added by) pfm
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
17484  M02S12530.253l688 ---|          STM    UAFA
17485  M01S00591.253l688 +++|          STM    UAFB
17486  M01S12531.pfm     +++| UAF7     LDM    FCAF,CI     SET/CLEAR *AFPDR* FLAG
17487  M01S12532.pfm     +++|          SCN    AFPDRM
Line S12533 Modification History
M01 (Added by) pfm
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
17488  M02S12533.253l688 ---| UAFA     LMN    AFPDRM
17489  M01S00592.253l688 +++| UAFB     LMN    AFPDRM
17490  M01S12534.pfm     +++|*         PSN                (*CLEAR* REQUEST)
17491  M01S12535.pfm     +++|          UJN    UAF4        RETURN
17492  M01S12536.pfm     +++|
17493  M01S12537.pfm     +++|*         PROCESS *TEMPORARY ERROR* FLAG.
17494  M01S12538.pfm     +++|
17495  M01S12539.pfm     +++| UAF8     LDD    T2
17496  M01S12540.pfm     +++|          NJN    UAF9        IF *SET* REQUEST
17497  M01S12541.pfm     +++|          STM    UAFC
17498  M01S12542.pfm     +++| UAF9     LDM    FCAF,CI     SET/CLEAR *AFTMP* FLAG
17499  M01S12543.pfm     +++|          SCN    AFTMPM
17500  M01S12544.pfm     +++| UAFC     LMN    AFTMPM
17501  M01S12545.pfm     +++|*         PSN                (*CLEAR* REQUEST)
17502  M01S12546.pfm     +++|          UJN    UAF4        RETURN
17503  M01S12547.pfm     +++|
17504  M01S12548.pfm     +++|*         PROCESS *FREE CARTRIDGE* FLAG.
17505  M01S12549.pfm     +++|
17506  M01S12550.pfm     +++| UAF10    LDD    T2          PROCESS *AFFRE* FLAG
17507  M01S12551.pfm     +++|          ZJN    UAF11       IF *CLEAR* REQUEST
Line S12552 Modification History
M01 (Added by) pfm
M02 (Updated by) pfm57
Seq #  *Modification Id* Act 
----------------------------+
17508  M02S12552.pfm57   ---|          LDN    PSNI
17509  M01S00004.pfm57   +++|          LDM    FCBT,CI
17510  M01S00005.pfm57   +++|          NJP    UAF2.1      IF FILE CURRENTLY DISK RESIDENT
17511  M01S00006.pfm57   +++|          LDN    PSNI        ENABLE SET OF FLAG
17512  M01S12553.pfm     +++|          STM    UAFE
17513  M01S12554.pfm     +++| UAF11    LDM    FCAF,CI     ALTERNATE STORAGE FLAGS
17514  M01S12555.pfm     +++|          LPC    -AFFREM     CLEAR *AFFRE* FLAG
17515  M01S12556.pfm     +++| UAFE     UJN    UAF12       DO NOT RESET FLAG
17516  M01S12557.pfm     +++|*         PSN                (*SET* REQUEST)
17517  M01S12558.pfm     +++|          LMC    AFFREM      SET *AFFRE* FLAG
17518  M01S12559.pfm     +++| UAF12    LJM    UAF4        STORE ALTERNATE STORAGE FLAGS
17519  M01S00009.ns2670  +++| UFL      SPACE  4,20
17520  M01S00010.ns2670  +++|**        UFL - UPDATE FILE LENGTH.
17521  M01S00011.ns2670  +++|*
17522  M01S00012.ns2670  +++|*         ENTRY  (CI) = ADDRESS OF PFC ENTRY IN BUFFER.
17523  M01S00013.ns2670  +++|*
17524  M01S00014.ns2670  +++|*         EXIT   FILE LENGTH UPDATED IN PFC.
17525  M01S00015.ns2670  +++|*
17526  M01S00016.ns2670  +++|*         USES   CM, T6.
17527  M01S00017.ns2670  +++|*
Line S00018 Modification History
M01 (Added by) ns2670
M02 (Updated by) ns2776
Seq #  *Modification Id* Act 
----------------------------+
17528  M02S00018.ns2776  ---|*         CALLS  CTA, PDV, RMD, SDN, SEI.
17529  M01S00093.ns2776  +++|*         CALLS  CTA, PDA, RMD, SDN, SEI.
17530  M01S00019.ns2670  +++|*
17531  M01S00020.ns2670  +++|*         MACROS ERROR, SETMS.
17532  M01S00021.ns2670  +++|*
17533  M01S00022.ns2670  +++|*         NOTES  THIS SUBROUTINE ASSUMES THAT THE FILE IS NOT
17534  M01S00023.ns2670  +++|*                CURRENTLY ATTACHED IN A WRITEABLE MODE; THE
17535  M01S00024.ns2670  +++|*                CORRECTNESS OF THAT ASSUMPTION DEPENDS ON LOGIC IN
17536  M01S00025.ns2670  +++|*                *PFDUMP* AND *PFU*.  THIS SUBROUTINE WILL ONLY BE
17537  M01S00026.ns2670  +++|*                CALLED IF *TFLOK* IS STILL SET, AND *PFDUMP* DOES
17538  M01S00027.ns2670  +++|*                NOT SET *TFLOK* UNTIL AFTER *PFU* HAS DETERMINED
17539  M01S00028.ns2670  +++|*                THAT THE FILE IS NOT BUSY.
17540  M01S00029.ns2670  +++|
17541  M01S00030.ns2670  +++|
17542  M01S00031.ns2670  +++| UFL      SUBR               ENTRY/EXIT
17543  M01S00032.ns2670  +++|          LDM    FCBS,CI
17544  M01S00033.ns2670  +++|          SHN    21-13
17545  M01S00034.ns2670  +++|          PJN    UFLX        IF INDIRECT ACCESS FILE
17546  M01S00035.ns2670  +++|          LDM    FCLF,CI
17547  M01S00036.ns2670  +++|          ADM    FCLF+1,CI
17548  M01S00037.ns2670  +++|          NJN    UFLX        IF FILE LENGTH NONZERO
17549  M01S00038.ns2670  +++|          LDM    FCDN,CI     CHECK DEVICE NUMBER
17550  M01S00039.ns2670  +++|          LPN    77
17551  M01S00040.ns2670  +++|          ZJN    UFL2        IF FILE ON MASTER DEVICE
17552  M01S00041.ns2670  +++|
17553  M01S00042.ns2670  +++|*         PROCESS ALTERNATE DEVICE ACCESS.
17554  M01S00043.ns2670  +++|
17555  M01S00044.ns2670  +++|          STD    CM
17556  M01S00045.ns2670  +++|          LDM    PFPN+4      SET FAMILY EST ORDINAL
17557  M01S00046.ns2670  +++|          RJM    SDN         SEARCH FOR DEVICE NUMBER
17558  M01S00047.ns2670  +++|          PJN    UFL2        IF DEVICE FOUND
17559  M01S00048.ns2670  +++|          ADN    1
Line S00049 Modification History
M01 (Added by) ns2670
M02 (Updated by) ns2776
Seq #  *Modification Id* Act 
----------------------------+
17560  M02S00049.ns2776  ---|          ZJN    UFL1        IF DEVICE NOT FOUND
Line S00050 Modification History
M01 (Added by) ns2670
M02 (Updated by) ns2776
Seq #  *Modification Id* Act 
----------------------------+
17561  M02S00050.ns2776  ---|          RJM    PDV         PROCESS DEVICE STATUS
17562  M01S00094.ns2776  +++|          RJM    PDA         PROCESS DEVICE AVAILABILITY
17563  M01S00051.ns2670  +++| UFL1     ERROR  DAD,CH      * DIRECT ACCESS DEVICE ERROR.*
17564  M01S00052.ns2670  +++|
17565  M01S00053.ns2670  +++|*         DETERMINE FILE LENGTH.
17566  M01S00054.ns2670  +++|
17567  M01S00055.ns2670  +++| UFL2     LDM    FCBT,CI     SET FILE FIRST TRACK
17568  M01S00056.ns2670  +++|          STD    T6
17569  M01S00057.ns2670  +++|          SETMS  STATUS
17570  M01S00058.ns2670  +++|          LDD    CM+4        SET TRT ADDRESS FOR *SEI*
17571  M01S00059.ns2670  +++|          SHN    3
17572  M01S00060.ns2670  +++|          ADN    TRLL
17573  M01S00061.ns2670  +++|          RJM    CTA         CALCULATE FWA OF TRT
17574  M01S00062.ns2670  +++|          SBD    TH
17575  M01S00063.ns2670  +++|          STM    SEIA+1
17576  M01S00064.ns2670  +++|          SHN    -14
17577  M01S00065.ns2670  +++|          LMC    ADCI
17578  M01S00066.ns2670  +++|          STM    SEIA
17579  M01S00067.ns2670  +++|          LDN    0           FORCE CURRENT TRT
17580  M01S00068.ns2670  +++|          RJM    SEI         SKIP TO EOI
17581  M01S00069.ns2670  +++|          LDD    T2          SET FILE LENGTH
17582  M01S00070.ns2670  +++|          STM    FCLF,CI
17583  M01S00071.ns2670  +++|          LDD    T3
17584  M01S00072.ns2670  +++|          STM    FCLF+1,CI
17585  M01S00073.ns2670  +++|          RJM    RMD         RESET TO MASTER DEVICE
17586  M01S00074.ns2670  +++|          UJP    UFLX        RETURN
Line S00593 Modification History
M01 (Added by) 253l688
M02 (Updated by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
17587  M02S00593.274l797 ---| UTF      SPACE  4,10
17588  M01S00022.274l797 +++| UTF      SPACE  4,20
17589  M01S00594.253l688 +++|**        UTF - UPDATE TAPE ALTERNATE STORAGE FLAGS.
17590  M01S00595.253l688 +++|*
17591  M01S00596.253l688 +++|*         ENTRY  (CI) = ADDRESS OF CATALOG ENTRY.
17592  M01S00597.253l688 +++|*
17593  M01S00598.253l688 +++|*         EXIT   (FCTF) UPDATED.
17594  M01S00599.253l688 +++|*
17595  M01S00600.253l688 +++|*         USES   T1, T2.
17596  M01S00023.274l797 +++|*
17597  M01S00024.274l797 +++|*         NOTE - CODE TO SET AND CLEAR SOME OF THESE FLAGS ARE INCLUDED
17598  M01S00025.274l797 +++|*                IN THIS FUNCTION ONLY FOR TESTING PURPOSES.  DURING
17599  M01S00026.274l797 +++|*                NORMAL SYSTEM OPERATION, THE FLAGS ARE SET BY OTHER
17600  M01S00027.274l797 +++|*                MEANS.  FOR EXAMPLE, *PFDUMP* SETS THE FLAG *TFLOK*
17601  M01S00028.274l797 +++|*                BY CALLING THE *PFU* FUNCTION *CTSL*, AND SETS THE
17602  M01S00029.274l797 +++|*                FLAGS *TFSVS*, *TFLIF*, *TFCTS* AND *TFACS* BY
17603  M01S00030.274l797 +++|*                SPECIFYING THESE BITS ON THE CALL TO *SETASA*.
17604  M01S12560.pfm     +++|
17605  M01S12561.pfm     +++|
Line S12562 Modification History
M01 (Added by) pfm
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
17606  M02S12562.253l688 ---| UAFB     BSS    0           TABLE OF ERROR FLAG PROCESSORS
17607  M01S00601.253l688 +++| UTF      SUBR               ENTRY/EXIT
17608  M01S00602.253l688 +++|          LDM    PFES        SAVE SET/CLEAR FLAG
17609  M01S00603.253l688 +++|          SCN    77
17610  M01S00604.253l688 +++|          STD    T2
17611  M01S00605.253l688 +++|          LDM    PFES        GET PROCESSOR ADDRESS
17612  M01S00606.253l688 +++|          LPN    77
17613  M01S00607.253l688 +++|          STD    T1
17614  M01S00608.253l688 +++|          SBN    TFMAX+1
17615  M01S00609.253l688 +++|          PJN    UTF1        IF INVALID FLAG NUMBER
17616  M01S00610.253l688 +++|          LDM    UTFA,T1
17617  M01S00611.253l688 +++|          STD    T1
17618  M01S00612.253l688 +++|          LJM    0,T1        PROCESS FLAG
17619  M01S00613.253l688 +++|
17620  M01S00614.253l688 +++| UTFA     BSS    0           TABLE OF ERROR FLAG PROCESSORS
17621  M01S12563.pfm     +++|          LOC    0
Line S12564 Modification History
M01 (Added by) pfm
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
17622  M02S12564.253l688 ---|          CON    UAF2        *AFOBS* PROCESSOR
Line S12565 Modification History
M01 (Added by) pfm
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
17623  M02S12565.253l688 ---|          CON    UAF3        *AFPSE* PROCESSOR
Line S12566 Modification History
M01 (Added by) pfm
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
17624  M02S12566.253l688 ---|          CON    UAF5        *AFPDE* PROCESSOR
Line S12567 Modification History
M01 (Added by) pfm
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
17625  M02S12567.253l688 ---|          CON    UAF6        *AFPDR* PROCESSOR
Line S12568 Modification History
M01 (Added by) pfm
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
17626  M02S12568.253l688 ---|          CON    UAF1        *AFVER* PROCESSOR
Line S12569 Modification History
M01 (Added by) pfm
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
17627  M02S12569.253l688 ---|          CON    UAF8        *AFTMP* PROCESSOR
Line S12570 Modification History
M01 (Added by) pfm
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
17628  M02S12570.253l688 ---|          CON    UAF10       *AFFRE* PROCESSOR
17629  M01S00615.253l688 +++|          CON    UTF1        *TFVER* PROCESSOR
17630  M01S00616.253l688 +++|          CON    UTF2        *TFSVS* PROCESSOR
17631  M01S00617.253l688 +++|          CON    UTF5        *TFPVN* PROCESSOR
17632  M01S00618.253l688 +++|          CON    UTF7        *TFSVN* PROCESSOR
17633  M01S00619.253l688 +++|          CON    UTF9        *TFEPV* PROCESSOR
17634  M01S00620.253l688 +++|          CON    UTF11       *TFESV* PROCESSOR
17635  M01S00031.274l797 +++|          CON    UTF13       *TFLIF* PROCESSOR
17636  M01S00032.274l797 +++|          CON    UTF15       *TFCTS* PROCESSOR
17637  M01S00033.274l797 +++|          CON    UTF17       *TFACS* PROCESSOR
17638  M01S00621.253l688 +++|          CON    UTF1        RESERVED
17639  M01S00622.253l688 +++|          CON    UTF1        RESERVED
Line S00623 Modification History
M01 (Added by) 253l688
M02 (Updated by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
17640  M02S00623.274l797 ---|          CON    UTF1        RESERVED
Line S00624 Modification History
M01 (Added by) 253l688
M02 (Updated by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
17641  M02S00624.274l797 ---|          CON    UTF1        RESERVED
Line S00625 Modification History
M01 (Added by) 253l688
M02 (Updated by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
17642  M02S00625.274l797 ---|          CON    UTF1        RESERVED
Line S00626 Modification History
M01 (Added by) 253l688
M02 (Updated by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
17643  M02S00626.274l797 ---|          CON    UTF13       *TFLOK* PROCESSOR
17644  M01S00034.274l797 +++|          CON    UTF19       *TFLOK* PROCESSOR
17645  M01S12571.pfm     +++|          LOC    *O
17646  M01S00627.253l688 +++|
17647  M01S00628.253l688 +++| UTF1     ERROR  ICU         * INVALID CATALOG UPDATE.*
17648  M01S00629.253l688 +++|
17649  M01S00630.253l688 +++|*         PROCESS *SECONDARY VSN EXISTS* FLAG.
17650  M01S00631.253l688 +++|
17651  M01S00632.253l688 +++| UTF2     LDD    T2          PROCESS *TFSVS*
17652  M01S00633.253l688 +++|          NJN    UTF3        IF *SET* REQUEST
17653  M01S00634.253l688 +++|          STM    UTFB
17654  M01S00635.253l688 +++| UTF3     LDM    FCTF,CI     SET/CLEAR *TFSVS* FLAG
17655  M01S00636.253l688 +++|          SCN    TFSVSM
17656  M01S00637.253l688 +++| UTFB     LMN    TFSVSM
17657  M01S00638.253l688 +++|*         PSN                (*CLEAR* REQUEST)
17658  M01S00639.253l688 +++| UTF4     STM    FCTF,CI     UPDATE FLAG FIELD IN CATALOG
17659  M01S00640.253l688 +++|          UJP    UTFX        RETURN
17660  M01S00641.253l688 +++|
17661  M01S00642.253l688 +++|*         PROCESS *PRIMARY VSN NOT AVAILABLE* FLAG.
17662  M01S00643.253l688 +++|
17663  M01S00644.253l688 +++| UTF5     LDD    T2          PROCESS *TFPVN*
17664  M01S00645.253l688 +++|          NJN    UTF6        IF *SET* REQUEST
17665  M01S00646.253l688 +++|          STM    UTFC
17666  M01S00647.253l688 +++| UTF6     LDM    FCTF,CI     SET/CLEAR *TFPVN* FLAG
17667  M01S00648.253l688 +++|          SCN    TFPVNM
17668  M01S00649.253l688 +++| UTFC     LMN    TFPVNM
17669  M01S00650.253l688 +++|*         PSN                (*CLEAR* REQUEST)
17670  M01S00651.253l688 +++|          UJN    UTF4        RETURN
17671  M01S00652.253l688 +++|
17672  M01S00653.253l688 +++|*         PROCESS *SECONDARY VSN NOT AVAILABLE* FLAG.
17673  M01S00654.253l688 +++|
17674  M01S00655.253l688 +++| UTF7     LDM    FCTF,CI     CHECK IF SECONDARY VSN EXISTS
17675  M01S00656.253l688 +++|          LPK    TFSVSM
17676  M01S00657.253l688 +++|          ZJP    UTF1        IF SECONDARY VSN NOT DEFINED
17677  M01S00658.253l688 +++|          LDD    T2
17678  M01S00659.253l688 +++|          NJN    UTF8        IF *SET* REQUEST
17679  M01S00660.253l688 +++|          STM    UTFD
17680  M01S00661.253l688 +++| UTF8     LDM    FCTF,CI     SET/CLEAR *TFSVN* FLAG
17681  M01S00662.253l688 +++|          SCN    TFSVNM
17682  M01S00663.253l688 +++| UTFD     LMN    TFSVNM
17683  M01S00664.253l688 +++|*         PSN                (*CLEAR* REQUEST)
17684  M01S00665.253l688 +++|          UJN    UTF4        RETURN
17685  M01S00666.253l688 +++|
17686  M01S00667.253l688 +++|*         PROCESS *DATA ERROR ON PRIMARY VSN* FLAG.
17687  M01S00668.253l688 +++|
17688  M01S00669.253l688 +++| UTF9     LDD    T2
17689  M01S00670.253l688 +++|          NJN    UTF10       IF *SET* REQUEST
17690  M01S00671.253l688 +++|          STM    UTFE
17691  M01S00672.253l688 +++| UTF10    LDM    FCTF,CI     SET/CLEAR *TFEPV* FLAG
17692  M01S00673.253l688 +++|          SCN    TFEPVM
17693  M01S00674.253l688 +++| UTFE     LMN    TFEPVM
17694  M01S00675.253l688 +++|*         PSN                (*CLEAR* REQUEST)
17695  M01S00676.253l688 +++|          UJP    UTF4        RETURN
17696  M01S00677.253l688 +++|
17697  M01S00678.253l688 +++|*         PROCESS *DATA ERROR ON SECONDARY VSN* FLAG.
17698  M01S00679.253l688 +++|
17699  M01S00680.253l688 +++| UTF11    LDM    FCTF,CI     CHECK IF SECONDARY VSN EXISTS
17700  M01S00681.253l688 +++|          LPK    TFSVSM
17701  M01S00682.253l688 +++|          ZJP    UTF1        IF SECONDARY VSN NOT DEFINED
17702  M01S00683.253l688 +++|          LDD    T2
17703  M01S00684.253l688 +++|          NJN    UTF12       IF *SET* REQUEST
17704  M01S00685.253l688 +++|          STM    UTFF
17705  M01S00686.253l688 +++| UTF12    LDM    FCTF,CI     SET/CLEAR *TFESV* FLAG
17706  M01S00687.253l688 +++|          SCN    TFESVM
17707  M01S00688.253l688 +++| UTFF     LMN    TFESVM
17708  M01S00689.253l688 +++|*         PSN                (*CLEAR* REQUEST)
17709  M01S00690.253l688 +++|          UJP    UTF4        RETURN
17710  M01S00691.253l688 +++|
17711  M01S00035.274l797 +++|*         PROCESS *FILE ON LI FORMAT TAPE* FLAG.
17712  M01S00036.274l797 +++|
17713  M01S00037.274l797 +++| UTF13    LDD    T2          PROCESS *TFLIF*
17714  M01S00038.274l797 +++|          NJN    UTF14       IF *SET* REQUEST
17715  M01S00039.274l797 +++|          STM    UTFG
17716  M01S00040.274l797 +++|          STM    UTFG+1
17717  M01S00041.274l797 +++| UTF14    LDM    FCTF,CI     SET/CLEAR *TFLIF* FLAG
17718  M01S00042.274l797 +++|          LPC    -TFLIFM
17719  M01S00043.274l797 +++| UTFG     LMC    TFLIFM
17720  M01S00044.274l797 +++|*         PSN                (*CLEAR* REQUEST)
17721  M01S00045.274l797 +++|          UJP    UTF4        RETURN
17722  M01S00046.274l797 +++|
17723  M01S00047.274l797 +++|*         PROCESS *FILE ON CARTRIDGE (CT/AT) TAPE* FLAG.
17724  M01S00048.274l797 +++|
17725  M01S00049.274l797 +++| UTF15    LDD    T2          PROCESS *TFCTS*
17726  M01S00050.274l797 +++|          NJN    UTF15       IF *SET* REQUEST
17727  M01S00051.274l797 +++|          STM    UTFH
17728  M01S00052.274l797 +++|          STM    UTFH+1
17729  M01S00053.274l797 +++| UTF16    LDM    FCTF,CI     SET/CLEAR *TFCTS* FLAG
17730  M01S00054.274l797 +++|          LPC    -TFCTSM
17731  M01S00055.274l797 +++| UTFH     LMC    TFCTSM
17732  M01S00056.274l797 +++|*         PSN                (*CLEAR* REQUEST)
17733  M01S00057.274l797 +++|          UJP    UTF4        RETURN
17734  M01S00058.274l797 +++|
17735  M01S00059.274l797 +++|*         PROCESS *FILE ON ACS CARTRIDGE (AT) TAPE* FLAG.
17736  M01S00060.274l797 +++|
17737  M01S00061.274l797 +++| UTF17    LDD    T2          PROCESS *TFACS*
17738  M01S00062.274l797 +++|          NJN    UTF18       IF *SET* REQUEST
17739  M01S00063.274l797 +++|          STM    UTFI
17740  M01S00064.274l797 +++|          STM    UTFI+1
17741  M01S00065.274l797 +++| UTF18    LDM    FCTF,CI     SET/CLEAR *TFACS* FLAG
17742  M01S00066.274l797 +++|          LPC    -TFACSM
17743  M01S00067.274l797 +++| UTFI     LMC    TFACSM
17744  M01S00068.274l797 +++|*         PSN                (*CLEAR* REQUEST)
17745  M01S00069.274l797 +++|          UJP    UTF4        RETURN
17746  M01S00070.274l797 +++|
17747  M01S00692.253l688 +++|*         PROCESS *TFLOK* FLAG.
Line S00075 Modification History
M01 (Added by) ns2670
M02 (Updated by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
17748  M02S00075.274l797 ---|*         NOTE - CODE TO SET THIS FLAG IS INCLUDED IN *PFM* ONLY FOR
Line S00076 Modification History
M01 (Added by) ns2670
M02 (Updated by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
17749  M02S00076.274l797 ---|*         TESTING PURPOSES.  WHEN DESTAGING FILES TO TAPE, *PFDUMP*
Line S00077 Modification History
M01 (Added by) ns2670
M02 (Updated by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
17750  M02S00077.274l797 ---|*         SETS THIS FLAG BY CALLING *PFU* FUNCTION *CTSL*.
17751  M01S00693.253l688 +++|
Line S00694 Modification History
M01 (Added by) 253l688
M02 (Updated by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
17752  M02S00694.274l797 ---| UTF13    LDD    T2
17753  M01S00071.274l797 +++| UTF19    LDD    T2
17754  M01S00695.253l688 +++|          ZJP    UTF1        IF *CLEAR* REQUEST
17755  M01S00696.253l688 +++|          LDM    FCTF,CI     SET *TFLOK* FLAG
17756  M01S00697.253l688 +++|          LPC    -TFLOKM
17757  M01S00698.253l688 +++|          LMC    TFLOKM
17758  M01S00699.253l688 +++|          UJP    UTF4        RETURN
17759  M01S12572.pfm     +++| WCE      SPACE  4,15
17760  M01S12573.pfm     +++|**        WCE - REWRITE CATALOG ENTRY.
17761  M01S12574.pfm     +++|*
17762  M01S12575.pfm     +++|*         ENTRY  (CI) = ADDRESS OF CATALOG ENTRY.
17763  M01S12576.pfm     +++|*                (CB) = ADDRESS OF CATALOG BUFFER.
17764  M01S12577.pfm     +++|*
Line S12578 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
17765  M02S12578.242l642 ---|*         EXIT   TO TRPX.
Line S01523 Modification History
M01 (Added by) 242l642
M02 (Updated by) ns2414
Seq #  *Modification Id* Act 
----------------------------+
17766  M02S01523.ns2414  ---|*         EXIT   TO *3PT*.
17767  M01S00309.ns2414  +++|*         EXIT   TO *3PU*.
17768  M01S12579.pfm     +++|*                (FCKD) UPDATED AND CATALOG SECTOR REWRITTEN.
17769  M01S12580.pfm     +++|*
17770  M01S12581.pfm     +++|*         USES   CM - CM+4.
17771  M01S12582.pfm     +++|*
17772  M01S12583.pfm     +++|*         CALLS  WBI.
17773  M01S12584.pfm     +++|*
17774  M01S12585.pfm     +++|*         MACROS ENDMS.
17775  M01S12586.pfm     +++|
17776  M01S12587.pfm     +++|
17777  M01S12588.pfm     +++| WCE      BSS    0           ENTRY
17778  M01S12589.pfm     +++|          LDN    PDTL        UPDATE CONTROL MODIFICATION DATE
17779  M01S12590.pfm     +++|          CRD    CM
17780  M01S12591.pfm     +++|          LDD    CM+2
17781  M01S12592.pfm     +++|          STM    FCKD,CI
17782  M01S12593.pfm     +++|          LDD    CM+3
17783  M01S12594.pfm     +++|          STM    FCKD+1,CI
17784  M01S12595.pfm     +++|          LDD    CM+4
17785  M01S12596.pfm     +++|          STM    FCKD+2,CI
17786  M01S12597.pfm     +++|          LDD    CB          REWRITE CATALOG BUFFER
17787  M01S12598.pfm     +++|          RJM    WBI
17788  M01S12599.pfm     +++|          ENDMS
Line S12600 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
17789  M02S12600.242l642 ---|          LJM    TRPX        TERMINATE PROGRAM
Line S01524 Modification History
M01 (Added by) 242l642
M02 (Updated by) ns2414
Seq #  *Modification Id* Act 
----------------------------+
17790  M02S01524.ns2414  ---|          EXECUTE  3PT       TERMINATE PROGRAM
17791  M01S00310.ns2414  +++|          EXECUTE  3PU       TERMINATE PROGRAM
17792  M01S12601.pfm     +++|          SPACE  4,10
17793  M01S12602.pfm     +++|*         COMMON DECKS.
17794  M01S12603.pfm     +++|
17795  M01S12604.pfm     +++|
17796  M01S12605.pfm     +++|*CALL     COMPSDN
17797  M01S00078.ns2670  +++| SEI$     SET    0           FORCE TRT UPDATE ON *SEI* CALLS
17798  M01S00079.ns2670  +++|*CALL     COMPSEI
17799  M01S12606.pfm     +++|          SPACE  4,10
17800  M01S12607.pfm     +++|*         CHECK FOR OVERFLOW.
17801  M01S12608.pfm     +++|
17802  M01S12609.pfm     +++|
17803  M01S12610.pfm     +++|          OVERFLOW  OVLC,BUF1-2  OVERFLOW INTO CATALOG BUFFER
17804  M01S12611.pfm     +++|          OVERLAY  (DEVICE TO DEVICE TRANSFER.),LOCG
17805  M01S12612.pfm     +++|          SPACE  4,10
17806  M01S12613.pfm     +++|**        THIS OVERLAY PROCESSES DEVICE-TO-DEVICE TRANSFER FOR
17807  M01S12614.pfm     +++|*         THE INDIRECT ACCESS FILE COMMANDS *GET*, *OLD*, *SAVE*,
17808  M01S12615.pfm     +++|*         *REPLACE*, AND *APPEND*.
17809  M01S12616.pfm     +++|
17810  M01S12617.pfm     +++|
17811  M01S12618.pfm     +++| OVL      BSS    0           ENTRY
17812  M01S12619.pfm     +++|          RJM    CES         CREATE EOI SECTOR
17813  M01S12620.pfm     +++|          UJN    ".Q"X       RETURN
17814  M01S12621.pfm     +++|          TITLE  DEVICE-TO-DEVICE TRANSFER MAIN LOOP.
17815  M01S12622.pfm     +++|**        DTD - DEVICE TO DEVICE TRANSFER.
17816  M01S12623.pfm     +++|*
17817  M01S12624.pfm     +++|*         ENTRY  (T4 - T7) = MASS STORAGE PARMETERS TO START READ AT.
17818  M01S12625.pfm     +++|*                (SDAA - SDAC) = MASS STORAGE PARAMETERS FOR 1ST WRITE
17819  M01S12626.pfm     +++|*                (BB) = ADDRESS TO START READING IN AT.
17820  M01S12627.pfm     +++|*                (FA) = FST ADDRESS.
17821  M01S12628.pfm     +++|*                (LF - LF+1) = FILE LENGTH.
17822  M01S12629.pfm     +++|*
Line S12630 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
17823  M02S12630.242l642 ---|*         CALLS  IBA, RNS, SDP, WES, WNS.
17824  M01S01525.242l642 +++|*         CALLS  IBA, PDV, RNS, SDP, WES, WNS.
17825  M01S12631.pfm     +++|*
17826  M01S12632.pfm     +++|*         MACROS ERROR, SETMS.
17827  M01S12633.pfm     +++|
17828  M01S12634.pfm     +++|
17829  M01S12635.pfm     +++| DTD      BSS    0           ENTRY
17830  M01S01526.242l642 +++|          LDK    PTE         SET ERROR PROCESSOR ADDRESS FOR *RNS*
17831  M01S01527.242l642 +++|          STM    MSRA
17832  M01S12636.pfm     +++| DTD0     LDD    BB
17833  M01S12637.pfm     +++|          RJM    RNS
Line S12638 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
17834  M02S12638.242l642 ---| .MSE3    BSS    0           (*COMPRNS* RETURN ADDRESS)
17835  M01S12639.pfm     +++|          LDI    BB
17836  M01S12640.pfm     +++|          ADM    1,BB
17837  M01S12641.pfm     +++|          ZJN    DTD1        IF EOI
17838  M01S12642.pfm     +++|          RJM    IBA         INCREMENT BUFFER ADDRESSES
17839  M01S12643.pfm     +++|          MJN    DTD0        IF BUFFER NOT FULL
17840  M01S12644.pfm     +++| DTD1     RJM    SDP         SWAP DISK PARAMETERS
17841  M01S12645.pfm     +++| DTD2     LDI    BB
17842  M01S12646.pfm     +++|          ADM    1,BB
Line S12647 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
17843  M02S12647.242l642 ---|          ZJN    DTD4        IF EOI SECTOR
17844  M01S01528.242l642 +++|          ZJP    DTD4        IF EOI SECTOR
17845  M01S12648.pfm     +++|          SOD    LF+1        DECREMENT LENGTH
17846  M01S12649.pfm     +++|          PJN    DTD3        IF NO UNDERFLOW
17847  M01S12650.pfm     +++|          AOD    LF+1
17848  M01S12651.pfm     +++|          SOD    LF
Line S12652 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
17849  M02S12652.242l642 ---|          MJN    DTD7        IF LENGTH ERROR
17850  M01S01529.242l642 +++|          MJP    DTD7        IF LENGTH ERROR
17851  M01S12653.pfm     +++| DTD3     RJM    WNS         WRITE NEXT SECTOR
17852  M01S12654.pfm     +++|          RJM    IBA         INCREMENT BUFFER ADDRESSES
17853  M01S12655.pfm     +++|          MJN    DTD2        IF STILL ANOTHER SECTOR IN BUFFER
17854  M01S12656.pfm     +++|          RJM    SDP         SWAP DISK PARAMETERS
Line S12657 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
17855  M02S12657.242l642 ---|          SETMS  READ
Line S01530 Modification History
M01 (Added by) 242l642
M02 (Updated by) ns2645
Seq #  *Modification Id* Act 
----------------------------+
17856  M02S01530.ns2645  ---|          SETMS  IO
17857  M01S00021.ns2645  +++|          SETMS  READSTR,NS
17858  M01S01531.242l642 +++|          RJM    PDV         PROCESS DEVICE STATUS
17859  M01S12658.pfm     +++|          LJM    DTD0        LOOP
17860  M01S12659.pfm     +++|
17861  M01S12660.pfm     +++|*         EOI SECTOR ENCOUNTERED.
17862  M01S12661.pfm     +++|
17863  M01S12662.pfm     +++| DTD4     LDD    LF          CHECK FILE LENGTH
17864  M01S12663.pfm     +++|          ADD    LF+1
17865  M01S12664.pfm     +++|          ZJN    DTD8        IF NO LENGTH ERROR
17866  M01S12665.pfm     +++|          LDD    CC
17867  M01S12666.pfm     +++|          LMN    CCGT
17868  M01S12667.pfm     +++|          ZJN    DTD7        IF *GET*
17869  M01S12668.pfm     +++|          LMN    CCOD&CCGT
17870  M01S12669.pfm     +++|          ZJN    DTD7        IF *OLD*
17871  M01S12670.pfm     +++|          LMN    CCUG&CCOD
17872  M01S12671.pfm     +++|          ZJN    DTD7        IF *UGET*
17873  M01S12672.pfm     +++|
17874  M01S12673.pfm     +++|*         IF EOI ENCOUNTERED ON *SAVE*/*REPLACE*/*APPEND* BEFORE
17875  M01S12674.pfm     +++|*         FILE LENGTH EXHAUSTED, FILL TO END OF FILE WITH EOF-S.
17876  M01S12675.pfm     +++|
17877  M01S12676.pfm     +++| DTD5     SOD    LF+1        DECREMENT LENGTH
17878  M01S12677.pfm     +++|          PJN    DTD6        IF STILL MORE SECTORS
17879  M01S12678.pfm     +++|          AOD    LF+1
17880  M01S12679.pfm     +++|          SOD    LF
17881  M01S12680.pfm     +++|          MJN    DTD7        IF END OF SPACE
17882  M01S12681.pfm     +++| DTD6     RJM    WNS         WRITE EOF
17883  M01S12682.pfm     +++|          UJN    DTD5        CHECK IF MORE EOF-S NEEDED
17884  M01S12683.pfm     +++|
17885  M01S12684.pfm     +++| DTD7     LJM    PLE         PROCESS LENGTH ERROR
17886  M01S12685.pfm     +++|
17887  M01S12686.pfm     +++| DTD8     RJM    WES         WRITE EOI SECTOR
17888  M01S12687.pfm     +++|          LDD    FA
17889  M01S12688.pfm     +++|          ZJN    DTD9        IF NOT FST
17890  M01S12689.pfm     +++|          NFA    FA,R
17891  M01S12690.pfm     +++|          ADN    FSTL
17892  M01S12691.pfm     +++|          CWD    FS
17893  M01S12692.pfm     +++|
17894  M01S12693.pfm     +++| DTD9     LDC    0
17895  M01S12694.pfm     +++| DTDA     EQU    *-1         (TRANSFER ERROR FLAG)
17896  M01S12695.pfm     +++|          ZJN    DTD10       IF NO TRANSFER ERRORS
Line S12696 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
17897  M02S12696.242l642 ---|          ERROR  DTE,CH,,T5  *DATA TRANSFER ERROR.*
17898  M01S01532.242l642 +++|          LDM    SDAA        SET SOURCE EST ORDINAL
17899  M01S01533.242l642 +++|          ERROR  DTE,CH      *DATA TRANSFER ERROR.*
17900  M01S12697.pfm     +++|
Line S12698 Modification History
M01 (Added by) pfm
M02 (Updated by) ns2311
Seq #  *Modification Id* Act 
----------------------------+
17901  M02S12698.ns2311  ---| DTD10    LDM    IAIF
Line S12699 Modification History
M01 (Added by) pfm
M02 (Updated by) ns2311
Seq #  *Modification Id* Act 
----------------------------+
17902  M02S12699.ns2311  ---|          ZJN    DTD11       IF INDIRECT ALLOCATION INTERLOCK NOT SET
Line S12700 Modification History
M01 (Added by) pfm
M02 (Updated by) ns2311
Seq #  *Modification Id* Act 
----------------------------+
17903  M02S12700.ns2311  ---|          LDD    EQ          CLEAR INDIRECT ALLOCATION INTERLOCK
Line S12701 Modification History
M01 (Added by) pfm
M02 (Updated by) ns2311
Seq #  *Modification Id* Act 
----------------------------+
17904  M02S12701.ns2311  ---|          STD    CM+1
Line S12702 Modification History
M01 (Added by) pfm
M02 (Updated by) ns2311
Seq #  *Modification Id* Act 
----------------------------+
17905  M02S12702.ns2311  ---|          LDM    DVLW
Line S12703 Modification History
M01 (Added by) pfm
M02 (Updated by) ns2311
Seq #  *Modification Id* Act 
----------------------------+
17906  M02S12703.ns2311  ---|          STD    CM+2
Line S12704 Modification History
M01 (Added by) pfm
M02 (Updated by) ns2311
Seq #  *Modification Id* Act 
----------------------------+
17907  M02S12704.ns2311  ---|          LDN    CTIS
Line S12705 Modification History
M01 (Added by) pfm
M02 (Updated by) ns2311
Seq #  *Modification Id* Act 
----------------------------+
17908  M02S12705.ns2311  ---|          STD    CM+3
Line S12706 Modification History
M01 (Added by) pfm
M02 (Updated by) ns2311
Seq #  *Modification Id* Act 
----------------------------+
17909  M02S12706.ns2311  ---|          MONITOR  STBM
Line S12707 Modification History
M01 (Added by) pfm
M02 (Updated by) ns2311
Seq #  *Modification Id* Act 
----------------------------+
17910  M02S12707.ns2311  ---| DTD11    LJM    TRPX        TERMINATE PROGRAM
Line S00016 Modification History
M01 (Added by) ns2311
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
17911  M02S00016.242l642 ---| DTD10    LJM    TRPX        TERMINATE PROGRAM
Line S01534 Modification History
M01 (Added by) 242l642
M02 (Updated by) ns2414
Seq #  *Modification Id* Act 
----------------------------+
17912  M02S01534.ns2414  ---| DTD10    EXECUTE  3PT       TERMINATE PROGRAM
Line S00311 Modification History
M01 (Added by) ns2414
M02 (Updated by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
17913  M02S00311.pfm54   ---| DTD10    EXECUTE  3PU       TERMINATE PROGRAM
17914  M01S00192.pfm54   +++| DTD10    LDM    IAIF        CHECK FOR INDIRECT ALLOCATION INTERLOCK
17915  M01S00193.pfm54   +++|          ZJN    DTD11       IF INDIRECT ALLOCATION INTERLOCK NOT SET
17916  M01S00194.pfm54   +++|          LDD    EQ          CLEAR INTERLOCK (SET CHECKPOINT BIT)
17917  M01S00195.pfm54   +++|          ADC    4000
17918  M01S00196.pfm54   +++|          STD    CM+1
17919  M01S00197.pfm54   +++|          LDM    DVLW
17920  M01S00198.pfm54   +++|          STD    CM+2
17921  M01S00199.pfm54   +++|          LDN    CTIS
17922  M01S00200.pfm54   +++|          STD    CM+3
17923  M01S00201.pfm54   +++|          MONITOR  STBM
17924  M01S00202.pfm54   +++|*         LDN    0           CLEAR INDIRECT ALLOCATION INTERLOCK FLAG
17925  M01S00203.pfm54   +++|          STM    IAIF
17926  M01S00204.pfm54   +++| DTD11    EXECUTE  3PU       TERMINATE PROGRAM
17927  M01S12708.pfm     +++|          TITLE  SUBROUTINES.
17928  M01S12709.pfm     +++| DPC      SPACE  4,10
17929  M01S12710.pfm     +++|**        DPC - DECREMENT PRU COUNTER.
17930  M01S12711.pfm     +++|*
17931  M01S12712.pfm     +++|*         ENTRY  (DPCA) PRESET FOR SRU ACCUMULATION OPTION.
17932  M01S12713.pfm     +++|*                       .EQ. 0 TO ACCUMULATE SRUS.
17933  M01S12714.pfm     +++|*                       .NE. 0 TO NOT ACCUMULATE SRUS.
17934  M01S12715.pfm     +++|*
Line S12716 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
17935  M02S12716.242l642 ---|*         EXIT   (DPPF) UPDATED IF SPECIFIED NUMBER OF PRUS TRANSFERRED
17936  M01S01535.242l642 +++|*         EXIT   (IAPF) UPDATED IF SPECIFIED NUMBER OF PRUS TRANSFERRED
17937  M01S12717.pfm     +++|*                AND SRU ACCUMULATION OPTION ON.
17938  M01S12718.pfm     +++|
17939  M01S12719.pfm     +++|
17940  M01S12720.pfm     +++| DPC      SUBR               ENTRY/EXIT
17941  M01S12721.pfm     +++|          SOM    DPCB        DECREMENT PRUS TRANSFERRED
17942  M01S12722.pfm     +++|          NJN    DPCX        IF INCREMENT NOT EXHAUSTED
17943  M01S12723.pfm     +++| DPCA     LDN    0           CHECK SRU ACCUMULATION OPTION
17944  M01S12724.pfm     +++|*         LDN    1           (NO SRU ACCUMULATION)
17945  M01S12725.pfm     +++|          NJN    DPCX        IF NO SRU ACCUMULATION
17946  M01S12726.pfm     +++|          LDN    IPPR        INCREMENT SRUS FOR TRANSFER
Line S12727 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
17947  M02S12727.242l642 ---|          RAM    DPPF
17948  M01S01536.242l642 +++|          RAM    AIPF+1
17949  M01S12728.pfm     +++|          SHN    -14
Line S12729 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
17950  M02S12729.242l642 ---|          RAM    DPPF-1
17951  M01S01537.242l642 +++|          RAM    AIPF
17952  M01S12730.pfm     +++|          LDN    IPPN        RESET PRU TRANSFER INCREMENT
17953  M01S12731.pfm     +++|          STM    DPCB
17954  M01S12732.pfm     +++|          UJN    DPCX        RETURN
17955  M01S12733.pfm     +++|
17956  M01S12734.pfm     +++| DPCB     CON    IPPN        PRU TRANSFER INCREMENT
17957  M01S12735.pfm     +++| IBA      SPACE  4,10
17958  M01S12736.pfm     +++|**        IBA - INCREMENT BUFFER ADDRESS.
17959  M01S12737.pfm     +++|*
17960  M01S12738.pfm     +++|*         EXIT   (A) .LT. 0, IF BUFFER NOT FULL.
17961  M01S12739.pfm     +++|
17962  M01S12740.pfm     +++|
17963  M01S12741.pfm     +++| IBA2     LDC    502         FULL BUFFER NEEDED FOR WRITE ERROR
17964  M01S12742.pfm     +++|          RAD    BB
17965  M01S12743.pfm     +++|          LCN    1
17966  M01S12744.pfm     +++|
17967  M01S12745.pfm     +++| IBA      SUBR               ENTRY/EXIT
17968  M01S12746.pfm     +++|          LDD    BB
17969  M01S12747.pfm     +++|          LMM    SDPA
17970  M01S12748.pfm     +++|          ZJN    IBA2        IF FIRST SECTOR IN BUFFER
17971  M01S12749.pfm     +++|          LDI    BB
17972  M01S12750.pfm     +++|          ZJN    IBA1        IF EOF
17973  M01S12751.pfm     +++|          LDM    1,BB        GET LENGTH
17974  M01S12752.pfm     +++|          SHN    2
17975  M01S12753.pfm     +++|          ADM    1,BB
17976  M01S12754.pfm     +++| IBA1     ADN    2
17977  M01S12755.pfm     +++|          RAD    BB
17978  M01S12756.pfm     +++|          ADC    -BFMS
17979  M01S12757.pfm     +++|          UJN    IBAX        RETURN
17980  M01S12758.pfm     +++| PLE      SPACE  4,10
17981  M01S12759.pfm     +++|**        PLE - PROCESS LENGTH ERROR.
17982  M01S12760.pfm     +++|*
17983  M01S12761.pfm     +++|*         CALLS  WES.
17984  M01S12762.pfm     +++|*
17985  M01S12763.pfm     +++|*         MACROS ERROR.
17986  M01S12764.pfm     +++|
17987  M01S12765.pfm     +++|
17988  M01S12766.pfm     +++| PLE      BSS    0           ENTRY
17989  M01S12767.pfm     +++|          RJM    WES         WRITE EOI SECTOR
Line S12768 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
17990  M02S12768.242l642 ---|          LDM    SDAA        SET SOURCE EST ORDINAL
17991  M01S01538.242l642 +++|          LDM    PLEA
17992  M01S01539.242l642 +++|          NJN    PLE1        IF LENGTH ERROR DUE TO HARDWARE FAILURE
17993  M01S01540.242l642 +++|          LDM    SDAA        SET SOURCE EST ORDINAL
17994  M01S01541.242l642 +++|          ERROR  FLE,CH,,,,EI  *EQXXX,DNYY, FILE LENGTH ERROR.*
17995  M01S01542.242l642 +++|
17996  M01S01543.242l642 +++| PLE1     LDM    SDAA        SET SOURCE EST ORDINAL
17997  M01S12769.pfm     +++|          ERROR  FLE,CH      *EQXXX,DNYY, FILE LENGTH ERROR.*
17998  M01S01544.242l642 +++|
17999  M01S01545.242l642 +++|
18000  M01S01546.242l642 +++| PLEA     CON    0           LINKAGE ERROR DUE TO HARDWARE FAILURE
18001  M01S12770.pfm     +++| PTE      SPACE  4,10
18002  M01S12771.pfm     +++|**        PTE - PROCESS TRANSFER ERROR.
18003  M01S12772.pfm     +++|*
Line S12773 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
18004  M02S12773.242l642 ---|*         ENTRY  FROM MSR.
18005  M01S01547.242l642 +++|*         ENTRY  READ ERROR DETECTED BY *COMPRNS*.
18006  M01S12774.pfm     +++|*
Line S12775 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
18007  M02S12775.242l642 ---|*         EXIT   TO *.MSE3* WITH EOI LINKAGE SET IF NOT VALID SECTOR.
Line S12776 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
18008  M02S12776.242l642 ---|*                TO *MSRX* WITH TRANSFER ERROR INDICATED IF VALID DATA.
18009  M01S01548.242l642 +++|*         EXIT   (DTDA) .NE. 0 IF DATA TRANSFER ERROR OCCURRED.
18010  M01S01549.242l642 +++|*                (PLEA) .NE. 0 IF LINKAGE ERROR OCCURRED.
18011  M01S01550.242l642 +++|*
18012  M01S01551.242l642 +++|*         CALLS  PES.
18013  M01S12777.pfm     +++|
18014  M01S12778.pfm     +++|
Line S12779 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
18015  M02S12779.242l642 ---| PTE      BSS    0           ENTRY
18016  M01S01552.242l642 +++| PTE      SUBR               ENTRY/EXIT
18017  M01S01553.242l642 +++|          RJM    PES         PROCESS ERROR STATUS
18018  M01S12780.pfm     +++|          LDM    RDCT        CHECK TYPE OF ERROR
18019  M01S12781.pfm     +++|          SHN    21-13
18020  M01S12782.pfm     +++|          PJN    PTE1        IF VALID SECTOR READ
18021  M01S01554.242l642 +++|          AOM    PLEA        INDICATE LINKAGE ERROR
18022  M01S12783.pfm     +++|          LDN    0           SET EOI LINKAGE TO TERMINATE TRANSFER
18023  M01S12784.pfm     +++|          STM    1,BB
18024  M01S12785.pfm     +++|          STI    BB
Line S12786 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
18025  M02S12786.242l642 ---|          LJM    .MSE3       REENTER TRANSFER LOOP
18026  M01S01555.242l642 +++|          UJN    PTEX        RETURN
18027  M01S12787.pfm     +++|
18028  M01S12788.pfm     +++| PTE1     AOM    DTDA        INDICATE TRANSFER ERROR
Line S12789 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
18029  M02S12789.242l642 ---|          LJM    MSRX        REENTER *COMPRNS*
18030  M01S01556.242l642 +++|          UJN    PTEX        RETURN
18031  M01S12790.pfm     +++| SDP      SPACE  4,15
18032  M01S12791.pfm     +++|**        SDP - SWAP DISK PARAMETERS.
18033  M01S12792.pfm     +++|*
18034  M01S12793.pfm     +++|*         ENTRY  (SDAA - SDAC) = NEXT DEVICE PARAMETERS.
18035  M01S12794.pfm     +++|*                (T5 - T7) = CURRENT DEVICE PARAMETERS.
18036  M01S12795.pfm     +++|*
18037  M01S12796.pfm     +++|*         EXIT   (T4 - T7) = DISK INFORMATION FOR NEXT DEVICE.
18038  M01S12797.pfm     +++|*                (BB) = STARTING BUFFER ADDRESS.
18039  M01S12798.pfm     +++|*                *SETMS* WRITE PERFORMED.
18040  M01S12799.pfm     +++|*
18041  M01S12800.pfm     +++|*         USES   T0 - T7.
18042  M01S01557.242l642 +++|*
18043  M01S01558.242l642 +++|*         CALLS  PDV.
18044  M01S12801.pfm     +++|*
18045  M01S12802.pfm     +++|*         MACROS ENDMS, SETMS.
18046  M01S12803.pfm     +++|
18047  M01S12804.pfm     +++|
18048  M01S12805.pfm     +++| SDP      SUBR               ENTRY/EXIT
18049  M01S12806.pfm     +++|          ENDMS
18050  M01S12807.pfm     +++|          LDN    T5          SWAP DEVICE PARAMETERS
18051  M01S12808.pfm     +++|          STD    T1
18052  M01S12809.pfm     +++| SDP1     LDI    T1
18053  M01S12810.pfm     +++|          STD    T0
18054  M01S12811.pfm     +++|          LDM    SDAA-T5,T1
18055  M01S12812.pfm     +++|          STI    T1
18056  M01S12813.pfm     +++|          LDD    T0
18057  M01S12814.pfm     +++|          STM    SDAA-T5,T1
18058  M01S12815.pfm     +++|          AOD    T1
18059  M01S12816.pfm     +++|          LMN    T7+1
18060  M01S12817.pfm     +++|          NJN    SDP1        IF NOT ALL PARAMETERS SWAPPGD
Line S12818 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
18061  M02S12818.242l642 ---|          SETMS  WRITE
Line S01559 Modification History
M01 (Added by) 242l642
M02 (Updated by) ns2645
Seq #  *Modification Id* Act 
----------------------------+
18062  M02S01559.ns2645  ---|          SETMS  IO
18063  M01S00022.ns2645  +++|          SETMS  IO,NS
18064  M01S01560.242l642 +++|          RJM    PDV         PROCESS DEVICE STATUS
18065  M01S12819.pfm     +++|          LDM    UERR        SET TRANSFER MODE (REWRITE OR NON-REWRITE)
Line S12820 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
18066  M02S12820.242l642 ---|          SCN    EPRW
18067  M01S01561.242l642 +++|          LPC    -EPRW
18068  M01S12821.pfm     +++|          LMM    DTMD
18069  M01S12822.pfm     +++|          STM    UERR
18070  M01S12823.pfm     +++|          LDC    BUF         SET BUFFER ADDRESS
18071  M01S12824.pfm     +++| SDPA     EQU    *-1
18072  M01S12825.pfm     +++|          STD    BB
18073  M01S12826.pfm     +++|          STM    WDSE        SET WRITE ERROR BUFFER ADDRESS
18074  M01S12827.pfm     +++|          LJM    SDPX        RETURN
18075  M01S12828.pfm     +++| SNS      SPACE  4,15
18076  M01S12829.pfm     +++|**        SNS - SET NEXT SECTOR.
18077  M01S12830.pfm     +++|*
18078  M01S12831.pfm     +++|*         ENTRY  (T7) = CURRENT SECTOR.
18079  M01S12832.pfm     +++|*                (SNSA) PRESET IF ACCUMULATION DESIRED.
18080  M01S12833.pfm     +++|*
18081  M01S12834.pfm     +++|*         EXIT   (T3) = NEXT SECTOR/TRACK.
18082  M01S12835.pfm     +++|*
18083  M01S12836.pfm     +++|*         USES   T3.
18084  M01S12837.pfm     +++|*
18085  M01S12838.pfm     +++|*         CALLS  SNT.
18086  M01S12839.pfm     +++|
18087  M01S12840.pfm     +++|
18088  M01S12841.pfm     +++| SNS      SUBR               ENTRY/EXIT
18089  M01S12842.pfm     +++|          LDD    T7          SET NEXT SECTOR
18090  M01S12843.pfm     +++|          ADN    1
18091  M01S12844.pfm     +++|          STD    T3
18092  M01S12845.pfm     +++|          LMM    SLM
18093  M01S12846.pfm     +++|          NJN    SNSX        IF NOT SECTOR LIMIT
18094  M01S12847.pfm     +++|
18095  M01S12848.pfm     +++|*         SET NEXT TRACK.
18096  M01S12849.pfm     +++|
18097  M01S12850.pfm     +++| SNSA     LDN    0
18098  M01S12851.pfm     +++|*         LDN    1           (IF PRU ACCUMULATION DESIRED)
18099  M01S12852.pfm     +++|          ZJN    SNS1        IF NO PRU ACCUMULATION
18100  M01S12853.pfm     +++|          LDM    SLM         INCREMENT PRU COUNT FOR NEXT TRACK
Line S12854 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
18101  M02S12854.242l642 ---|          RAM    DPPD+1
18102  M01S01562.242l642 +++|          RAM    AIPR+1
18103  M01S12855.pfm     +++|          SHN    -14
Line S12856 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
18104  M02S12856.242l642 ---|          RAM    DPPD
18105  M01S01563.242l642 +++|          RAM    AIPR
18106  M01S12857.pfm     +++| SNS1     RJM    SNT         SET NEXT TRACK
18107  M01S12858.pfm     +++|          STD    T3
18108  M01S12859.pfm     +++|          UJN    SNSX        RETURN
Line S12860 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
18109  M02S12860.242l642 ---| WES      SPACE  4,15
18110  M01S01564.242l642 +++| WES      SPACE  4,20
18111  M01S12861.pfm     +++|**        WES - WRITE EOI SECTOR.
18112  M01S12862.pfm     +++|*
18113  M01S12863.pfm     +++|*         ENTRY  (T4) = CHANNEL (RESERVED).
18114  M01S12864.pfm     +++|*                (T5) = EST ORDINAL.
18115  M01S12865.pfm     +++|*                (T6) = EOI TRACK.
18116  M01S12866.pfm     +++|*                (T7) = EOI SECTOR.
18117  M01S12867.pfm     +++|*                (CC) = COMMAND CODE.
18118  M01S12868.pfm     +++|*
18119  M01S12869.pfm     +++|*         EXIT   CHANNEL RELEASED.
18120  M01S12870.pfm     +++|*                EOI SET IN TRT IF *GET*, *OLD*, OR *UGET* REQUEST.
18121  M01S01565.242l642 +++|*                TO *WSE* TO PROCESS WRITE ERRORS.
18122  M01S12871.pfm     +++|*
18123  M01S12872.pfm     +++|*         USES   CM - CM+4.
18124  M01S12873.pfm     +++|*
18125  M01S12874.pfm     +++|*         CALLS  WEI.
18126  M01S12875.pfm     +++|*
18127  M01S12876.pfm     +++|*         MACROS ENDMS, ERROR, MONITOR.
18128  M01S12877.pfm     +++|
18129  M01S12878.pfm     +++|
18130  M01S12879.pfm     +++| WES      SUBR               ENTRY/EXIT
18131  M01S12880.pfm     +++|          LDN    0           CLEAR FST ADDRESS
18132  M01S12881.pfm     +++|          STD    FA
18133  M01S12882.pfm     +++|          RJM    WEI         WRITE EOI
Line S12883 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
18134  M02S12883.242l642 ---|          MJN    WES2        IF MASS STORAGE ERRORS
18135  M01S01566.242l642 +++|          MJP    WSE         IF WRITE ERROR
18136  M01S12884.pfm     +++|          ENDMS
18137  M01S12885.pfm     +++|          LDC    *           RESTORE FST ADDRESS
18138  M01S12886.pfm     +++| WESA     EQU    *-1
18139  M01S12887.pfm     +++|          STD    FA
18140  M01S12888.pfm     +++|          LDD    CC          CHECK REQUEST
18141  M01S12889.pfm     +++|          LMN    CCGT
18142  M01S12890.pfm     +++|          ZJN    WES1        IF *GET*
18143  M01S12891.pfm     +++|          LMN    CCOD&CCGT
18144  M01S12892.pfm     +++|          ZJN    WES1        IF *OLD*
18145  M01S12893.pfm     +++|          LMN    CCUG&CCOD
18146  M01S12894.pfm     +++|          NJN    WESX        IF NOT *UGET*
18147  M01S12895.pfm     +++| WES1     LDD    T5          SET EST ORDINAL
18148  M01S12896.pfm     +++|          STD    CM+1
18149  M01S12897.pfm     +++|          LDD    T6          SET TRACK
18150  M01S12898.pfm     +++|          LPC    3777
18151  M01S12899.pfm     +++|          STD    CM+2
18152  M01S12900.pfm     +++|          LDD    T7          SET SECTOR
18153  M01S12901.pfm     +++|          STD    CM+3
18154  M01S12902.pfm     +++|          MONITOR DTKM       SET EOI IN TRT
Line S12903 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
18155  M02S12903.242l642 ---|          UJN    WESX        RETURN
18156  M01S01567.242l642 +++|          UJP    WESX        RETURN
18157  M01S12904.pfm     +++|
Line S12905 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
18158  M02S12905.242l642 ---| WES2     ERROR  MSE,,,T5    *EQXXX,DNYY, MASS STORAGE ERROR.*
18159  M01S12906.pfm     +++|
18160  M01S12907.pfm     +++| WEIA     BSSZ   WCEI*5+2    EOI BUFFER
Line S12908 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
18161  M02S12908.242l642 ---| WNS      SPACE  4,10
18162  M01S01568.242l642 +++| WNS      SPACE  4,15
18163  M01S12909.pfm     +++|**        WNS - WRITE NEXT SECTOR.
18164  M01S12910.pfm     +++|*
18165  M01S12911.pfm     +++|*         WRITE SECTOR WITH NEW LINKAGE.  USES OLD WORD COUNT AND
18166  M01S12912.pfm     +++|*         EOF FLAGS.  SYSTEM SECTORS ARE HANDLED PROPERLY ALSO.
18167  M01S12913.pfm     +++|*         PRU INCREMENTS AND PF INCREMENTS ARE UPDATED.
18168  M01S12914.pfm     +++|*
18169  M01S12915.pfm     +++|*         ENTRY  (BB) = ADDRESS OF SECTOR BUFFER.
18170  M01S01569.242l642 +++|*
18171  M01S01570.242l642 +++|*         EXIT   TO *WSE* TO PROCESS WRITE ERRORS.
18172  M01S12916.pfm     +++|*
18173  M01S12917.pfm     +++|*         USES   T1, T3 - T7.
18174  M01S12918.pfm     +++|*
18175  M01S12919.pfm     +++|*         CALLS  SNT, WDS.
18176  M01S12920.pfm     +++|
18177  M01S12921.pfm     +++|
18178  M01S12922.pfm     +++| WNS      SUBR               ENTRY/EXIT
18179  M01S12923.pfm     +++|          RJM    SNS         SET NEXT SECTOR
18180  M01S12924.pfm     +++|          LDI    BB
18181  M01S12925.pfm     +++|          NJN    WNS1        IF NOT EOF
18182  M01S12926.pfm     +++|
18183  M01S12927.pfm     +++|*         PROCESS EOF.
18184  M01S12928.pfm     +++|
18185  M01S12929.pfm     +++|          LDD    T3          SET NEXT SECTOR ADDRESS
18186  M01S12930.pfm     +++|          STM    1,BB
18187  M01S12931.pfm     +++|          UJN    WNS3        WRITE SECTOR
18188  M01S12932.pfm     +++|
18189  M01S12933.pfm     +++|*         PROCESS SYSTEM SECTOR.
18190  M01S12934.pfm     +++|
18191  M01S12935.pfm     +++| WNS1     LMC    3777
18192  M01S12936.pfm     +++|          NJN    WNS2        IF NOT SYSTEM SECTOR
18193  M01S12937.pfm     +++|          LDD    T3          SET NEXT SECTOR ADDRESS
18194  M01S12938.pfm     +++|          STM    NSSS-BFMS,BB
18195  M01S12939.pfm     +++|          UJN    WNS3        WRITE SECTOR
18196  M01S12940.pfm     +++|
18197  M01S12941.pfm     +++|*         PROCESS DATA SECTOR.
18198  M01S12942.pfm     +++|
18199  M01S12943.pfm     +++| WNS2     LDD    T3          SET NEXT SECTOR ADDRESS
18200  M01S12944.pfm     +++|          STI    BB
18201  M01S12945.pfm     +++|
18202  M01S12946.pfm     +++|*         WRITE SECTOR.
18203  M01S12947.pfm     +++|
18204  M01S12948.pfm     +++| WNS3     LDD    BB
18205  M01S12949.pfm     +++|          STD    T1
18206  M01S12950.pfm     +++|          RJM    IBA         INCREMENT BUFFER ADDRESS
18207  M01S12951.pfm     +++|          SHN    -21
18208  M01S12952.pfm     +++|          ZJN    WNS4        IF END OF BUFFER
18209  M01S12953.pfm     +++|          LDC    WCSF&WLSF   WRITE CONSECUTIVE SECTOR
18210  M01S12954.pfm     +++| WNS4     LMD    T1+WLSF     WRITE LAST SECTOR
18211  M01S12955.pfm     +++|          STD    BB          RESET BUFFER ADDRESS
18212  M01S12956.pfm     +++|          RJM    WDS
Line S12957 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
18213  M02S12957.242l642 ---|          MJN    WNS6        IF WRITE ERROR
18214  M01S01571.242l642 +++|          MJN    WSE         IF WRITE ERROR
18215  M01S12958.pfm     +++|          RJM    DPC         DECREMENT PRU COUNT
18216  M01S12959.pfm     +++|
18217  M01S12960.pfm     +++|*         SET NEXT SECTOR.
18218  M01S12961.pfm     +++|
18219  M01S12962.pfm     +++|          LDD    T3          SET NEXT SECTOR
18220  M01S12963.pfm     +++|          STD    T7
18221  M01S12964.pfm     +++|          SHN    21-13
18222  M01S12965.pfm     +++|          PJN    WNS5        IF NOT TRACK POINTER
18223  M01S12966.pfm     +++|          SHN    -21+13      SET NEXT TRACK
18224  M01S12967.pfm     +++|          STD    T6
18225  M01S12968.pfm     +++|          LDN    0
18226  M01S12969.pfm     +++|          STD    T7
18227  M01S12970.pfm     +++| WNS5     LJM    WNSX        RETURN
Line S12971 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
18228  M02S12971.242l642 ---|
Line S12972 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
18229  M02S12972.242l642 ---|*         PROCESS MASS STORAGE WRITE ERRORS.
Line S12973 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
18230  M02S12973.242l642 ---|
Line S12974 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
18231  M02S12974.242l642 ---| WNS6     ERROR  MSE,,,T5    *EQXXX,DNYY, MASS STORAGE ERROR.*
18232  M01S01572.242l642 +++| WSE      SPACE  4,15
18233  M01S01573.242l642 +++|**        WSE - WRITE MASS STORAGE ERROR PROCESSOR.
18234  M01S01574.242l642 +++|*
18235  M01S01575.242l642 +++|*         ENTRY  (PWRF) = *PFM* RESTART FLAGS FOR RECALL.
18236  M01S01576.242l642 +++|*                (RDCT) = DRIVER STATUS.
18237  M01S01577.242l642 +++|*                (STAT) = *STNS* BIT SET IF JOB SUSPENSION NOT ALLOWED.
18238  M01S01578.242l642 +++|*
18239  M01S01579.242l642 +++|*         EXIT   (PWRF) = *RFRR* FLAG SET IF REQUEST TO BE RETRIED
18240  M01S01580.242l642 +++|*                         DUE TO UNRECOVERABLE WRITE ERROR.
18241  M01S01581.242l642 +++|*                TO *ERR* TO RETRY REQUEST OR ISSUE ERROR MESSAGE.
18242  M01S01582.242l642 +++|*
18243  M01S01583.242l642 +++|*         MACROS ERROR.
18244  M01S01584.242l642 +++|
18245  M01S01585.242l642 +++|
18246  M01S01586.242l642 +++| WSE      BSS    0           ENTRY
18247  M01S01587.242l642 +++|          LDM    STAT        *PFM* STATUS BITS
18248  M01S01588.242l642 +++|          LPK    STNS
18249  M01S01589.242l642 +++|          NJN    WSE3        IF JOB SUSPENSION INHIBITED
18250  M01S01590.242l642 +++|          LDM    RDCT        DRIVER STATUS
18251  M01S01591.242l642 +++|          SHN    21-12
18252  M01S01592.242l642 +++|          PJN    WSE1        IF RECOVERABLE ERROR
18253  M01S01593.242l642 +++|          LDM    PWRF        CHECK RESTART FLAGS
18254  M01S01594.242l642 +++|          LPK    RFRR
18255  M01S01595.242l642 +++|          NJN    WSE2        IF REQUEST ALREADY RETRIED
18256  M01S01596.242l642 +++|          LDK    RFRR        SET RETRY REQUEST FLAG
18257  M01S01597.242l642 +++|          RAM    PWRF
18258  M01S01598.242l642 +++| WSE1     ERROR  RTR,CH      RETRY REQUEST
18259  M01S01599.242l642 +++|
18260  M01S01600.242l642 +++| WSE2     ERROR  MSE,CH,,T5  *EQXXX,DNYY, MASS STORAGE ERROR.*
18261  M01S01601.242l642 +++|
18262  M01S01602.242l642 +++| WSE3     ERROR  MSE,CH,,T5,,EI  *EQXXX,DNYY, MASS STORAGE ERROR.*
18263  M01S12975.pfm     +++|          SPACE  4,10
18264  M01S12976.pfm     +++|*         COMMON DECKS.
18265  M01S12977.pfm     +++|
18266  M01S12978.pfm     +++|
18267  M01S12979.pfm     +++|*CALL     COMPWEI
18268  M01S12980.pfm     +++| BUF      SPACE  4,10
18269  M01S12981.pfm     +++|*         BUF - BUFFER USED IN DEVICE TO DEVICE TRANSFER.
18270  M01S12982.pfm     +++|
18271  M01S12983.pfm     +++|
18272  M01S12984.pfm     +++| BUF      BSS    0
18273  M01S12985.pfm     +++|
18274  M01S12986.pfm     +++| .BUFL    SET    EPFW-BUF
18275  M01S12987.pfm     +++|          ERRNG  .BUFL-5020  NOT ROOM FOR 8 SECTORS IN BUFFER
18276  M01S12988.pfm     +++| CES      SPACE  4,10
18277  M01S12989.pfm     +++|**        CES - CREATE EOI SECTOR.
18278  M01S12990.pfm     +++|*
18279  M01S12991.pfm     +++|*         ENTRY  (CC) = COMMAND CODE.
18280  M01S12992.pfm     +++|*                (FA) = FST ADDRESS.
18281  M01S12993.pfm     +++|*                (FS - FS+4) = FST IMAGE (*GET*/*OLD*/*UGET* REQUEST).
18282  M01S12994.pfm     +++|*                (SDAA - SDAC) = PARAMETERS FOR 1ST WRITE.
18283  M01S12995.pfm     +++|*
18284  M01S12996.pfm     +++|*         EXIT   (WEIA) SET UP WITH EOI DATA.
18285  M01S12997.pfm     +++|*                (WESA) = FST ADDRESS.
18286  M01S12998.pfm     +++|
18287  M01S12999.pfm     +++|
18288  M01S13000.pfm     +++| CES2     LDD    MA          MOVE FST INFORMATION TO EOI BUFFER
18289  M01S13001.pfm     +++|          CWM    SDAA,ON
18290  M01S13002.pfm     +++|          SBN    1
18291  M01S13003.pfm     +++| CES3     CRM    WEIA+FSEI,ON
18292  M01S13004.pfm     +++|          LDD    FA          SAVE FST ADDRESS
18293  M01S13005.pfm     +++|          STM    WESA
18294  M01S13006.pfm     +++|          NFA    FA,R        COPY FILE NAME TO EOI BUFFER
18295  M01S13007.pfm     +++|          ADK    FNTL
18296  M01S13008.pfm     +++|          CRM    WEIA+FNEI,ON
18297  M01S13009.pfm     +++|
18298  M01S13010.pfm     +++| CES      SUBR               ENTRY/EXIT
18299  M01S13011.pfm     +++|          LDD    CC          CHECK REQUEST
18300  M01S13012.pfm     +++|          LMN    CCGT
18301  M01S13013.pfm     +++|          ZJN    CES1        IF *GET* FUNCTION
18302  M01S13014.pfm     +++|          LMN    CCOD&CCGT
18303  M01S13015.pfm     +++|          ZJN    CES1        IF *OLD*
18304  M01S13016.pfm     +++|          LMN    CCUG&CCOD
18305  M01S13017.pfm     +++|          NJN    CES2        IF NOT *UGET*
18306  M01S13018.pfm     +++| CES1     LDD    MA          COPY FST IMAGE TO EOI BUFFER
18307  M01S13019.pfm     +++|          CWD    FS
18308  M01S13020.pfm     +++|          UJN    CES3        READ FST ENTRY
18309  M01S13021.pfm     +++|          SPACE  4,10
18310  M01S13022.pfm     +++|*         EQUIVALENCE EXTERNALLY REFERENCED TAGS.
18311  M01S13023.pfm     +++|
18312  M01S13024.pfm     +++|
18313  M01S13025.pfm     +++|          QUAL   *
18314  M01S13026.pfm     +++|
18315  M01S13027.pfm     +++| BUF      EQU    /".O"/BUF
18316  M01S13028.pfm     +++| DPCA     EQU    /".O"/DPCA
18317  M01S13029.pfm     +++| DPCB     EQU    /".O"/DPCB
18318  M01S13030.pfm     +++| DTD      EQU    /".O"/DTD
18319  M01S13031.pfm     +++| DTDA     EQU    /".O"/DTDA
18320  M01S13032.pfm     +++| IBA      EQU    /".O"/IBA
18321  M01S13033.pfm     +++| PLE      EQU    /".O"/PLE
18322  M01S01603.242l642 +++| PLEA     EQU    /".O"/PLEA
18323  M01S13034.pfm     +++| PTE      EQU    /".O"/PTE
18324  M01S13035.pfm     +++| SDP      EQU    /".O"/SDP
18325  M01S13036.pfm     +++| SDPA     EQU    /".O"/SDPA
18326  M01S13037.pfm     +++| SNSA     EQU    /".O"/SNSA
18327  M01S13038.pfm     +++| WNS      EQU    /".O"/WNS
Line S13039 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
18328  M02S13039.242l642 ---| .MSE3    EQU    /".O"/.MSE3
18329  M01S13040.pfm     +++|          OVERLAY  (APPEND - ORIGINAL FILE TRANSFER.),(BUF+5)
18330  M01S13041.pfm     +++|          SPACE  4,10
Line S13042 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
18331  M02S13042.242l642 ---|**        THIS OVERLAY (TOGETHER WITH OVERLAY *3PN*) PERFORMS THE
Line S01604 Modification History
M01 (Added by) 242l642
M02 (Updated by) ns2414
Seq #  *Modification Id* Act 
----------------------------+
18332  M02S01604.ns2414  ---|**        THIS OVERLAY (TOGETHER WITH OVERLAY *3PO*) PERFORMS THE
18333  M01S00312.ns2414  +++|**        THIS OVERLAY (TOGETHER WITH OVERLAY *3PP*) PERFORMS THE
18334  M01S13043.pfm     +++|*         DEVICE-TO-DEVICE TRANSFER OF THE ORIGINAL PERMANENT FILE,
18335  M01S13044.pfm     +++|*         WHEN REQUIRED, FOR THE INDIRECT ACCESS FILE COMMAND
Line S13045 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
18336  M02S13045.242l642 ---|*         *APPEND*.  ONCE THIS TRANSFER IS COMPLETE, OVERLAY *3PN*
Line S01605 Modification History
M01 (Added by) 242l642
M02 (Updated by) ns2414
Seq #  *Modification Id* Act 
----------------------------+
18337  M02S01605.ns2414  ---|*         *APPEND*.  ONCE THIS TRANSFER IS COMPLETE, OVERLAY *3PO*
18338  M01S00313.ns2414  +++|*         *APPEND*.  ONCE THIS TRANSFER IS COMPLETE, OVERLAY *3PP*
18339  M01S13046.pfm     +++|*         IS CALLED TO COPY THE LOCAL FILE.
18340  M01S13047.pfm     +++|
18341  M01S13048.pfm     +++|
18342  M01S13049.pfm     +++| OVL      BSS    0           ENTRY
18343  M01S13050.pfm     +++|          UJN    ".Q"X       RETURN AFTER LOAD
18344  M01S13051.pfm     +++| ADT      SPACE  4,15
18345  M01S13052.pfm     +++|**        ADT - APPEND DISK TRANSFER.
18346  M01S13053.pfm     +++|*
18347  M01S13054.pfm     +++|*         ENTRY  (FS - FS+4) = FST ENTRY FOR SYSTEM FILE.
18348  M01S13055.pfm     +++|*                (PFFN) = BEGINNING TRACK OF READ FILE.
18349  M01S13056.pfm     +++|*                (PFFN+1) = BEGINNING SECTOR OF READ FILE.
18350  M01S13057.pfm     +++|*
18351  M01S13058.pfm     +++|*         EXIT   TO *DTD*.
18352  M01S13059.pfm     +++|*                TO *PLE* FOR LENGTH ERRORS.
18353  M01S13060.pfm     +++|*
18354  M01S13061.pfm     +++|*         USES   BB, P0, P1, T5, T6, T7, CM - CM+4, LF - LF+1.
18355  M01S13062.pfm     +++|*
Line S13063 Modification History
M01 (Added by) pfm
M02 (Updated by) ns2776
Seq #  *Modification Id* Act 
----------------------------+
18356  M02S13063.ns2776  ---|*         CALLS  CSS, CTI, DTD, IBA, PLE, RNS, RSS, SDP, STI, WNS.
18357  M01S00095.ns2776  +++|*         CALLS  CSS, CTI, DTD, IBA, PDV, PLE, RNS, RSS, SDP, STI, WNS.
18358  M01S13064.pfm     +++|*
18359  M01S13065.pfm     +++|*         MACROS ENDMS, ERROR, MONITOR, SETMS.
18360  M01S13066.pfm     +++|
18361  M01S13067.pfm     +++|
18362  M01S13068.pfm     +++| ADT      BSS    0           ENTRY
18363  M01S01606.242l642 +++|          LDK    PTE         SET ERROR PROCESSOR ADDRESS FOR *RNS*
18364  M01S01607.242l642 +++|          STM    MSRA
18365  M01S13069.pfm     +++| ADT2     LDD    BB          READ NEXT SECTOR
18366  M01S13070.pfm     +++|          RJM    RNS
Line S13071 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
18367  M02S13071.242l642 ---| .MSE4    BSS    0           (*COMPRNS* RETURN ADDRESS)
18368  M01S13072.pfm     +++|          LDI    BB
18369  M01S13073.pfm     +++|          ADM    1,BB
18370  M01S13074.pfm     +++|          ZJN    ADT3        IF EOI
18371  M01S13075.pfm     +++|          RJM    IBA         INCREMENT BUFFER ADDRESSES
18372  M01S13076.pfm     +++|          MJN    ADT2        IF BUFFER NOT FULL
18373  M01S13077.pfm     +++| ADT3     RJM    SDP         SWAP DISK PARAMETERS
18374  M01S13078.pfm     +++| ADT4     LDI    BB
18375  M01S13079.pfm     +++|          ADM    1,BB
18376  M01S13080.pfm     +++|          ZJN    ADT6        IF EOI SECTOR
18377  M01S13081.pfm     +++|          SOD    LF+1        DECREMENT LENGTH
18378  M01S13082.pfm     +++|          PJN    ADT5        IF NO UNDEFLOW
18379  M01S13083.pfm     +++|          AOD    LF+1
18380  M01S13084.pfm     +++|          SOD    LF
18381  M01S13085.pfm     +++|          PJN    ADT5        IF NO LENGTH ERROR
18382  M01S13086.pfm     +++|          LJM    PLE         PROCESS LENGTH ERROR
18383  M01S13087.pfm     +++|
18384  M01S13088.pfm     +++| ADT5     RJM    WNS         WRITE NEXT SECTOR
18385  M01S13089.pfm     +++|          RJM    IBA         INCREMENT BUFFER ADDRESS
18386  M01S13090.pfm     +++|          MJN    ADT4        IF STILL ROOM IN BUFFER
18387  M01S13091.pfm     +++|          RJM    SDP         SWAP DISK PARAMETERS
Line S13092 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
18388  M02S13092.242l642 ---|          SETMS  READ
Line S01608 Modification History
M01 (Added by) 242l642
M02 (Updated by) ns2645
Seq #  *Modification Id* Act 
----------------------------+
18389  M02S01608.ns2645  ---|          SETMS  IO
18390  M01S00023.ns2645  +++|          SETMS  READSTR,NS
18391  M01S01609.242l642 +++|          RJM    PDV         PROCESS DEVICE STATUS
18392  M01S13093.pfm     +++|          LJM    ADT2        LOOP
18393  M01S13094.pfm     +++|
18394  M01S13095.pfm     +++|*         CHECK FOR DELAYED DELINK REQUEST FOR ORIGINAL FILE.
18395  M01S13096.pfm     +++|
18396  M01S13097.pfm     +++| ADT6     LDM    APDK+1
18397  M01S13098.pfm     +++|          ZJP    ADT9        IF NO DELINK REQUESTED
Line S13099 Modification History
M01 (Added by) pfm
M02 (Updated by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
18398  M02S13099.pfm54   ---|          LDD    T6          SAVE CURRENT POSITION
Line S13100 Modification History
M01 (Added by) pfm
M02 (Updated by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
18399  M02S13100.pfm54   ---|          STD    P0
Line S13101 Modification History
M01 (Added by) pfm
M02 (Updated by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
18400  M02S13101.pfm54   ---|          LDD    T7
Line S13102 Modification History
M01 (Added by) pfm
M02 (Updated by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
18401  M02S13102.pfm54   ---|          STD    P1
Line S13103 Modification History
M01 (Added by) pfm
M02 (Updated by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
18402  M02S13103.pfm54   ---|
Line S13104 Modification History
M01 (Added by) pfm
M02 (Updated by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
18403  M02S13104.pfm54   ---|*         DELINK OLD FILE.
Line S13105 Modification History
M01 (Added by) pfm
M02 (Updated by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
18404  M02S13105.pfm54   ---|
18405  M01S13106.pfm     +++|          ENDMS
Line S13107 Modification History
M01 (Added by) pfm
M02 (Updated by) ns2415
Seq #  *Modification Id* Act 
----------------------------+
18406  M02S13107.ns2415  ---|          LDM    DVLW
Line S00203 Modification History
M01 (Added by) ns2415
M02 (Updated by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
18407  M02S00203.pfm54   ---|          LDM    DVLW        INTERLOCK INDIRECT ALLOCATION
Line S13108 Modification History
M01 (Added by) pfm
M02 (Updated by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
18408  M02S13108.pfm54   ---|          STD    T6
Line S13109 Modification History
M01 (Added by) pfm
M02 (Updated by) ns2415
M03 (Updated by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
18409  M03S13109.pfm54   ---|          RJM    STI         INTERLOCK DATA CHAIN
Line S00204 Modification History
M01 (Added by) ns2415
M02 (Updated by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
18410  M02S00204.pfm54   ---|          RJM    STI
Line S13110 Modification History
M01 (Added by) pfm
M02 (Updated by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
18411  M02S13110.pfm54   ---|          ZJN    ADT8        IF TRACK INTERLOCKED
Line S13111 Modification History
M01 (Added by) pfm
M02 (Updated by) ns2415
M03 (Updated by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
18412  M03S13111.pfm54   ---|          ERROR  ABT         * PFM ABORTED.*
Line S00205 Modification History
M01 (Added by) ns2415
M02 (Updated by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
18413  M02S00205.pfm54   ---|          ERROR  ABT,,,T5    *EQXXX,DNYY, PFM ABORTED.*
Line S13112 Modification History
M01 (Added by) pfm
M02 (Updated by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
18414  M02S13112.pfm54   ---|
Line S13113 Modification History
M01 (Added by) pfm
M02 (Updated by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
18415  M02S13113.pfm54   ---| ADT8     LDD    MA          COPY DELINK PARAMETERS
18416  M01S00205.pfm54   +++|          LDD    MA          COPY DELINK PARAMETERS
18417  M01S13114.pfm     +++|          CWM    APDK,ON
18418  M01S13115.pfm     +++|          SBN    1
18419  M01S13116.pfm     +++|          CRD    CM
Line S13117 Modification History
M01 (Added by) pfm
M02 (Updated by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
18420  M02S13117.pfm54   ---|          LDC    4000        SET CHECKPOINT VIA *DLKM*
Line S13118 Modification History
M01 (Added by) pfm
M02 (Updated by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
18421  M02S13118.pfm54   ---|          RAD    CM+1
18422  M01S13119.pfm     +++|          MONITOR DLKM
18423  M01S00206.pfm54   +++|          LDM    STAT
18424  M01S00207.pfm54   +++|          LPC    STBD+STXC
18425  M01S00208.pfm54   +++|          LMC    STBD+STXC
18426  M01S00209.pfm54   +++|          ZJN    ADT9        IF EXTENDING CHAIN ON BUFFERED DEVICE
18427  M01S00210.pfm54   +++|          LDD    EQ          CLEAR INDIRECT ALLOCATION INTERLOCK
18428  M01S00211.pfm54   +++|          STD    CM+1
18429  M01S13120.pfm     +++|          LDM    DVLW
Line S13121 Modification History
M01 (Added by) pfm
M02 (Updated by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
18430  M02S13121.pfm54   ---|          RJM    CTI
Line S13122 Modification History
M01 (Added by) pfm
M02 (Updated by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
18431  M02S13122.pfm54   ---|          LDD    P0          RESET CURRENT POSITION
Line S13123 Modification History
M01 (Added by) pfm
M02 (Updated by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
18432  M02S13123.pfm54   ---|          STD    T6
Line S13124 Modification History
M01 (Added by) pfm
M02 (Updated by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
18433  M02S13124.pfm54   ---|          LDD    P1
Line S13125 Modification History
M01 (Added by) pfm
M02 (Updated by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
18434  M02S13125.pfm54   ---|          STD    T7
18435  M01S00212.pfm54   +++|          STD    CM+2
18436  M01S00213.pfm54   +++|          LDN    CTIS
18437  M01S00214.pfm54   +++|          STD    CM+3
18438  M01S00215.pfm54   +++|          MONITOR  STBM
18439  M01S00216.pfm54   +++|*         LDN    0           CLEAR INDIRECT ALLOCATION INTERLOCK FLAG
18440  M01S00217.pfm54   +++|          STM    IAIF
18441  M01S13126.pfm     +++|
18442  M01S13127.pfm     +++|*         COPY LOCAL FILE TO INDIRECT FILE.
18443  M01S13128.pfm     +++|
18444  M01S13129.pfm     +++| ADT9     SOM    DPCA        ENABLE SRU ACCUMULATION
18445  M01S13130.pfm     +++|          LDN    IPPN        RESET PRU TRANSFER INCREMENT
18446  M01S13131.pfm     +++|          STM    DPCB
18447  M01S13132.pfm     +++|          LDD    FS          SET UP LOCAL FILE PARAMETERS
18448  M01S13133.pfm     +++|          STM    SDAA
18449  M01S13134.pfm     +++|          LDD    FS+1
18450  M01S13135.pfm     +++|          STM    SDAB
18451  M01S13136.pfm     +++|          LDN    FSMS
18452  M01S13137.pfm     +++|          STM    SDAC
18453  M01S13138.pfm     +++|          LDC    BUF         RESET BUFFER ADDRESS
18454  M01S13139.pfm     +++|          STM    SDPA
18455  M01S13140.pfm     +++|          RJM    SDP         SWAP DISK PARAMETERS
Line S13141 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
18456  M02S13141.242l642 ---|          SETMS  READ
Line S01610 Modification History
M01 (Added by) 242l642
M02 (Updated by) ns2645
Seq #  *Modification Id* Act 
----------------------------+
18457  M02S01610.ns2645  ---|          SETMS  IO
18458  M01S00024.ns2645  +++|          SETMS  READSTR,NS
18459  M01S01611.242l642 +++|          RJM    PDV         PROCESS DEVICE STATUS
18460  M01S13142.pfm     +++|          LJM    DTD         ENTER DEVICE TO DEVICE TRANSFER
Line S13143 Modification History
M01 (Added by) pfm
M02 (Updated by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
18461  M02S13143.pfm54   ---|          TITLE  SUBROUTINES.
Line S13144 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
M03 (Updated by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
18462  M03S13144.pfm54   ---| PAE      SPACE  4,10
Line S13145 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
M03 (Updated by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
18463  M03S13145.pfm54   ---|**        PAE - PROCESS APPEND ERROR.
Line S13146 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
M03 (Updated by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
18464  M03S13146.pfm54   ---|*
Line S13147 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
M03 (Updated by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
18465  M03S13147.pfm54   ---|*         ENTRY  FROM MSR.
Line S13148 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
M03 (Updated by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
18466  M03S13148.pfm54   ---|*
Line S13149 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
M03 (Updated by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
18467  M03S13149.pfm54   ---|*         EXIT   TO *.MSE4* WITH EOI LINKAGE SET IF NOT VALID SECTOR.
Line S13150 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
M03 (Updated by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
18468  M03S13150.pfm54   ---|*                TO *MSRX* WITH TRANSFER ERROR INDICATED IF VALID DATA.
Line S13151 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
M03 (Updated by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
18469  M03S13151.pfm54   ---|
Line S13152 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
M03 (Updated by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
18470  M03S13152.pfm54   ---|
Line S13153 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
M03 (Updated by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
18471  M03S13153.pfm54   ---| PAE      BSS    0           ENTRY
Line S13154 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
M03 (Updated by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
18472  M03S13154.pfm54   ---|          LDM    RDCT        CHECK TYPE OF ERROR
Line S13155 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
M03 (Updated by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
18473  M03S13155.pfm54   ---|          SHN    21-13
Line S13156 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
M03 (Updated by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
18474  M03S13156.pfm54   ---|          PJN    PAE1        IF VALID SECTOR READ
Line S13157 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
M03 (Updated by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
18475  M03S13157.pfm54   ---|          LDN    0           SET EOI LINKAGE
Line S13158 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
M03 (Updated by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
18476  M03S13158.pfm54   ---|          STM    1,BB
Line S13159 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
M03 (Updated by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
18477  M03S13159.pfm54   ---|          STI    BB
Line S13160 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
M03 (Updated by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
18478  M03S13160.pfm54   ---|          LJM    .MSE4       REENTER TRANSFER LOOP
Line S13161 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
M03 (Updated by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
18479  M03S13161.pfm54   ---|
Line S13162 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
M03 (Updated by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
18480  M03S13162.pfm54   ---| PAE1     AOM    DTDA        SET ERROR ON TRANSFER
Line S13163 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
M03 (Updated by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
18481  M03S13163.pfm54   ---|          LJM    MSRX        REENTER TRANSFER LOOP
Line S13164 Modification History
M01 (Added by) pfm
M02 (Updated by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
18482  M02S13164.pfm54   ---|          SPACE  4,10
Line S13165 Modification History
M01 (Added by) pfm
M02 (Updated by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
18483  M02S13165.pfm54   ---|*         COMMON DECKS.
Line S13166 Modification History
M01 (Added by) pfm
M02 (Updated by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
18484  M02S13166.pfm54   ---|
Line S13167 Modification History
M01 (Added by) pfm
M02 (Updated by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
18485  M02S13167.pfm54   ---|
Line S13168 Modification History
M01 (Added by) pfm
M02 (Updated by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
18486  M02S13168.pfm54   ---|*CALL     COMPCTI
Line S13169 Modification History
M01 (Added by) pfm
M02 (Updated by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
18487  M02S13169.pfm54   ---|*CALL     COMPSTI
18488  M01S13170.pfm     +++| BUFA     SPACE  4,10
18489  M01S13171.pfm     +++|*         BUFA - BUFFER FOR DEVICE TO DEVICE TRANSFER OF
18490  M01S13172.pfm     +++|*                EXISTING INDIRECT FILE.
18491  M01S13173.pfm     +++|
18492  M01S13174.pfm     +++|
18493  M01S13175.pfm     +++| BUFA     BSS    0
18494  M01S13176.pfm     +++|
18495  M01S13177.pfm     +++| .BUFAL   SET    EPFW-BUFA
18496  M01S13178.pfm     +++|          ERRNG  .BUFAL-4316 NOT ROOM FOR 7 SECTORS IN BUFFER
18497  M01S13179.pfm     +++|          SPACE  4,10
18498  M01S13180.pfm     +++|*         EQUIVALENCE EXTERNALLY REFERENCED TAGS.
18499  M01S13181.pfm     +++|
18500  M01S13182.pfm     +++|
18501  M01S13183.pfm     +++|          QUAL   *
18502  M01S13184.pfm     +++|
18503  M01S13185.pfm     +++| ADT      EQU    /".O"/ADT
18504  M01S13186.pfm     +++| BUFA     EQU    /".O"/BUFA
Line S13187 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
18505  M02S13187.242l642 ---| PAE      EQU    /".O"/PAE
Line S13188 Modification History
M01 (Added by) pfm
M02 (Updated by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
18506  M02S13188.242l642 ---| .MSE4    EQU    /".O"/.MSE4
18507  M01S13189.pfm     +++|          OVERLAY  (STAGE FILE FROM ALTERNATE STORAGE.)
Line S13190 Modification History
M01 (Added by) pfm
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
18508  M02S13190.253l688 ---| MAT      SPACE  4,15
Line S13191 Modification History
M01 (Added by) pfm
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
18509  M02S13191.253l688 ---|**        THIS OVERLAY INITIATES A STAGE OPERATION FOR
Line S13192 Modification History
M01 (Added by) pfm
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
18510  M02S13192.253l688 ---|*         A FILE WHICH IS NOT CURRENTLY RESIDENT ON DISK, BUT
Line S13193 Modification History
M01 (Added by) pfm
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
18511  M02S13193.253l688 ---|*         WHICH HAS A VALID COPY ON ALTERNATE STORAGE.
Line S13194 Modification History
M01 (Added by) pfm
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
18512  M02S13194.253l688 ---|*         THIS IS ACCOMPLISHED BY ISSUEING A *TDAM* REQUEST TO THE
Line S13195 Modification History
M01 (Added by) pfm
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
18513  M02S13195.253l688 ---|*         APPROPRIATE EXECUTIVE TO INITIATE STAGING OF THE FILE.
Line S13196 Modification History
M01 (Added by) pfm
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
18514  M02S13196.253l688 ---|*         THE JOB IS THEN PLACED IN TIMED-EVENT ROLLOUT TO AWAIT
Line S13197 Modification History
M01 (Added by) pfm
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
18515  M02S13197.253l688 ---|*         COMPLETION OF THE STAGE.  THE ORIGINAL *PFM* REQUEST WILL
Line S13198 Modification History
M01 (Added by) pfm
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
18516  M02S13198.253l688 ---|*         BE REISSUED AUTOMATICALLY WHEN THE JOB ROLLS IN.
18517  M01S00700.253l688 +++| SPF      SPACE  4,15
18518  M01S00701.253l688 +++|**        THIS OVERLAY INITIATES A STAGE OPERATION FOR A FILE WHICH
18519  M01S00702.253l688 +++|*         IS NOT CURRENTLY RESIDENT ON DISK, BUT WHICH HAS A VALID
18520  M01S00703.253l688 +++|*         COPY ON ALTERNATE STORAGE.  THIS IS ACCOMPLISHED BY
18521  M01S00704.253l688 +++|*         ISSUING A *TDAM* REQUEST TO THE APPROPRIATE EXECUTIVE TO
18522  M01S00705.253l688 +++|*         INITIATE STAGING OF THE FILE.  THE JOB IS THEN PLACED IN
18523  M01S00706.253l688 +++|*         TIMED-EVENT ROLLOUT TO AWAIT COMPLETION OF THE STAGE.  THE
18524  M01S00707.253l688 +++|*         ORIGINAL *PFM* REQUEST WILL BE REISSUED AUTOMATICALLY WHEN
18525  M01S00708.253l688 +++|*         THE JOB ROLLS IN.
18526  M01S13199.pfm     +++|
18527  M01S13200.pfm     +++|
Line S13201 Modification History
M01 (Added by) pfm
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
18528  M02S13201.253l688 ---| MAT      BSS    0           ENTRY
Line S00709 Modification History
M01 (Added by) 253l688
M02 (Updated by) pfm73
Seq #  *Modification Id* Act 
----------------------------+
18529  M02S00709.pfm73   ---| SPF      BSS    0           ENTRY FOR *STAGEPF* REQUEST
18530  M01S00001.pfm73   +++| SPF      BSS    0           ENTRY
18531  M01S00001.pfm34   +++|          RJM    RMD         RESET TO MASTER DEVICE
18532  M01S00002.pfm73   +++|          RJM    CCC         CHECK FOR CARTRIDGE COPY
18533  M01S00003.pfm73   +++|          STD    P2          SAVE CARTRIDGE COPY STATUS
18534  M01S00004.pfm73   +++|          RJM    CTC         CHECK FOR TAPE COPY
18535  M01S00005.pfm73   +++|          STD    P3          SAVE TAPE COPY STATUS
18536  M01S00006.pfm73   +++|          RJM    UPF         UPDATE PFC
18537  M01S00007.pfm73   +++|
18538  M01S00008.pfm73   +++|*         CHECK ERROR STATUS.
18539  M01S00009.pfm73   +++|
Line S13202 Modification History
M01 (Added by) pfm
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
18540  M02S13202.253l688 ---|          LDM    FCAF,CI     CHECK FOR ALTERNATE STORAGE ERRORS
Line S13203 Modification History
M01 (Added by) pfm
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
18541  M02S13203.253l688 ---|          STD    T1
Line S13204 Modification History
M01 (Added by) pfm
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
18542  M02S13204.253l688 ---|          LPN    AFPSEM+AFPDEM
Line S13205 Modification History
M01 (Added by) pfm
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
18543  M02S13205.253l688 ---|          ZJN    MAT1        IF NO PERMANENT ERRORS
Line S13206 Modification History
M01 (Added by) pfm
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
18544  M02S13206.253l688 ---|          ERROR  PPE,CH      *(FILE NAME) PERMANENT ERROR.*
18545  M01S00710.253l688 +++|          LDN    0           INDICATE CARTRIDGE STAGING ATTEMPT
18546  M01S00711.253l688 +++|          STD    P1
Line S00712 Modification History
M01 (Added by) 253l688
M02 (Updated by) pfm73
Seq #  *Modification Id* Act 
----------------------------+
18547  M02S00712.pfm73   ---|          RJM    CCC         CHECK FOR CARTRIDGE COPY
Line S00713 Modification History
M01 (Added by) 253l688
M02 (Updated by) pfm73
Seq #  *Modification Id* Act 
----------------------------+
18548  M02S00713.pfm73   ---|          STD    P2          SAVE CARTRIDGE COPY STATUS
Line S00714 Modification History
M01 (Added by) 253l688
M02 (Updated by) pfm73
Seq #  *Modification Id* Act 
----------------------------+
18549  M02S00714.pfm73   ---|          ZJP    SPF5        IF CARTRIDGE COPY AVAILABLE
Line S00715 Modification History
M01 (Added by) 253l688
M02 (Updated by) pfm73
Seq #  *Modification Id* Act 
----------------------------+
18550  M02S00715.pfm73   ---|          LDN    1           INDICATE TAPE STAGING ATTEMPT
Line S00716 Modification History
M01 (Added by) 253l688
M02 (Updated by) pfm73
Seq #  *Modification Id* Act 
----------------------------+
18551  M02S00716.pfm73   ---|          STD    P1
Line S00717 Modification History
M01 (Added by) 253l688
M02 (Updated by) pfm73
Seq #  *Modification Id* Act 
----------------------------+
18552  M02S00717.pfm73   ---|          RJM    CTC         CHECK FOR TAPE COPY
Line S00718 Modification History
M01 (Added by) 253l688
M02 (Updated by) pfm73
Seq #  *Modification Id* Act 
----------------------------+
18553  M02S00718.pfm73   ---|          STD    P3          SAVE TAPE COPY STATUS
Line S00719 Modification History
M01 (Added by) 253l688
M02 (Updated by) pfm73
Seq #  *Modification Id* Act 
----------------------------+
18554  M02S00719.pfm73   ---|          ZJN    SPF5        IF TAPE COPY AVAILABLE
18555  M01S00010.pfm73   +++|          LDD    P2
18556  M01S00011.pfm73   +++|          ZJN    SPF5        IF NO ERROR ON CARTRIDGE COPY
18557  M01S00012.pfm73   +++|          AOD    P1          INDICATE TAPE STAGING ATTEMPT
18558  M01S00013.pfm73   +++|          LDD    P3
18559  M01S00014.pfm73   +++|          ZJN    SPF5        IF NO ERROR ON TAPE COPY
18560  M01S13207.pfm     +++|
Line S13208 Modification History
M01 (Added by) pfm
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
18561  M02S13208.253l688 ---| MAT1     LDD    T1
Line S00720 Modification History
M01 (Added by) 253l688
M02 (Updated by) pfm73
Seq #  *Modification Id* Act 
----------------------------+
18562  M02S00720.pfm73   ---|*         STAGE NOT POSSIBLE - PROCESS ERROR STATUS.
18563  M01S00015.pfm73   +++|*         FILE CANNOT BE STAGED - DETERMINE CORRECT ERROR MESSAGE.
18564  M01S00721.253l688 +++|
18565  M01S00722.253l688 +++|          LDD    P2          CHECK CARTRIDGE COPY ERROR STATUS
18566  M01S00016.pfm73   +++|          SBN    1
18567  M01S00017.pfm73   +++|          NJN    SPF1        IF CARTRIDGE COPY EXISTS
18568  M01S00018.pfm73   +++|          LDD    P3          CHECK TAPE COPY ERROR STATUS
18569  M01S00019.pfm73   +++|          SBN    1
18570  M01S00020.pfm73   +++|          NJN    SPF1        IF TAPE COPY EXISTS
18571  M01S00021.pfm73   +++|          ERROR  AIO,CH,IW   * NO ALTERNATE STORAGE COPY EXISTS.*
18572  M01S00022.pfm73   +++|
18573  M01S00023.pfm73   +++| SPF1     LDD    P2          CHECK CARTRIDGE COPY ERROR STATUS
18574  M01S00024.pfm73   +++|          SBN    2
18575  M01S00025.pfm73   +++|          ZJN    SPF2        IF STAGING DISABLED ERROR
18576  M01S00026.pfm73   +++|          LDD    P3          CHECK TAPE COPY ERROR STATUS
18577  M01S00027.pfm73   +++|          SBN    2
18578  M01S00028.pfm73   +++|          NJN    SPF3        IF NOT STAGING DISABLED ERROR
18579  M01S00029.pfm73   +++| SPF2     ERROR  SGD,CH,IW   * STAGING DISABLED.*
18580  M01S00030.pfm73   +++|
18581  M01S00031.pfm73   +++| SPF3     LDD    P2          CHECK CARTRIDGE COPY ERROR STATUS
18582  M01S00723.253l688 +++|          SBN    3
Line S00724 Modification History
M01 (Added by) 253l688
M02 (Updated by) pfm73
Seq #  *Modification Id* Act 
----------------------------+
18583  M02S00724.pfm73   ---|          MJN    SPF2        IF NO COPY EXISTS OR STAGING DISABLED
Line S00725 Modification History
M01 (Added by) 253l688
M02 (Updated by) pfm73
Seq #  *Modification Id* Act 
----------------------------+
18584  M02S00725.pfm73   ---|          SBN    1
Line S00726 Modification History
M01 (Added by) 253l688
M02 (Updated by) pfm73
Seq #  *Modification Id* Act 
----------------------------+
18585  M02S00726.pfm73   ---|          PJN    SPF1        IF PERMANENT ERROR
18586  M01S00032.pfm73   +++|          NJN    SPF4        IF NOT TEMPORARY ERROR
18587  M01S00727.253l688 +++|          ERROR  TPE,CH,IW   *(NAME) TEMPORARY ERROR, TRY LATER.*
18588  M01S00728.253l688 +++|
Line S00729 Modification History
M01 (Added by) 253l688
M02 (Updated by) pfm73
Seq #  *Modification Id* Act 
----------------------------+
18589  M02S00729.pfm73   ---| SPF1     ERROR  PPE,CH,IW   *(FILE NAME) PERMANENT ERROR.*
Line S00730 Modification History
M01 (Added by) 253l688
M02 (Updated by) pfm73
Seq #  *Modification Id* Act 
----------------------------+
18590  M02S00730.pfm73   ---|
Line S00731 Modification History
M01 (Added by) 253l688
M02 (Updated by) pfm73
Seq #  *Modification Id* Act 
----------------------------+
18591  M02S00731.pfm73   ---| SPF2     LDD    P3          CHECK TAPE COPY ERROR STATUS
Line S00732 Modification History
M01 (Added by) 253l688
M02 (Updated by) pfm73
Seq #  *Modification Id* Act 
----------------------------+
18592  M02S00732.pfm73   ---|          SBN    1
Line S00733 Modification History
M01 (Added by) 253l688
M02 (Updated by) pfm73
Seq #  *Modification Id* Act 
----------------------------+
18593  M02S00733.pfm73   ---|          ZJN    SPF4        IF NO TAPE COPY EXISTS
Line S00734 Modification History
M01 (Added by) 253l688
M02 (Updated by) pfm73
Seq #  *Modification Id* Act 
----------------------------+
18594  M02S00734.pfm73   ---|          SBN    1
Line S00735 Modification History
M01 (Added by) 253l688
M02 (Updated by) pfm73
Seq #  *Modification Id* Act 
----------------------------+
18595  M02S00735.pfm73   ---|          NJN    SPF1        IF VSN NOT AVAILABLE OR DATA ERROR
Line S00736 Modification History
M01 (Added by) 253l688
M02 (Updated by) pfm73
Seq #  *Modification Id* Act 
----------------------------+
18596  M02S00736.pfm73   ---| SPF3     ERROR  SGD,CH,IW   * STAGING DISABLED.*
Line S00737 Modification History
M01 (Added by) 253l688
M02 (Updated by) pfm73
Seq #  *Modification Id* Act 
----------------------------+
18597  M02S00737.pfm73   ---|
Line S00738 Modification History
M01 (Added by) 253l688
M02 (Updated by) pfm73
Seq #  *Modification Id* Act 
----------------------------+
18598  M02S00738.pfm73   ---|*         NO TAPE COPY EXISTS.
Line S00739 Modification History
M01 (Added by) 253l688
M02 (Updated by) pfm73
Seq #  *Modification Id* Act 
----------------------------+
18599  M02S00739.pfm73   ---|
Line S00740 Modification History
M01 (Added by) 253l688
M02 (Updated by) pfm73
Seq #  *Modification Id* Act 
----------------------------+
18600  M02S00740.pfm73   ---| SPF4     LDD    P2          CHECK CARTRIDGE COPY ERROR STATUS AGAIN
Line S00741 Modification History
M01 (Added by) 253l688
M02 (Updated by) pfm73
Seq #  *Modification Id* Act 
----------------------------+
18601  M02S00741.pfm73   ---|          SBN    1
Line S00742 Modification History
M01 (Added by) 253l688
M02 (Updated by) pfm73
Seq #  *Modification Id* Act 
----------------------------+
18602  M02S00742.pfm73   ---|          NJN    SPF3        IF CARTRIDGE COPY EXISTS
Line S00743 Modification History
M01 (Added by) 253l688
M02 (Updated by) pfm73
Seq #  *Modification Id* Act 
----------------------------+
18603  M02S00743.pfm73   ---|          ERROR  AIO,CH,IW   * NO ALTERNATE STORAGE COPY EXISTS.*
18604  M01S00033.pfm73   +++| SPF4     ERROR  PPE,CH,IW   *(FILE NAME) PERMANENT ERROR.*
18605  M01S00744.253l688 +++|
18606  M01S00745.253l688 +++|*         LOOP *MXRL* TIMES ISSUING *TDAM* REQUESTS TO THE EXECUTIVE.
18607  M01S00746.253l688 +++|
18608  M01S00747.253l688 +++| SPF5     RJM    STR         SETUP *TDAM* REQUEST
18609  M01S00748.253l688 +++|          LDC    ART         SET ROLLOUT TIME LIMIT
18610  M01S00749.253l688 +++|          STM    ERRD
18611  M01S00750.253l688 +++|          LDN    0           INITIALIZE FOR LOOP
18612  M01S00751.253l688 +++|          STD    P0
18613  M01S00752.253l688 +++|
18614  M01S00753.253l688 +++|*         CHECK IF STAGING STILL ENABLED.
18615  M01S00754.253l688 +++|
18616  M01S00755.253l688 +++| SPF6     LDN    SSTL        CHECK FOR STAGING DISABLED
18617  M01S00756.253l688 +++|          CRD    CM
18618  M01S00757.253l688 +++|          LDD    P1
18619  M01S00758.253l688 +++|          NJN    SPF8        IF TAPE STAGING REQUEST
18620  M01S00759.253l688 +++|          LDD    CM
18621  M01S00760.253l688 +++|          SHN    21-6
18622  M01S00761.253l688 +++|          PJN    SPF9        IF CARTRIDGE STAGING ENABLED
18623  M01S00762.253l688 +++| SPF7     ERROR  SGD,CH,IW   *STAGING DISABLED.*
18624  M01S00763.253l688 +++|
Line S00764 Modification History
M01 (Added by) 253l688
M02 (Updated by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
18625  M02S00764.274l797 ---| SPF8     LDD    CM+1
18626  M01S00072.274l797 +++| SPF7.1   LDD    CM+1        CHECK FOR *ACS TAPE PF STAGING* ENABLED
18627  M01S00073.274l797 +++|          SHN    21-11
18628  M01S00074.274l797 +++|          UJN    SPF8.1      CHECK IF ENABLED
18629  M01S00075.274l797 +++|
18630  M01S00076.274l797 +++| SPF8     LDM    FCTF,CI
18631  M01S00077.274l797 +++|          SHN    21-TFACS
18632  M01S00078.274l797 +++|          MJN    SPF7.1      IF FILE ON ACS CARTRIDGE TAPE
18633  M01S00079.274l797 +++|          LDD    CM+1        CHECK FOR *TAPE PF STAGING* ENABLED
18634  M01S00765.253l688 +++|          SHN    21-7
Line S00766 Modification History
M01 (Added by) 253l688
M02 (Updated by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
18635  M02S00766.274l797 ---|          MJN    SPF7        IF TAPE PF STAGING DISABLED
18636  M01S00080.274l797 +++| SPF8.1   MJN    SPF7        IF STAGING DISABLED
18637  M01S00767.253l688 +++|
18638  M01S00768.253l688 +++|*         ISSUE *TDAM* REQUEST.
18639  M01S00769.253l688 +++|
18640  M01S00770.253l688 +++| SPF9     LDN    1           SET WRITE FUNCTION
18641  M01S00771.253l688 +++|          STD    CM+1
18642  M01S00772.253l688 +++| SPFA     LDC    MTSI        SET *MAGNET* SUBSYSTEM ID
18643  M01S00773.253l688 +++|*         LDC    MFSI        (SET *MSS* SUBSYSTEM ID)
18644  M01S00774.253l688 +++|*         LDC    AFSI        (SET *MSE* SUBSYSTEM ID)
18645  M01S00775.253l688 +++|          STD    CM+2
18646  M01S00776.253l688 +++|          LDC    6*100       SET MESSAGE LENGTH
18647  M01S00777.253l688 +++|          STD    CM+3
Line S00778 Modification History
M01 (Added by) 253l688
M02 (Updated by) ns2773
Seq #  *Modification Id* Act 
----------------------------+
18648  M02S00778.ns2773  ---| SPFB     LDC    PFTB        SET ADDRESS OF *MAGNET* *TDAM* BUFFER
Proceed to Part 16
cdc/nos2.source/opl.opl871/deck/pfm.015.txt ยท Last modified: by 127.0.0.1