Deck PFDUMP Part 011

50 Modifications

Source

Seq #  *Modification Id* Act 
----------------------------+
11885  M02S00606.286l859 ---|*                PLACED IN TAPE LABEL.
Line S07052 Modification History
M01 (Removed by) 253l688
M02 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
11886  M02S07052.286l859 ---|*                PACK NAME, UNIT COUNT AND EQUIPMENT MNEMONIC SET IN
11887  M02S07053.286l859 ---|*                *PURGF* FET IF AUXILIARY DEVICE BEING DUMPED.
11888  M02S07054.286l859 ---|*                EXIT TO *AEP* IF NO FILES SELECTED.
Line S00888 Modification History
M01 (Added by) 253l688
M02 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
11889  M02S00888.286l859 ---|*                EXIT TO *ABT* IF NO FILES SELECTED.
Line S07055 Modification History
M01 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
11890  M01S07055.286l859 ---|*
Line S07056 Modification History
M01 (Removed by) ns22000
M02 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
11891  M02S07056.286l859 ---|*         USES   X - 1, 2, 3, 6, 7.
Line S00607 Modification History
M01 (Added by) ns22000
M02 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
11892  M02S00607.286l859 ---|*         USES   X - 1, 2, 3, 4, 6, 7.
Line S07057 Modification History
M01 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
11893  M01S07057.286l859 ---|*                A - 1, 2, 3, 6, 7.
Line S07058 Modification History
M01 (Removed by) ns22000
M02 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
11894  M02S07058.286l859 ---|*                B - 2.
Line S00608 Modification History
M01 (Added by) ns22000
M02 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
11895  M02S00608.286l859 ---|*                B - 2, 3, 4, 5.
11896  M00S07059.pfdump  +++|
Line S02148 Modification History
M01 (Added by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
11897  M01S02148.286l859 +++|*         SET MASTER DEVICE MASKS AND CATALOG TRACK COUNTS.
11898  M01S02149.286l859 +++|*         IF FILE STAGING IS NOT SUPPRESSED, THE MASTER DEVICE MAP IS
11899  M01S02150.286l859 +++|*         NOT WRITTEN BECAUSE FILES COPIED FROM ALTERNATE STORAGE TAPES
11900  M01S02151.286l859 +++|*         ARE NOT DUMPED IN CATALOG TRACK ORDER.
11901  M00S07060.pfdump  +++|
Line S02152 Modification History
M01 (Added by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
11902  M01S02152.286l859 +++|          SA1    CPAR+/COMSPFS/CPOP
11903  M01S02153.286l859 +++|          LX1    59-47
11904  M01S02154.286l859 +++|          PL     X1,SLPX     IF STAGING NOT SUPPRESSED
Line S07061 Modification History
M01 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
11905  M01S07061.286l859 ---|*         SET PF DESCRIPTION FOR FAMILY DEVICE.
11906  M01S07062.286l859 ---|
11907  M01S07063.286l859 ---| SMP4     SA1    MSTT        PF DESCRIPTION = A FAMILY EQUIPMENT
Line S07064 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
11908  M01S07064.ns22000 ---|          SX2    7700B
11909  M01S07065.ns22000 ---|          BX6    X2*X1
11910  M01S07066.ns22000 ---|          LX6    6
Line S00609 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
11911  M01S00609.ns22000 +++|          MX2    -9
Line S00610 Modification History
M01 (Added by) ns22000
M02 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
11912  M02S00610.286l859 ---|          AX1    6
11913  M02S00611.286l859 ---|          BX6    -X2*X1
Line S07067 Modification History
M01 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
11914  M01S07067.286l859 ---|          SA6    PDWD
11915  M01S07068.286l859 ---|
11916  M01S07069.286l859 ---| SMP      SUBR               ENTRY/EXIT
11917  M01S07070.286l859 ---|
Line S07071 Modification History
M01 (Removed by) ns22000
M02 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
11918  M02S07071.286l859 ---|*         BUILD DEVICE DUMP MASK.
Line S00612 Modification History
M01 (Added by) ns22000
M02 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
11919  M02S00612.286l859 ---|*         BUILD THE DEVICE DUMP MASK.  ALSO, INSERT ALL THE NON-ZERO
11920  M02S00613.286l859 ---|*         DEVICE MASKS AND THE NUMBER OF CATALOG TRACKS INTO THE TAPE
11921  M02S00614.286l859 ---|*         LABEL.
Line S07072 Modification History
M01 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
11922  M01S07072.286l859 ---|
Line S07073 Modification History
M01 (Removed by) ns22000
M02 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
11923  M02S07073.286l859 ---|          SA3    MSTT        SET CATALOG TRACK COUNT OF FIRST DEVICE
11924  M02S07074.286l859 ---|          MX7    -12
11925  M02S07075.286l859 ---|          LX3    -12
Line S00615 Modification History
M01 (Added by) ns22000
M02 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
11926  M02S00615.286l859 ---|          MX2    -9
Line S00616 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
11927  M01S00616.ns22000 +++|          MX4    -8
Line S02155 Modification History
M01 (Added by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
11928  M01S02155.286l859 +++|          SB4    B0          SHIFT COUNT
Line S00617 Modification History
M01 (Added by) ns22000
M02 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
11929  M02S00617.286l859 ---|          SX7    B0+
Line S00618 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
11930  M01S00618.ns22000 +++|          SB2    MSTT+1      SET ADDRESS OF MASS STORAGE TABLE
Line S00619 Modification History
M01 (Added by) ns22000
M02 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
11931  M02S00619.253l688 ---|          SB3    DMCT        LABEL OFFSET
Line S00889 Modification History
M01 (Added by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
11932  M01S00889.253l688 +++|          SB3    DMPLBL+/COMSPFS/D0AL  DEVICE INFORMATION OFFSET
Line S00620 Modification History
M01 (Added by) ns22000
M02 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
11933  M02S00620.286l859 ---|          SB4    B0          SHIFT COUNT
Line S00621 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
11934  M01S00621.ns22000 +++|          SB5    60
Line S00622 Modification History
M01 (Added by) ns22000
M02 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
11935  M02S00622.286l859 ---|          SA3    B2-B1       SET CATALOG COUNT OF FIRST DEVICE
11936  M02S00623.286l859 ---|          LX3    -15
Line S07076 Modification History
M01 (Removed by) ns22000
M02 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
11937  M02S07076.286l859 ---|          BX6    -X7*X3
11938  M02S07077.286l859 ---|          SA2    FSSD        GET SINGLE DEVICE FLAG
11939  M02S07078.286l859 ---|          SB2    A3+B1       SET ADDRESS OF MASS STORAGE TABLE
11940  M02S07079.286l859 ---|          SA1    CPAR+/COMSPFS/CPPN
Line S00624 Modification History
M01 (Added by) ns22000
M02 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
11941  M02S00624.286l859 ---|          BX6    -X2*X3
Line S07080 Modification History
M01 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
11942  M01S07080.286l859 ---|          SA6    NCAT
Line S07081 Modification History
M01 (Removed by) ns22000
M02 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
11943  M02S07081.286l859 ---| SMP1     SA3    B2          ACCUMULATE DEVICE DUMP MASK
11944  M02S07082.286l859 ---|          BX7    X7+X3
Line S00625 Modification History
M01 (Added by) ns22000
M02 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
11945  M02S00625.286l859 ---| SMP1     SA3    B2          MASS STORAGE TABLE ENTRY
Line S07083 Modification History
M01 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
11946  M01S07083.286l859 ---|          ZR     X3,SMP2     IF END OF MASS STORAGE TABLE
Line S02156 Modification History
M01 (Added by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
11947  M01S02156.286l859 +++| SLP2     SA3    B2          MASS STORAGE TABLE ENTRY
11948  M01S02157.286l859 +++|          ZR     X3,SLPX     IF END OF MASS STORAGE TABLE
Line S00626 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
11949  M01S00626.ns22000 +++|          BX6    -X4*X3      GET DEVICE MASK
11950  M00S07084.pfdump  +++|          SB2    B2+2        ADVANCE MASS STORAGE TABLE ADDRESS
Line S07085 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
11951  M01S07085.ns22000 ---|          ZR     X2,SMP1     IF NOT SINGLE DEVICE DUMP
11952  M01S07086.ns22000 ---| SMP2     MX2    -8          SET DEVICE DUMP MASK
11953  M01S07087.ns22000 ---|          BX6    -X2*X7
11954  M01S07088.ns22000 ---|          SA6    MASK
11955  M01S07089.ns22000 ---|          ZR     X6,SMP3     IF NO MASTER DEVICES TO DUMP
Line S00627 Modification History
M01 (Added by) ns22000
M02 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
11956  M02S00627.286l859 ---|          ZR     X6,SMP1     IF NOT MASK DEVICE
11957  M02S00628.286l859 ---|          BX7    X7+X6       ACCUMULATE DEVICE DUMP MASK
Line S02158 Modification History
M01 (Added by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
11958  M01S02158.286l859 +++|          ZR     X6,SLP2     IF NOT MASTER DEVICE
Line S00629 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
11959  M01S00629.ns22000 +++|          SA3    A3-B1       GET NUMBER OF CATALOG TRACKS
11960  M01S00630.ns22000 +++|          LX6    12
11961  M01S00631.ns22000 +++|          LX3    -15
11962  M01S00632.ns22000 +++|          BX3    -X2*X3
11963  M01S00633.ns22000 +++|          BX6    X6+X3
11964  M01S00634.ns22000 +++|          SA1    B3          STORE DEVICE MASK AND CATALOG TRACKS
11965  M01S00635.ns22000 +++|          LX6    X6,B4
11966  M01S00636.ns22000 +++|          BX6    X6+X1
11967  M01S00637.ns22000 +++|          SA6    A1
11968  M01S00638.ns22000 +++|          SB4    B4+20
Line S00639 Modification History
M01 (Added by) ns22000
M02 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
11969  M02S00639.286l859 ---|          LT     B4,B5,SMP1  IF MORE ROOM IN LABEL WORD
Line S02159 Modification History
M01 (Added by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
11970  M01S02159.286l859 +++|          LT     B4,B5,SLP2  IF MORE ROOM IN LABEL WORD
Line S00640 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
11971  M01S00640.ns22000 +++|          SB3    B3+B1       ADVANCE POINTER
11972  M01S00641.ns22000 +++|          SB4    B0          RESET SHIFT COUNT
Line S00642 Modification History
M01 (Added by) ns22000
M02 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
11973  M02S00642.286l859 ---|          EQ     SMP1        GET NEXT ENTRY
11974  M02S00643.286l859 ---|
11975  M02S00644.286l859 ---| SMP2     SA2    FSSD        GET SINGLE DEVICE FLAG
11976  M02S00645.286l859 ---|          ZR     X2,SMP2.1   IF NOT SINGLE DEVICE DUMP
11977  M02S00646.286l859 ---|          SA3    MSTT+1
11978  M02S00647.286l859 ---|          BX7    -X4*X3
11979  M02S00648.286l859 ---| SMP2.1   SA7    MASK        SET DEVICE DUMP MASK
11980  M02S00649.286l859 ---|          SA1    CPAR+/COMSPFS/CPPN
11981  M02S00650.286l859 ---|          ZR     X7,SMP3     IF NO MASTER DEVICES TO DUMP
Line S07090 Modification History
M01 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
11982  M01S07090.286l859 ---|          ZR     X1,SMP4     IF PACK NAME NOT SPECIFIED
Line S07091 Modification History
M01 (Removed by) 253l688
M02 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
11983  M02S07091.286l859 ---|
11984  M02S07092.286l859 ---|*         SET PF DESCRIPTION AND PURGE PARAMETERS FOR AN AUXILIARY
11985  M02S07093.286l859 ---|*         DEVICE.
11986  M02S07094.286l859 ---|
Line S07095 Modification History
M01 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
11987  M01S07095.286l859 ---|          MX3    42          SET PACK NAME IN PF DESCRIPTION WORD
11988  M01S07096.286l859 ---|          BX6    X3*X1
11989  M01S07097.286l859 ---|          SA6    PDWD
Line S07098 Modification History
M01 (Removed by) 253l688
M02 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
11990  M02S07098.286l859 ---|          SA2    MSTT+1      SET UNIT COUNT
11991  M02S07099.286l859 ---|          MX3    -6
11992  M02S07100.286l859 ---|          LX2    -30
11993  M02S07101.286l859 ---|          BX1    -X3*X2
11994  M02S07102.286l859 ---|          LX2    12          SET EQUIPMENT MNEMONIC
11995  M02S07103.286l859 ---|          SX1    X1+B1
11996  M02S07104.286l859 ---|          MX3    -11
11997  M02S07105.286l859 ---|          BX6    X6+X1       MERGE UNIT COUNT WITH PACK NAME
11998  M02S07106.286l859 ---|          SA1    PURGF+1     CLEAR OLD MNEMONIC FROM FET
11999  M02S07107.286l859 ---|          BX2    -X3*X2
12000  M02S07108.286l859 ---|          MX3    -48
12001  M02S07109.286l859 ---|          SA6    PURGF+CFPK
12002  M02S07110.286l859 ---|          BX1    -X3*X1
12003  M02S07111.286l859 ---|          LX2    48          PUT MNEMONIC IN FET
12004  M02S07112.286l859 ---|          BX7    X2+X1
12005  M02S07113.286l859 ---|          SA7    A1+
Line S07114 Modification History
M01 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
12006  M01S07114.286l859 ---|          EQ     SMPX        RETURN
12007  M01S07115.286l859 ---|
12008  M01S07116.286l859 ---|*         PROCESS NO FILES SELECTED.
12009  M01S07117.286l859 ---|
Line S07118 Modification History
M01 (Removed by) 253l688
M02 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
12010  M02S07118.286l859 ---| SMP3     SX1    PMSE        SET NO FILES SELECTED MESSAGE
12011  M02S07119.286l859 ---|          EQ     AEP         ABORT DUMP
12012  M02S07120.286l859 ---| SSP      SPACE  4,20
12013  M02S07121.286l859 ---|**        SSP - SET FILE SELECTION PARAMETERS.
12014  M02S07122.286l859 ---|*
12015  M02S07123.286l859 ---|*         ENTRY  (BFSP) = BINARY FILE SELECTION PARAMETERS.
12016  M02S07124.286l859 ---|*
12017  M02S07125.286l859 ---|*         EXIT   (FSSD) = SINGLE DEVICE STATUS.
12018  M02S07126.286l859 ---|*                (FSNM) = NON-MASTER DEVICE FILE SELECTION PARAMETER.
12019  M02S07127.286l859 ---|*                (FSTD) = TRUE DEVICE FILE SELECTION PARAMETER.
12020  M02S07128.286l859 ---|*                FIRST DEVICE IN *MSTT* IS FIRST DEVICE TO BE
12021  M02S07129.286l859 ---|*                PROCESSED.
12022  M02S07130.286l859 ---|*                EXIT TO *AEP* IF NO FILES SELECTED.
12023  M02S07131.286l859 ---|*
12024  M02S07132.286l859 ---|*         USES   X - 1, 2, 6, 7.
12025  M02S07133.286l859 ---|*                A - 1, 2, 6, 7.
12026  M02S07134.286l859 ---|*
12027  M02S07135.286l859 ---|*         CALLS  EBE, LDN, LUI.
12028  M02S07136.286l859 ---|
12029  M02S07137.286l859 ---|
12030  M02S07138.286l859 ---|*         EXCHANGE DEVICE WITH FIRST ENTRY IN *MSTT*.
12031  M02S07139.286l859 ---|
12032  M02S07140.286l859 ---| SSP5     RJ     LDN         LOCATE DEVICE IN MASS STORAGE TABLE
12033  M02S07141.286l859 ---| SSP6     SA1    B2+B1       EXCHANGE DEVICE WITH FIRST *MSTT* ENTRY
12034  M02S07142.286l859 ---|          BX6    X2
12035  M02S07143.286l859 ---|          SA2    MSTT
12036  M02S07144.286l859 ---|          BX7    X1
12037  M02S07145.286l859 ---|          SA1    A2+B1
12038  M02S07146.286l859 ---|          SA6    A2
12039  M02S07147.286l859 ---|          SA7    A2+B1
12040  M02S07148.286l859 ---|          BX6    X2
12041  M02S07149.286l859 ---|          LX7    X1
12042  M02S07150.286l859 ---|          SA6    B2
12043  M02S07151.286l859 ---|          SA7    B2+B1
12044  M02S07152.286l859 ---|
12045  M02S07153.286l859 ---| SSP      SUBR               ENTRY/EXIT
12046  M02S07154.286l859 ---|
12047  M02S07155.286l859 ---|*         CHECK FOR NO FILES SELECTED.
12048  M02S07156.286l859 ---|
12049  M02S07157.286l859 ---|          SA2    BFSP        GET BOOLEAN SELECTION PARAMETERS
12050  M02S07158.286l859 ---|          SA1    NFSL        CHECK FOR NO FILES SELECTED
12051  M02S07159.286l859 ---|          RJ     EBE
12052  M02S07160.286l859 ---|          ZR     X6,SSP1     IF FILES SELECTED
12053  M02S07161.286l859 ---|          SX1    PMSE        SET NO FILES SELECTED MESSAGE
12054  M02S07162.286l859 ---|          EQ     AEP         ABORT DUMP
12055  M02S07163.286l859 ---|
12056  M02S07164.286l859 ---|*         CHECK FOR SINGLE DEVICE SELECTED.
12057  M02S07165.286l859 ---|
12058  M02S07166.286l859 ---| SSP1     SA1    SDFL        CHECK FOR SINGLE DEVICE SELECTED
12059  M02S07167.286l859 ---|          RJ     EBE
12060  M02S07168.286l859 ---|          SA6    FSSD        SAVE SINGLE DEVICE STATUS
12061  M02S07169.286l859 ---|
12062  M02S07170.286l859 ---|*         PROCESS NON-MASTER FILE RESIDENCE DEVICE SELECTION.
12063  M02S07171.286l859 ---|
12064  M02S07172.286l859 ---|          SA1    NMDN
12065  M02S07173.286l859 ---|          RJ     EBE         EVALUATE BOOLEAN EXPRESSION
12066  M02S07174.286l859 ---|          ZR     X6,SSP2     IF *DN* NOT NON-MASTER RESIDENCE DEVICE
12067  M02S07175.286l859 ---|          SA1    CPAR+/COMSPFS/CPDN  SET NON-MASTER DEVICE TO *DN*
12068  M02S07176.286l859 ---|          BX6    X1
12069  M02S07177.286l859 ---|          SA6    FSNM
12070  M02S07178.286l859 ---| SSP2     SA1    NMTD
12071  M02S07179.286l859 ---|          RJ     EBE         EVALUATE BOOLEAN EXPRESSION
12072  M02S07180.286l859 ---|          ZR     X6,SSP3     IF *TD* NOT NON-MASTER RESIDENCE DEVICE
12073  M02S07181.286l859 ---|          SA1    CPAR+/COMSPFS/CPTD  SET NON-MASTER DEVICE TO *TD*
12074  M02S07182.286l859 ---|          BX6    X1
12075  M02S07183.286l859 ---|          SA6    FSNM
12076  M02S07184.286l859 ---|
12077  M02S07185.286l859 ---|*         PROCESS TRUE DEVICE FILE SELECTION.
12078  M02S07186.286l859 ---|
12079  M02S07187.286l859 ---| SSP3     SA1    TDSL
12080  M02S07188.286l859 ---|          RJ     EBE         EVALUATE BOOLEAN EXPRESSION
12081  M02S07189.286l859 ---|          ZR     X6,SSP4     IF NOT TRUE DEVICE FILE SELECTION
12082  M02S07190.286l859 ---|          SA1    CPAR+/COMSPFS/CPTD  SET TRUE DEVICE FILE SELECTION
12083  M02S07191.286l859 ---|          BX6    X1
12084  M02S07192.286l859 ---|          SA6    FSTD
12085  M02S07193.286l859 ---|
12086  M02S07194.286l859 ---|*         PROCESS FIRST MASTER DEVICE SELECTION.
12087  M02S07195.286l859 ---|
12088  M02S07196.286l859 ---| SSP4     SA1    FMDN        CHECK IF *DN* IS FIRST MASTER DEVICE
12089  M02S07197.286l859 ---|          RJ     EBE
12090  M02S07198.286l859 ---|          SA1    CPAR+/COMSPFS/CPDN
12091  M02S07199.286l859 ---|          NZ     X6,SSP5     IF *DN* IS FIRST MASTER DEVICE
12092  M02S07200.286l859 ---|          SA1    FMTD        CHECK IF *TD* IS FIRST MASTER DEVICE
12093  M02S07201.286l859 ---|          RJ     EBE
12094  M02S07202.286l859 ---|          SA1    CPAR+/COMSPFS/CPTD
12095  M02S07203.286l859 ---|          NZ     X6,SSP5     IF *TD* IS FIRST MASTER DEVICE
12096  M02S07204.286l859 ---|          SA1    FMDI        CHECK IF *DI* IS FIRST MASTER DEVICE
12097  M02S07205.286l859 ---|          RJ     EBE
12098  M02S07206.286l859 ---|          ZR     X6,SSPX     IF *DI* NOT FIRST MASTER DEVICE
12099  M02S07207.286l859 ---|          SA1    CPAR+/COMSPFS/CPDI  LOCATE MASTER DEVICE FOR *DI*
12100  M02S07208.286l859 ---|          RJ     LUI
12101  M02S07209.286l859 ---|          EQ     SSP6        MOVE DEVICE TO START OF TABLE
Line S00651 Modification History
M01 (Added by) ns22000
M02 (Removed by) 253l688
M03 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
12102  M03S00651.286l859 ---| VES      SPACE  4,15
12103  M03S00652.286l859 ---|**        VES - VERIFY EQUIPMENT SECURITY.
12104  M03S00653.286l859 ---|*
12105  M03S00654.286l859 ---|*         ENTRY  FILE ASSIGNED.
12106  M03S00655.286l859 ---|*                (A5) = FET ADDRESS.
12107  M03S00656.286l859 ---|*                (SYSS) = SYSTEM SECURITY MODE.
12108  M03S00657.286l859 ---|*                (DPLA) = LOWER ACCESS LEVEL TO DUMP.
12109  M03S00658.286l859 ---|*                (DPUA) = UPPER ACCESS LEVEL TO DUMP.
12110  M03S00659.286l859 ---|*
12111  M03S00660.286l859 ---|*         EXIT   ABORT IF RANGE OF ACCESS LEVELS TO BE DUMPED IS NOT
12112  M03S00661.286l859 ---|*                ALLOWED ON ASSIGNED EQUIPMENT.
Line S00070 Modification History
M01 (Added by) pfdum21
M02 (Removed by) 253l688
M03 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
12113  M03S00070.286l859 ---|*                (VESA) = EST ORDINAL OF ASSIGNED FILE.
Line S00662 Modification History
M01 (Added by) ns22000
M02 (Removed by) 253l688
M03 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
12114  M03S00662.286l859 ---|*
12115  M03S00663.286l859 ---|*         USES   X - 0, 1, 2, 6, 7.
12116  M03S00664.286l859 ---|*                A - 1, 2, 6, 7.
12117  M03S00665.286l859 ---|*
12118  M03S00666.286l859 ---|*         MACROS GETEAL, STATUS.
12119  M03S00667.286l859 ---|
12120  M03S00668.286l859 ---|
12121  M03S00669.286l859 ---| VES      SUBR               ENTRY/EXIT
Line S00670 Modification History
M01 (Added by) ns22000
M02 (Removed by) pfdum21
M03 (Removed by) 253l688
M04 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
12122  M04S00670.286l859 ---|          SA1    SYSS
12123  M04S00671.286l859 ---|          ZR     X1,VESX     IF NOT SECURE SYSTEM
Line S00672 Modification History
M01 (Added by) ns22000
M02 (Removed by) 253l688
M03 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
12124  M03S00672.286l859 ---|          STATUS A5,P
12125  M03S00673.286l859 ---|          SA1    A5+6        GET EST ORDINAL
12126  M03S00674.286l859 ---|          MX0    -12
12127  M03S00675.286l859 ---|          LX1    12
12128  M03S00676.286l859 ---|          BX6    -X0*X1
12129  M03S00677.286l859 ---|          SA6    VESA
Line S00071 Modification History
M01 (Added by) pfdum21
M02 (Removed by) 253l688
M03 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
12130  M03S00071.286l859 ---|          SA1    SYSS
12131  M03S00072.286l859 ---|          ZR     X1,VESX     IF NOT SECURED SYSTEM
Line S00678 Modification History
M01 (Added by) ns22000
M02 (Removed by) 253l688
M03 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
12132  M03S00678.286l859 ---|          GETEAL VESA        GET EQUIPMENT/DEVICE ACCESS LEVEL LIMITS
12133  M03S00679.286l859 ---|          SA1    VESA
12134  M03S00680.286l859 ---|          LX1    -12
12135  M03S00681.286l859 ---|          BX2    -X0*X1
12136  M03S00682.286l859 ---|          MX0    -3
12137  M03S00683.286l859 ---|          BX6    -X0*X2      EQUIPMENT UPPER LIMIT
12138  M03S00684.286l859 ---|          LX2    -3
12139  M03S00685.286l859 ---|          BX7    -X0*X2      EQUIPMENT LOWER LIMIT
12140  M03S00686.286l859 ---|          SA1    DPUA
12141  M03S00687.286l859 ---|          SA2    DPLA
12142  M03S00688.286l859 ---|          IX6    X6-X1
12143  M03S00689.286l859 ---|          NG     X6,VES1     IF UPPER LEVEL NOT ALLOWED
12144  M03S00690.286l859 ---|          IX7    X2-X7
12145  M03S00691.286l859 ---|          PL     X7,VESX     IF LOWER LEVEL ALLOWED
12146  M03S00692.286l859 ---| VES1     SX1    PMSV        * PFDUMP - ACCESS LEVEL NOT ALLOWED.*
12147  M03S00693.286l859 ---|          EQ     AEP         ABORT
12148  M03S00694.286l859 ---|
12149  M03S00695.286l859 ---| VESA     CON    0           EQUIPMENT ACCESS LIMITS RETURN
Line S00890 Modification History
M01 (Added by) 253l688
M02 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
12150  M02S00890.286l859 ---| SMP3     SX1    PMSF        * PFDUMP - NO FILES SELECTED.*
12151  M02S00891.286l859 ---|          EQ     ABT         ABORT DUMP
Line S02160 Modification History
M01 (Added by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
12152  M01S02160.286l859 +++|          EQ     SLP2        GET NEXT ENTRY
12153  M00S07210.pfdump  +++|          TITLE  CATALOG IMAGE RECORD SUBROUTINES.
Line S07211 Modification History
M01 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
12154  M01S07211.253l688 ---| BCL      SPACE  4
Line S00892 Modification History
M01 (Added by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
12155  M01S00892.253l688 +++| BCL      SPACE  4,15
12156  M00S07212.pfdump  +++|**        BCL - BUILD CATALOG LIST.
12157  M00S07213.pfdump  +++|*
12158  M00S07214.pfdump  +++|*         ENTRY  (B2) = NEXT WORD ADDRESS OF CATALOG BUFFER.
12159  M00S07215.pfdump  +++|*                (B3) = NEXT WORD ADDRESS OF WORKING STORAGE BUFFER.
12160  M00S07216.pfdump  +++|*                (B4) = LAST WORD ADDRESS OF CATALOG BUFFER.
12161  M00S07217.pfdump  +++|*
12162  M00S07218.pfdump  +++|*         EXIT   (B2) = NEXT WORD ADDRESS OF CATALOG BUFFER.
12163  M00S07219.pfdump  +++|*                (B3) = NEXT WORD ADDRESS OF WORKING STORAGE BUFFER.
12164  M00S07220.pfdump  +++|*                (B4) = LAST WORD ADDRESS OF CATALOG BUFFER.
12165  M00S07221.pfdump  +++|*                (B5) = NUMBER OF CATALOGS.
12166  M00S07222.pfdump  +++|*
Line S07223 Modification History
M01 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
12167  M01S07223.253l688 ---|*         USES   X - 0, 1, 2, 6, 7.
12168  M01S07224.253l688 ---|*                A - 1, 2, 6, 7.
12169  M01S07225.253l688 ---|*                B - 2, 3, 4, 5.
12170  M01S07226.253l688 ---|*
12171  M01S07227.253l688 ---|*         CALLS  MCO.
Line S00893 Modification History
M01 (Added by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
12172  M01S00893.253l688 +++|*         USES   X - 0, 1, 2, 6.
12173  M01S00894.253l688 +++|*                A - 1, 2, 6.
12174  M01S00895.253l688 +++|*                B - 2, 3, 5.
12175  M00S07228.pfdump  +++|
12176  M00S07229.pfdump  +++|
12177  M00S07230.pfdump  +++| BCL      SUBR               ENTRY/EXIT
12178  M00S07231.pfdump  +++|          SB5    B0          INITIALIZE NUMBER OF CATALOGS
12179  M00S07232.pfdump  +++|          MX3    -18
12180  M00S07233.pfdump  +++| BCL1     SX6    B3-DBUFH-776B
12181  M00S07234.pfdump  +++|          PL     X6,BCLX     IF END OF 1000B WORD BLOCK
12182  M00S07235.pfdump  +++|          SA2    B2
12183  M00S07236.pfdump  +++|          BX6    -X3*X2
12184  M00S07237.pfdump  +++|          ZR     X6,BCL3     IF PURGED FILE
Line S00896 Modification History
M01 (Added by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
12185  M01S00896.253l688 +++|          SA1    CPAR+/COMSPFS/CPOP
12186  M01S00897.253l688 +++|          LX1    59-45
12187  M01S00898.253l688 +++|          NG     X1,BCL2     IF OP=Y SELECTED
Line S00001 Modification History
M01 (Added by) pfdum7
Seq #  *Modification Id* Act 
----------------------------+
12188  M01S00001.pfdum7  +++|          SA1    B2+FCBR     GET BACKUP REQUIREMENT
12189  M01S00002.pfdum7  +++|          MX0    -3
12190  M01S00003.pfdum7  +++|          LX1    0-54
12191  M01S00004.pfdum7  +++|          BX6    -X0*X1
12192  M01S00005.pfdum7  +++|          SX6    X6-BRNO
12193  M01S00006.pfdum7  +++|          ZR     X6,BCL3     IF NO BACKUP REQUIRED
12194  M00S07238.pfdump  +++|
12195  M00S07239.pfdump  +++|*         GENERATE CATALOG IMAGE ENTRY.
12196  M00S07240.pfdump  +++|
Line S07241 Modification History
M01 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
12197  M01S07241.253l688 ---|          BX6    X2          STORE WORD IN CATALOG LIST
Line S00899 Modification History
M01 (Added by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
12198  M01S00899.253l688 +++| BCL2     BX6    X2          STORE WORD IN CATALOG LIST
12199  M00S07242.pfdump  +++|          SA6    B3
12200  M00S07243.pfdump  +++|          SB3    B3+B1
12201  M00S07244.pfdump  +++|          SB5    B5+B1
12202  M00S07245.pfdump  +++|          MX0    18          SET SECOND WORD OF CIR ENTRY
12203  M00S07246.pfdump  +++|          SA1    B2+3
12204  M00S07247.pfdump  +++|          SA2    A1+B1
12205  M00S07248.pfdump  +++|          LX1    6
12206  M00S07249.pfdump  +++|          BX6    X0*X1
12207  M00S07250.pfdump  +++|          BX2    -X0*X2
12208  M00S07251.pfdump  +++|          BX6    X6+X2
12209  M00S07252.pfdump  +++|          SA6    B3
12210  M00S07253.pfdump  +++|          SB3    B3+B1
12211  M00S07254.pfdump  +++|          SB5    B5+B1
Line S07255 Modification History
M01 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
12212  M01S07255.253l688 ---|          SA2    CPAR+/COMSPFS/CPLO
12213  M01S07256.253l688 ---|          LX2    59-58
12214  M01S07257.253l688 ---|          PL     X2,BCL3     IF CATALOG IMAGE LISTING NOT REQUESTED
12215  M01S07258.253l688 ---|
12216  M01S07259.253l688 ---|*         CATALOG CATALOG IMAGE RECORD.
12217  M01S07260.253l688 ---|
12218  M01S07261.253l688 ---|          SX6    B2          SAVE REGISTERS
12219  M01S07262.253l688 ---|          SX7    B3
12220  M01S07263.253l688 ---|          SA6    BCLA
12221  M01S07264.253l688 ---|          SA7    A6+B1
12222  M01S07265.253l688 ---|          SX6    B4
12223  M01S07266.253l688 ---|          SX7    B5
12224  M01S07267.253l688 ---|          SA6    A7+B1
12225  M01S07268.253l688 ---|          SA7    A6+B1
12226  M01S07269.253l688 ---|          SA1    B2+B1       CHECK FOR DIRECT ACCESS FILE
12227  M01S07270.253l688 ---|          LX1    59-11
12228  M01S07271.253l688 ---|          PL     X1,BCL2     IF NOT DIRECT ACCESS FILE
12229  M01S07272.253l688 ---|          LX1    12
12230  M01S07273.253l688 ---|          MX7    24
12231  M01S07274.253l688 ---|          BX6    X7+X1       BLANK OUT LENGTH
12232  M01S07275.253l688 ---|          SA6    B2+FCLF+FCBS*
12233  M01S07276.253l688 ---| BCL2     RJ     MCO         MOVE CATALOG TO OUTPUT
12234  M01S07277.253l688 ---|          SA1    BCLA        RESTORE REGISTERS
12235  M01S07278.253l688 ---|          SA2    A1+B1
12236  M01S07279.253l688 ---|          SB2    X1
12237  M01S07280.253l688 ---|          SB3    X2
12238  M01S07281.253l688 ---|          SA1    A2+B1
12239  M01S07282.253l688 ---|          SA2    A1+B1
12240  M01S07283.253l688 ---|          SB4    X1
12241  M01S07284.253l688 ---|          SB5    X2
12242  M01S07285.253l688 ---|          MX3    -18
12243  M00S07286.pfdump  +++| BCL3     SB2    B2+NWCE     INCREMENT CATALOG BUFFER INDEX
12244  M00S07287.pfdump  +++|          LT     B2,B4,BCL1  IF NOT AT END OF CATALOG BUFFER
12245  M00S07288.pfdump  +++|          EQ     BCLX        RETURN
Line S07289 Modification History
M01 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
12246  M01S07289.253l688 ---|
12247  M01S07290.253l688 ---|
12248  M01S07291.253l688 ---| BCLA     BSS    4           REGISTER HOLD AREA
12249  M01S07292.253l688 ---|          SPACE  4
12250  M01S07293.253l688 ---|***       CATALOG IMAGE RECORD (CIR)
12251  M01S07294.253l688 ---|*
12252  M01S07295.253l688 ---|*T        42/PERMANENT FILE NAME,18/ USER INDEX
Figure

0171829 USER INDEXPERMANENT FILE NAME3059PERMANENT FILE NAME

12253  M01S07296.253l688 ---|*T        18/ ACCESS COUNT,6/ DN,36/ LAST ACCESS DATE AND TIME
Figure

029 LAST ACCESS DATE AND TIME303536414259 LAST ACCESS DATE AND TIME DN ACCESS COUNT

12254  M01S07297.253l688 ---|*
12255  M01S07298.253l688 ---|*         THERE IS 1 ENTRY FOR EACH FILE ON THE CATALOG
12256  M00S07299.pfdump  +++| CCI      SPACE  4,20
12257  M00S07300.pfdump  +++|**        CCI - CREATE CATALOG IMAGE.
12258  M00S07301.pfdump  +++|*
Line S07302 Modification History
M01 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
12259  M01S07302.286l859 ---|*         EXIT   CIR WRITTEN TO TAPE.
Line S02161 Modification History
M01 (Added by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
12260  M01S02161.286l859 +++|*         EXIT   CIR WRITTEN TO ARCHIVE FILE.
12261  M00S07303.pfdump  +++|*
12262  M00S07304.pfdump  +++|*         USES   X - ALL.
Line S07305 Modification History
M01 (Removed by) pfdum18
Seq #  *Modification Id* Act 
----------------------------+
12263  M01S07305.pfdum18 ---|*                A - 1, 2, 3, 5, 6, 7.
Line S00001 Modification History
M01 (Added by) pfdum18
Seq #  *Modification Id* Act 
----------------------------+
12264  M01S00001.pfdum18 +++|*                A - 1, 2, 3, 4, 5, 6, 7.
12265  M00S07306.pfdump  +++|*                B - 2, 3, 4, 5, 6.
12266  M00S07307.pfdump  +++|*
Line S07308 Modification History
M01 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
12267  M01S07308.253l688 ---|*         CALLS  BCL, CAC, RCE, SAC, WIB, WUC.
Line S00900 Modification History
M01 (Added by) 253l688
M02 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
12268  M02S00900.286l859 ---|*         CALLS  BCL, CAC, ICI, RCE, SAC, WIB, WUC.
Line S02162 Modification History
M01 (Added by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
12269  M01S02162.286l859 +++|*         CALLS  BCL, CAC, ICI, RCS, SAC, WIB.
12270  M00S07309.pfdump  +++|*
12271  M00S07310.pfdump  +++|*         MACROS ARCHIVE, CALLPFU, MOVE, PCINT, READCW, RETURN,
12272  M00S07311.pfdump  +++|*                WRITER.
12273  M00S07312.pfdump  +++|
12274  M00S07313.pfdump  +++|
12275  M00S07314.pfdump  +++| CCI16    RETURN CATC
12276  M00S07315.pfdump  +++|          SA5    IDSA+/COMSPFS/ADMS
12277  M00S07316.pfdump  +++|          MOVE   4,MSGL,X5   CLEAR MESSAGE
12278  M00S07317.pfdump  +++|
12279  M00S07318.pfdump  +++| CCI      SUBR               ENTRY/EXIT
12280  M00S07319.pfdump  +++|          SA1    CPAR+/COMSPFS/CPPN  PF DESCRIPTION = PACK NAME
12281  M00S07320.pfdump  +++|          MX2    42
12282  M00S07321.pfdump  +++|          BX6    X2*X1
12283  M00S07322.pfdump  +++|          NZ     X1,CCI1     IF PACK NAME SPECIFIED
12284  M00S07323.pfdump  +++|          SA1    MSTT        PF DESCRIPTION = A FAMILY EQUIPMENT
Line S07324 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
12285  M01S07324.ns22000 ---|          SX2    7700B
12286  M01S07325.ns22000 ---|          BX6    X2*X1
12287  M01S07326.ns22000 ---|          LX6    6
Line S00696 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
12288  M01S00696.ns22000 +++|          MX2    -9
12289  M01S00697.ns22000 +++|          AX1    6
12290  M01S00698.ns22000 +++|          BX6    -X2*X1
12291  M00S07327.pfdump  +++| CCI1     SA6    CDWD        SAVE PF DESCRIPTION
12292  M00S07328.pfdump  +++|
Line S07329 Modification History
M01 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
12293  M01S07329.253l688 ---|*         SET CATALOG IMAGE REPORT HEADER.
Line S00901 Modification History
M01 (Added by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
12294  M01S00901.253l688 +++|*         INITIALIZE MESSAGES AND OUTPUT FILES FOR CIR PROCESSING.
12295  M00S07330.pfdump  +++|
Line S07331 Modification History
M01 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
12296  M01S07331.253l688 ---|          SA1    HCIR        SET CIR HEADER
12297  M01S07332.253l688 ---|          SA2    A1+B1
12298  M01S07333.253l688 ---|          BX6    X1
12299  M01S07334.253l688 ---|          BX7    X2
12300  M01S07335.253l688 ---|          SA6    HTYP
12301  M01S07336.253l688 ---|          SA7    A6+B1
Line S00902 Modification History
M01 (Added by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
12302  M01S00902.253l688 +++|          RJ     ICI         INITIALIZE FOR CIR OUTPUT
12303  M00S07337.pfdump  +++|          SA5    IDSA+/COMSPFS/ADMS
12304  M00S07338.pfdump  +++|          MOVE   3,CIRM,X5
12305  M00S07339.pfdump  +++|          EQ     CCI3        SEARCH FOR DEVICE
12306  M00S07340.pfdump  +++|
12307  M00S07341.pfdump  +++|*         SEARCH FOR MASTER DEVICE TO PROCESS.
12308  M00S07342.pfdump  +++|
12309  M00S07343.pfdump  +++| CCI2     PCINT  CATC,CTCC   CLEAR CATALOG TRACK INTERLOCK
12310  M00S07344.pfdump  +++|
12311  M00S07345.pfdump  +++| CCI3     SX6    B1          INITIALIZE CATALOG TRACK
12312  M00S07346.pfdump  +++|          SA6    CCTR
12313  M00S07347.pfdump  +++|          SA1    CCIB        GET MSTT INDEX
12314  M00S07348.pfdump  +++|          SX6    X1+2
12315  M00S07349.pfdump  +++|          SA6    A1
12316  M00S07350.pfdump  +++|          SA1    MSTT+X1     GET MASS STORAGE TABLE ENTRY
12317  M00S07351.pfdump  +++|          SA2    A1+B1
12318  M00S07352.pfdump  +++|          ZR     X1,CCI16    IF END OF MASS STORAGE TABLE
12319  M00S07353.pfdump  +++|
12320  M00S07354.pfdump  +++|*         INITIALIZE FOR CATALOG TRACK PROCESSING.
12321  M00S07355.pfdump  +++|
12322  M00S07356.pfdump  +++|          MX6    -8          GET DEVICE MASK
12323  M00S07357.pfdump  +++|          BX3    -X6*X2
12324  M00S07358.pfdump  +++|          ZR     X3,CCI3     IF NOT A MASTER DEVICE
Line S00002 Modification History
M01 (Added by) pfdum18
M02 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
12325  M02S00002.286l859 ---|          SA4    MASK        GET COMPOSITE DUMP MASK
Line S02163 Modification History
M01 (Added by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
12326  M01S02163.286l859 +++|          SA4    MASK        GET FILE SELECTIION MASK
Line S00003 Modification History
M01 (Added by) pfdum18
Seq #  *Modification Id* Act 
----------------------------+
12327  M01S00003.pfdum18 +++|          BX4    X4*X3
12328  M01S00004.pfdum18 +++|          ZR     X4,CCI3     IF THIS DEVICE NOT BEING DUMPED
Line S07359 Modification History
M01 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
12329  M01S07359.286l859 ---|          MX6    -1          GET CATALOG ENTRY FORMAT CODE
12330  M01S07360.286l859 ---|          LX6    17
12331  M01S07361.286l859 ---|          BX7    -X6*X2
12332  M01S07362.286l859 ---|          LX7    0-17
12333  M01S07363.286l859 ---|          SA7    CFMT        SAVE FORMAT CODE
Line S02164 Modification History
M01 (Added by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
12334  M01S02164.286l859 +++|          MX6    -6
12335  M01S02165.286l859 +++|          BX6    -X6*X1
12336  M01S02166.286l859 +++|          SA6    CPAR+/COMSPFS/CPDN  SET MASTER DEVICE NUMBER
Line S07364 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
12337  M01S07364.ns22000 ---|          MX7    -6          SET MASTER EQUIPMENT NUMBER
Line S00699 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
12338  M01S00699.ns22000 +++|          MX7    -9
12339  M00S07365.pfdump  +++|          LX1    -6
12340  M00S07366.pfdump  +++|          BX6    -X7*X1
Line S07367 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
12341  M01S07367.ns22000 ---|          MX7    -12         SET NUMBER OF CATALOG TRACKS
12342  M00S07368.pfdump  +++|          SA6    MAEQ
Line S07369 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
12343  M01S07369.ns22000 ---|          LX1    -6
Line S00700 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
12344  M01S00700.ns22000 +++|          LX1    -9
12345  M00S07370.pfdump  +++|          BX6    -X7*X1
12346  M00S07371.pfdump  +++|          LX3    24          PUT DEVICE MASK IN HEADER
12347  M00S07372.pfdump  +++|          SA6    NCAT
12348  M00S07373.pfdump  +++|          SA1    CIRH        GET CATALOG IMAGE HEADER
12349  M00S07374.pfdump  +++|          LX6    36          PUT NUMBER OF CATALOG TRACKS IN HEADER
12350  M00S07375.pfdump  +++|          BX3    X1+X3
12351  M00S07376.pfdump  +++|          BX7    X3+X6
12352  M00S07377.pfdump  +++|          SB2    B0          CLEAR USER INDEX
12353  M00S07378.pfdump  +++|          SA7    CICH        SAVE HEADER WORD
12354  M00S07379.pfdump  +++| CCI4     LX2    -1          POSITION MASK BIT
12355  M00S07380.pfdump  +++|          SB2    B2+B1       ADVANCE USER INDEX
12356  M00S07381.pfdump  +++|          PL     X2,CCI4     IF MASK BIT NOT SET
12357  M00S07382.pfdump  +++|          SA1    CDPM        SET CATALOG DESCRIPTION PARAMETER
12358  M00S07383.pfdump  +++|          SX7    B2-B1       SET CATALOG DESCRIPTION USER INDEX
12359  M00S07384.pfdump  +++|          BX6    X1
12360  M00S07385.pfdump  +++|          SA7    CDUI
12361  M00S07386.pfdump  +++|          SA6    CATC+FTPM
12362  M00S07387.pfdump  +++|          RJ     SAC         SET PF ACTIVITY COUNT
Line S07388 Modification History
M01 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
12363  M01S07388.286l859 ---|          RJ     WUC         WAIT FOR NO PF UTILITY ACTIVE ON DEVICE
Line S07389 Modification History
M01 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
12364  M01S07389.253l688 ---|          CALLPFU CATC,CTCT,R GET CORRECT CATALOG TRACK
Line S00903 Modification History
M01 (Added by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
12365  M01S00903.253l688 +++|          CALLPFU  CATC,CTCT,R  GET CORRECT CATALOG TRACK
12366  M00S07390.pfdump  +++|          SA1    CATC+FTPM   GET CATALOG TRACK PARAMETERS
12367  M00S07391.pfdump  +++|          SX2    5           SET FILE STATUS
Line S07392 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
12368  M01S07392.ns22000 ---|          MX0    -18
Line S00701 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
12369  M01S00701.ns22000 +++|          MX0    -24
12370  M00S07393.pfdump  +++|          BX1    -X0*X1      SET EQ AND FIRST TRACK
12371  M00S07394.pfdump  +++|          MX0    -12
12372  M00S07395.pfdump  +++|          BX7    -X0*X1      SET CURRENT TRACK
12373  M00S07396.pfdump  +++|          LX1    36
12374  M00S07397.pfdump  +++|          BX2    X1+X2       BUILD CATALOG TRACK FST ENTRY
12375  M00S07398.pfdump  +++|          LX7    24
12376  M00S07399.pfdump  +++|          BX6    X2+X7
12377  M00S07400.pfdump  +++|          SA6    A1
12378  M00S07401.pfdump  +++|          RETURN CATC,R      RETURN ANY EXISTING CATC
Line S07402 Modification History
M01 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
12379  M01S07402.253l688 ---|          CALLPFU CATC,CTOL,R CREATE CATALOG TRACK FILE
Line S00904 Modification History
M01 (Added by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
12380  M01S00904.253l688 +++|          CALLPFU  CATC,CTOL,R  CREATE CATALOG TRACK FILE
12381  M00S07403.pfdump  +++|          PCINT  CATC,CTSC   SET CATALOG TRACK INTERLOCK
12382  M00S07404.pfdump  +++|
12383  M00S07405.pfdump  +++|*         INITIALIZE CATALOG TRACK WORKING BUFFER.
12384  M00S07406.pfdump  +++|
12385  M00S07407.pfdump  +++| CCI5     READCW CATC,17B    INITIATE CATALOG READ
12386  M00S07408.pfdump  +++|          BX6    X6-X6       CLEAR EMPTY RECORD FLAG
12387  M00S07409.pfdump  +++|          SA6    EMRF
12388  M00S07410.pfdump  +++|          SX6    DBUFH       INITIALIZE CONTROL WORD ADDRESS
12389  M00S07411.pfdump  +++|          SA6    CWAD
12390  M00S07412.pfdump  +++|          SB3    X6+B1       INITIALIZE WORKING STORAGE POINTER
12391  M00S07413.pfdump  +++|          SB5    B0
12392  M00S07414.pfdump  +++|
12393  M00S07415.pfdump  +++|*         READ CATALOG FILE.
12394  M00S07416.pfdump  +++|
12395  M00S07417.pfdump  +++| CCI6     SX6    B3          SAVE *CIR* BUFFER PARAMETERS
12396  M00S07418.pfdump  +++|          SX7    B5
12397  M00S07419.pfdump  +++|          LX6    18
12398  M00S07420.pfdump  +++|          BX7    X6+X7
12399  M00S07421.pfdump  +++|          SA7    CCIA
Line S02167 Modification History
M01 (Added by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
12400  M01S02167.286l859 +++| CCI6.1   SX6    B0+
12401  M01S02168.286l859 +++|          SA6    CFTS        CLEAR END OF CATALOG TRACK STATUS
12402  M00S07422.pfdump  +++|          SX2    CATC        READ BUFFER OF CATALOG ENTRIES
Line S07423 Modification History
M01 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
12403  M01S07423.286l859 ---|          RJ     RCE
12404  M01S07424.286l859 ---|          SX6    B3          SAVE CATALOG BUFFER PARAMETERS
12405  M01S07425.286l859 ---|          SX7    B6
Line S02169 Modification History
M01 (Added by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
12406  M01S02169.286l859 +++|          RJ     RCS
12407  M01S02170.286l859 +++|          SA2    CSLW
12408  M01S02171.286l859 +++|          SX6    B1
12409  M01S02172.286l859 +++|          SX7    X2          SET LWA+1 OF ENTRIES
12410  M01S02173.286l859 +++|          ZR     X1,CCI6.2   IF ENTRIES READ
12411  M01S02174.286l859 +++|          NG     X1,CCI6.1   IF READ ERROR WITH DATA TRANSFERRED
12412  M01S02175.286l859 +++|          SA6    CFTS        SET END OF CATALOG TRACK
12413  M01S02176.286l859 +++|          SX7    CSBF        SET NO DATA READ
12414  M01S02177.286l859 +++| CCI6.2   SX6    CSBF        SAVE CATALOG BUFFER PARAMETERS
12415  M00S07426.pfdump  +++|          LX6    18
12416  M00S07427.pfdump  +++|          BX7    X6+X7
12417  M00S07428.pfdump  +++|          SA7    CCIC
12418  M00S07429.pfdump  +++|          SA1    CCIA        RESTORE *CIR* BUFFER PARAMETERS
12419  M00S07430.pfdump  +++|          SB5    X1
12420  M00S07431.pfdump  +++|          LX1    -18
12421  M00S07432.pfdump  +++|          SA2    CCIC        RESTORE CATALOG BUFFER PARAMETERS
12422  M00S07433.pfdump  +++|          SB3    X1
12423  M00S07434.pfdump  +++|          SB4    X2
12424  M00S07435.pfdump  +++|          LX2    -18
12425  M00S07436.pfdump  +++|          SB2    X2
12426  M00S07437.pfdump  +++|          NE     B2,B4,CCI7  IF CATALOG ENTRIES TRANSFERRED
12427  M00S07438.pfdump  +++|          SA1    CFTS
12428  M00S07439.pfdump  +++|          ZR     X1,CCI6     IF NOT END OF CATALOG TRACK
12429  M00S07440.pfdump  +++|          SA2    EMRF
12430  M00S07441.pfdump  +++|          NZ     X2,CCI8     IF NOT EMPTY RECORD
12431  M00S07442.pfdump  +++|          EQ     CCI13       CONTINUE TO NEXT CATALOG TRACK
12432  M00S07443.pfdump  +++|
12433  M00S07444.pfdump  +++|*         BUILD *CIR*.
12434  M00S07445.pfdump  +++|
12435  M00S07446.pfdump  +++| CCI7     SX6    B1          SET EMPTY RECORD FLAG
12436  M00S07447.pfdump  +++|          SA6    EMRF
12437  M00S07448.pfdump  +++|          RJ     BCL         BUILD CATALOG LIST
12438  M00S07449.pfdump  +++| CCI8     SA2    NCTL        UPDATE NUMBER OF CATALOGS ON THIS TRACK
12439  M00S07450.pfdump  +++|          SX4    B5
12440  M00S07451.pfdump  +++|          SB5    B0          CLEAR CATALOG COUNT
12441  M00S07452.pfdump  +++|          IX6    X2+X4
12442  M00S07453.pfdump  +++|          SA3    NCTB
12443  M00S07454.pfdump  +++|          SA6    A2
12444  M00S07455.pfdump  +++|          IX6    X3+X4
12445  M00S07456.pfdump  +++|          SA6    A3
12446  M00S07457.pfdump  +++|          SA2    CWAD        GET CONTROL WORD ADDRESS
12447  M00S07458.pfdump  +++|          GE     B2,B4,CCI9  IF CATALOG BUFFER EMPTY
12448  M00S07459.pfdump  +++|          SX3    CICW        SET UP CONTROL WORD
12449  M00S07460.pfdump  +++|          SX7    B5          SAVE *CIR* BUFFER PARAMETER
12450  M00S07461.pfdump  +++|          SA7    CCIA
12451  M00S07462.pfdump  +++|          SX6    B2          SAVE CATALOG BUFFER PARAMETERS
12452  M00S07463.pfdump  +++|          SX7    B4+
12453  M00S07464.pfdump  +++|          LX6    18
12454  M00S07465.pfdump  +++|          BX7    X6+X7
12455  M00S07466.pfdump  +++|          SA7    CCIC
12456  M00S07467.pfdump  +++|          RJ     WIB         WRITE IMAGE BLOCK
12457  M00S07468.pfdump  +++|          SA1    CCIA        RESTORE *CIR* BUFFER PARAMETER
12458  M00S07469.pfdump  +++|          SB5    X1+
12459  M00S07470.pfdump  +++|          SA1    CCIC        RESTORE CATALOG BUFFER PARAMETERS
12460  M00S07471.pfdump  +++|          SB4    X1
12461  M00S07472.pfdump  +++|          LX1    -18
12462  M00S07473.pfdump  +++|          SB2    X1
12463  M00S07474.pfdump  +++|          EQ     CCI7        LOOP TO FINISH CATALOG BLOCK
12464  M00S07475.pfdump  +++|
12465  M00S07476.pfdump  +++| CCI9     SX6    B3-DBUFH-776B
12466  M00S07477.pfdump  +++|          PL     X6,CCI10    IF END OF 1000B WORD BLOCK
12467  M00S07478.pfdump  +++|          SA1    CFTS
12468  M00S07479.pfdump  +++|          ZR     X1,CCI6     IF NOT EOR OR EOF
12469  M00S07480.pfdump  +++|          EQ     CCI11       WRITE IMAGE BLOCK
12470  M00S07481.pfdump  +++|
12471  M00S07482.pfdump  +++| CCI10    SX3    CICW        SET CONTROL WORD
12472  M00S07483.pfdump  +++|          SA1    CFTS
12473  M00S07484.pfdump  +++|          ZR     X1,CCI12    IF NOT EOR OR EOF
12474  M00S07485.pfdump  +++| CCI11    SX3    CRWC        SET EOR CONTROL WORD
12475  M00S07486.pfdump  +++| CCI12    SX7    B5          SAVE *CIR* BUFFER PARAMETER
12476  M00S07487.pfdump  +++|          SA7    CCIA
12477  M00S07488.pfdump  +++|          SX6    B2          SAVE CATALOG BUFFER PARAMETERS
12478  M00S07489.pfdump  +++|          SX7    B4+
12479  M00S07490.pfdump  +++|          LX6    18
12480  M00S07491.pfdump  +++|          BX7    X6+X7
12481  M00S07492.pfdump  +++|          SA7    CCIC
12482  M00S07493.pfdump  +++|          RJ     WIB         WRITE IMAGE BLOCK
12483  M00S07494.pfdump  +++|          SA1    CCIA        RESTORE *CIR* BUFFER PARAMETER
12484  M00S07495.pfdump  +++|          SB5    X1+
12485  M00S07496.pfdump  +++|          SA1    CCIC        RESTORE CATALOG BUFFER PARAMETERS
12486  M00S07497.pfdump  +++|          SB4    X1
12487  M00S07498.pfdump  +++|          LX1    -18
12488  M00S07499.pfdump  +++|          SB2    X1+
12489  M00S07500.pfdump  +++|          SA1    CFTS
12490  M00S07501.pfdump  +++|          ZR     X1,CCI6     IF NOT EOR OR EOF
12491  M00S07502.pfdump  +++| CCI13    SA2    EMRF
12492  M00S07503.pfdump  +++|          ZR     X2,CCI14    IF EMPTY CATALOG TRACK
12493  M00S07504.pfdump  +++|          ARCHIVE  WRITER
12494  M00S07505.pfdump  +++| CCI14    SA2    NCAT        CONTINUE TO NEXT CATALOG TRACK
12495  M00S07506.pfdump  +++|          SA3    CCTR
12496  M00S07507.pfdump  +++|          SX6    X3+B1
12497  M00S07508.pfdump  +++|          IX2    X3-X2
12498  M00S07509.pfdump  +++|          PL     X2,CCI15    IF END OF CATALOG TRACKS
12499  M00S07510.pfdump  +++|          SA6    A3
12500  M00S07511.pfdump  +++|
12501  M00S07512.pfdump  +++|*         ADVANCE TO NEXT CATALOG TRACK.
12502  M00S07513.pfdump  +++|
12503  M00S07514.pfdump  +++|          PCINT  CATC,CTAC   ADVANCE CATALOG TRACK
12504  M00S07515.pfdump  +++|          EQ     CCI5        LOOP FOR NEXT TRACK
12505  M00S07516.pfdump  +++|
12506  M00S07517.pfdump  +++|*         ADVANCE TO NEXT DEVICE.
12507  M00S07518.pfdump  +++|
12508  M00S07519.pfdump  +++| CCI15    RJ     CAC         CLEAR PF ACTIVITY COUNT
Line S07520 Modification History
M01 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
12509  M01S07520.253l688 ---|          SA1    CPAR+/COMSPFS/CPLO
12510  M01S07521.253l688 ---|          LX1    59-58
12511  M01S07522.253l688 ---|          PL     X1,CCI2     IF CATALOG LIST NOT REQUESTED
12512  M01S07523.253l688 ---|
12513  M01S07524.253l688 ---|*         INITIALIZE LIST ROUTINE.
12514  M01S07525.253l688 ---|
12515  M01S07526.253l688 ---|          WRITER OUTPUT,R
12516  M01S07527.253l688 ---|          SX6    B1
12517  M01S07528.253l688 ---|          SA6    PAGE
12518  M01S07529.253l688 ---|          BX6    X6-X6
12519  M01S07530.253l688 ---|          SA6    LNAC
Line S07531 Modification History
M01 (Removed by) ns22000
M02 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
12520  M02S07531.253l688 ---|          SX6    PGLM
Line S00702 Modification History
M01 (Added by) ns22000
M02 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
12521  M02S00702.253l688 ---|          SX6    99999       FORCE PAGE EJECT
Line S07532 Modification History
M01 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
12522  M01S07532.253l688 ---|          SA6    LNPP
12523  M00S07533.pfdump  +++|          EQ     CCI2        SEARCH FOR NEXT MASTER DEVICE
12524  M00S07534.pfdump  +++|
12525  M00S07535.pfdump  +++|
12526  M00S07536.pfdump  +++| CCIA     BSSZ   1           CATALOG TRACK WORKING BUFFER INDICES
12527  M00S07537.pfdump  +++| CCIB     CON    0           MSTT LOCATOR
12528  M00S07538.pfdump  +++| CCIC     BSS    1           CATALOG BUFFER PARAMETER SAVE AREA
Line S00905 Modification History
M01 (Added by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
12529  M01S00905.253l688 +++|
12530  M00S07539.pfdump  +++| CDPM     VFD    24/0,18/CDWD,18/CDUI  CATALOG DESCRIPTION PARAMETER
12531  M00S07540.pfdump  +++| CDUI     BSS    1           CATALOG DESCRIPTION USER INDEX
12532  M00S07541.pfdump  +++|
Line S07542 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
12533  M01S07542.ns22000 ---|*CDWD     42/PN,6/EQ,12/0
Line S00703 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
12534  M01S00703.ns22000 +++|*T CDWD   42/ PN, 6/, 12/ EQ
Figure CDWD

01112171829 EQ PN3059 PN

12535  M00S07543.pfdump  +++|*         PN = PACKNAME FOR AN AUXILIARY DEVICE.
12536  M00S07544.pfdump  +++|*            = 0 FOR A FAMILY DEVICE.
Line S07545 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
12537  M01S07545.ns22000 ---|*         EQ = EQUIPMENT NUMBER OF THE DEVICE.
Line S00704 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
12538  M01S00704.ns22000 +++|*         EQ = EST ORDINAL OF THE DEVICE.
12539  M00S07546.pfdump  +++|
12540  M00S07547.pfdump  +++| CDWD     BSS    1           CATALOG DESCRIPTION WORD
Line S02178 Modification History
M01 (Added by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
12541  M01S02178.286l859 +++| CFTS     CON    0           CATALOG TRACK TERMINATION FLAG
12542  M00S07548.pfdump  +++| CRIN     CON    1           CURRENT RANDOM INDEX
12543  M00S07549.pfdump  +++| NCTL     BSSZ   1           NUMBER OF CATALOGS
12544  M00S07550.pfdump  +++| NCTB     BSSZ   1           NUMBER OF CATALOGS IN BLOCK
12545  M00S07551.pfdump  +++| EMRF     BSSZ   1           EMPTY CATALOG RECORD FLAG
12546  M00S07552.pfdump  +++| CCTR     CON    1           CURRENT CATALOG TRACK
12547  M00S07553.pfdump  +++| CWAD     BSSZ   1           CONTROL WORD ADDRESS
12548  M00S07554.pfdump  +++| CONT     CON    CFCW+201B   DIRECTORY CONTROL WORD
12549  M00S07555.pfdump  +++| TCCT     BSSZ   1           TOTAL CATALOG COUNT
12550  M00S07556.pfdump  +++| CDIR     BSSZ   200B        CATALOG DIRECTORY
12551  M00S07557.pfdump  +++| CIRM     DIS    3,GENERATING CATALOG IMAGE.
12552  M00S07558.pfdump  +++| CIRH     VFD    12/0LCH,48/0    CATALOG IMAGE RECORD HEADER
12553  M00S07559.pfdump  +++| CICH     BSS    1           HEADER WORD WITH MASK
Line S02179 Modification History
M01 (Added by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
12554  M01S02179.286l859 +++| NCAT     BSSZ   1           NUMBER OF CATALOG TRACKS
12555  M00S07560.pfdump  +++| WIB      SPACE  4,20
12556  M00S07561.pfdump  +++|**        WIB - WRITE CATALOG IMAGE BLOCK.
12557  M00S07562.pfdump  +++|*
12558  M00S07563.pfdump  +++|*         ENTRY  (X2) = ADDRESS TO STORE CONTROL WORD AT.
12559  M00S07564.pfdump  +++|*                (X3) = CONTROL WORD.
12560  M00S07565.pfdump  +++|*                (NCTB) = WORD COUNT OF BLOCK.
12561  M00S07566.pfdump  +++|*                (CICH) = CATALOG IMAGE HEADER.
12562  M00S07567.pfdump  +++|*                (DBUFH - DBUFH+1000B) = CATALOG IMAGE BLOCK.
12563  M00S07568.pfdump  +++|*
12564  M00S07569.pfdump  +++|*         EXIT   (B3) = NEXT AVAILABLE WORKING STORAGE ADDRESS.
12565  M00S07570.pfdump  +++|*                (NCTB) = 0.
12566  M00S07571.pfdump  +++|*                (CICH) = 0.
12567  M00S07572.pfdump  +++|*                (CWAD) = NEXT CONTROL WORD ADDRESS.
12568  M00S07573.pfdump  +++|*                CATALOG IMAGE BLOCK WRITTEN TO ARCHIVE FILE.
Line S00906 Modification History
M01 (Added by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
12569  M01S00906.253l688 +++|*                CATALOG IMAGE DATA WRITTEN TO SELECTED OUTPUT FILES.
12570  M00S07574.pfdump  +++|*
12571  M00S07575.pfdump  +++|*         USES   X - 1, 4, 6, 7.
12572  M00S07576.pfdump  +++|*                A - 1, 4, 6, 7.
12573  M00S07577.pfdump  +++|*                B - 3.
12574  M00S07578.pfdump  +++|*
Line S00907 Modification History
M01 (Added by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
12575  M01S00907.253l688 +++|*         CALLS  OCI.
12576  M01S00908.253l688 +++|*
12577  M00S07579.pfdump  +++|*         MACROS ARCHIVE.
12578  M00S07580.pfdump  +++|
12579  M00S07581.pfdump  +++|
12580  M00S07582.pfdump  +++| WIB      SUBR               ENTRY/EXIT
12581  M00S07583.pfdump  +++|
12582  M00S07584.pfdump  +++|*         SET UP CONTROL WORD.
12583  M00S07585.pfdump  +++|
Line S07586 Modification History
M01 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
12584  M01S07586.253l688 ---|          SA4    NCTB        SET WORD COUNT IN CONTROL WORD
12585  M01S07587.253l688 ---|          BX6    X3+X4
12586  M01S07588.253l688 ---|          SA1    CICH        BOOLEAN IN HEADER IF PRESENT
12587  M01S07589.253l688 ---|          BX6    X6+X1
12588  M01S07590.253l688 ---|          BX7    X7-X7
12589  M01S07591.253l688 ---|          SA7    A1
Line S00909 Modification History
M01 (Added by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
12590  M01S00909.253l688 +++|          SA4    NCTB
12591  M01S00910.253l688 +++|          SA1    CICH
12592  M01S00911.253l688 +++|          BX6    X3+X4       MERGE CONTROL WORD AND WORD COUNT
12593  M01S00912.253l688 +++|          BX6    X6+X1       MERGE HEADER IF PRESENT
12594  M00S07592.pfdump  +++|          SA6    X2
Line S07593 Modification History
M01 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
12595  M01S07593.253l688 ---|          SA7    A4          CLEAR BLOCK CATALOG COUNT
12596  M00S07594.pfdump  +++|
12597  M00S07595.pfdump  +++|*         WRITE BLOCK.
12598  M00S07596.pfdump  +++|
12599  M00S07597.pfdump  +++|          SX7    B1          INCLUDE CONTROL WORD IN WORD COUNT
12600  M00S07598.pfdump  +++|          IX4    X4+X7
12601  M00S07599.pfdump  +++|          ARCHIVE  WRITEW,DBUFH,X4  WRITE CATALOG IMAGE BLOCK
Line S00913 Modification History
M01 (Added by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
12602  M01S00913.253l688 +++|
12603  M01S00914.253l688 +++|*         WRITE CIR DATA TO OUTPUT FILES.
12604  M01S00915.253l688 +++|
12605  M01S00916.253l688 +++|          SA1    NCTB
12606  M01S00917.253l688 +++|          SX6    DBUFH+1     SET BUFFER ADDRESS
12607  M01S00918.253l688 +++|          BX7    X1          SET WORD COUNT
12608  M01S00919.253l688 +++|          RJ     OCI         OUTPUT CIR ENTRIES
12609  M01S00920.253l688 +++|
12610  M01S00921.253l688 +++|*         RESET BLOCK POINTERS.
12611  M01S00922.253l688 +++|
12612  M01S00923.253l688 +++|          SX7    B0+
12613  M01S00924.253l688 +++|          SA7    CICH        CLEAR CATALOG IMAGE HEADER
12614  M01S00925.253l688 +++|          SA7    NCTB        CLEAR BLOCK CATALOG COUNT
12615  M00S07600.pfdump  +++|          SX6    DBUFH       SET CONTROL WORD ADDRESS
12616  M00S07601.pfdump  +++|          SA6    CWAD
12617  M00S07602.pfdump  +++|          SB3    X6+1        SET WORKING STORAGE ADDRESS
12618  M00S07603.pfdump  +++|          EQ     WIBX        RETURN
12619  M00S07604.pfdump  +++|          TITLE  PRESET MESSAGES.
Line S07605 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
12620  M01S07605.ns22000 ---|*         PRESET MESSAGES
Line S00705 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
12621  M01S00705.ns22000 +++| PRESET   SPACE  4,10
Line S00706 Modification History
M01 (Added by) ns22000
M02 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
12622  M02S00706.286l859 ---|**        PRESET MESSAGES.
Line S02180 Modification History
M01 (Added by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
12623  M01S02180.286l859 +++|**        PRESET ERROR MESSAGES.
12624  M00S07606.pfdump  +++|
12625  M00S07607.pfdump  +++|
Line S07608 Modification History
M01 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
12626  M01S07608.253l688 ---| PMSA     DATA   30C PFDUMP DEVICE MASK
12627  M01S07609.253l688 ---| PMSB     DATA   80C
12628  M01S07610.253l688 ---| PMSC     DATA   30C *PFDUMP
12629  M01S07611.253l688 ---| PMSD     DATA   C* PFDUMP - DEVICE $021 NOT FOUND.*
12630  M01S07612.253l688 ---| PMSE     DATA   C* PFDUMP - NO FILES SELECTED.*
12631  M01S07613.253l688 ---| PMSF     DATA   20H ALL FILES FOR
12632  M01S07614.253l688 ---| PMSG     DATA   10H FILENAME
12633  M01S07615.253l688 ---| PMSH     DATA   10H MODIFIED
12634  M01S07616.253l688 ---|          DATA   10H ACCESSED
12635  M01S07617.253l688 ---|          DATA   10H CREATED
12636  M01S07618.253l688 ---| PMSI     DATA   10H AFTER
12637  M01S07619.253l688 ---| PMSJ     DATA   10H BEFORE
12638  M01S07620.253l688 ---| PMSK     DATA   10HUSER INDEX
12639  M01S07621.253l688 ---| PMSL     DATA   30H INDIRECT ACCESS FILES ONLY
12640  M01S07622.253l688 ---| PMSM     DATA   30H DIRECT ACCESS FILES ONLY
12641  M01S07623.253l688 ---| PMSN     DATA   10H DUMPING -
12642  M01S07624.253l688 ---| PMSO     DATA   10H1
12643  M01S07625.253l688 ---| PMSP     DATA   10H PACKNAME
12644  M01S07626.253l688 ---| PMSQ     DATA   10H   PACK
Line S07627 Modification History
M01 (Removed by) v23l617
M02 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
12645  M02S07627.253l688 ---| PMSR     DATA   30H MSS FILE STAGING SUPPRESSED
Line S00253 Modification History
M01 (Added by) v23l617
M02 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
12646  M02S00253.253l688 ---| PMSR     DATA   30H FILE STAGING SUPPRESSED
Line S07628 Modification History
M01 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
12647  M01S07628.253l688 ---| PMSS     DATA   40H RESET DISK SPACE RELEASE INHIBIT DATES
Line S00707 Modification History
M01 (Added by) ns22000
M02 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
12648  M02S00707.253l688 ---| PMST     DATA   40H ACCESS LEVELS FROM           TO
12649  M02S00708.253l688 ---| PMSU     DATA   C* PFDUMP - ACCESS LEVEL LIMITS OUT OF RANGE.*
12650  M02S00709.253l688 ---| PMSV     DATA   C* PFDUMP - ACCESS LEVELS NOT ALLOWED ON ARCHIVE FILE E
12651  M02S00710.253l688 ---|,QUIPMENT.*
Line S00926 Modification History
M01 (Added by) 253l688
M02 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
12652  M02S00926.274l797 ---| PMSA     DATA   C* PFDUMP - NINE TRACK TAPE REQUIRED FOR DESTAGE.*
Line S00267 Modification History
M01 (Added by) 274l797
M02 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
12653  M02S00267.286l859 ---| PMSA     DATA   C* PFDUMP - NT/CT/AT TAPE OR OD REQUIRED FOR DESTAGE.*
Line S00927 Modification History
M01 (Added by) 253l688
M02 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
12654  M02S00927.286l859 ---| PMSB     DATA   C* PFDUMP - TAPE NOT AT BOI FOR DESTAGE.*
12655  M02S00928.286l859 ---| PMSC     DATA   C* PFDUMP - TAPE FORMAT OR LABEL NOT VALID FOR DESTAGE.
12656  M02S00929.286l859 ---|,*
12657  M02S00930.286l859 ---| PMSD     DATA   C* PFDUMP - VSN NOT VALID FOR DESTAGE.*
12658  M02S00931.286l859 ---| PMSE     DATA   C* PFDUMP - ACCESS LEVEL LIMITS OUT OF RANGE.*
12659  M02S00932.286l859 ---| PMSF     DATA   C* PFDUMP - NO FILES SELECTED.*
Line S00268 Modification History
M01 (Added by) 274l797
M02 (Removed by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
12660  M02S00268.286l859 ---| PMSK     DATA   C* PFDUMP - OPTICAL DISK LABEL NOT VALID FOR DESTAGE.*
12661  M02S00269.286l859 ---| PMSL     DATA   C* PFDUMP - PARTITION NOT VALID FOR DESTAGE.*
12662  M02S00270.286l859 ---| PMSM     DATA   C* PFDUMP - INTERNAL ERROR ON FILE ZZZZZOD.*
12663  M02S00271.286l859 ---| PMSN     DATA   C* PFDUMP - VERSION NUMBER EXCEEDED FOR DESTAGE.*
Line S02181 Modification History
M01 (Added by) 286l859
Seq #  *Modification Id* Act 
----------------------------+
12664  M01S02181.286l859 +++| ERAR     DATA   C* ACCESS LEVEL LIMITS OUT OF RANGE.*
12665  M01S02182.286l859 +++| ERFD     DATA   C* TAPE FORMAT OR LABEL NOT VALID FOR DESTAGE.*
12666  M01S02183.286l859 +++| ERLD     DATA   C* OPTICAL DISK LABEL NOT VALID FOR DESTAGE.*
12667  M01S02184.286l859 +++| ERND     DATA   C* VERSION NUMBER EXCEEDED FOR DESTAGE.*
12668  M01S02185.286l859 +++| EROF     DATA   C* INTERNAL ERROR ON FILE ZZZZZOD.*
12669  M01S02186.286l859 +++| ERPD     DATA   C* PARTITION NOT VALID FOR DESTAGE.*
12670  M01S02187.286l859 +++| ERTD     DATA   C* NT/CT/AT TAPE OR OD REQUIRED FOR DESTAGE.*
12671  M01S02188.286l859 +++| ERVD     DATA   C* VSN NOT VALID FOR DESTAGE.*
Line S00711 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
12672  M01S00711.ns22000 +++|          SPACE  4,10
12673  M01S00712.ns22000 +++|*         PRESET RESERVED LOCATIONS.
12674  M01S00713.ns22000 +++|
12675  M01S00714.ns22000 +++|
Line S00073 Modification History
M01 (Added by) pfdum21
M02 (Removed by) pfdum25
Seq #  *Modification Id* Act 
----------------------------+
12676  M02S00073.pfdum25 ---| BUFI     CON    0           FL INCREASE FOR ISMT BUFFERS
Line S00008 Modification History
M01 (Added by) pfdum25
M02 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
12677  M02S00008.274l797 ---| BUFI     CON    0           FL INCREASE FOR *ISMT*/*CMTS* BUFFERS
Line S00272 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
12678  M01S00272.274l797 +++| BUFI     CON    0           FL INCREASE FOR VERIFY FILE BUFFER
Line S00715 Modification History
M01 (Added by) ns22000
M02 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
12679  M02S00715.253l688 ---| DPLA     CON    8           DUMP LOWER ACCESS LEVEL
12680  M02S00716.253l688 ---| DPUA     CON    -1          DUMP UPPER ACCESS LEVEL
12681  M02S00717.253l688 ---| SYLA     CON    0           SYSTEM LOWER ACCESS LEVEL LIMIT
12682  M02S00718.253l688 ---| SYSS     CON    0           SYSTEM SECURITY MODE
12683  M02S00719.253l688 ---| SYUA     CON    0           SYSTEM UPPER ACCESS LEVEL LIMIT
Line S00720 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
12684  M01S00720.ns22000 +++| COMMON   SPACE  4,10
12685  M01S00721.ns22000 +++|**        PRESET COMMON DECKS.
12686  M01S00722.ns22000 +++|
12687  M01S00723.ns22000 +++|
Line S00105 Modification History
M01 (Added by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
12688  M01S00105.241l630 +++|*CALL     COMCDCP
Line S00933 Modification History
M01 (Added by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
12689  M01S00933.253l688 +++|          LIST   X
12690  M01S00934.253l688 +++|*CALL     COMCPFP
12691  M01S00935.253l688 +++|          LIST   *
Line S00724 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
12692  M01S00724.ns22000 +++|*CALL     COMCRSB
Line S00273 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
12693  M01S00273.274l797 +++|*CALL     COMCSKW
12694  M01S00274.274l797 +++|*CALL     COMCSOE
Line S00106 Modification History
M01 (Added by) 241l630
Seq #  *Modification Id* Act 
----------------------------+
12695  M01S00106.241l630 +++|
12696  M01S00107.241l630 +++| PRK      HERE               ASSEMBLE Y-COORDINATE PRESET CODE HERE
Line S07629 Modification History
M01 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
12697  M01S07629.253l688 ---|          SPACE  4
Line S00936 Modification History
M01 (Added by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
12698  M01S00936.253l688 +++|          SPACE  4,10
12699  M00S07630.pfdump  +++|*         PRESET BUFFERS.
12700  M00S07631.pfdump  +++|
12701  M00S07632.pfdump  +++|
Line S07633 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
12702  M01S07633.ns22000 ---| ESTADD   EQU    *           *RSB* PARAMETER WORD FOR *EST*
Line S00725 Modification History
M01 (Added by) ns22000
M02 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
12703  M02S00725.274l797 ---| ESTADD   EQU    *           *RSB* PARAMETER WORD FOR EST
Line S00275 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
12704  M01S00275.274l797 +++| ODFBUF   EQU    *           OPTICAL DISK MOUNT FILE BUFFER *ZZZZZOD*
12705  M01S00276.274l797 +++| ESTADD   EQU    ODFBUF+ODFBL *RSB* PARAMETER WORD FOR EST
Line S07634 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
12706  M01S07634.ns22000 ---| ESTBUF   EQU    ESTADD+1    *EST* BUFFER
Line S00726 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
12707  M01S00726.ns22000 +++| ESTBUF   EQU    ESTADD+1    EST BUFFER
Line S07635 Modification History
M01 (Removed by) pfdum2
Seq #  *Modification Id* Act 
----------------------------+
12708  M01S07635.pfdum2  ---| MSTADD   EQU    ESTBUF+77B  *RSB* PARAMETER WORD FOR *MST*
Line S00001 Modification History
M01 (Added by) pfdum2
M02 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
12709  M02S00001.ns22000 ---| MSTADD   EQU    ESTBUF+100B *RSB* PARAMETER WORD FOR MST
Line S00727 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
12710  M01S00727.ns22000 +++| MSTADD   EQU    ESTBUF+ESMX*ESTE  *RSB* PARAMETER WORD FOR MST
Line S07636 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
12711  M01S07636.ns22000 ---| MSTBUF   EQU    MSTADD+1    *MST* BUFFER
Line S00728 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
12712  M01S00728.ns22000 +++| MSTBUF   EQU    MSTADD+1    MST BUFFER
Line S07637 Modification History
M01 (Removed by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
12713  M01S07637.253l688 ---| PREL     EQU    MSTBUF+MSTL PRESET LWA + 1
Line S00937 Modification History
M01 (Added by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
12714  M01S00937.253l688 +++| DSTBUF   EQU    MSTBUF+MSTL DEVICE STATUS BUFFER
12715  M01S00938.253l688 +++| PREL     EQU    DSTBUF+2*MSMX*2  PRESET LWA + 1
12716  M00S07638.pfdump  +++|
12717  M00S07639.pfdump  +++|          ERRNG  CATB-PREL   PRESET OVERLAYS *CATB*
Line S07640 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
12718  M01S07640.ns22000 ---|          TITLE  DISPLAY AREAS.
Line S00729 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
12719  M01S00729.ns22000 +++|          SPACE  4,10
12720  M00S07641.pfdump  +++|          END