User Tools

Site Tools


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

Deck PFM Part 006

95 Modifications

Listing Sections

Source

Seq #  *Modification Id* Act 
----------------------------+
08827  M00S06503.pfm     +++|*                (HB) = ADDRESS OF HOLE BUFFER, IF ANY.
08828  M00S06504.pfm     +++|*                (HP) = POINTER TO HOLE ENTRY, IF ANY.
08829  M00S06505.pfm     +++|*
08830  M00S06506.pfm     +++|*         EXIT   (EBSC) = END BUFFER SECTOR, IF BUFFER IS IN *BFMS*.
08831  M00S06507.pfm     +++|*                (EBTK) = END BUFFER TRACK, IF BUFFER IS IN *BFMS*.
08832  M00S06508.pfm     +++|*                BUFFERS SWAPPED.
08833  M00S06509.pfm     +++|*                BUFFER ADDRESSES AND POINTERS RESET.
08834  M00S06510.pfm     +++|*
08835  M00S06511.pfm     +++|*         USES   EB, EP, HB, HP, T1, T2, T3.
08836  M00S06512.pfm     +++|
08837  M00S06513.pfm     +++|
08838  M00S06514.pfm     +++| SDB5     LDD    EB
08839  M00S06515.pfm     +++|          LMC    BFMS
08840  M00S06516.pfm     +++|          NJN    SDBX        IF END BUFFER IS NOT IN *BFMS*
08841  M00S06517.pfm     +++|          LDM    BFMS-2      INDICATE THAT END BUFFER IS IN *BFMS*
08842  M00S06518.pfm     +++|          STM    EBTK
08843  M00S06519.pfm     +++|          LDM    BFMS-1
08844  M00S06520.pfm     +++|          STM    EBSC
08845  M00S06521.pfm     +++|
08846  M00S06522.pfm     +++| SDB      SUBR               ENTRY/EXIT
08847  M00S06523.pfm     +++|          LDD    HP
08848  M00S06524.pfm     +++|          ZJN    SDBX        IF NO HOLE FOUND
08849  M00S06525.pfm     +++|          LDD    HB
08850  M00S06526.pfm     +++|          LMC    BFMS
08851  M00S06527.pfm     +++|          NJN    SDB5        IF HOLE NOT IN *BFMS*
08852  M00S06528.pfm     +++|
08853  M00S06529.pfm     +++|*         DETERMINE WHICH BUFFER TO SWAP.
08854  M00S06530.pfm     +++|
08855  M00S06531.pfm     +++|          LDD    CB
08856  M00S06532.pfm     +++|          LMC    BUF1
08857  M00S06533.pfm     +++|          ZJN    SDB1        IF CATALOG IS IN *BUF1*
08858  M00S06534.pfm     +++|          LDC    BUF1-BUF2   SWAP *BFMS* WITH *BUF1*
08859  M00S06535.pfm     +++| SDB1     ADC    BUF2        SWAP *BFMS* WITH *BUF2*
08860  M00S06536.pfm     +++|          STD    T1          SET BUFFER ADDRESSES
08861  M00S06537.pfm     +++|          SBN    2
08862  M00S06538.pfm     +++|          STM    SDBA
08863  M00S06539.pfm     +++|          STM    SDBB
08864  M00S06540.pfm     +++|          LDC    503B        MOVE BUFFER PLUS DISK ADDRESS
08865  M00S06541.pfm     +++|          STD    T2
08866  M00S06542.pfm     +++|
08867  M00S06543.pfm     +++|*         SWAP BUFFERS.
08868  M00S06544.pfm     +++|
08869  M00S06545.pfm     +++| SDB2     LDM    BFMS-2,T2   SWAP ONE PAIR OF BYTES
08870  M00S06546.pfm     +++|          STD    T3
08871  M00S06547.pfm     +++|          LDM    *-2,T2
08872  M00S06548.pfm     +++| SDBA     EQU    *-1         (ADDRESS OF BUFFER - 2)
08873  M00S06549.pfm     +++|          STM    BFMS-2,T2
08874  M00S06550.pfm     +++|          LDD    T3
08875  M00S06551.pfm     +++|          STM    *-2,T2
08876  M00S06552.pfm     +++| SDBB     EQU    *-1         (ADDRESS OF BUFFER - 2)
08877  M00S06553.pfm     +++|          SOD    T2
08878  M00S06554.pfm     +++|          PJN    SDB2        IF MORE BYTES TO SWAP
08879  M00S06555.pfm     +++|
08880  M00S06556.pfm     +++|*         RESET POINTERS TO BUFFERS WHICH HAVE BEEN MOVED.
08881  M00S06557.pfm     +++|
Line S06558 Modification History
M01 (Removed by) pfm40
Seq #  *Modification Id* Act 
----------------------------+
08882  M01S06558.pfm40   ---|          LDD    HP          RESET HOLE POINTERS
Line S00026 Modification History
M01 (Added by) pfm40
Seq #  *Modification Id* Act 
----------------------------+
08883  M01S00026.pfm40   +++|          LDD    T1          RESET HOLE POINTERS
08884  M00S06559.pfm     +++|          SBD    HB
Line S06560 Modification History
M01 (Removed by) pfm40
Seq #  *Modification Id* Act 
----------------------------+
08885  M01S06560.pfm40   ---|          ADD    T1
08886  M01S06561.pfm40   ---|          STD    HP
Line S00027 Modification History
M01 (Added by) pfm40
Seq #  *Modification Id* Act 
----------------------------+
08887  M01S00027.pfm40   +++|          RAD    HP
08888  M00S06562.pfm     +++|          LDD    T1
08889  M00S06563.pfm     +++|          STD    HB
08890  M00S06564.pfm     +++|          LDD    EB
08891  M00S06565.pfm     +++|          LMD    T1
08892  M00S06566.pfm     +++|          NJN    SDB3        IF END OF CATALOGS IS IN HOLE BUFFER
08893  M00S06567.pfm     +++|          LDC    BFMS        RESET END POINTERS TO POINT TO *BFMS*
08894  M00S06568.pfm     +++|          STD    T1
08895  M00S06569.pfm     +++| SDB3     LDD    EP          RESET END POINTERS
08896  M00S06570.pfm     +++|          ZJN    SDB4        IF END SECTOR IS EOI
08897  M00S06571.pfm     +++|          SBD    EB
08898  M00S06572.pfm     +++|          ADD    T1
08899  M00S06573.pfm     +++|          STD    EP
08900  M00S06574.pfm     +++| SDB4     LDD    T1
08901  M00S06575.pfm     +++|          STD    EB
08902  M00S06576.pfm     +++|          UJP    SDB5        RETURN
08903  M00S06577.pfm     +++| SSP      SPACE  4,10
08904  M00S06578.pfm     +++|**        SSP - SET STATISTICAL PARAMETERS.
08905  M00S06579.pfm     +++|*
08906  M00S06580.pfm     +++|*         ENTRY  (NF - NF+1) = NUMBER OF FILES.
08907  M00S06581.pfm     +++|*                (CS - CS+1) = CUMULATIVE SIZE OF INDIRECT FILES.
08908  M00S06582.pfm     +++|*
08909  M00S06583.pfm     +++|*         EXIT   (ACNF - ACNF+1) SET WITH NUMBER OF FILE.
08910  M00S06584.pfm     +++|*                (CIFS - CIFS+1) SET WITH CUMULATIVE SIZE OF FILES.
08911  M00S06585.pfm     +++|
08912  M00S06586.pfm     +++|
08913  M00S06587.pfm     +++| SSP      SUBR               ENTRY/EXIT
08914  M00S06588.pfm     +++|          LDD    CS
08915  M00S06589.pfm     +++|          STM    CIFS
08916  M00S06590.pfm     +++|          LDD    CS+1
08917  M00S06591.pfm     +++|          STM    CIFS+1
08918  M00S06592.pfm     +++|          LDD    NF
08919  M00S06593.pfm     +++|          STM    ACNF
08920  M00S06594.pfm     +++|          LDD    NF+1
08921  M00S06595.pfm     +++|          STM    ACNF+1
08922  M00S06596.pfm     +++|          UJN    SSPX        EXIT
Line S00005 Modification History
M01 (Added by) pfm62
Seq #  *Modification Id* Act 
----------------------------+
08923  M01S00005.pfm62   +++| VFI      SPACE  4,10
08924  M01S00006.pfm62   +++|**        VFI - VERIFY THAT FILE IS INDIRECT ACCESS.
08925  M01S00007.pfm62   +++|*
08926  M01S00008.pfm62   +++|*         EXIT   TO *ERR* IF FILE IS DIRECT ACCESS.
08927  M01S00009.pfm62   +++|*
08928  M01S00010.pfm62   +++|*         MACROS ERROR.
08929  M01S00011.pfm62   +++|
08930  M01S00012.pfm62   +++|
08931  M01S00013.pfm62   +++| VFI      SUBR               ENTRY/EXIT
08932  M01S00014.pfm62   +++|          LDM    FCBS,CI     CHECK FILE TYPE
08933  M01S00015.pfm62   +++|          SHN    21-13
08934  M01S00016.pfm62   +++|          PJN    VFIX        IF INDIRECT ACCESS FILE
08935  M01S00017.pfm62   +++|          ERROR  FDA         *(FILE NAME) IS DIRECT ACCESS.*
08936  M00S06597.pfm     +++|          SPACE  4,10
08937  M00S06598.pfm     +++|*         CHECK FOR OVERFLOW.
08938  M00S06599.pfm     +++|
08939  M00S06600.pfm     +++|
08940  M00S06601.pfm     +++|          USE    OVERFLOW
08941  M00S06602.pfm     +++|          ERRNG  BUF2-2-*    OVERFLOW INTO CATALOG/PERMIT BUFFER
Line S00008 Modification History
M01 (Added by) pfm63
Seq #  *Modification Id* Act 
----------------------------+
08942  M01S00008.pfm63   +++|          TITLE  OVERLAYABLE INITIALIZATION ROUTINES.
08943  M01S00009.pfm63   +++| IRP      SPACE  4,25
08944  M01S00010.pfm63   +++|***       INITIAL REQUEST PROCESSING.
08945  M01S00011.pfm63   +++|*
08946  M01S00012.pfm63   +++|*         CALL REQUEST PREPROCESSOR TO PERFORM CATALOG AND
08947  M01S00013.pfm63   +++|*         PERMIT SEARCH, BEFORE CALLING COMMAND OVERLAY.
08948  M01S00014.pfm63   +++|*
08949  M01S00015.pfm63   +++|*         ENTRY  (CC) = COMMAND CODE.
08950  M01S00016.pfm63   +++|*                (DVLW - DVLW+4) = DEVICE LAYOUT WORD OF MST.
08951  M01S00017.pfm63   +++|*                (MSTA) = MST ADDRESS/10B.
08952  M01S00018.pfm63   +++|*                (PFOU) = OPTIONAL USER NAME
08953  M01S00019.pfm63   +++|*                (PFPN) = OPTIONAL PACK NAME.
08954  M01S00020.pfm63   +++|*
08955  M01S00021.pfm63   +++|*         EXIT   TO COMMAND PROCESSOR AS SPECIFIED BY (CC).
08956  M01S00022.pfm63   +++|*                (CCDA) = CHANGED IF PASSWORD CHECKING IS NOT NEEDED.
08957  M01S00023.pfm63   +++|*                (CCDB) = *PSN* SET IF ACCUMULATION REQUIRED.
08958  M01S00024.pfm63   +++|*                (CCDC) = CHANGED IF SECURITY ACCESS VIOLATION.
08959  M01S00025.pfm63   +++|*                (DVLW) = DEVICE LAYOUT WORD OF MASTER DEVICE FROM MST.
08960  M01S00026.pfm63   +++|*                (LCOA) = COMMAND OVERLAY PROCESSOR ADDRESS.
08961  M01S00027.pfm63   +++|*                (LCOB) = COMMAND OVERLAY NAME.
08962  M01S00028.pfm63   +++|*                (SCHG) = BYPASS SET IF USER INDEX CHECK IS NOT NEEDED.
08963  M01S00029.pfm63   +++|*                THE FOLLOWING SEARCH POINTERS ARE INITIALIZED.
08964  M01S00030.pfm63   +++|*                (HL, PB, PP, CS, CS+1, HB, HP, CB, CI, EP)
08965  M01S00031.pfm63   +++|*
08966  M01S00032.pfm63   +++|*         USES   T1, CM - CM+4.
08967  M01S00033.pfm63   +++|*
08968  M01S00034.pfm63   +++|*         CALLS  RMD.
08969  M01S00035.pfm63   +++|
08970  M01S00036.pfm63   +++|
08971  M01S00037.pfm63   +++| IRP      BSS    0           ENTRY
08972  M01S00038.pfm63   +++|
08973  M01S00039.pfm63   +++|*         INITIALIZE CATALOG SEARCH ROUTINES.
08974  M01S00040.pfm63   +++|
08975  M01S00041.pfm63   +++|          LDM    PFOU
08976  M01S00042.pfm63   +++|          NJN    IRP1        IF ALTERNATE USER NAME SPECIFIED
08977  M01S00043.pfm63   +++|          ISTORE CCDA,(UJN CCD4)  SET BYPASS OF PASSWORD CHECK
08978  M01S00044.pfm63   +++|          ISTORE CCDC,(NJN CCD9)  SET SECURITY VIOLATION PROCESSING
08979  M01S00045.pfm63   +++| IRP1     LDM    STAT        CHECK FOR SEARCH STATISTICS REQUIRED
08980  M01S00046.pfm63   +++|          LPK    STAC
08981  M01S00047.pfm63   +++|          ZJN    IRP2        IF ACCUMULATION NOT REQUIRED
08982  M01S00048.pfm63   +++|          ISTORE CCDB,(PSN)  SET ACCUMULATION REQUIRED
08983  M01S00049.pfm63   +++|
08984  M01S00050.pfm63   +++|*         INITIALIZE FOR DEVICE ACCESS.
08985  M01S00051.pfm63   +++|
08986  M01S00052.pfm63   +++| IRP2     RJM    RMD         SET DRIVER FOR MASTER DEVICE
08987  M01S00053.pfm63   +++|          LDM    MSTA        READ MST DEVICE LAYOUT WORD
08988  M01S00054.pfm63   +++|          SHN    3
08989  M01S00055.pfm63   +++|          ADN    ALGL
08990  M01S00056.pfm63   +++|          CRM    DVLW,ON
08991  M01S00057.pfm63   +++|          LDM    STAT        CHECK FOR PRIVATE DEVICE
08992  M01S00058.pfm63   +++|          LPK    STPD
08993  M01S00059.pfm63   +++|          ZJN    IRP3        IF NOT PRIVATE DEVICE
08994  M01S00060.pfm63   +++|          ISTORE SCHG,(PSN)  SET BYPASS OF USER INDEX CHECK
08995  M01S00061.pfm63   +++|
08996  M01S00062.pfm63   +++|*         INITIALIZE SEARCH POINTERS.
08997  M01S00063.pfm63   +++|
08998  M01S00064.pfm63   +++| IRP3     LDN    0           CLEAR DIRECT CELLS
08999  M01S00065.pfm63   +++|          STD    HL          LENGTH OF HOLE
09000  M01S00066.pfm63   +++|          STD    PB          POINTER TO PERMIT BUFFER
09001  M01S00067.pfm63   +++|          STD    PP          INDEX TO PERMIT BUFFER
09002  M01S00068.pfm63   +++|          STD    CS          CUMULATIVE SIZE OF FILES IN CATALOG
09003  M01S00069.pfm63   +++|          STD    CS+1
09004  M01S00070.pfm63   +++|          LDN    ZERL        CLEAR CONTIGUOUS STORAGE
09005  M01S00071.pfm63   +++|          CRD    HB
09006  M01S00072.pfm63   +++|          ERRNZ  HP-HB-1     DIRECT CELLS NOT CONTIGUOUS
09007  M01S00073.pfm63   +++|          ERRNZ  CB-HP-1     DIRECT CELLS NOT CONTIGUOUS
09008  M01S00074.pfm63   +++|          ERRNZ  CI-CB-1     DIRECT CELLS NOT CONTIGUOUS
09009  M01S00075.pfm63   +++|          ERRNZ  EP-CI-1     DIRECT CELLS NOT CONTIGUOUS
09010  M01S00076.pfm63   +++|
09011  M01S00077.pfm63   +++|*         EXIT TO REQUEST PREPROCESSOR.
09012  M01S00078.pfm63   +++|
09013  M01S00079.pfm63   +++|          LDD    CC          INDEX INTO *TCMD* TABLE
09014  M01S00080.pfm63   +++|          SHN    1
09015  M01S00081.pfm63   +++|          ADD    CC
09016  M01S00082.pfm63   +++|          STD    T1
09017  M01S00083.pfm63   +++|          LDM    TCMD+2,T1   SET OVERLAY NAME INTO *EXECUTE* MACRO
09018  M01S00084.pfm63   +++|          STM    LCOB
09019  M01S00085.pfm63   +++|          LDM    TCMD+1,T1   SET REQUEST PROCESSOR ENTRY ADDRESS
09020  M01S00086.pfm63   +++|          STM    LCOA
09021  M01S00087.pfm63   +++|          LDM    TCMD,T1     SET REQUEST PREPROCESSOR ADDRESS
09022  M01S00088.pfm63   +++|          STD    T1
09023  M01S00089.pfm63   +++|          LJM    0,T1        EXIT TO REQUEST PREPROCESSOR
09024  M01S00090.pfm63   +++| CMD      SPACE  4,15
09025  M01S00091.pfm63   +++|**        CMD - CREATE *TCMD* TABLE ENTRIES.
09026  M01S00092.pfm63   +++|*
09027  M01S00093.pfm63   +++|*         *CMD* CREATES THE THREE-WORD *TCMD* ENTRIES AND DEFINES
09028  M01S00094.pfm63   +++|*         THE SYMBOLS *OVXX* AND *PRXX*, THE OVERLAY SUFFIX AND REQUEST
09029  M01S00095.pfm63   +++|*         PROCESSOR ENTRY ADDRESS, RESPECTIVELY, FOR FUNCTION XX.
09030  M01S00096.pfm63   +++|*         *XX* IS THE APPROPRIATE LAST TWO CHARACTERS OF THE COMMAND
09031  M01S00097.pfm63   +++|*         CODE SYMBOL *CCXX*.
09032  M01S00098.pfm63   +++|*
09033  M01S00099.pfm63   +++|* CC      CMD    PPR,PRO
09034  M01S00100.pfm63   +++|*
09035  M01S00101.pfm63   +++|*         CC     COMMAND CODE SUFFIX
09036  M01S00102.pfm63   +++|*         PPR    PREPROCESSOR ADDRESS.  IF OMITTED, A ZERO ENTRY IS
09037  M01S00103.pfm63   +++|*                CREATED.
09038  M01S00104.pfm63   +++|*         PRO    REQUEST PROCESSOR ENTRY ADDRESS IN THE FORM /3PX/ADDR.
09039  M01S00105.pfm63   +++|
09040  M01S00106.pfm63   +++|
09041  M01S00107.pfm63   +++|          MACRO  CMD,C,PPR,PRO
09042  M01S00108.pfm63   +++|          ERRNZ  *-3*//CC_C  TABLE ENTRY OUT OF ORDER
09043  M01S00109.pfm63   +++| .A       IFC    EQ,$PPR$$
09044  M01S00110.pfm63   +++|          CON    0,0,0
09045  M01S00111.pfm63   +++| .A       ELSE
09046  M01S00112.pfm63   +++| .1       MICRO  2,2,PRO//
09047  M01S00113.pfm63   +++|          CON    PPR,PRO,2R".1"
09048  M01S00114.pfm63   +++| OV_C     EQU    2R".1"
09049  M01S00115.pfm63   +++| CMD      RMT
09050  M01S00116.pfm63   +++| PR_C     EQU    PRO
09051  M01S00117.pfm63   +++|          RMT
09052  M01S00118.pfm63   +++| .A       ENDIF
09053  M01S00119.pfm63   +++|          ENDM
09054  M01S00120.pfm63   +++| TCMD     SPACE  4,10
09055  M01S00121.pfm63   +++|**        TCMD - TABLE OF COMMAND PROCESSOR ADDRESSES.
09056  M01S00122.pfm63   +++|*
09057  M01S00123.pfm63   +++|*         *TCMD* IS CREATED BY THE *CMD* MACRO.
09058  M01S00124.pfm63   +++|*
09059  M01S00125.pfm63   +++|*         FIRST BYTE IS PREPROCESSOR ADDRESS IN *3PC*.
09060  M01S00126.pfm63   +++|*         SECOND BYTE IS PROCESSOR ADDRESS IN COMMAND OVERLAY.
09061  M01S00127.pfm63   +++|*         THIRD BYTE IS SUFFIX FOR COMMAND OVERLAY NAME.
09062  M01S00128.pfm63   +++|
09063  M01S00129.pfm63   +++| TCMD     EQU    *-3         COMMAND CODE ADDRESS TABLE
09064  M01S00130.pfm63   +++|          LOC    3
09065  M01S00131.pfm63   +++|
09066  M01S00132.pfm63   +++| SV       CMD    SAV,/3PG/SAV  *SAVE*
09067  M01S00133.pfm63   +++| GT       CMD    GET,/3PF/GET  *GET*
09068  M01S00134.pfm63   +++| PG       CMD    PUR,/3PL/PUR  *PURGE*
09069  M01S00135.pfm63   +++| CT       CMD                  *CATLIST*
09070  M01S00136.pfm63   +++| PM       CMD    PER,/3PM/PER  *PERMIT*
09071  M01S00137.pfm63   +++| RP       CMD    REP,/3PG/REP  *REPLACE*
09072  M01S00138.pfm63   +++| AP       CMD    APP,/3PH/APP  *APPEND*
09073  M01S00139.pfm63   +++| DF       CMD    DEF,/3PK/DEF  *DEFINE*
09074  M01S00140.pfm63   +++| AT       CMD    ATT,/3PI/ATT  *ATTACH*
09075  M01S00141.pfm63   +++| CG       CMD    CHG,/3PN/CHG  *CHANGE*
09076  M01S00142.pfm63   +++| UA       CMD    UAT,/3PI/UAT  *UATTACH*
09077  M01S00143.pfm63   +++| SA       CMD    SAA,/3PO/SAA  *SETASA*
09078  M01S00144.pfm63   +++| AF       CMD    SAF,/3PO/SAF  *SETAF*
09079  M01S00145.pfm63   +++| SD       CMD    SDA,/3PK/SDA  *SETDA*
09080  M01S00146.pfm63   +++| DD       CMD    DDS,/3PL/DDS  *DROPDS*
09081  M01S00147.pfm63   +++| AN       CMD                  *ASSIGNPF*
09082  M01S00148.pfm63   +++| OD       CMD    OLD,/3PF/OLD  *OLD*
09083  M01S00149.pfm63   +++| AC       CMD    SAC,/3PN/CHG  *SETPFAC*
09084  M01S00150.pfm63   +++| AL       CMD    SAL,/3PN/CHG  *SETPFAL*
09085  M01S00151.pfm63   +++| UG       CMD    UGT,/3PF/UGT  *UGET*
09086  M01S00152.pfm63   +++| UR       CMD    URE,/3PG/URE  *UREPLAC*
09087  M01S00153.pfm63   +++| DI       CMD    DIS,/3PM/DIS  *DROPIDS*
09088  M01S00154.pfm63   +++| DP       CMD    DPF,/3PM/DPF  *DELPFC*
09089  M01S00155.pfm63   +++| RS       CMD                  *RPFSTAT*
09090  M01S00156.pfm63   +++| SP       CMD    SPF,/3PR/SPF  *STAGEPF*
09091  M01S00157.pfm63   +++|
09092  M01S00158.pfm63   +++|          LOC    *O
09093  M00S06603.pfm     +++|
09094  M00S06604.pfm     +++|          OVERFLOW  OVLA,EPFW
09095  M00S06605.pfm     +++|          EJECT
09096  M00S06606.pfm     +++|*         EQUIVALENCE EXTERNALLY REFERENCED TAGS.
09097  M00S06607.pfm     +++|
09098  M00S06608.pfm     +++|
09099  M00S06609.pfm     +++|          QUAL   *
09100  M00S06610.pfm     +++|
09101  M00S06611.pfm     +++| CAI      EQU    /".O"/CAI
09102  M00S06612.pfm     +++| CSA      EQU    /".O"/CSA
09103  M00S06613.pfm     +++| CTI      EQU    /".O"/CTI
Line S00031 Modification History
M01 (Added by) pfm36
Seq #  *Modification Id* Act 
----------------------------+
09104  M01S00031.pfm36   +++| DPR      EQU    /".O"/DPR
09105  M00S06614.pfm     +++| DTK      EQU    /".O"/DTK
Line S00066 Modification History
M01 (Added by) ns2415
M02 (Removed by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
09106  M02S00066.pfm54   ---| HNG      EQU    /".O"/HNG
09107  M00S06615.pfm     +++| IRA      EQU    /".O"/IRA
09108  M00S06616.pfm     +++| ITC      EQU    /".O"/ITC
Line S06617 Modification History
M01 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
09109  M01S06617.242l642 ---| ITF      EQU    /".O"/ITF
09110  M01S06618.242l642 ---| MSRX     EQU    /".O"/MSRX
Line S00748 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
09111  M01S00748.242l642 +++| MSRA     EQU    /".O"/MSRA
09112  M00S06619.pfm     +++| RMD      EQU    /".O"/RMD
09113  M00S06620.pfm     +++| RNS      EQU    /".O"/RNS
Line S06621 Modification History
M01 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
09114  M01S06621.253l688 ---| RTK      EQU    /".O"/RTK
09115  M00S06622.pfm     +++| SNT      EQU    /".O"/SNT
09116  M00S06623.pfm     +++| SNTA     EQU    /".O"/SNTA
Line S00032 Modification History
M01 (Added by) pfm36
Seq #  *Modification Id* Act 
----------------------------+
09117  M01S00032.pfm36   +++| STI      EQU    /".O"/STI
Line S00749 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
09118  M01S00749.242l642 +++| UCE      EQU    /".O"/UCE
09119  M01S00750.242l642 +++| UCE3     EQU    /".O"/UCE3
09120  M01S00751.242l642 +++| UCE4     EQU    /".O"/UCE4
09121  M01S00752.242l642 +++| UCEA     EQU    /".O"/UCEA
09122  M01S00753.242l642 +++| UCEB     EQU    /".O"/UCEB
09123  M01S00754.242l642 +++| UCEC     EQU    /".O"/UCEC
09124  M00S06624.pfm     +++| WBI      EQU    /".O"/WBI
09125  M00S06625.pfm     +++|
Line S06626 Modification History
M01 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
09126  M01S06626.253l688 ---| EOIA     EQU    /".O"/EOIA
09127  M01S06627.253l688 ---| EOIB     EQU    /".O"/EOIB
09128  M00S06628.pfm     +++| LOCG     EQU    /".O"/LOCG
Line S00755 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
09129  M01S00755.242l642 +++| OVLC     EQU    /".O"/OVLC
09130  M00S06629.pfm     +++| OVLU     EQU    /".O"/OVLU
Line S06630 Modification History
M01 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
09131  M01S06630.242l642 ---|          OVERLAY  (CATALOG/PERMIT UPDATE ROUTINES.),OVLU
Line S06631 Modification History
M01 (Removed by) 241l630
M02 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
09132  M02S06631.242l642 ---| IUR      SPACE  4,10
09133  M02S06632.242l642 ---|**        IUR - INITIALIZE UPDATE ROUTINES.
09134  M02S06633.242l642 ---|
09135  M02S06634.242l642 ---|
09136  M02S06635.242l642 ---| IUR      BSS    0           ENTRY
09137  M02S06636.242l642 ---|          LDM    PUCW
09138  M02S06637.242l642 ---|          SHN    21-13
09139  M02S06638.242l642 ---|          PJN    IUR1        IF NO USER CONTROL WORD SPECIFIED
09140  M02S06639.242l642 ---|          LDN    PSNI        FORCE UPDATE OF USER CONTROL WORD
09141  M02S06640.242l642 ---|          STM    FCEG
09142  M02S06641.242l642 ---| IUR1     LDM    PFPW
09143  M02S06642.242l642 ---|          ZJN    IUR2        IF PASSWORD NOT SPECIFIED
09144  M02S06643.242l642 ---|          LDN    PSNI        FORCE UPDATE OF PASSWORD
09145  M02S06644.242l642 ---|          STM    FCEH
09146  M02S06645.242l642 ---| IUR2     UJN    ".Q"X       RETURN AFTER LOAD
Line S00022 Modification History
M01 (Added by) 241l630
M02 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
09147  M02S00022.242l642 ---|          SPACE  4,10
09148  M02S00023.242l642 ---|          LJM    IUR         INITIALIZE UPDATE ROUTINES
Line S00756 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
09149  M01S00756.242l642 +++|          OVERLAY  (CATALOG UPDATE ROUTINES.),OVLU
09150  M01S00757.242l642 +++| OVL      SPACE  4,10
09151  M01S00758.242l642 +++|***       THIS OVERLAY CONTAINS SUBROUTINES USED BY THE COMMAND
Line S00759 Modification History
M01 (Added by) 242l642
M02 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
09152  M02S00759.253l688 ---|*         OVERLAYS TO UPDATE THE CATALOG FILE.
Line S00226 Modification History
M01 (Added by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
09153  M01S00226.253l688 +++|*         OVERLAYS TO UPDATE THE PERMANENT FILE CATALOG.
Line S00760 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
09154  M01S00760.242l642 +++|
09155  M01S00761.242l642 +++|
09156  M01S00762.242l642 +++| OVL      BSS    0           ENTRY
09157  M01S00763.242l642 +++|          RJM    RMD         RESET TO MASTER DEVICE
Line S00764 Modification History
M01 (Added by) 242l642
M02 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
09158  M02S00764.253l688 ---|          RJM    IUR         INITIALIZE UPDATE ROUTINES
09159  M02S00765.253l688 ---|          UJN    ".Q"X       RETURN AFTER LOAD
Line S00227 Modification History
M01 (Added by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
09160  M01S00227.253l688 +++|          LDM    DVLW+1      PRESET FIRST TRACK FIELD IN EOI BUFFER
09161  M01S00228.253l688 +++|          STM    EOIFS+1
09162  M01S00229.253l688 +++|          LDN    PDTL        PRESET DATE/TIME FIELD IN EOI BUFFER
09163  M01S00230.253l688 +++|          CRM    EOIDT,ON
Line S00231 Modification History
M01 (Added by) 253l688
M02 (Removed by) 271l750
Seq #  *Modification Id* Act 
----------------------------+
09164  M02S00231.271l750 ---|          LDM    PUCN
Line S00009 Modification History
M01 (Added by) 271l750
Seq #  *Modification Id* Act 
----------------------------+
09165  M01S00009.271l750 +++|          LDM    PUCW
Line S00232 Modification History
M01 (Added by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
09166  M01S00232.253l688 +++|          SHN    21-13
09167  M01S00233.253l688 +++|          PJN    OVL1        IF NO USER CONTROL WORD SPECIFIED
09168  M01S00234.253l688 +++|          LDN    PSNI        FORCE UPDATE OF USER CONTROL WORD
09169  M01S00235.253l688 +++|          STM    FCEG
09170  M01S00236.253l688 +++| OVL1     LDM    PFPW
09171  M01S00237.253l688 +++|          ZJN    OVL2        IF PASSWORD NOT SPECIFIED
09172  M01S00238.253l688 +++|          LDN    PSNI        FORCE UPDATE OF PASSWORD
09173  M01S00239.253l688 +++|          STM    FCEH
09174  M01S00240.253l688 +++| OVL2     UJN    ".Q"X       RETURN AFTER LOAD
09175  M00S06646.pfm     +++|          TITLE  ALLOCATION ROUTINES.
Line S06647 Modification History
M01 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
09176  M01S06647.242l642 ---| ACS      SPACE  4,20
Line S00766 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
09177  M01S00766.242l642 +++| ACS      SPACE  4,25
09178  M00S06648.pfm     +++|**        ACS - ALLOCATE CATALOG SPACE.
09179  M00S06649.pfm     +++|*
09180  M00S06650.pfm     +++|*         ENTRY  (T5) = (EQ) = MASTER DEVICE EST ORDINAL.
09181  M00S06651.pfm     +++|*                (EB) = POINTER TO END BUFFER.
09182  M00S06652.pfm     +++|*                (DVLW - DVLW+4) = DEVICE LAYOUT WORD OF MST.
09183  M00S06653.pfm     +++|*                (FS) = EST ORDINAL FOR FILE.
09184  M00S06654.pfm     +++|*                (FS+1) = FIRST TRACK OF FILE.
09185  M00S06655.pfm     +++|*                (SDAC) = FIRST SECTOR OF FILE ,(4XXX) FOR DA FILE.
09186  M00S06656.pfm     +++|*
09187  M00S06657.pfm     +++|*         EXIT   NEXT SECTOR ALLOCATED FOR CATALOGS.
09188  M00S06658.pfm     +++|*                NEW CATALOG BUFFER CLEARED.
09189  M00S06659.pfm     +++|*                ADDRESS SET IN 2 LOCATIONS PRECEEDING BUFFER.
09190  M00S06660.pfm     +++|*                (EP) = ADDRESS OF NEXT AVAILABLE ENTRY IN BUFFER.
09191  M00S06661.pfm     +++|*                LINKAGE SET IN BUFFER.
09192  M00S06662.pfm     +++|*                OVERFLOW BIT SET IN MST IF NEW TRACK ALLOCATED.
Line S00767 Modification History
M01 (Added by) 242l642
M02 (Removed by) ns2415
Seq #  *Modification Id* Act 
----------------------------+
09193  M02S00767.ns2415  ---|*                TO *ATL* IF TRACK LIMIT ENCOUNTERED.
Line S00067 Modification History
M01 (Added by) ns2415
Seq #  *Modification Id* Act 
----------------------------+
09194  M01S00067.ns2415  +++|*                TO *HNG* IF LABEL TRACK NOT RESERVED.
09195  M00S06663.pfm     +++|*
09196  M00S06664.pfm     +++|*         USES   EP, T1, T5, T6.
09197  M00S06665.pfm     +++|*
09198  M00S06666.pfm     +++|*         CALLS  CAI, ITC, RTK, SEI.
09199  M00S06667.pfm     +++|*
Line S06668 Modification History
M01 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
09200  M01S06668.242l642 ---|*         MACROS ENDMS, ERROR, MONITOR.
Line S00768 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
09201  M01S00768.242l642 +++|*         MACROS ENDMS, MONITOR.
09202  M00S06669.pfm     +++|
09203  M00S06670.pfm     +++|
09204  M00S06671.pfm     +++| ACS3     LDD    EB          SAVE BUFFER ADDRESS
09205  M00S06672.pfm     +++|          ADN    1
09206  M00S06673.pfm     +++|          STM    ACSA
09207  M00S06674.pfm     +++|          ADN    1           SET POINTER TO NEXT AVAILABLE ENTRY
09208  M00S06675.pfm     +++|          STD    EP
09209  M00S06676.pfm     +++|          LDC    500
09210  M00S06677.pfm     +++|          STD    T1
09211  M00S06678.pfm     +++| ACS4     LDN    0           CLEAR NEW CATALOG SECTOR BUFFER
09212  M00S06679.pfm     +++|          STM    *,T1
09213  M00S06680.pfm     +++| ACSA     EQU    *-1         (ADDRESS OF BUFFER + 1)
09214  M00S06681.pfm     +++|          SOD    T1
09215  M00S06682.pfm     +++|          PJN    ACS4        IF MORE BYTES TO CLEAR
09216  M00S06683.pfm     +++|
09217  M00S06684.pfm     +++| ACS      SUBR               ENTRY/EXIT
09218  M00S06685.pfm     +++|          LDM    -2,EB       END BUFFER TRACK
09219  M00S06686.pfm     +++|          STD    T6
09220  M00S06687.pfm     +++|          LDM    -1,EB
09221  M00S06688.pfm     +++|          ADN    1
09222  M00S06689.pfm     +++|          STI    EB
09223  M00S06690.pfm     +++|          LMM    SLM
09224  M00S06691.pfm     +++|          NJN    ACS3        IF NOT AT SECTOR LIMIT
09225  M00S06692.pfm     +++|          ENDMS
09226  M00S06693.pfm     +++|          LDM    DVLW+1      INTERLOCK CATALOG ALLOCATION
Line S06694 Modification History
M01 (Removed by) pfm29
Seq #  *Modification Id* Act 
----------------------------+
09227  M01S06694.pfm29   ---|          STM    AILK
09228  M00S06695.pfm     +++|          RJM    ITC
Line S00001 Modification History
M01 (Added by) pfm29
M02 (Removed by) ns2415
Seq #  *Modification Id* Act 
----------------------------+
09229  M02S00001.ns2415  ---|          LDD    T6          SET ALLOCATION INTERLOCK FLAG
Line S00068 Modification History
M01 (Added by) ns2415
Seq #  *Modification Id* Act 
----------------------------+
09230  M01S00068.ns2415  +++|          ZJN    ACS1        IF INTERLOCK SUCCESSFUL
09231  M01S00069.ns2415  +++|          RJM    HNG         HANG IF LABEL TRACK NOT RESERVED
09232  M01S00070.ns2415  +++|
09233  M01S00071.ns2415  +++| ACS1     LDD    T6          SET ALLOCATION INTERLOCK FLAG
Line S00002 Modification History
M01 (Added by) pfm29
Seq #  *Modification Id* Act 
----------------------------+
09234  M01S00002.pfm29   +++|          STM    AILK
09235  M00S06696.pfm     +++|          RJM    SEI         SEARCH FOR END OF CATALOG TRACK
09236  M00S06697.pfm     +++|          LDD    T5          SET CATALOG TRACK OVERFLOW
09237  M00S06698.pfm     +++|          STD    CM+1
09238  M00S06699.pfm     +++|          LDN    SGBS
09239  M00S06700.pfm     +++|          STD    CM+3
09240  M00S06701.pfm     +++|          LDN    GCTO
09241  M00S06702.pfm     +++|          STD    CM+2
09242  M00S06703.pfm     +++|          MONITOR  STBM
09243  M00S06704.pfm     +++|          LDD    T6
09244  M00S06705.pfm     +++|          STI    EB
09245  M00S06706.pfm     +++|          RJM    RTK         REQUEST TRACK
Line S06707 Modification History
M01 (Removed by) ns2415
Seq #  *Modification Id* Act 
----------------------------+
09246  M01S06707.ns2415  ---|          ZJN    ACS1        IF NO TRACK AVAILABLE
Line S00072 Modification History
M01 (Added by) ns2415
Seq #  *Modification Id* Act 
----------------------------+
09247  M01S00072.ns2415  +++|          ZJN    ACS2        IF NO TRACK AVAILABLE
09248  M00S06708.pfm     +++|          RJM    CAI         CLEAR ALLOCATION INTERLOCK
09249  M00S06709.pfm     +++|          LJM    ACS3        EXIT
09250  M00S06710.pfm     +++|
09251  M00S06711.pfm     +++|*         TRACK LIMIT ENCOUNTERED.
09252  M00S06712.pfm     +++|
Line S06713 Modification History
M01 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
09253  M01S06713.242l642 ---| ACS1     LDM    SDAC
09254  M01S06714.242l642 ---|          SHN    21-13
09255  M01S06715.242l642 ---|          PJN    ACS2        IF NOT DIRECT ACCESS FILE CREATION
09256  M01S06716.242l642 ---|          LDD    FS          CLEAR FILE INTERLOCK
09257  M01S06717.242l642 ---|          STD    T5
09258  M01S06718.242l642 ---|          LDD    FS+1
09259  M01S06719.242l642 ---|          RJM    CTI
09260  M01S06720.242l642 ---|          LDD    EQ          RESTORE EST ORDINAL
09261  M01S06721.242l642 ---|          STD    T5
09262  M01S06722.242l642 ---| ACS2     ERROR  TKL,,,T5    *EQXXX,DNYY, TRACK LIMIT.*
09263  M01S06723.242l642 ---| AFS      SPACE  4,15
Line S00769 Modification History
M01 (Added by) 242l642
M02 (Removed by) ns2415
Seq #  *Modification Id* Act 
----------------------------+
09264  M02S00769.ns2415  ---| ACS1     LJM    ATL         ALLOCATION FILE TRACK LIMIT
Line S00073 Modification History
M01 (Added by) ns2415
Seq #  *Modification Id* Act 
----------------------------+
09265  M01S00073.ns2415  +++| ACS2     ERROR  TKL,,,T5    *EQXXX,DNYY, TRACK LIMIT.*
Line S00770 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
09266  M01S00770.242l642 +++| AFS      SPACE  4,20
09267  M00S06724.pfm     +++|**        AFS - ALLOCATE FILE SPACE.
09268  M00S06725.pfm     +++|*
09269  M00S06726.pfm     +++|*         ENTRY  (T5) = MASTER DEVICE EST ORDINAL.
Line S06727 Modification History
M01 (Removed by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
09270  M01S06727.pfm54   ---|*                (DVLW - DVLW+4) = DEVICE LAYOUT WORD OF MST.
09271  M00S06728.pfm     +++|*                (LF - LF+1) = LENGTH OF FILE TO BE ALLOCATED.
Line S00011 Modification History
M01 (Added by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
09272  M01S00011.pfm54   +++|*                INDIRECT ALLOCATION INTERLOCK SET.
09273  M00S06729.pfm     +++|*
09274  M00S06730.pfm     +++|*         EXIT   SPACE ALLOCATED FOR INDIRECT FILE.
09275  M00S06731.pfm     +++|*                (SDAB) = TRACK OF NEW FILE.
09276  M00S06732.pfm     +++|*                (SDAC) = SECTOR OF NEW FILE.
Line S06733 Modification History
M01 (Removed by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
09277  M01S06733.pfm54   ---|*                ALLOCATION INTERLOCK SET IF BUFFERED DEVICE.
Line S00771 Modification History
M01 (Added by) 242l642
M02 (Removed by) ns2415
M03 (Removed by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
09278  M03S00771.pfm54   ---|*                TO *ATL* IF TRACK LIMIT ENCOUNTERED.
Line S00074 Modification History
M01 (Added by) ns2415
M02 (Removed by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
09279  M02S00074.pfm54   ---|*                TO *HNG* IF INDIRECT CHAIN NOT RESERVED.
09280  M00S06734.pfm     +++|*
09281  M00S06735.pfm     +++|*         USES   T2, T7, CM - CM+4.
09282  M00S06736.pfm     +++|*
Line S06737 Modification History
M01 (Removed by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
09283  M01S06737.pfm54   ---|*         CALLS  DTK, ITC, SEI.
Line S00012 Modification History
M01 (Added by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
09284  M01S00012.pfm54   +++|*         CALLS  DTK, SEI.
09285  M00S06738.pfm     +++|*
Line S06739 Modification History
M01 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
09286  M01S06739.242l642 ---|*         MACROS ENDMS, ERROR, MONITOR.
Line S00772 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
09287  M01S00772.242l642 +++|*         MACROS ENDMS, MONITOR.
09288  M00S06740.pfm     +++|
09289  M00S06741.pfm     +++|
Line S06742 Modification History
M01 (Removed by) ns2415
Seq #  *Modification Id* Act 
----------------------------+
09290  M01S06742.ns2415  ---| AFS6     LDD    T7          FIRST SECTOR OF NEW FILE
Line S00075 Modification History
M01 (Added by) ns2415
M02 (Removed by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
09291  M02S00075.pfm54   ---| AFS8     LDD    T7          FIRST SECTOR OF NEW FILE
Line S06743 Modification History
M01 (Removed by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
09292  M01S06743.pfm54   ---|          STM    SDAC
Line S00001 Modification History
M01 (Added by) ns2311
M02 (Removed by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
09293  M02S00001.pfm54   ---|          LDM    CPTF
Line S00002 Modification History
M01 (Added by) ns2311
M02 (Removed by) ns2415
M03 (Removed by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
09294  M03S00002.pfm54   ---|          ZJN    AFS7        IF NOT CPU TRANSFER
Line S00076 Modification History
M01 (Added by) ns2415
M02 (Removed by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
09295  M02S00076.pfm54   ---|          ZJN    AFS9        IF NOT CPU TRANSFER
Line S06744 Modification History
M01 (Removed by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
09296  M01S06744.pfm54   ---|          LDM    STAT
09297  M01S06745.pfm54   ---|          LPC    STBD
Line S06746 Modification History
M01 (Removed by) ns2311
M02 (Removed by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
09298  M02S06746.pfm54   ---|          NJN    AFSX        IF BUFFERED DEVICE
09299  M02S06747.pfm54   ---|          LDC    4000        SET CHECKPOINT BIT VIA *STBM*
Line S00003 Modification History
M01 (Added by) ns2311
M02 (Removed by) ns2415
M03 (Removed by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
09300  M03S00003.pfm54   ---|          ZJN    AFS7        IF NOT BUFFERED DEVICE
Line S00077 Modification History
M01 (Added by) ns2415
M02 (Removed by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
09301  M02S00077.pfm54   ---|          ZJN    AFS9        IF NOT BUFFERED DEVICE
Line S00004 Modification History
M01 (Added by) ns2311
M02 (Removed by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
09302  M02S00004.pfm54   ---|          AOM    DCEF        PREVENT RELEASE OF ALLOCATION INTERLOCK
09303  M02S00005.pfm54   ---|          UJN    AFSX        RETURN
09304  M02S00006.pfm54   ---|
Line S00007 Modification History
M01 (Added by) ns2311
M02 (Removed by) ns2415
M03 (Removed by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
09305  M03S00007.pfm54   ---| AFS7     LDC    4000        SET CHECKPOINT BIT VIA *STBM*
Line S00078 Modification History
M01 (Added by) ns2415
M02 (Removed by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
09306  M02S00078.pfm54   ---| AFS9     LDC    4000        SET CHECKPOINT BIT VIA *STBM*
Line S06748 Modification History
M01 (Removed by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
09307  M01S06748.pfm54   ---|          RAD    T5
09308  M01S06749.pfm54   ---|          LDM    DVLW        CLEAR INDIRECT ALLOCATION INTERLOCK
09309  M01S06750.pfm54   ---|          RJM    CTI
09310  M01S06751.pfm54   ---|          LDN    0           CLEAR INDIRECT ALLOCATION INTERLOCK FLAG
09311  M01S06752.pfm54   ---|          STM    IAIF
09312  M01S06753.pfm54   ---|          LDD    T5          RESTORE EST ORDINAL
09313  M01S06754.pfm54   ---|          LPC    777
09314  M01S06755.pfm54   ---|          STD    T5
09315  M01S06756.pfm54   ---|
09316  M00S06757.pfm     +++| AFS      SUBR               ENTRY/EXIT
09317  M00S06758.pfm     +++|          ENDMS              RELEASE CHANNEL
09318  M00S06759.pfm     +++|          LDM    IAIF
Line S06760 Modification History
M01 (Removed by) ns2415
Seq #  *Modification Id* Act 
----------------------------+
09319  M01S06760.ns2415  ---|          NJN    AFS0        IF ALLOCATION INTERLOCK SET (*APPEND*)
Line S00079 Modification History
M01 (Added by) ns2415
M02 (Removed by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
09320  M02S00079.pfm54   ---|          NJN    AFS2        IF ALLOCATION INTERLOCK SET (*APPEND*)
Line S06761 Modification History
M01 (Removed by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
09321  M01S06761.pfm54   ---|          LDM    DVLW        INTERLOCK INDIRECT ACCESS FILE ALLOCATION
09322  M01S06762.pfm54   ---|          RJM    ITC
Line S06763 Modification History
M01 (Removed by) ns2415
M02 (Removed by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
09323  M02S06763.pfm54   ---|          AOM    IAIF        SET INDIRECT ALLOCATION INTERLOCK FLAG
09324  M02S06764.pfm54   ---| AFS0     RJM    SEI         FIND END OF INDIRECT CHAIN
Line S00080 Modification History
M01 (Added by) ns2415
M02 (Removed by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
09325  M02S00080.pfm54   ---|          ZJN    AFS1        IF INTERLOCK SUCCESSFUL
09326  M02S00081.pfm54   ---|          RJM    HNG         HANG IF INDIRECT CHAIN NOT RESERVED
Line S00013 Modification History
M01 (Added by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
09327  M01S00013.pfm54   +++|          NJN    AFS2        IF ALLOCATION INTERLOCK SET
09328  M01S00014.pfm54   +++|          RJM    HNG         HANG
Line S00082 Modification History
M01 (Added by) ns2415
Seq #  *Modification Id* Act 
----------------------------+
09329  M01S00082.ns2415  +++|
Line S00083 Modification History
M01 (Added by) ns2415
M02 (Removed by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
09330  M02S00083.pfm54   ---| AFS1     AOM    IAIF        SET INDIRECT ALLOCATION INTERLOCK FLAG
09331  M02S00084.pfm54   ---| AFS2     RJM    SEI         FIND END OF INDIRECT CHAIN
Line S00015 Modification History
M01 (Added by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
09332  M01S00015.pfm54   +++| AFS2     LDM    DVLW        SKIP TO END OF INDIRECT CHAIN
09333  M01S00016.pfm54   +++|          STD    T6
09334  M01S00017.pfm54   +++|          RJM    SEI
09335  M00S06765.pfm     +++|          LDD    T5          SET EST ORDINAL AND TRACK
09336  M00S06766.pfm     +++|          STD    CM+1
09337  M00S06767.pfm     +++|          LDD    T6
09338  M00S06768.pfm     +++|          STM    SDAB
09339  M00S06769.pfm     +++|          STD    CM+2
09340  M00S06770.pfm     +++|          LDD    T7          CALCULATE SECTORS REQUIRED
09341  M00S06771.pfm     +++|          ADD    LF+1
09342  M00S06772.pfm     +++| AFSB     ADN    2           ALLOCATE FOR SYSTEM SECTOR AND EOI
09343  M00S06773.pfm     +++|*         PSN                (*APPEND* - DO NOT ALLOCATE FOR SS/EOI)
09344  M00S06774.pfm     +++|          STD    CM+4
09345  M00S06775.pfm     +++|          STD    T2
09346  M00S06776.pfm     +++|          SHN    -14
09347  M00S06777.pfm     +++|          ADD    LF
09348  M00S06778.pfm     +++|          STD    CM+3
09349  M00S06779.pfm     +++|          AOD    T7
09350  M00S06780.pfm     +++|          LMM    SLM
Line S06781 Modification History
M01 (Removed by) ns2415
Seq #  *Modification Id* Act 
----------------------------+
09351  M01S06781.ns2415  ---|          NJN    AFS1        IF CURRENT EOI NOT AT END OF TRACK
Line S00085 Modification History
M01 (Added by) ns2415
Seq #  *Modification Id* Act 
----------------------------+
09352  M01S00085.ns2415  +++|          NJN    AFS3        IF CURRENT EOI NOT AT END OF TRACK
09353  M00S06782.pfm     +++|          STD    T7          RESET FIRST TRACK AND SECTOR OF NEW FILE
09354  M00S06783.pfm     +++|          STM    AFSA+PSNI*0
Line S06784 Modification History
M01 (Removed by) ns2415
Seq #  *Modification Id* Act 
----------------------------+
09355  M01S06784.ns2415  ---| AFS1     LDD    CM+4        SUBTRACT SECTORS IN CURRENT TRACK
Line S00086 Modification History
M01 (Added by) ns2415
Seq #  *Modification Id* Act 
----------------------------+
09356  M01S00086.ns2415  +++| AFS3     LDD    CM+4        SUBTRACT SECTORS IN CURRENT TRACK
09357  M00S06785.pfm     +++|          SBM    SLM
09358  M00S06786.pfm     +++|          STD    CM+4
Line S00087 Modification History
M01 (Added by) ns2415
Seq #  *Modification Id* Act 
----------------------------+
09359  M01S00087.ns2415  +++|          PJN    AFS6        IF ADDITIONAL TRACKS REQUIRED
09360  M01S00088.ns2415  +++|          LDD    CM+3
Line S06787 Modification History
M01 (Removed by) ns2415
Seq #  *Modification Id* Act 
----------------------------+
09361  M01S06787.ns2415  ---|          PJN    AFS4        IF ADDITIONAL TRACKS REQUIRED
Line S00089 Modification History
M01 (Added by) ns2415
Seq #  *Modification Id* Act 
----------------------------+
09362  M01S00089.ns2415  +++|          NJN    AFS5        IF ADDITIONAL TRACKS REQUIRED
Line S06788 Modification History
M01 (Removed by) ns2415
Seq #  *Modification Id* Act 
----------------------------+
09363  M01S06788.ns2415  ---|          LDD    CM+3
09364  M01S06789.ns2415  ---|          NJN    AFS3        IF ADDITIONAL TRACKS REQUIRED
09365  M00S06790.pfm     +++|          LDD    T2          SET EOI IN TRT
09366  M00S06791.pfm     +++|          RJM    DTK
Line S06792 Modification History
M01 (Removed by) ns2415
Seq #  *Modification Id* Act 
----------------------------+
09367  M01S06792.ns2415  ---| AFS2     LJM    AFS6        COMPLETE ALLOCATION
Line S00090 Modification History
M01 (Added by) ns2415
M02 (Removed by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
09368  M02S00090.pfm54   ---| AFS4     LJM    AFS8        COMPLETE ALLOCATION
Line S00018 Modification History
M01 (Added by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
09369  M01S00018.pfm54   +++|          UJN    AFS8        COMPLETE ALLOCATION
09370  M00S06793.pfm     +++|
Line S06794 Modification History
M01 (Removed by) ns2415
Seq #  *Modification Id* Act 
----------------------------+
09371  M01S06794.ns2415  ---| AFS3     AOD    CM+4        ADJUST FOR UNDERFLOW
Line S00091 Modification History
M01 (Added by) ns2415
Seq #  *Modification Id* Act 
----------------------------+
09372  M01S00091.ns2415  +++| AFS5     AOD    CM+4        ADJUST FOR UNDERFLOW
09373  M00S06795.pfm     +++|          SOD    CM+3
Line S06796 Modification History
M01 (Removed by) ns2415
Seq #  *Modification Id* Act 
----------------------------+
09374  M01S06796.ns2415  ---| AFS4     AOD    CM+4        ADJUST SECTOR COUNT FOR *RTCM*
Line S00092 Modification History
M01 (Added by) ns2415
Seq #  *Modification Id* Act 
----------------------------+
09375  M01S00092.ns2415  +++| AFS6     AOD    CM+4        ADJUST SECTOR COUNT FOR *RTCM*
09376  M00S06797.pfm     +++|          SHN    -14
09377  M00S06798.pfm     +++|          RAD    CM+3
09378  M00S06799.pfm     +++|          MONITOR  RTCM
Line S06800 Modification History
M01 (Removed by) ns2415
Seq #  *Modification Id* Act 
----------------------------+
09379  M01S06800.ns2415  ---|          STM    DTMD        CLEAR REWRITE ON FILE COPY
Line S00093 Modification History
M01 (Added by) ns2415
Seq #  *Modification Id* Act 
----------------------------+
09380  M01S00093.ns2415  +++|*         LDN    0           CLEAR REWRITE ON FILE COPY
09381  M01S00094.ns2415  +++|          STM    DTMD
09382  M00S06801.pfm     +++|          LDD    CM+4
Line S06802 Modification History
M01 (Removed by) ns2415
Seq #  *Modification Id* Act 
----------------------------+
09383  M01S06802.ns2415  ---| AFSA     UJN    AFS5        SKIP UPDATE OF FIRST TRACK
Line S00095 Modification History
M01 (Added by) ns2415
Seq #  *Modification Id* Act 
----------------------------+
09384  M01S00095.ns2415  +++| AFSA     UJN    AFS7        SKIP UPDATE OF FIRST TRACK
09385  M00S06803.pfm     +++|*         PSN                (CURRENT EOI AT END OF TRACK)
Line S06804 Modification History
M01 (Removed by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
09386  M01S06804.pfm54   ---|          STM    SDAB
Line S06805 Modification History
M01 (Removed by) ns2415
M02 (Removed by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
09387  M02S06805.pfm54   ---| AFS5     NJN    AFS2        IF TRACKS ASSIGNED
Line S06806 Modification History
M01 (Removed by) 242l642
M02 (Removed by) ns2415
M03 (Removed by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
09388  M03S06806.pfm54   ---|          ERROR  TKL,,,T5    *EQXXX,DNYY, TRACK LIMIT.*
09389  M03S06807.pfm54   ---| APS      SPACE  4,15
09390  M03S06808.pfm54   ---|**        APS - ALLOCATE PERMIT SPACE.
09391  M03S06809.pfm54   ---|*
09392  M03S06810.pfm54   ---|*         ENTRY  (T5) = MASTER DEVICE EST ORDINAL.
09393  M03S06811.pfm54   ---|*                (PB) = ADDRESS OF PERMIT BUFFER.
09394  M03S06812.pfm54   ---|*                (DVLW - DVLW+4) = DEVICE LAYOUT WORD OF MST.
09395  M03S06813.pfm54   ---|*
09396  M03S06814.pfm54   ---|*         EXIT   (RI - RI+1) = RANDOM ADDRESS OF NEW PERMIT SECTOR.
09397  M03S06815.pfm54   ---|*                (EOIA) SET WITH ADDRESS OF NEW EOI.
09398  M03S06816.pfm54   ---|*                (WNPB) = LINKAGE TO NEW EOI.
09399  M03S06817.pfm54   ---|*                PERMIT ALLOCATION INTERLOCK SET.
09400  M03S06818.pfm54   ---|*
09401  M03S06819.pfm54   ---|*         USES   T6, T7, RI - RI+1.
09402  M03S06820.pfm54   ---|*
09403  M03S06821.pfm54   ---|*         CALLS  DTK, ITC, RTK, SEI.
09404  M03S06822.pfm54   ---|*
09405  M03S06823.pfm54   ---|*         MACROS ENDMS, ERROR.
09406  M03S06824.pfm54   ---|
09407  M03S06825.pfm54   ---|
09408  M03S06826.pfm54   ---| APS4     LDD    T6          SAVE ADDRESS OF NEW EOI
09409  M03S06827.pfm54   ---|          STM    EOIA
09410  M03S06828.pfm54   ---|          LDD    T7
09411  M03S06829.pfm54   ---|          STM    EOIA+1
09412  M03S06830.pfm54   ---|
09413  M03S06831.pfm54   ---| APS      SUBR               ENTRY/EXIT
09414  M03S06832.pfm54   ---|          ENDMS              RELEASE CHANNEL
09415  M03S06833.pfm54   ---|          LDM    DVLW+2      INTERLOCK PERMIT ALLOCATION
Line S06834 Modification History
M01 (Removed by) pfm29
M02 (Removed by) 242l642
M03 (Removed by) ns2415
M04 (Removed by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
09416  M04S06834.pfm54   ---|          STM    AILK
Line S06835 Modification History
M01 (Removed by) 242l642
M02 (Removed by) ns2415
M03 (Removed by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
09417  M03S06835.pfm54   ---|          RJM    ITC
Line S00003 Modification History
M01 (Added by) pfm29
M02 (Removed by) 242l642
M03 (Removed by) ns2415
M04 (Removed by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
09418  M04S00003.pfm54   ---|          LDD    T6          SET ALLOCATION INTERLOCK FLAG
09419  M04S00004.pfm54   ---|          STM    AILK
Line S06836 Modification History
M01 (Removed by) 242l642
M02 (Removed by) ns2415
M03 (Removed by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
09420  M03S06836.pfm54   ---|          RJM    SEI         SEARCH FOR END OF PERMIT FILE
09421  M03S06837.pfm54   ---|          LDD    T2          SAVE RANDOM ADDRESS OF NEW PERMIT SECTOR
09422  M03S06838.pfm54   ---|          STD    RI
09423  M03S06839.pfm54   ---|          LDD    T3
09424  M03S06840.pfm54   ---|          STD    RI+1
09425  M03S06841.pfm54   ---|          AOD    T7          CHECK FOR END OF TRACK
09426  M03S06842.pfm54   ---|          LMM    SLM
09427  M03S06843.pfm54   ---|          ZJN    APS2        IF AT END OF TRACK
09428  M03S06844.pfm54   ---|          LDD    T7          SAVE LINKAGE TO NEW EOI
09429  M03S06845.pfm54   ---|          STM    WNPB
09430  M03S06846.pfm54   ---|          RJM    DTK         SET EOI IN TRT
09431  M03S06847.pfm54   ---| APS1     UJP    APS4        SAVE ADDRESS OF NEW EOI
09432  M03S06848.pfm54   ---|
09433  M03S06849.pfm54   ---| APS2     RJM    RTK         REQUEST NEW TRACK
09434  M03S06850.pfm54   ---|          ZJN    APS3        IF NO TRACK AVAILABLE
09435  M03S06851.pfm54   ---|          STD    T6          SET ADDRESS OF NEW EOI
09436  M03S06852.pfm54   ---|          STM    WNPB        SAVE LINKAGE TO NEW EOI
09437  M03S06853.pfm54   ---|          LDN    0
09438  M03S06854.pfm54   ---|          STD    T7
09439  M03S06855.pfm54   ---|          UJN    APS1        SAVE ADDRESS OF NEW EOI
09440  M03S06856.pfm54   ---|
09441  M03S06857.pfm54   ---| APS3     ERROR  TKL,,,T5    *EQXXX,DNYY, TRACK LIMIT.*
Line S00773 Modification History
M01 (Added by) 242l642
M02 (Removed by) ns2415
M03 (Removed by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
09442  M03S00773.pfm54   ---|*         UJN    ATL         PROCESS ALLOCATION FILE TRACK LIMIT
09443  M03S00774.pfm54   ---| ATL      SPACE  4,10
09444  M03S00775.pfm54   ---|**        ATL - ALLOCATION FILE TRACK LIMIT.
09445  M03S00776.pfm54   ---|
09446  M03S00777.pfm54   ---|
09447  M03S00778.pfm54   ---| ATL      ERROR  TKL,,,T5    *EQXXX,DNYY, TRACK LIMIT.*
Line S00096 Modification History
M01 (Added by) ns2415
M02 (Removed by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
09448  M02S00096.pfm54   ---| AFS7     NJN    AFS4        IF TRACKS ASSIGNED
09449  M02S00097.pfm54   ---|          ERROR  TKL,,,T5    *EQXXX,DNYY, TRACK LIMIT.*
Line S00019 Modification History
M01 (Added by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
09450  M01S00019.pfm54   +++|          STM    SDAB        SET FIRST TRACK OF NEW FILE
09451  M01S00020.pfm54   +++| AFS7     ZJN    AFS9        IF NO TRACKS ASSIGNED
09452  M01S00021.pfm54   +++| AFS8     LDD    T7          SET FIRST SECTOR OF NEW FILE
09453  M01S00022.pfm54   +++|          STM    SDAC
09454  M01S00023.pfm54   +++|          LDC    STXC        SET *EXTENDING INDIRECT CHAIN* FLAG
09455  M01S00024.pfm54   +++|          RAM    STAT
09456  M01S00025.pfm54   +++|          LDN    0           CLEAR REWRITE ON FILE COPY
09457  M01S00026.pfm54   +++|          STM    DTMD
09458  M01S00027.pfm54   +++|          LJM    AFSX        RETURN
09459  M01S00028.pfm54   +++|
09460  M01S00029.pfm54   +++| AFS9     ERROR  TKL,,,T5    *EQXXX,DNYY, TRACK LIMIT.*
09461  M00S06858.pfm     +++|          TITLE  CATALOG UPDATE ROUTINES.
09462  M00S06859.pfm     +++| CCS      SPACE  4,30
09463  M00S06860.pfm     +++|**        CCS - CREATE CATALOG SECTOR.
09464  M00S06861.pfm     +++|*
09465  M00S06862.pfm     +++|*         ENTRY  (HB) = ADDRESS OF BUFFER CONTAINING HOLE.
09466  M00S06863.pfm     +++|*                (HP) = INDEX TO HOLE ENTRY.
09467  M00S06864.pfm     +++|*                (EB) = POINTER TO BUFFER CONTAINING END OF CATALOGS.
09468  M00S06865.pfm     +++|*                (EP) = INDEX TO FIRST AVAILABLE ENTRY IN END BUFFER.
09469  M00S06866.pfm     +++|*                (CC) = COMMAND CODE.
Line S06867 Modification History
M01 (Removed by) ns2414
Seq #  *Modification Id* Act 
----------------------------+
09470  M01S06867.ns2414  ---|*                (CI) = INDEX TO OLD CATALOG ENTRY (REPLACE/APPEND)
09471  M01S06868.ns2414  ---|*                (CCSB) = PRESET TO *PSN* FOR *DEFINE* REQUEST.
09472  M01S06869.ns2414  ---|*                (CCSC) = PRESET TO *PSN* FOR *DEFINE* REQUEST.
Line S00779 Modification History
M01 (Added by) 242l642
M02 (Removed by) ns2414
Seq #  *Modification Id* Act 
----------------------------+
09473  M02S00779.ns2414  ---|*                (CCSF) = PRESET TO *PSN* FOR *DEFINE* REQUEST.
09474  M02S00780.ns2414  ---|*                (CCSG) = PRESET TO *PSN* FOR *DEFINE* REQUEST.
Line S00028 Modification History
M01 (Added by) pfm40
Seq #  *Modification Id* Act 
----------------------------+
09475  M01S00028.pfm40   +++|*                (DAHP) .NE. 0 IF DIRECT ACCESS HOLE BEING USED.
Line S00074 Modification History
M01 (Added by) ns2414
Seq #  *Modification Id* Act 
----------------------------+
09476  M01S00074.ns2414  +++|*                (CI) = INDEX TO CATALOG ENTRY (APPEND/REPLACE/UREPLACE)
09477  M01S00075.ns2414  +++|*                (CCSB) = PRESET TO *PSN* FOR *DEFINE*/*DROPIDS*.
Line S00076 Modification History
M01 (Added by) ns2414
M02 (Removed by) pfm75
Seq #  *Modification Id* Act 
----------------------------+
09478  M02S00076.pfm75   ---|*                (CCSC) = PRESET TO *PSN* FOR *DEFINE*.
09479  M02S00077.pfm75   ---|*                (CCSF) = PRESET TO *PSN* FOR *DEFINE*.
09480  M02S00078.pfm75   ---|*                (CCSG) = PRESET TO *PSN* FOR *DEFINE*.
Line S00001 Modification History
M01 (Added by) pfm75
Seq #  *Modification Id* Act 
----------------------------+
09481  M01S00001.pfm75   +++|*                (CCSC) = PRESET TO *PSN* FOR *DEFINE*/*DROPIDS*.
09482  M01S00002.pfm75   +++|*                (CCSF) = PRESET TO *PSN* FOR *DEFINE*/*DROPIDS*.
09483  M01S00003.pfm75   +++|*                (CCSG) = PRESET TO *PSN* FOR *DEFINE*/*DROPIDS*.
09484  M00S06870.pfm     +++|*                (SDAB) = FIRST TRACK OF FILE.
09485  M00S06871.pfm     +++|*                (SDAC) = FIRST SECTOR OF FILE, (4XXX) FOR DA FILE.
09486  M00S06872.pfm     +++|*
09487  M00S06873.pfm     +++|*         EXIT   CATALOG ENTRY CREATED.
Line S00781 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
09488  M01S00781.242l642 +++|*                CATALOG ENTRY NOT WRITTEN TO DISK IF *DEFINE* REQUEST.
09489  M00S06874.pfm     +++|*                SPACE FOR FILE ALLOCATED IF NECESSARY.
09490  M00S06875.pfm     +++|*                (EP) = ADDRESS OF NEW CATALOG ENTRY OF FILE (IF DAPF).
09491  M00S06876.pfm     +++|*                (EB) = ADDRESS OF BUFFER FOR FILE (IF DAPF).
09492  M00S06877.pfm     +++|*                IF (HB) .NE. (EB), END BUFFER REWRITTEN.
09493  M00S06878.pfm     +++|*
09494  M00S06879.pfm     +++|*         USES   T1 - T7.
09495  M00S06880.pfm     +++|*
09496  M00S06881.pfm     +++|*         CALLS  ACS, AFS, FCE, FHE, REB, WBI.
09497  M00S06882.pfm     +++|*
09498  M00S06883.pfm     +++|*         NOTES  THE SYMBOLS *CCSA*, *CCSD* AND *CCSV* SHOULD NOT BE
09499  M00S06884.pfm     +++|*                USED AS DATA TAGS IN THIS SUBROUTINE, SINCE THEY
09500  M00S06885.pfm     +++|*                CONFLICT WITH GLOBAL SYMBOLS.
09501  M00S06886.pfm     +++|
09502  M00S06887.pfm     +++|
09503  M00S06888.pfm     +++| CCS      SUBR               ENTRY/EXIT
09504  M00S06889.pfm     +++| CCSE     LDD    HP
09505  M00S06890.pfm     +++|*         LJM    CCS5.1      (*UREPLACE*)
09506  M00S06891.pfm     +++|          NJN    CCS3        IF HOLE AVAILABLE
09507  M00S06892.pfm     +++|
09508  M00S06893.pfm     +++|*         CREATE NEW CATALOG ENTRY.
09509  M00S06894.pfm     +++|
09510  M00S06895.pfm     +++|          RJM    REB         REREAD END BUFFER (IF NECESSARY)
09511  M00S06896.pfm     +++| CCSB     RJM    AFS         ALLOCATE FILE SPACE
09512  M00S06897.pfm     +++|*         PSN                (*DEFINE* OR *DROPIDS*)
09513  M00S06898.pfm     +++|          LDD    EP
09514  M00S06899.pfm     +++|          NJN    CCS2        IF SPACE AVAILABLE IN LAST SECTOR
09515  M00S06900.pfm     +++|          RJM    ACS         ALLOCATE CATALOG SPACE
09516  M00S06901.pfm     +++|
09517  M00S06902.pfm     +++|*         FORM CATALOG ENTRY FOR FILE.
09518  M00S06903.pfm     +++|
09519  M00S06904.pfm     +++| CCS2     LDD    EP          SET ADDRESS OF FIRST ENTRY
09520  M00S06905.pfm     +++|          RJM    FCE
Line S00029 Modification History
M01 (Added by) pfm40
Seq #  *Modification Id* Act 
----------------------------+
09521  M01S00029.pfm40   +++|          LDM    DAHP
09522  M01S00030.pfm40   +++|          NJN    CCS2.1      IF USING DIRECT ACCESS HOLE
09523  M00S06906.pfm     +++|          LDN    NWCE        ADVANCE SECTOR WORD COUNT
09524  M00S06907.pfm     +++|          RAM    1,EB
Line S06908 Modification History
M01 (Removed by) pfm40
Seq #  *Modification Id* Act 
----------------------------+
09525  M01S06908.pfm40   ---|          LJM    CCS7
Line S00031 Modification History
M01 (Added by) pfm40
Seq #  *Modification Id* Act 
----------------------------+
09526  M01S00031.pfm40   +++| CCS2.1   LJM    CCS7        WRITE END BUFFER
09527  M00S06909.pfm     +++|
09528  M00S06910.pfm     +++|*         USE EXISTING CATALOG ENTRY FOR FILE.
09529  M00S06911.pfm     +++|
09530  M00S06912.pfm     +++| CCS3     UJN    CCS5        PROCESS INDIRECT ACCESS FILE
Line S06913 Modification History
M01 (Removed by) pfm75
Seq #  *Modification Id* Act 
----------------------------+
09531  M01S06913.pfm75   ---|*         PSN                (*DEFINE* REQUEST)
Line S00004 Modification History
M01 (Added by) pfm75
Seq #  *Modification Id* Act 
----------------------------+
09532  M01S00004.pfm75   +++|*         PSN                (*DEFINE*/*DROPIDS* REQUEST)
09533  M00S06914.pfm     +++| CCSC     EQU    *-1
09534  M00S06915.pfm     +++|
09535  M00S06916.pfm     +++|*         REUSE DELETED DIRECT ACCESS FILE ENTRY.
09536  M00S06917.pfm     +++|
09537  M00S06918.pfm     +++|          LDD    HP          FORM CATALOG ENTRY FOR DIRECT ACCESS FILE
09538  M00S06919.pfm     +++|          STD    EP
09539  M00S06920.pfm     +++|          RJM    FCE
09540  M00S06921.pfm     +++|
09541  M00S06922.pfm     +++| CCS4     LDD    HB          REWRITE CATALOG SECTOR
09542  M00S06923.pfm     +++|          STD    EB
Line S06924 Modification History
M01 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
09543  M01S06924.242l642 ---|          RJM    WBI
Line S00782 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
09544  M01S00782.242l642 +++| CCSF     RJM    WBI
Line S00783 Modification History
M01 (Added by) 242l642
M02 (Removed by) pfm75
Seq #  *Modification Id* Act 
----------------------------+
09545  M02S00783.pfm75   ---|*         PSN                (*DEFINE* REQUEST)
Line S00005 Modification History
M01 (Added by) pfm75
Seq #  *Modification Id* Act 
----------------------------+
09546  M01S00005.pfm75   +++|*         PSN                (*DEFINE*/*DROPIDS* REQUEST)
Line S06925 Modification History
M01 (Removed by) pfm40
Seq #  *Modification Id* Act 
----------------------------+
09547  M01S06925.pfm40   ---|          UJN    CCSX        EXIT
Line S00032 Modification History
M01 (Added by) pfm40
Seq #  *Modification Id* Act 
----------------------------+
09548  M01S00032.pfm40   +++|          UJP    CCSX        EXIT
09549  M00S06926.pfm     +++|
09550  M00S06927.pfm     +++|*         UTILIZE HOLE FOR INDIRECT ACCESS FILE.
09551  M00S06928.pfm     +++|
09552  M00S06929.pfm     +++| CCS5     LDM    FCBT,HP     SET ADDRESS OF HOLE
09553  M00S06930.pfm     +++|          STM    SDAB
09554  M00S06931.pfm     +++|          LDM    FCBS,HP
09555  M00S06932.pfm     +++|          STM    SDAC
09556  M00S06933.pfm     +++|          LDD    HP          REFORM CATALOG ENTRY FOR NEW FILE
09557  M00S06934.pfm     +++|          RJM    FCE         FORM CATALOG ENTRY
09558  M00S06935.pfm     +++| CCS5.1   LDD    HL          LENGTH OF HOLE
09559  M00S06936.pfm     +++|          SBD    LF+1
09560  M00S06937.pfm     +++|          ZJN    CCS4        IF EXACT FIT
09561  M00S06938.pfm     +++|
09562  M00S06939.pfm     +++|*         CREATE CATALOG ENTRY FOR UNUSED PORTION OF HOLE.
09563  M00S06940.pfm     +++|*
09564  M00S06941.pfm     +++|*         NOTE - CODE IN *SCH* AND *APP* GUARANTEES THAT A HOLE
09565  M00S06942.pfm     +++|*         WILL NOT BE SELECTED UNLESS IT IS LARGE ENOUGH TO
09566  M00S06943.pfm     +++|*         ALLOW A NEW MINIMUM-SIZED HOLE TO BE CREATED (EXCEPT
09567  M00S06944.pfm     +++|*         FOR EXACT FITS).
09568  M00S06945.pfm     +++|
09569  M00S06946.pfm     +++|          SBN    2           SET NEW HOLE LENGTH
09570  M00S06947.pfm     +++|          STD    HL
09571  M00S06948.pfm     +++|          RJM    REB         REREAD END BUFFER (IF NECESSARY)
09572  M00S06949.pfm     +++|          LDD    EP
09573  M00S06950.pfm     +++|          NJN    CCS6        IF SPACE AVAILABLE IN LAST SECTOR
09574  M00S06951.pfm     +++|          RJM    ACS         ALLOCATE CATALOG SPACE
09575  M00S06952.pfm     +++| CCS6     RJM    FHE         FORM HOLE ENTRY
Line S00033 Modification History
M01 (Added by) pfm40
Seq #  *Modification Id* Act 
----------------------------+
09576  M01S00033.pfm40   +++|          LDM    DAHP
09577  M01S00034.pfm40   +++|          NJN    CCS6.1      IF USING DIRECT ACCESS HOLE
09578  M00S06953.pfm     +++|          LDN    NWCE
09579  M00S06954.pfm     +++|          RAM    1,EB
Line S06955 Modification History
M01 (Removed by) pfm40
Seq #  *Modification Id* Act 
----------------------------+
09580  M01S06955.pfm40   ---|          LDD    HB          REWRITE FILE CATALOG ENTRY
Line S00035 Modification History
M01 (Added by) pfm40
Seq #  *Modification Id* Act 
----------------------------+
09581  M01S00035.pfm40   +++| CCS6.1   LDD    HB          REWRITE FILE CATALOG ENTRY
09582  M00S06956.pfm     +++|          RJM    WBI
09583  M00S06957.pfm     +++|          LDD    HB          CHECK BUFFERS
09584  M00S06958.pfm     +++|          LMD    EB
09585  M00S06959.pfm     +++|          ZJN    CCS8        IF NEW ENTRY IN SAME BUFFER AS HOLE
09586  M00S06960.pfm     +++| CCS7     LDD    EB          WRITE NEW CATALOG ENTRY
Line S06961 Modification History
M01 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
09587  M01S06961.242l642 ---|          RJM    WBI
Line S00784 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
09588  M01S00784.242l642 +++| CCSG     RJM    WBI
Line S00785 Modification History
M01 (Added by) 242l642
M02 (Removed by) pfm75
Seq #  *Modification Id* Act 
----------------------------+
09589  M02S00785.pfm75   ---|*         PSN                (*DEFINE* REQUEST)
Line S00006 Modification History
M01 (Added by) pfm75
Seq #  *Modification Id* Act 
----------------------------+
09590  M01S00006.pfm75   +++|*         PSN                (*DEFINE*/*DROPIDS* REQUEST)
09591  M00S06962.pfm     +++|
09592  M00S06963.pfm     +++|*         WRITE EOI SECTOR IF NEW SECTOR OF CATALOGS.
09593  M00S06964.pfm     +++|
09594  M00S06965.pfm     +++| CCS8     LDD    EP          CHECK END BUFFER
09595  M00S06966.pfm     +++|          SBD    EB
09596  M00S06967.pfm     +++|          SBN    2
Line S00036 Modification History
M01 (Added by) pfm40
Seq #  *Modification Id* Act 
----------------------------+
09597  M01S00036.pfm40   +++|          ADM    DAHP        NON-ZERO IF USING DIRECT ACCESS HOLE
09598  M00S06968.pfm     +++|          NJN    CCS10       IF NOT NEW END BUFFER
09599  M00S06969.pfm     +++|          LDI    EB
09600  M00S06970.pfm     +++|          SHN    6
09601  M00S06971.pfm     +++|          PJN    CCS9        IF NOT NEW TRACK
09602  M00S06972.pfm     +++|          SHN    -6
09603  M00S06973.pfm     +++|          STD    T6
09604  M00S06974.pfm     +++|          LDN    0
09605  M00S06975.pfm     +++| CCS9     SHN    -6
Line S06976 Modification History
M01 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
09606  M01S06976.253l688 ---|          STD    T7
Line S00241 Modification History
M01 (Added by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
09607  M01S00241.253l688 +++|          STD    T7          SET SECTOR NUMBER
09608  M00S06977.pfm     +++|          STM    EOIA+1
Line S06978 Modification History
M01 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
09609  M01S06978.253l688 ---|          LDD    T6
Line S00242 Modification History
M01 (Added by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
09610  M01S00242.253l688 +++|          STM    EOIFS+3
09611  M01S00243.253l688 +++|          LDD    T6          SET TRACK NUMBER
09612  M00S06979.pfm     +++|          STM    EOIA
Line S00244 Modification History
M01 (Added by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
09613  M01S00244.253l688 +++|          STM    EOIFS+2
09614  M00S06980.pfm     +++|          LDC    EOIB        WRITE EOI
09615  M00S06981.pfm     +++|          RJM    WBI
09616  M00S06982.pfm     +++| CCS10    LJM    CCSX
Line S00037 Modification History
M01 (Added by) pfm40
Seq #  *Modification Id* Act 
----------------------------+
09617  M01S00037.pfm40   +++| CDA      SPACE  4,15
09618  M01S00038.pfm40   +++|**        CDA - COMPARE DISK ADDRESSES.
09619  M01S00039.pfm40   +++|*
09620  M01S00040.pfm40   +++|*         IF THE DISK ADDRESS FOR THE BUFFER MATCHES THE DISK ADDRESS
09621  M01S00041.pfm40   +++|*         FOR THE DIRECT ACCESS HOLE, SET THE END BUFFER POINTERS TO
09622  M01S00042.pfm40   +++|*         MATCH THE BUFFER POINTERS.
09623  M01S00043.pfm40   +++|*
09624  M01S00044.pfm40   +++|*         ENTRY  (A) = BUFFER ADDRESS.
09625  M01S00045.pfm40   +++|*
09626  M01S00046.pfm40   +++|*         EXIT   (A) = 0 IF DISK ADDRESS MATCH.
09627  M01S00047.pfm40   +++|*                (EB) = BUFFER ADDRESS IF DISK ADDRESSES MATCH.
09628  M01S00048.pfm40   +++|*                (EP) = OFFSET IF DISK ADDRESSES MATCH.
09629  M01S00049.pfm40   +++|*
09630  M01S00050.pfm40   +++|*         USES   T3.
09631  M01S00051.pfm40   +++|
09632  M01S00052.pfm40   +++|
09633  M01S00053.pfm40   +++| CDA      SUBR               ENTRY/EXIT
09634  M01S00054.pfm40   +++|          STD    T3          SAVE BUFFER ADDRESS
09635  M01S00055.pfm40   +++|          LDM    DAHP
09636  M01S00056.pfm40   +++|          LMM    -2,T3
09637  M01S00057.pfm40   +++|          NJN    CDAX        IF NOT THE SAME TRACK
09638  M01S00058.pfm40   +++|          LDM    DAHP+1
09639  M01S00059.pfm40   +++|          LMM    -1,T3
09640  M01S00060.pfm40   +++|          NJN    CDAX        IF NOT THE SAME SECTOR
09641  M01S00061.pfm40   +++|          LDD    T3          SET END BUFFER ADDRESS
09642  M01S00062.pfm40   +++|          STD    EB
09643  M01S00063.pfm40   +++|          ADM    DAHP+2
09644  M01S00064.pfm40   +++|          STD    EP
09645  M01S00065.pfm40   +++|          LDN    0           DISK ADDRESS MATCH
09646  M01S00066.pfm40   +++|          UJN    CDAX        RETURN
Line S00030 Modification History
M01 (Added by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
09647  M01S00030.pfm54   +++| CIA      SPACE  4,30
09648  M01S00031.pfm54   +++|**        CIA - CLEAR INDIRECT ALLOCATION INTERLOCK.
09649  M01S00032.pfm54   +++|*
09650  M01S00033.pfm54   +++|*         THE INTERLOCK IS NOT CLEARED AT THIS TIME WHEN EXTENDING
09651  M01S00034.pfm54   +++|*         THE INDIRECT CHAIN ON A BUFFERED DEVICE; THE INTERLOCK IS
09652  M01S00035.pfm54   +++|*         HELD THROUGHOUT THE TRANSFER.  THIS IS DONE FOR THE FOLLOWING
09653  M01S00036.pfm54   +++|*         REASON:  SINCE ANY REQUEST TO WRITE TO NEWLY ALLOCATED SPACE
09654  M01S00037.pfm54   +++|*         ON A BUFFERED DEVICE MUST BE DONE BY SEQUENTIAL (NON-REWRITE)
09655  M01S00038.pfm54   +++|*         REQUESTS, ALL EXTENSIONS OF THE INDIRECT CHAIN ARE PERFORMED
09656  M01S00039.pfm54   +++|*         WITH SEQUENTIAL WRITES.  HOWEVER, THIS MEANS THAT TWO OR MORE
09657  M01S00040.pfm54   +++|*         COPIES OF *PFM* CANNOT BE ALLOWED TO PERFORM SUCH EXTENSIONS
09658  M01S00041.pfm54   +++|*         AT THE SAME TIME, SINCE ONE *PFM* MIGHT THEN DO A
09659  M01S00042.pfm54   +++|*         SEQUENTIAL WRITE INTO A PHYSICAL SECTOR PREVIOUSLY WRITTEN
09660  M01S00043.pfm54   +++|*         BY ANOTHER *PFM*, WHICH MAY DESTROY THE DATA WRITTEN BY
09661  M01S00044.pfm54   +++|*         THAT OTHER *PFM*.  NOTE THAT THE INTERLOCK MUST ALSO BE
09662  M01S00045.pfm54   +++|*         HELD THROUGHOUT THE TRANSFER FOR *CPUPFM* TRANSFERS, SINCE
09663  M01S00046.pfm54   +++|*         FOR SEQUENTIAL WRITES *1MS*/*CPUMTR* WILL CHANGE THE VALUE
09664  M01S00047.pfm54   +++|*         OF THE EOI IN THE TRT DURING THE TRANSFER, AND WILL NOT SET
09665  M01S00048.pfm54   +++|*         THE FINAL VALUE OF THE EOI UNTIL THE TRANSFER IS COMPLETE.
09666  M01S00049.pfm54   +++|*
09667  M01S00050.pfm54   +++|*         ENTRY  (EQ) = MASTER DEVICE EST ORDINAL.
09668  M01S00051.pfm54   +++|*                (DVLW) = FIRST TRACK OF INDIRECT CHAIN.
09669  M01S00052.pfm54   +++|*
09670  M01S00053.pfm54   +++|*         EXIT   INDIRECT ALLOCATION INTERLOCK CLEARED.
09671  M01S00054.pfm54   +++|*                (IAIF) CLEARED.
09672  M01S00055.pfm54   +++|*
09673  M01S00056.pfm54   +++|*         USES   T5, T6.
09674  M01S00057.pfm54   +++|*
09675  M01S00058.pfm54   +++|*         CALLS  CTI.
09676  M01S00059.pfm54   +++|*
09677  M01S00060.pfm54   +++|*         MACROS ENDMS.
09678  M01S00061.pfm54   +++|
09679  M01S00062.pfm54   +++|
09680  M01S00063.pfm54   +++| CIA      SUBR               ENTRY/EXIT
09681  M01S00064.pfm54   +++|          ENDMS
09682  M01S00065.pfm54   +++|          LDM    STAT
09683  M01S00066.pfm54   +++|          LPC    STBD+STXC
09684  M01S00067.pfm54   +++|          LMC    STBD+STXC
09685  M01S00068.pfm54   +++|          ZJN    CIAX        IF EXTENDING CHAIN ON BUFFERED DEVICE
09686  M01S00069.pfm54   +++|          LDD    EQ
09687  M01S00070.pfm54   +++|          STD    T5
09688  M01S00071.pfm54   +++|          LDM    STAT
09689  M01S00072.pfm54   +++|          LPC    STXC
09690  M01S00073.pfm54   +++|          ZJN    CIA1        IF NOT EXTENDING CHAIN
09691  M01S00074.pfm54   +++|          RAD    T5          SET CHECKPOINT BIT
09692  M01S00075.pfm54   +++|          ERRNZ  STXC-4000   CODE DEPENDS ON VALUE
09693  M01S00076.pfm54   +++| CIA1     LDM    DVLW        CLEAR INTERLOCK
09694  M01S00077.pfm54   +++|          STD    T6
09695  M01S00078.pfm54   +++|          RJM    CTI
09696  M01S00079.pfm54   +++|          LDD    EQ
09697  M01S00080.pfm54   +++|          STD    T5
09698  M01S00081.pfm54   +++|          LDN    0           CLEAR FLAG
09699  M01S00082.pfm54   +++|          STM    IAIF
09700  M01S00083.pfm54   +++|          UJN    CIAX        RETURN
09701  M00S06983.pfm     +++| DCE      SPACE  4,30
09702  M00S06984.pfm     +++|**        DCE - DELETE CATALOG ENTRY.
09703  M00S06985.pfm     +++|*
09704  M00S06986.pfm     +++|*         DELETE CATALOG ENTRY FOR INDIRECT ACCESS FILE.
09705  M00S06987.pfm     +++|*         DETERMINE IF SPACE CAN BE RELEASED AND RELEASE IF REQUESTED.
09706  M00S06988.pfm     +++|*
09707  M00S06989.pfm     +++|*         ENTRY  (CB) = BUFFER ADDRESS.
09708  M00S06990.pfm     +++|*                (CI) = POINTER TO CATALOG ENTRY.
Line S06991 Modification History
M01 (Removed by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
09709  M01S06991.pfm54   ---|*                MASTER DEVICE CHANNEL RESERVED.
09710  M00S06992.pfm     +++|*                (DCEC) = PRESET TO *PSN* FOR *APPEND* REQUEST.
09711  M00S06993.pfm     +++|*                (DCED) = PRESET TO *PSN* FOR *APPEND* REQUEST.
Line S06994 Modification History
M01 (Removed by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
09712  M01S06994.pfm54   ---|*                (DVLW - DVLW+4) = DEVICE LAYOUT WORD OF MST.
Line S00084 Modification History
M01 (Added by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
09713  M01S00084.pfm54   +++|*                INDIRECT ALLOCATION INTERLOCK SET.
09714  M00S06995.pfm     +++|*
09715  M00S06996.pfm     +++|*         EXIT   ENTRY DELETED IN CATALOG SECTOR.
09716  M00S06997.pfm     +++|*                (A) = 0     IF NO DELINK POSSIBLE.
09717  M00S06998.pfm     +++|*                (A) = 1     IF DELINK POSSIBLE.
Line S00786 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
09718  M01S00786.242l642 +++|*                            CATALOG BUFFER REWRITTEN IF NOT *APPEND*
09719  M01S00787.242l642 +++|*                            REQUEST.
09720  M00S06999.pfm     +++|*                (A) = 2     IF FILE AT END OF CHAIN.
Line S00788 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
09721  M01S00788.242l642 +++|*                            CATALOG BUFFER REWRITTEN IF NOT *APPEND*
09722  M01S00789.242l642 +++|*                            REQUEST.
09723  M00S07000.pfm     +++|*                DELINK REQUEST SAVED AT *APDK* IF DELINK POSSIBLE FOR
Line S07001 Modification History
M01 (Removed by) ns2415
Seq #  *Modification Id* Act 
----------------------------+
09724  M01S07001.ns2415  ---|*                AN APPEND OPERATION.
09725  M01S07002.ns2415  ---|*                DATA CHAIN INTERLOCKED IF APPEND COMMAND AND
09726  M01S07003.ns2415  ---|*                FILE AT END OF CHAIN.
Line S00098 Modification History
M01 (Added by) ns2415
Seq #  *Modification Id* Act 
----------------------------+
09727  M01S00098.ns2415  +++|*                  AN APPEND OPERATION.
Line S00099 Modification History
M01 (Added by) ns2415
M02 (Removed by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
09728  M02S00099.pfm54   ---|*                INDIRECT CHAIN INTERLOCKED IF APPEND COMMAND AND
09729  M02S00100.pfm54   ---|*                  FILE AT END OF CHAIN.
09730  M02S00101.pfm54   ---|*                TO *HNG* IF INDIRECT CHAIN NOT RESERVED.
09731  M00S07004.pfm     +++|*
09732  M00S07005.pfm     +++|*         USES   P0, P1, P2, P3, T1, T2, T3, T4, T6, T7, CM - CM+4.
09733  M00S07006.pfm     +++|*
Line S07007 Modification History
M01 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
09734  M01S07007.242l642 ---|*         CALLS  CAI, CTI, DTK, ITC, SNT.
Line S00790 Modification History
M01 (Added by) 242l642
M02 (Removed by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
09735  M02S00790.pfm54   ---|*         CALLS  CAI, CTI, DTK, ITC, SNT, WBI.
Line S00085 Modification History
M01 (Added by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
09736  M01S00085.pfm54   +++|*         CALLS  DTK, SNT, WBI.
09737  M00S07008.pfm     +++|*
Line S07009 Modification History
M01 (Removed by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
09738  M01S07009.pfm54   ---|*         MACROS ENDMS.
Line S00086 Modification History
M01 (Added by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
09739  M01S00086.pfm54   +++|*         MACROS ENDMS, MONITOR.
09740  M00S07010.pfm     +++|
09741  M00S07011.pfm     +++|
Line S00102 Modification History
M01 (Added by) ns2415
M02 (Removed by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
09742  M02S00102.pfm54   ---| DCE16    RJM    HNG         HANG IF INDIRECT CHAIN NOT RESERVED
09743  M02S00103.pfm54   ---|
09744  M00S07012.pfm     +++| DCE      SUBR               ENTRY/EXIT
Line S07013 Modification History
M01 (Removed by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
09745  M01S07013.pfm54   ---|          ENDMS              RELEASE CHANNEL
09746  M00S07014.pfm     +++|          LDM    IAIF
Line S07015 Modification History
M01 (Removed by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
09747  M01S07015.pfm54   ---|          NJN    DCE0        IF INDIRECT ALLOCATION ALREADY INTERLOCKED
09748  M01S07016.pfm54   ---|          LDM    DVLW        INTERLOCK DATA CHAIN
09749  M01S07017.pfm54   ---|          RJM    ITC
Line S00104 Modification History
M01 (Added by) ns2415
M02 (Removed by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
09750  M02S00104.pfm54   ---|          NJN    DCE16       IF INTERLOCK NOT SUCCESSFUL
Line S07018 Modification History
M01 (Removed by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
09751  M01S07018.pfm54   ---|          AOM    IAIF        SET INDIRECT ALLOCATION INTERLOCK FLAG
Line S00087 Modification History
M01 (Added by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
09752  M01S00087.pfm54   +++|          NJN    DCE0        IF ALLOCATION INTERLOCK SET
09753  M01S00088.pfm54   +++|          RJM    HNG         HANG
09754  M00S07019.pfm     +++|
Line S07020 Modification History
M01 (Removed by) pfm59
Seq #  *Modification Id* Act 
----------------------------+
09755  M01S07020.pfm59   ---|*         CHECK FOR POSIBILITY OF TRACK DELINK.
Line S00008 Modification History
M01 (Added by) pfm59
Seq #  *Modification Id* Act 
----------------------------+
09756  M01S00008.pfm59   +++|*         SET CATALOG ENTRY AS HOLE.
09757  M00S07021.pfm     +++|
09758  M00S07022.pfm     +++| DCE0     LDM    FCLF+1,CI   SET LENGTH OF HOLE
09759  M00S07023.pfm     +++|          ADN    2           ACCOUNT FOR SYSTEM SECTOR AND EOI
09760  M00S07024.pfm     +++|          STD    P1
09761  M00S07025.pfm     +++|          SHN    -14
09762  M00S07026.pfm     +++|          ADM    FCLF,CI
09763  M00S07027.pfm     +++|          STD    P0
09764  M00S07028.pfm     +++|          LDM    FCBS,CI     SET START OF HOLE
09765  M00S07029.pfm     +++|          STD    T7
09766  M00S07030.pfm     +++|          LDN    0           CLEAR TRACK COUNT
09767  M00S07031.pfm     +++|          STD    T3
09768  M00S07032.pfm     +++|          STM    FCUI+1,CI   SET ENTRY AS HOLE
09769  M00S07033.pfm     +++|          LDM    FCUI,CI
09770  M00S07034.pfm     +++|          SCN    77
09771  M00S07035.pfm     +++|          STM    FCUI,CI
09772  M00S07036.pfm     +++|          LDD    CI          SET CONTROL MODIFICATION DATE IN HOLE
09773  M00S07037.pfm     +++|          RAM    DCEB
09774  M00S07038.pfm     +++|          LDN    PDTL
09775  M00S07039.pfm     +++|          CRM    FCKD-2,ON
09776  M00S07040.pfm     +++| DCEB     EQU    *-1         (ADDRESS OF DATE WITHIN BUFFER)
09777  M00S07041.pfm     +++|          LDM    FCBT,CI
Line S00009 Modification History
M01 (Added by) pfm59
Seq #  *Modification Id* Act 
----------------------------+
09778  M01S00009.pfm59   +++|          NJN    DCE1        IF FILE IS DISK RESIDENT
09779  M01S00010.pfm59   +++|          LDC    4000        SET AS DAPF HOLE
09780  M01S00011.pfm59   +++|          STM    FCBS,CI
09781  M01S00012.pfm59   +++|          LJM    DCE15       EXIT
09782  M01S00013.pfm59   +++|
09783  M01S00014.pfm59   +++|*         CHECK FOR POSSIBILITY OF TRACK DELINK.
09784  M01S00015.pfm59   +++|
09785  M00S07042.pfm     +++| DCE1     STD    T6          SET CURRENT TRACK
09786  M00S07043.pfm     +++|          RJM    SNT         SET NEXT TRACK
09787  M00S07044.pfm     +++|          STD    T1
09788  M00S07045.pfm     +++|          SHN    6
09789  M00S07046.pfm     +++|          PJN    DCE5        IF END OF TRACK CHAIN
09790  M00S07047.pfm     +++|          LDM    SLM
09791  M00S07048.pfm     +++|          SBD    T7
09792  M00S07049.pfm     +++|          STD    T2          SAVE SECTOR COUNT FOR THIS TRACK
09793  M00S07050.pfm     +++|          LDD    P1          DECREMENT REMAINING HOLE BY SECTOR COUNT
09794  M00S07051.pfm     +++|          SBD    T2
09795  M00S07052.pfm     +++|          STD    T0          SAVE RESULT
09796  M00S07053.pfm     +++|          PJN    DCE4        IF NOT END OF HOLE
09797  M00S07054.pfm     +++|          SOD    P0
09798  M00S07055.pfm     +++|          PJN    DCE3        IF NOT END OF HOLE
09799  M00S07056.pfm     +++| DCE2     LJM    DCE10       PROCESS END OF HOLE
09800  M00S07057.pfm     +++|
09801  M00S07058.pfm     +++| DCE3     AOD    T0          RESTORE RESULT
09802  M00S07059.pfm     +++| DCE4     STD    P1
09803  M00S07060.pfm     +++|          AOD    T3          ADVANCE TRACK COUNT
09804  M00S07061.pfm     +++|          LDN    0           SET FIRST SECTOR
09805  M00S07062.pfm     +++|          STD    T7
09806  M00S07063.pfm     +++|          LDD    P2          SAVE PREVIOUS TRACK
09807  M00S07064.pfm     +++|          STD    P3
09808  M00S07065.pfm     +++|          LDD    T6          SAVE LAST TRACK
09809  M00S07066.pfm     +++|          STD    P2
09810  M00S07067.pfm     +++|          LDD    T1
09811  M00S07068.pfm     +++|          UJN    DCE1        LOOP FOR NEXT TRACK
09812  M00S07069.pfm     +++|
09813  M00S07070.pfm     +++|*         END OF CHAIN ENCOUNTERED.
09814  M00S07071.pfm     +++|
09815  M00S07072.pfm     +++| DCE5     LDD    P0
09816  M00S07073.pfm     +++|          SHN    14
09817  M00S07074.pfm     +++|          ADD    P1
09818  M00S07075.pfm     +++|          ADD    T7
09819  M00S07076.pfm     +++|          SBD    T1
09820  M00S07077.pfm     +++|          SBN    1
09821  M00S07078.pfm     +++|          NJN    DCE2        IF NOT LAST FILE ON CHAIN
09822  M00S07079.pfm     +++|          LDN    2           FLAG END OF CHAIN
09823  M00S07080.pfm     +++|          RAM    DCEA
09824  M00S07081.pfm     +++| DCEC     UJN    DCE6        NOT APPEND COMMAND
09825  M00S07082.pfm     +++|*         PSN                (*APPEND* REQUEST)
09826  M00S07083.pfm     +++|          LJM    DCE15       EXIT BACK TO APPEND PROCESSING
09827  M00S07084.pfm     +++|
Line S07085 Modification History
M01 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
09828  M01S07085.242l642 ---| DCE6     LDM    FCBT,CI     SET FIRST TRACK
09829  M01S07086.242l642 ---|          STD    T6
09830  M01S07087.242l642 ---|          LDM    FCBS,CI
09831  M01S07088.242l642 ---|          ZJN    DCE8        IF FILE STARTS AT SECTOR 0
Line S00791 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
09832  M01S00791.242l642 +++| DCE6     LDM    FCBS,CI
09833  M01S00792.242l642 +++|          ZJN    DCE7        IF FILE STARTS AT SECTOR 0
09834  M00S07089.pfm     +++|          SBN    1
Line S07090 Modification History
M01 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
09835  M01S07090.242l642 ---|          RJM    DTK         DROP TRACK CHAIN
Line S00793 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
09836  M01S00793.242l642 +++|          STD    P1
09837  M00S07091.pfm     +++|          LCN    0           SET AS NULL HOLE
09838  M00S07092.pfm     +++|          STM    FCBS,CI     SET AS NULL HOLE (DELETED DA FILE)
Line S07093 Modification History
M01 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
09839  M01S07093.242l642 ---| DCE7     LJM    DCE13       COMPLETE PROCESSING
Line S00794 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
09840  M01S00794.242l642 +++|          UJN    DCE8        REWRITE CATALOG ENTRY
09841  M00S07094.pfm     +++|
Line S07095 Modification History
M01 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
09842  M01S07095.242l642 ---| DCE8     STM    FCLF,CI     SET HOLE LENGTH
Line S00795 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
09843  M01S00795.242l642 +++| DCE7     STM    FCLF,CI     SET HOLE LENGTH
Line S07096 Modification History
M01 (Removed by) ns2273
Seq #  *Modification Id* Act 
----------------------------+
09844  M01S07096.ns2273  ---|          LDN    MNHS-2      LEAVE MINIMUM-SIZE HOLE
Line S00003 Modification History
M01 (Added by) ns2273
Seq #  *Modification Id* Act 
----------------------------+
09845  M01S00003.ns2273  +++|          LDK    MNHS-2      LEAVE MINIMUM-SIZE HOLE
09846  M00S07097.pfm     +++|          STM    FCLF+1,CI
09847  M00S07098.pfm     +++|          ADN    1
Line S07099 Modification History
M01 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
09848  M01S07099.242l642 ---|          RJM    DTK         DROP REMAINDER OF TRACK CHAIN
09849  M01S07100.242l642 ---|          UJN    DCE7        COMPLETE PROCESSING
Line S00796 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
09850  M01S00796.242l642 +++|          STD    P1
09851  M01S00797.242l642 +++| DCE8     LDD    CB          REWRITE CATALOG ENTRY
09852  M01S00798.242l642 +++|          RJM    WBI
09853  M01S00799.242l642 +++|          ENDMS
09854  M01S00800.242l642 +++|          LDM    FCBT,CI     SET FIRST TRACK
09855  M01S00801.242l642 +++|          STD    T6
09856  M01S00802.242l642 +++|          LDD    P1          LAST SECTOR WRITTEN
09857  M01S00803.242l642 +++|          RJM    DTK         DROP TRACK CHAIN
Line S00804 Modification History
M01 (Added by) 242l642
M02 (Removed by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
09858  M02S00804.pfm54   ---|          LJM    DCE13       COMPLETE PROCESSING
Line S00089 Modification History
M01 (Added by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
09859  M01S00089.pfm54   +++|          LJM    DCE15       EXIT
09860  M00S07101.pfm     +++|
09861  M00S07102.pfm     +++| DCE9     SOD    T3          DELINK ONE LESS TRACK
09862  M00S07103.pfm     +++|          LDD    P2          SET TRACK TO LINK TO
09863  M00S07104.pfm     +++|          STD    T6
09864  M00S07105.pfm     +++|          LDD    P3          SET LAST TRACK TO DELINK
09865  M00S07106.pfm     +++|          STD    P2
09866  M00S07107.pfm     +++|          LDM    SLM         ADJUST REMAINING LENGTH OF HOLE
09867  M00S07108.pfm     +++|          RAD    P1
09868  M00S07109.pfm     +++|
09869  M00S07110.pfm     +++|*         END OF HOLE ENCOUNTERED.
09870  M00S07111.pfm     +++|
09871  M00S07112.pfm     +++| DCE10    UJN    DCE11       NOT *APPEND*
09872  M00S07113.pfm     +++|*         PSN                (*APPEND* REQUEST)
09873  M00S07114.pfm     +++| DCEE     EQU    *-1
09874  M00S07115.pfm     +++|          LDM    CPTF
09875  M00S07116.pfm     +++|          ZJN    DCE11       IF NOT CPU TRANSFER
09876  M00S07117.pfm     +++|          LDC    IFUI        SET INDIRECT FLAW USER INDEX IN OLD PFC
09877  M00S07118.pfm     +++|          STM    FCUI+1,CI
09878  M00S07119.pfm     +++|          SHN    -14
09879  M00S07120.pfm     +++|          RAM    FCUI,CI
Line S07121 Modification History
M01 (Removed by) ns2311
Seq #  *Modification Id* Act 
----------------------------+
09880  M01S07121.ns2311  ---|          LJM    DCE14       CLEAR ALLOCATION INTERLOCK
Line S00008 Modification History
M01 (Added by) ns2311
M02 (Removed by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
09881  M02S00008.pfm54   ---| DCE10.1  LJM    DCE14       CLEAR ALLOCATION INTERLOCK
Line S00090 Modification History
M01 (Added by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
09882  M01S00090.pfm54   +++| DCE10.1  LJM    DCE15       EXIT
09883  M00S07122.pfm     +++|
09884  M00S07123.pfm     +++| DCE11    LDD    T3          CHECK TRACK COUNT
09885  M00S07124.pfm     +++|          SBN    2
Line S07125 Modification History
M01 (Removed by) ns2311
Seq #  *Modification Id* Act 
----------------------------+
09886  M01S07125.ns2311  ---|          MJP    DCE14       IF NO TRACKS TO DELINK
Line S00009 Modification History
M01 (Added by) ns2311
Seq #  *Modification Id* Act 
----------------------------+
09887  M01S00009.ns2311  +++|          MJN    DCE10.1     IF NO TRACKS TO DELINK
09888  M00S07126.pfm     +++|          LDM    FCBT,CI     SET NEW HOLE
09889  M00S07127.pfm     +++|          LPC    3777
09890  M00S07128.pfm     +++|          STD    CM+2
09891  M00S07129.pfm     +++|          LDM    SLM
09892  M00S07130.pfm     +++|          SBM    FCBS,CI
09893  M00S07131.pfm     +++|          ADD    P1
Line S07132 Modification History
M01 (Removed by) ns2273
Seq #  *Modification Id* Act 
----------------------------+
09894  M01S07132.ns2273  ---|          SBN    MNHS
Line S00004 Modification History
M01 (Added by) ns2273
Seq #  *Modification Id* Act 
----------------------------+
09895  M01S00004.ns2273  +++|          SBK    MNHS
09896  M00S07133.pfm     +++|          MJP    DCE9        IF NEW HOLE SHORTER THAN MINIMUM LENGTH
Line S07134 Modification History
M01 (Removed by) ns2273
Seq #  *Modification Id* Act 
----------------------------+
09897  M01S07134.ns2273  ---|          ADN    MNHS-2      SET LENGTH OF NEW HOLE
Line S00005 Modification History
M01 (Added by) ns2273
Seq #  *Modification Id* Act 
----------------------------+
09898  M01S00005.ns2273  +++|          ADK    MNHS-2      SET LENGTH OF NEW HOLE
09899  M00S07135.pfm     +++|          STM    FCLF+1,CI
Line S00001 Modification History
M01 (Added by) pfm44
Seq #  *Modification Id* Act 
----------------------------+
09900  M01S00001.pfm44   +++|          LDN    0
09901  M01S00002.pfm44   +++|          STM    FCLF,CI
09902  M00S07136.pfm     +++|          AOM    DCEA        SET DELINK POSSIBLE
09903  M00S07137.pfm     +++|          LDD    T5          SET CALL TO DELINK
Line S00091 Modification History
M01 (Added by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
09904  M01S00091.pfm54   +++|          ADC    4000        SET CHECKPOINT BIT
09905  M00S07138.pfm     +++|          STD    CM+1
09906  M00S07139.pfm     +++|          LDD    T6          SET NEXT TRACK IN CHAIN
09907  M00S07140.pfm     +++|          STD    CM+3
09908  M00S07141.pfm     +++|          LDD    P2          SET LAST TRACK TO RELEASE
09909  M00S07142.pfm     +++|          STD    CM+4
Line S07143 Modification History
M01 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
09910  M01S07143.242l642 ---| DCED     UJN    DCE12       NOT APPEND
09911  M01S07144.242l642 ---|*         PSN                (*APPEND* REQUEST)
09912  M00S07145.pfm     +++|          LDD    MA
09913  M00S07146.pfm     +++|          CWD    CM
09914  M00S07147.pfm     +++|          CRM    APDK,ON     SAVE DELINK REQUEST
Line S00805 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
09915  M01S00805.242l642 +++| DCED     UJN    DCE12       REWRITE CATALOG ENTRY
09916  M01S00806.242l642 +++|*         PSN                (*APPEND* REQUEST)
Line S07148 Modification History
M01 (Removed by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
09917  M01S07148.pfm54   ---|          UJN    DCE13       CLEAR DATA CHAIN INTERLOCK
Line S00092 Modification History
M01 (Added by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
09918  M01S00092.pfm54   +++|          UJN    DCE15       EXIT
09919  M00S07149.pfm     +++|
Line S07150 Modification History
M01 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
09920  M01S07150.242l642 ---| DCE12    MONITOR DLKM
Line S00807 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
09921  M01S00807.242l642 +++| DCE12    LDD    CB          REWRITE CATALOG ENTRY
09922  M01S00808.242l642 +++|          RJM    WBI
09923  M01S00809.242l642 +++|          ENDMS
09924  M01S00810.242l642 +++|          LDD    MA
09925  M01S00811.242l642 +++|          CWM    APDK,ON
09926  M01S00812.242l642 +++|          SBN    1
09927  M01S00813.242l642 +++|          CRD    CM
09928  M01S00814.242l642 +++|          MONITOR  DLKM      DELINK TRACKS
Line S07151 Modification History
M01 (Removed by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
09929  M01S07151.pfm54   ---| DCE13    LDC    4000        SET CHECKPOINT REQUEST
09930  M01S07152.pfm54   ---|          RAD    T5
Line S07153 Modification History
M01 (Removed by) ns2311
M02 (Removed by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
09931  M02S07153.pfm54   ---| DCE14    LDM    DVLW        CLEAR ALLOCATION INTERLOCK
Line S00010 Modification History
M01 (Added by) ns2311
M02 (Removed by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
09932  M02S00010.pfm54   ---| DCE14    LDN    0
09933  M02S00011.pfm54   ---|*         LDN    1           (EXTENDING CHAIN ON BUFFERED DEVICE)
09934  M02S00012.pfm54   ---| DCEF     EQU    *-1
09935  M02S00013.pfm54   ---|          NJN    DCE14.1     IF EXTENDING CHAIN ON BUFFERED DEVICE
09936  M02S00014.pfm54   ---|          LDM    DVLW
Line S07154 Modification History
M01 (Removed by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
09937  M01S07154.pfm54   ---|          RJM    CTI
09938  M01S07155.pfm54   ---|          LDN    0           CLEAR INDIRECT ALLOCATION INTERLOCK FLAG
09939  M01S07156.pfm54   ---|          STM    IAIF
Line S07157 Modification History
M01 (Removed by) ns2311
M02 (Removed by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
09940  M02S07157.pfm54   ---|          LDD    T5
Line S00015 Modification History
M01 (Added by) ns2311
M02 (Removed by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
09941  M02S00015.pfm54   ---| DCE14.1  LDD    T5          CLEAR CHECKPOINT BIT
Line S07158 Modification History
M01 (Removed by) pfm54
Seq #  *Modification Id* Act 
----------------------------+
09942  M01S07158.pfm54   ---|          LPC    777
09943  M01S07159.pfm54   ---|          STD    T5
09944  M00S07160.pfm     +++| DCE15    LDN    0           SET EXIT CONDITION
09945  M00S07161.pfm     +++|*         LDN    1           (DELINK POSSIBLE)
09946  M00S07162.pfm     +++|*         LDN    2           (FILE AT END OF CHAIN)
09947  M00S07163.pfm     +++| DCEA     EQU    *-1
09948  M00S07164.pfm     +++|          LJM    DCEX        RETURN
09949  M00S07165.pfm     +++| FCE      SPACE  4,15
09950  M00S07166.pfm     +++|**        FCE - FORM CATALOG ENTRY.
09951  M00S07167.pfm     +++|*
09952  M00S07168.pfm     +++|*         ENTRY  (A) = LOCATION OF ENTRY WITHIN BUFFER.
09953  M00S07169.pfm     +++|*                (FN - FN+3) = PERMANENT FILE NAME.
09954  M00S07170.pfm     +++|*                (LF - LF+1) = LENGTH OF FILE IN SECTORS.
09955  M00S07171.pfm     +++|*                (FCEG) = PRESET TO *PSN* FOR USER CONTROL WORD UPDATE.
09956  M00S07172.pfm     +++|*                (FCEH) = PRESET TO *PSN* IF PASSWORD SPECIFIED.
09957  M00S07173.pfm     +++|*                (SDAB) = STARTING TRACK ADDRESS.
09958  M00S07174.pfm     +++|*                (SDAC) = STARTING SECTOR ADDRESS.
09959  M00S07175.pfm     +++|*                (CI) = INDEX TO OLD CATALOG ENTRY.
09960  M00S07176.pfm     +++|*
09961  M00S07177.pfm     +++|*         EXIT   CATALOG ENTRY REFORMED IN BUFFER.
09962  M00S07178.pfm     +++|*                WORD COUNT OF SECTOR ADVANCED IF NOT A HOLE PLUG.
09963  M00S07179.pfm     +++|*                (PFCA) = ADDRESS OF NEW CATALOG ENTRY.
09964  M00S07180.pfm     +++|*
09965  M00S07181.pfm     +++|*         USES   EP, P0, CM - CM+4, FN - FN+3, T0 - T3, UI - UI+1,
09966  M00S07182.pfm     +++|*                LF - LF+1.
09967  M00S07183.pfm     +++|*
09968  M00S07184.pfm     +++|*         NOTE   THE SYMBOLS *FCEC*, *FCEF* AND *FCEO* SHOULD NOT BE
09969  M00S07185.pfm     +++|*                USED FOR DATA TAGS IN THIS ROUTINE, SINCE THEY
09970  M00S07186.pfm     +++|*                CONFLICT WITH THE GLOBAL CATALOG SYMBOL DEFINITIONS.
09971  M00S07187.pfm     +++|
09972  M00S07188.pfm     +++|
09973  M00S07189.pfm     +++| FCE      SUBR               ENTRY/EXIT
09974  M00S07190.pfm     +++|          STD    T1          ADDRESS OF CATALOG ENTRY
09975  M00S07191.pfm     +++|          STM    PFCA
09976  M00S07192.pfm     +++|          STM    FCEA        SET ADDRESS OF FILE NAME
09977  M00S07193.pfm     +++|          STD    T2          SET ADDRESS FOR CLEARING OF CATALOG ENTRY
09978  M00S07194.pfm     +++|          ADC    FCCW        SET ADDRESS OF USER CONTROL WORD
09979  M00S07195.pfm     +++|          STM    FCEB
09980  M00S07196.pfm     +++|          STM    FCED
09981  M00S07197.pfm     +++|          LDD    T1
09982  M00S07198.pfm     +++|          LMD    CI
09983  M00S07199.pfm     +++|          ZJN    FCE2        IF REPLACING SAME CATALOG ENTRY
09984  M00S07200.pfm     +++|
09985  M00S07201.pfm     +++|*         CLEAR CATALOG ENTRY BUFFER.
09986  M00S07202.pfm     +++|
09987  M00S07203.pfm     +++|          LDC    NWCE*5      CLEAR EXISTING CATALOG ENTRY
09988  M00S07204.pfm     +++|          STD    T3
09989  M00S07205.pfm     +++| FCE1     LDN    0
09990  M00S07206.pfm     +++|          STI    T2
09991  M00S07207.pfm     +++|          AOD    T2
09992  M00S07208.pfm     +++|          SOD    T3
09993  M00S07209.pfm     +++|          NJN    FCE1        IF MORE CATALOG TO CLEAR
09994  M00S07210.pfm     +++|
09995  M00S07211.pfm     +++|*         TRANSFER DATA INTO NEW CATALOG ENTRY.
09996  M00S07212.pfm     +++|
09997  M00S07213.pfm     +++| FCE2     LDD    MA          SET NEW FILE NAME
09998  M00S07214.pfm     +++|          CWD    FN
09999  M00S07215.pfm     +++|          CRM    *,ON
10000  M00S07216.pfm     +++| FCEA     EQU    *-1
10001  M00S07217.pfm     +++|          LDM    FCUI,T1     SET USER INDEX IN CATALOG ENTRY
10002  M00S07218.pfm     +++|          SCN    77
10003  M00S07219.pfm     +++|          ADD    UI          USER INDEX FIRST BYTE
10004  M00S07220.pfm     +++|          STM    FCUI,T1
10005  M00S07221.pfm     +++|          LDD    UI+1
10006  M00S07222.pfm     +++|          STM    FCUI+1,T1
10007  M00S07223.pfm     +++|          LDM    SDAB        SET BEGINNING TRACK AND SECTOR
10008  M00S07224.pfm     +++|          STM    FCBT,T1
10009  M00S07225.pfm     +++|          LDM    SDAC
10010  M00S07226.pfm     +++|          STM    FCBS,T1
10011  M00S07227.pfm     +++|          LDD    LF          SET LENGTH OF FILE
10012  M00S07228.pfm     +++|          STM    FCLF,T1
10013  M00S07229.pfm     +++|          LDD    LF+1
10014  M00S07230.pfm     +++|          STM    FCLF+1,T1
10015  M00S07231.pfm     +++|          LDN    PDTL        READ PACKED DATE AND TIME
10016  M00S07232.pfm     +++|          CRD    CM
10017  M00S07233.pfm     +++|          LDD    T1          SET TRANSFER OF OLD CATALOG
10018  M00S07234.pfm     +++|          ADN    FCRI
10019  M00S07235.pfm     +++|          STD    T2
10020  M00S07236.pfm     +++|          LDD    CI
10021  M00S07237.pfm     +++|          ZJN    FCE5        IF NO PRIOR FILE
10022  M00S07238.pfm     +++|          ADN    FCRI
10023  M00S07239.pfm     +++|          STD    T3
10024  M00S07240.pfm     +++|          LMD    T2
10025  M00S07241.pfm     +++|          ZJN    FCE4        IF SAME CATALOG ENTRY
10026  M00S07242.pfm     +++| FCE3     LDI    T3          TRANSFER OLD CATALOG DATA
10027  M00S07243.pfm     +++|          STI    T2
10028  M00S07244.pfm     +++|          AOD    T3
10029  M00S07245.pfm     +++|          AOD    T2
10030  M00S07246.pfm     +++|          ADC    -NWCE*5
10031  M00S07247.pfm     +++|          LMD    T1
10032  M00S07248.pfm     +++|          NJN    FCE3        IF MORE CATALOG TO TRANSFER
10033  M00S07249.pfm     +++| FCE4     LDM    FCEC,T1     CLEAR ERROR CODES FROM OLD FILE
10034  M00S07250.pfm     +++|          LPN    77
10035  M00S07251.pfm     +++|          STM    FCEC,T1
10036  M00S07252.pfm     +++|          LDC    UJNI+FCE7-FCEI  DO NOT UPDATE FCCD OR FCKD
10037  M00S07253.pfm     +++|          STM    FCEI
10038  M00S07254.pfm     +++| FCEG     UJN    FCE5        BYPASS USER CONTROL WORD UPDATE
10039  M00S07255.pfm     +++|*         PSN                (SET USER CONTROL WORD)
10040  M00S07256.pfm     +++|          LDD    MA          TRANSFER CONTROL WORD VIA MESSAGE BUFFER
Line S07257 Modification History
M01 (Removed by) ns2426
Seq #  *Modification Id* Act 
----------------------------+
10041  M01S07257.ns2426  ---|          CWM    PUCW,ON
Line S00081 Modification History
M01 (Added by) ns2426
M02 (Removed by) 271l750
Seq #  *Modification Id* Act 
----------------------------+
10042  M02S00081.271l750 ---|          CWM    PUCN,ON
Line S00010 Modification History
M01 (Added by) 271l750
Seq #  *Modification Id* Act 
----------------------------+
10043  M01S00010.271l750 +++|          CWM    PUCW,ON
10044  M00S07258.pfm     +++|          SBN    1
10045  M00S07259.pfm     +++|          CRM    *,ON
10046  M00S07260.pfm     +++| FCEB     EQU    *-1
10047  M00S07261.pfm     +++| FCE5     LDN    CM+2        SET TRANSFER ADDRESSES
10048  M00S07262.pfm     +++|*         UJN    FCE7.1      (*DROPIDS* - BYPASS DATE CHANGE)
10049  M00S07263.pfm     +++| FCEL     EQU    *-1
10050  M00S07264.pfm     +++|          STD    T2
10051  M00S07265.pfm     +++|          LDD    T1
10052  M00S07266.pfm     +++|          STD    T3
10053  M00S07267.pfm     +++| FCE6     LDI    T2          TRANSFER DATES
10054  M00S07268.pfm     +++| FCEI     STM    FCCD,T3
10055  M00S07269.pfm     +++|*         UJN    FCE7        (IF EXISTING CATALOG ENTRY)
10056  M00S07270.pfm     +++|          STM    FCKD,T3
10057  M00S07271.pfm     +++| FCE7     STM    FCUD,T3
10058  M00S07272.pfm     +++|          STM    FCAD,T3
10059  M00S07273.pfm     +++|          STM    FCMD,T3
10060  M00S07274.pfm     +++|          AOD    T3
10061  M00S07275.pfm     +++|          AOD    T2
10062  M00S07276.pfm     +++|          LMN    CM+5
10063  M00S07277.pfm     +++|          NJN    FCE6        LOOP TO END OF DATES
10064  M00S07278.pfm     +++|          LDD    CI
10065  M00S07279.pfm     +++|          ZJN    FCE8        IF NOT PREVIOUS FILE
10066  M00S07280.pfm     +++| FCE7.1   LJM    FCEX        RETURN
10067  M00S07281.pfm     +++|
10068  M00S07282.pfm     +++|*         NEW FILE CREATION.
10069  M00S07283.pfm     +++|
10070  M00S07284.pfm     +++| FCE8     LDN    FCPW        SET PASSWORD ADDRESS
10071  M00S07285.pfm     +++|          ADD    T1
10072  M00S07286.pfm     +++|          STM    FCEJ
10073  M00S07287.pfm     +++|          ADN    FCXD-FCPW   SAVE EXPIRATION DATE POINTER
10074  M00S07288.pfm     +++|          STD    T3
10075  M00S07289.pfm     +++|          ADN    FCCN-FCXD   SET CHARGE/PROJECT ADDRESS
10076  M00S07290.pfm     +++|          STM    FCEK
10077  M00S07291.pfm     +++|          LDD    MA          TRANSFER USER CONTROL WORD AND PASSWORD
Line S07292 Modification History
M01 (Removed by) ns2426
Seq #  *Modification Id* Act 
----------------------------+
10078  M01S07292.ns2426  ---|          CWM    PUCW,ON
Line S00082 Modification History
M01 (Added by) ns2426
M02 (Removed by) 271l750
Seq #  *Modification Id* Act 
----------------------------+
10079  M02S00082.271l750 ---|          CWM    PUCN,ON
Line S00011 Modification History
M01 (Added by) 271l750
Seq #  *Modification Id* Act 
----------------------------+
10080  M01S00011.271l750 +++|          CWM    PUCW,ON
10081  M00S07293.pfm     +++|          CWM    PFPW,ON
10082  M00S07294.pfm     +++|          SBN    2
10083  M00S07295.pfm     +++|          CRM    *,ON        SET USER CONTROL WORD
10084  M00S07296.pfm     +++| FCED     EQU    *-1
10085  M00S07297.pfm     +++| FCEH     UJN    FCE9        BYPASS PASSWORD UPDATE
10086  M00S07298.pfm     +++|*         PSN                (SET PASSWORD)
10087  M00S07299.pfm     +++|          CRM    *,ON        SET PASSWORD
10088  M00S07300.pfm     +++| FCEJ     EQU    *-1
10089  M00S07301.pfm     +++|          LDI    T3          SET PASSWORD EXPIRATION DATE
10090  M00S07302.pfm     +++|          SCN    77
10091  M00S07303.pfm     +++|          LMM    PXDT
10092  M00S07304.pfm     +++|          STI    T3
10093  M00S07305.pfm     +++|          LDM    PXDT+1
10094  M00S07306.pfm     +++|          STM    1,T3
10095  M00S07307.pfm     +++| FCE9     LDM    LFAL        SET ACCESS LEVEL AND CATEGORY SET
10096  M00S07308.pfm     +++|          STM    FCAL,T1
10097  M00S07309.pfm     +++|          ERRNZ  FCAL-FCFC+1 CODE DEPENDS ON VALUE
10098  M00S07310.pfm     +++|          LDM    PFFC
10099  M00S07311.pfm     +++|          STM    FCFC,T1
10100  M00S07312.pfm     +++|          LDM    PFFC+1
10101  M00S07313.pfm     +++|          STM    FCFC+1,T1
10102  M00S07314.pfm     +++|          LDM    PFFC+2
10103  M00S07315.pfm     +++|          STM    FCFC+2,T1
10104  M00S07316.pfm     +++|          LDM    MODE        SET CATALOG TYPE AND FILE MODE
10105  M00S07317.pfm     +++|          LPC    3737
10106  M00S07318.pfm     +++|          STM    FCCT,T1
10107  M00S07319.pfm     +++|          LDM    PFSS        SET SS, BR AND PR
10108  M00S07320.pfm     +++|          ERRNZ  PFSS-PFBR   *BR* AND *SS* MUST BE TOGETHER
10109  M00S07321.pfm     +++|          ERRNZ  PFRS-PFBR   *BR* AND *PR* MUST BE TOGETHER
10110  M00S07322.pfm     +++|          STM    FCFS,T1
10111  M00S07323.pfm     +++|          LDM    PFAP        SET ALTERNATE CATLIST PERMISSION
10112  M00S07324.pfm     +++|          LPC    6000
10113  M00S07325.pfm     +++|          STM    FCAP,T1
10114  M00S07326.pfm     +++|          LDC    0           SET DEVICE NUMBER
10115  M00S07327.pfm     +++| FCEE     EQU    *-1
10116  M00S07328.pfm     +++|          STM    FCDN,T1
10117  M00S07329.pfm     +++|          NFA    CHGN        SET EXECUTING CHARGE/PROJECT FROM NFL
10118  M00S07330.pfm     +++|          CRM    *,TR
10119  M00S07331.pfm     +++| FCEK     EQU    *-1
10120  M00S07332.pfm     +++|          ERRNZ  FCP1-FCCN-5 *FCP1* MUST FOLLOW *FCCN*
10121  M00S07333.pfm     +++|          ERRNZ  FCP2-FCCN-12  *FCP2* MUST FOLLOW *FCCN*/*FCP1*
10122  M00S07334.pfm     +++|          ERRNZ  PJ1N-CHGN+1 *PJ1N* MUST BE IMMEDIATELY AFTER *CHGN*
10123  M00S07335.pfm     +++|          ERRNZ  PJ2N-PJ1N+1 *PJ2N* MUST BE IMMEDIATELY AFTER *PJ1N*
10124  M00S07336.pfm     +++|          LJM    FCEX        RETURN
10125  M00S07337.pfm     +++|
10126  M00S07338.pfm     +++|*         TEST RANGE OF GENERATED RELATIVE JUMPS.
10127  M00S07339.pfm     +++|
10128  M00S07340.pfm     +++|          ERRNG  37+FCEI-FCE7
10129  M00S07341.pfm     +++| FHE      SPACE  4,15
10130  M00S07342.pfm     +++|**        FHE - FORM HOLE ENTRY.
10131  M00S07343.pfm     +++|*
10132  M00S07344.pfm     +++|*         ENTRY  (EP) = POINTER IN END BUFFER FOR NEW HOLE ENTRY.
10133  M00S07345.pfm     +++|*                (HL) = SIZE OF NEW HOLE.
10134  M00S07346.pfm     +++|*                (LF - LF+1) = SIZE OF NEW FILE.
10135  M00S07347.pfm     +++|*                (HP) = POINTER TO NEW FILE - PLACED IN PREVIOUS HOLE.
10136  M00S07348.pfm     +++|*                CATALOG ENTRY CONTAINS POINTER TO NEW FILE.
10137  M00S07349.pfm     +++|*
10138  M00S07350.pfm     +++|*         EXIT   NEW HOLE FORMED IN END BUFFER.
10139  M00S07351.pfm     +++|*
10140  M00S07352.pfm     +++|*         CALLS  *NONE*
10141  M00S07353.pfm     +++|*
10142  M00S07354.pfm     +++|*         USES   T1, T2, T3.
10143  M00S07355.pfm     +++|
10144  M00S07356.pfm     +++|
10145  M00S07357.pfm     +++| FHE      SUBR               ENTRY/EXIT
10146  M00S07358.pfm     +++|
10147  M00S07359.pfm     +++|*         DETERMINE START OF NEW HOLE.
10148  M00S07360.pfm     +++|
10149  M00S07361.pfm     +++|          LDM    FCBS,HP     FIRST SECTOR OF NEW FILE
10150  M00S07362.pfm     +++|          ADN    2           ALLOW FOR SYSTEM SECTOR AND EOI
Proceed to Part 7
cdc/nos2.source/opl.opl871/deck/pfm.006.txt ยท Last modified: by 127.0.0.1