User Tools

Site Tools


cdc:nos2.source:opl.opl871:deck:dsdi.005

Deck DSDI Part 005

70 Modifications

Listing Sections

Source

Seq #  *Modification Id* Act 
----------------------------+
Line S05361 Modification History
M01 (Added by) dsdi
M02 (Updated by) 261l700
Seq #  *Modification Id* Act 
----------------------------+
06734  M02S05361.261l700 ---|          RJ     PXM
Line S05362 Modification History
M01 (Added by) dsdi
M02 (Updated by) 261l700
Seq #  *Modification Id* Act 
----------------------------+
06735  M02S05362.261l700 ---|
Line S05363 Modification History
M01 (Added by) dsdi
M02 (Updated by) 261l700
Seq #  *Modification Id* Act 
----------------------------+
06736  M02S05363.261l700 ---|*         PRINT THE 3 WORDS FOLLOWING IDLE 1 AND CPUCIO 1 XP-S.
Line S05364 Modification History
M01 (Added by) dsdi
M02 (Updated by) 261l700
Seq #  *Modification Id* Act 
----------------------------+
06737  M02S05364.261l700 ---|
Line S05365 Modification History
M01 (Added by) dsdi
M02 (Updated by) 261l700
Seq #  *Modification Id* Act 
----------------------------+
06738  M02S05365.261l700 ---|          PRINT  (=2C  )
Line S05366 Modification History
M01 (Added by) dsdi
M02 (Updated by) 261l700
Seq #  *Modification Id* Act 
----------------------------+
06739  M02S05366.261l700 ---|          SA1    CPRA        SET LISTING ADDRESS
Line S05367 Modification History
M01 (Added by) dsdi
M02 (Updated by) 261l700
Seq #  *Modification Id* Act 
----------------------------+
06740  M02S05367.261l700 ---|          SX6    X1-26B
Line S05368 Modification History
M01 (Added by) dsdi
M02 (Updated by) 261l700
Seq #  *Modification Id* Act 
----------------------------+
06741  M02S05368.261l700 ---|          SA6    FW
Line S05369 Modification History
M01 (Added by) dsdi
M02 (Updated by) 261l700
Seq #  *Modification Id* Act 
----------------------------+
06742  M02S05369.261l700 ---|          SB2    X6          SET CORE ADDRESS
Line S05370 Modification History
M01 (Added by) dsdi
M02 (Updated by) 261l700
Seq #  *Modification Id* Act 
----------------------------+
06743  M02S05370.261l700 ---|          SB2    -B2
Line S05371 Modification History
M01 (Added by) dsdi
M02 (Updated by) 261l700
Seq #  *Modification Id* Act 
----------------------------+
06744  M02S05371.261l700 ---|          SA1    MTRD
Line S05372 Modification History
M01 (Added by) dsdi
M02 (Updated by) 261l700
Seq #  *Modification Id* Act 
----------------------------+
06745  M02S05372.261l700 ---|          SB2    BUF+20B+B2
Line S05373 Modification History
M01 (Added by) dsdi
M02 (Updated by) 261l700
Seq #  *Modification Id* Act 
----------------------------+
06746  M02S05373.261l700 ---|          RJ     GTD
Line S05374 Modification History
M01 (Added by) dsdi
M02 (Updated by) 261l700
Seq #  *Modification Id* Act 
----------------------------+
06747  M02S05374.261l700 ---| MTR1     SA1    MTRB        GET MTR XP ADDRESS
Line S05375 Modification History
M01 (Added by) dsdi
M02 (Updated by) 261l700
Seq #  *Modification Id* Act 
----------------------------+
06748  M02S05375.261l700 ---|          SA2    MTRC
Line S05376 Modification History
M01 (Added by) dsdi
M02 (Updated by) 261l700
Seq #  *Modification Id* Act 
----------------------------+
06749  M02S05376.261l700 ---|          SX1    X1
Line S05377 Modification History
M01 (Added by) dsdi
M02 (Updated by) 261l700
Seq #  *Modification Id* Act 
----------------------------+
06750  M02S05377.261l700 ---|          IX6    X1-X2
Line S05378 Modification History
M01 (Added by) dsdi
M02 (Updated by) 261l700
Seq #  *Modification Id* Act 
----------------------------+
06751  M02S05378.261l700 ---|          SX3    43B
Line S05379 Modification History
M01 (Added by) dsdi
M02 (Updated by) 261l700
Seq #  *Modification Id* Act 
----------------------------+
06752  M02S05379.261l700 ---|          IX6    X6+X3
Line S05380 Modification History
M01 (Added by) dsdi
M02 (Updated by) 261l700
Seq #  *Modification Id* Act 
----------------------------+
06753  M02S05380.261l700 ---|          SA6    CPRA
Line S05381 Modification History
M01 (Added by) dsdi
M02 (Updated by) 261l700
Seq #  *Modification Id* Act 
----------------------------+
06754  M02S05381.261l700 ---|          SB2    A6
06755  M01S00053.261l700 +++|          SA6    B2
06756  M01S05382.dsdi    +++|          RJ     POM         POSITION DUMP FILE
06757  M01S05383.dsdi    +++|          GETCM  BUF,BUFL
06758  M01S05384.dsdi    +++|          RJ     PXP         PRINT PPU EXCHANGE PACKAGES
Line S05385 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi78
Seq #  *Modification Id* Act 
----------------------------+
06759  M02S05385.dsdi78  ---|          SX6    B0+
Line S05386 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi78
Seq #  *Modification Id* Act 
----------------------------+
06760  M02S05386.dsdi78  ---|          SA6    PPTB        RESET CPP PROCESSING FLAG
06761  M01S00054.261l700 +++|
06762  M01S00055.261l700 +++|*         PRINT CYBER 176 EXCHANGE PACKAGES.
06763  M01S00056.261l700 +++|
06764  M01S05387.dsdi    +++|          SA1    CF
06765  M01S05388.dsdi    +++|          NZ     X1,DSD1     IF NOT CYBER 176
06766  M01S05389.dsdi    +++|          RJ     SEA         SET EXCHANGE ADDRESS
06767  M01S05390.dsdi    +++|          RJ     SRA         SET REFERENCE ADDRESS
06768  M01S05391.dsdi    +++|          RJ     SCM         SELECT CENTRAL MEMORY
06769  M01S05392.dsdi    +++|          BX6    X6-X6       SET RELATIVE ADDRESS OF CYBER 176 PACKAGES
06770  M01S05393.dsdi    +++|          SA6    CPRA
06771  M01S05394.dsdi    +++|          SB2    A6
06772  M01S05395.dsdi    +++|          SX7    X6+40B
06773  M01S05396.dsdi    +++|          SA7    A6+1
06774  M01S05397.dsdi    +++|          RJ     POM         POSITION DUMP FILE
06775  M01S05398.dsdi    +++|          GETCM  BUF,BUFL    READ EXCHANGE PACKAGES TO CORE
06776  M01S05399.dsdi    +++|          SA1    PXMD        SET HEADER ADDRESS
06777  M01S05400.dsdi    +++|          SB2    B0+
06778  M01S05401.dsdi    +++|          RJ     PXM         PRINT CYBER 176 EXCHANGE PACKAGES
06779  M01S05402.dsdi    +++|          SA1    PXMF        SET HEADER ADDRESS
06780  M01S05403.dsdi    +++|          SB2    40B         SET *BUF* OFFSET
06781  M01S05404.dsdi    +++|          RJ     PXM         PRINT PACKAGES
06782  M01S05405.dsdi    +++|          SA1    F.TCMT
06783  M01S05406.dsdi    +++|          SA1    X1+BIOL
06784  M01S05407.dsdi    +++|          AX1    24
06785  M01S05408.dsdi    +++|          SX1    X1
06786  M01S05409.dsdi    +++|          ZR     X1,DSD1     IF NO 819 DISKS IN SYSTEM
06787  M01S05410.dsdi    +++|          SA1    PXMG        SET HEADER FOR CHANNEL 2
06788  M01S05411.dsdi    +++|          SB2    100B
06789  M01S05412.dsdi    +++|          RJ     PXM         PRINT CHANNEL 2 I/O PACKAGES
06790  M01S05413.dsdi    +++|          SA1    PXMH        SET HEADER FOR CHANNEL 3
06791  M01S05414.dsdi    +++|          SB2    140B
06792  M01S05415.dsdi    +++|          RJ     PXM         PRINT CHANNEL 3 I/O PACKAGES
06793  M01S05416.dsdi    +++|          SA1    PXMI        SET HEADER FOR CHANNEL 4
06794  M01S05417.dsdi    +++|          SB2    200B
06795  M01S05418.dsdi    +++|          RJ     PXM         PRINT CHANNEL 4 I/O PACKAGES
06796  M01S05419.dsdi    +++|          SA1    PXMJ        SET HEADER FOR CHANNEL 5
06797  M01S05420.dsdi    +++|          SB2    240B
06798  M01S05421.dsdi    +++|          RJ     PXM         PRINT CHANNEL 5 I/O PACKAGES
06799  M01S05422.dsdi    +++|          SA1    PXMK        SET HEADER FOR CHANNEL 6
06800  M01S05423.dsdi    +++|          SB2    300B
06801  M01S05424.dsdi    +++|          RJ     PXM         PRINT CHANNEL 6 I/O PACKAGES
06802  M01S05425.dsdi    +++|          SA1    PXML        SET HEADER FOR CHANNEL 7
06803  M01S05426.dsdi    +++|          SB2    340B
06804  M01S05427.dsdi    +++|          RJ     PXM         PRINT CHANNEL 7 I/O PACKAGES
06805  M01S05428.dsdi    +++|          EQ     DSD1        PROCESS NEXT DIRECTIVE
06806  M01S05429.dsdi    +++|
06807  M01S05430.dsdi    +++| MTRA     CON    0           FWA OF PP EXCHANGE PACKAGES FROM LOW CORE
Line S05431 Modification History
M01 (Added by) dsdi
M02 (Updated by) 271l750
Seq #  *Modification Id* Act 
----------------------------+
06808  M02S05431.271l750 ---| MTRB     CON    0           WORD ZERO OF *CPUMTR* FL
06809  M01S00128.271l750 +++| MTRB     CON    0           WORD *CSXP* OF *CPUMTR* FL
06810  M01S00129.271l750 +++|          CON    0           WORD *CXBP* OF *CPUMTR* FL
06811  M01S05432.dsdi    +++| MTRC     CON    0           RA OF *CPUMTR*
Line S05433 Modification History
M01 (Added by) dsdi
M02 (Updated by) 271l750
Seq #  *Modification Id* Act 
----------------------------+
06812  M02S05433.271l750 ---| MTRE     CON    0,1,2
06813  M01S00130.271l750 +++| MTRE     CON    0,1,2,3
06814  M01S05434.dsdi    +++|
06815  M01S05435.dsdi    +++| MTRD     VFD    24/0,18/MTRD1,18/MTRD2
06816  M01S05436.dsdi    +++|
06817  M01S05437.dsdi    +++|
06818  M01S05438.dsdi    +++| MTRD1    BSS    0
06819  M01S05439.dsdi    +++|          FIELD       MTRE+0,(STSW WORD                  ),59,60,I
Line S05440 Modification History
M01 (Added by) dsdi
M02 (Updated by) 271l750
Seq #  *Modification Id* Act 
----------------------------+
06820  M02S05440.271l750 ---|          FIELD       MTRE+1,(JCIW WORD                  ),59,60,I
Line S05441 Modification History
M01 (Added by) dsdi
M02 (Updated by) 271l750
Seq #  *Modification Id* Act 
----------------------------+
06821  M02S05441.271l750 ---|          FIELD       MTRE+2,(CRCW WORD                  ),59,60,I
06822  M01S00131.271l750 +++|          FIELD       MTRE+1,(CWQW WORD                  ),59,60,I
06823  M01S00132.271l750 +++|          FIELD       MTRE+2,(CSAW WORD                  ),59,60,I
06824  M01S00133.271l750 +++|          FIELD       MTRE+3,(CTMW WORD                  ),59,60,I
06825  M01S05442.dsdi    +++|          CON    -1          END OF LEFT COLUMN
06826  M01S05443.dsdi    +++|
06827  M01S05444.dsdi    +++| MTRD2    BSS    0
06828  M01S05445.dsdi    +++|          CON    0           END OF RIGHT COLUMN
06829  M01S05446.dsdi    +++|
06830  M01S05447.dsdi    +++| MTRD3    EQU    *
06831  M01S05448.dsdi    +++|          ERRNG  2*MTRD2-MTRD1-MTRD3  IF RIGHT COLUMN LONGER THAN LEFT
06832  M01S05449.dsdi    +++| MTRQU    SPACE  4,10
06833  M01S05450.dsdi    +++|***       MTRQUEUE.
06834  M01S05451.dsdi    +++|*         DUMP CPU REQUEST, PP REQUEST, CPUCIO REQUEST,
06835  M01S05452.dsdi    +++|*         AND RECALL QUEUES.
06836  M01S05453.dsdi    +++|*
06837  M01S05454.dsdi    +++|*         MTRQUEUE,P1,P2.
06838  M01S05455.dsdi    +++|*         DUMP SELECTED QUEUES.
06839  M01S05456.dsdi    +++|
06840  M01S05457.dsdi    +++|
06841  M01S05458.dsdi    +++| MTRQU    DATA   0LMTRQUEUE
06842  M01S05459.dsdi    +++|
06843  M01S05460.dsdi    +++|          BX6    X6-X6       CLEAR *C* FLAG
06844  M01S05461.dsdi    +++|          SA6    MTQB
06845  M01S05462.dsdi    +++|          SA1    CH          CHECK SEPARATOR
06846  M01S05463.dsdi    +++|          SA1    X1+
06847  M01S05464.dsdi    +++|          SX1    X1-1R.
06848  M01S05465.dsdi    +++|          ZR     X1,MTQ6     IF DUMPING ALL QUEUES
06849  M01S05466.dsdi    +++|          SX6    0           CLEAR SELECTED OPTIONS
06850  M01S05467.dsdi    +++|          SA6    MTQA
06851  M01S05468.dsdi    +++| MTQ1     RJ     ASN         GET NEXT PARAMETER
06852  M01S05469.dsdi    +++|          ZR     B6,MTQ7     IF NO MORE PARAMETERS
06853  M01S05470.dsdi    +++|          AX1    X6,B6
06854  M01S05471.dsdi    +++|          SX1    X1-1RC
06855  M01S05472.dsdi    +++|          ZR     X1,MTQ3     IF *C* SELECTED
06856  M01S05473.dsdi    +++|          SX1    X1-1RP+1RC
06857  M01S05474.dsdi    +++|          ZR     X1,MTQ4     IF *P* SELECTED
06858  M01S05475.dsdi    +++|          SX1    X1-1RR+1RP
06859  M01S05476.dsdi    +++|          ZR     X1,MTQ5     IF *R* SELECTED
06860  M01S05477.dsdi    +++|          SX1    X1-1RW+1RR
06861  M01S05478.dsdi    +++|          NZ     X1,ERR6     IF INVALID PARAMETER
06862  M01S05479.dsdi    +++|          SX6    1           SET *W* SELECTED
06863  M01S05480.dsdi    +++| MTQ2     SA1    MTQA        UPDATE SELECTED OPTIONS
06864  M01S05481.dsdi    +++|          BX6    X6+X1
06865  M01S05482.dsdi    +++|          SA6    A1
06866  M01S05483.dsdi    +++|          EQ     MTQ1        GET NEXT PARAMETER
06867  M01S05484.dsdi    +++|
06868  M01S05485.dsdi    +++| MTQ3     SX6    10B         SET *C* SELECTED
06869  M01S05486.dsdi    +++|          JP     MTQ2        SAVE SELECTION
06870  M01S05487.dsdi    +++|
06871  M01S05488.dsdi    +++| MTQ4     SX6    4           SET *P* SELECTED
06872  M01S05489.dsdi    +++|          JP     MTQ2        SAVE SELECTION
06873  M01S05490.dsdi    +++|
06874  M01S05491.dsdi    +++| MTQ5     SX6    2           SET *R* SELECTED
06875  M01S05492.dsdi    +++|          JP     MTQ2        SAVE SELECTION
06876  M01S05493.dsdi    +++|
06877  M01S05494.dsdi    +++| MTQ6     SX6    17B         SELECT ALL OPTIONS
06878  M01S05495.dsdi    +++|          SA6    MTQA
06879  M01S05496.dsdi    +++|*         JP     MTQ7        PROCESS DUMP
06880  M01S05497.dsdi    +++|
06881  M01S05498.dsdi    +++|*         PROCESS CPU REQUEST QUEUE DUMP.
06882  M01S05499.dsdi    +++|
06883  M01S05500.dsdi    +++| MTQ7     SA5    NC          PRESET QUEUE ENTRY LIMIT
06884  M01S05501.dsdi    +++|          SX6    20B         20B ENTRIES PER CONTROL POINT
06885  M01S05502.dsdi    +++|          SX5    X5+B1
06886  M01S05503.dsdi    +++|          IX6    X5*X6
06887  M01S05504.dsdi    +++|          SA6    CCQA
06888  M01S05505.dsdi    +++|          RJ     LDC         LIST DIRECTIVE CARD
06889  M01S05506.dsdi    +++|          SA1    MTQA        GET OPTIONS
06890  M01S05507.dsdi    +++|          SX2    1
06891  M01S05508.dsdi    +++|          BX2    X2*X1
06892  M01S05509.dsdi    +++|          ZR     X2,MTQ10    IF *W* NOT SELECTED
06893  M01S05510.dsdi    +++|          SX6    0           CLEAR QUEUE ENTRY COUNT
06894  M01S05511.dsdi    +++|          SA6    CCQB
06895  M01S05512.dsdi    +++|          PRINT  (=2C  )
06896  M01S05513.dsdi    +++|          PRINT  (=C*        CPU REQUEST QUEUE*)
06897  M01S05514.dsdi    +++|          PRINT  (=2C  )
06898  M01S05515.dsdi    +++|          SA1    F.TCMT      GET CORE ADDRESS
06899  M01S05516.dsdi    +++|          SA2    X1+WQRL     GET BASE LINK
Line S05517 Modification History
M01 (Added by) dsdi
M02 (Updated by) 271l750
Seq #  *Modification Id* Act 
----------------------------+
06900  M02S05517.271l750 ---| MTQ8     MX6    11
Line S05518 Modification History
M01 (Added by) dsdi
M02 (Updated by) 271l750
Seq #  *Modification Id* Act 
----------------------------+
06901  M02S05518.271l750 ---|          LX6    17-59
Line S05519 Modification History
M01 (Added by) dsdi
M02 (Updated by) 271l750
Seq #  *Modification Id* Act 
----------------------------+
06902  M02S05519.271l750 ---|          BX6    X6*X2       GET START OF CONTROL POINT AREA
Line S05520 Modification History
M01 (Added by) dsdi
M02 (Updated by) 271l750
Seq #  *Modification Id* Act 
----------------------------+
06903  M02S05520.271l750 ---|          ZR     X6,MTQ10    IF END OF QUEUE
06904  M01S00134.271l750 +++| MTQ8     UX6,B4  X2
06905  M01S00135.271l750 +++|          ZR     B4,MTQ10    IF END OF QUEUE
06906  M01S05521.dsdi    +++|          SA3    NC          CHECK IF CPUCIO REQUEST
06907  M01S05522.dsdi    +++|          SX3    X3+B1
06908  M01S05523.dsdi    +++|          LX3    7
06909  M01S05524.dsdi    +++|          IX3    X6-X3
06910  M01S05525.dsdi    +++|          PL     X3,MTA9     IF CPUCIO REQUEST
06911  M01S00136.271l750 +++|          SX6    X6
06912  M01S05526.dsdi    +++|          SA6    FW          SAVE CONTROL POINT ADDRESS
06913  M01S05527.dsdi    +++|          SB2    X1
06914  M01S05528.dsdi    +++|          SA1    TCPR
06915  M01S05529.dsdi    +++|          RJ     GTD         DUMP CPU REQUEST QUEUE WORDS
06916  M01S05530.dsdi    +++|          RJ     CCQ
06917  M01S05531.dsdi    +++|          NG     X5,MTQ10    IF CIRCULAR QUEUE FOUND
06918  M01S05532.dsdi    +++|          PRINT  (=2C  )
06919  M01S05533.dsdi    +++|          SA2    FW          GET LINK TO NEXT ENTRY
06920  M01S05534.dsdi    +++|          SA1    F.TCMT
Line S05535 Modification History
M01 (Added by) dsdi
M02 (Updated by) 271l750
Seq #  *Modification Id* Act 
----------------------------+
06921  M02S05535.271l750 ---|          SX2    X2+JCIW
06922  M01S00137.271l750 +++|          SX2    X2+CWQW
06923  M01S05536.dsdi    +++|          IX2    X1+X2
06924  M01S05537.dsdi    +++|          SA2    X2
06925  M01S05538.dsdi    +++|          JP     MTQ8        PROCESS NEXT ENTRY
06926  M01S05539.dsdi    +++|
06927  M01S05540.dsdi    +++| MTA9     MX6    -18         GET ADDRESS OF CPUCIO ENTRY
06928  M01S05541.dsdi    +++|          BX6    -X6*X2
Line S05542 Modification History
M01 (Added by) dsdi
M02 (Updated by) 271l750
Seq #  *Modification Id* Act 
----------------------------+
06929  M02S05542.271l750 ---|          SX6    X6-JCIW
06930  M01S00138.271l750 +++|          SX6    X6-CWQW
06931  M01S05543.dsdi    +++|          SA6    FW
06932  M01S05544.dsdi    +++|          SA6    CPRA        SET FWA
06933  M01S05545.dsdi    +++|          SX7    25B
06934  M01S05546.dsdi    +++|          IX7    X6+X7
06935  M01S05547.dsdi    +++|          SA7    A6+B1       SET LWA
06936  M01S05548.dsdi    +++|          SX6    B0+
06937  M01S05549.dsdi    +++|          RJ     SRA         SET REFERENCE ADDRESS
06938  M01S05550.dsdi    +++|          RJ     SCM         SELECT CENTRAL MEMORY
06939  M01S05551.dsdi    +++|          SB2    CPRA
06940  M01S05552.dsdi    +++|          RJ     POM         POSITION DUMP FILE
06941  M01S05553.dsdi    +++|          GETCM  BUF,25B
06942  M01S05554.dsdi    +++|          SA2    FW
06943  M01S05555.dsdi    +++|          SB2    X2          SET CORE ADDRESS
06944  M01S05556.dsdi    +++|          SB2    -B2
06945  M01S05557.dsdi    +++|          SB2    BUF+B2
06946  M01S05558.dsdi    +++|          SA1    TCPR
06947  M01S05559.dsdi    +++|          RJ     GTD         DUMP CPUCIO REQUEST QUEUE
06948  M01S05560.dsdi    +++|          RJ     CCQ
06949  M01S05561.dsdi    +++|          NG     X5,MTQ10    IF CIRCULAR QUEUE FOUND
06950  M01S05562.dsdi    +++|          PRINT  (=2C  )
Line S05563 Modification History
M01 (Added by) dsdi
M02 (Updated by) 271l750
Seq #  *Modification Id* Act 
----------------------------+
06951  M02S05563.271l750 ---|          SA2    BUF+JCIW
06952  M01S00139.271l750 +++|          SA2    BUF+CWQW
06953  M01S05564.dsdi    +++|          JP     MTQ8        PROCESS NEXT ENTRY
06954  M01S05565.dsdi    +++|
06955  M01S05566.dsdi    +++|*         PROCESS PP REQUEST QUEUE DUMP.
06956  M01S05567.dsdi    +++|
06957  M01S05568.dsdi    +++| MTQ10    SA1    MTQA        GET OPTIONS
06958  M01S05569.dsdi    +++|          SX2    4
06959  M01S05570.dsdi    +++|          BX2    X2*X1
06960  M01S05571.dsdi    +++|          ZR     X2,MTQ12    IF *P* NOT SELECTED
06961  M01S05572.dsdi    +++|          SX6    0           CLEAR QUEUE ENTRY COUNT
06962  M01S05573.dsdi    +++|          SA6    CCQB
06963  M01S05574.dsdi    +++|          PRINT  (=2C  )
06964  M01S05575.dsdi    +++|          PRINT  (=C*        PP REQUEST QUEUE*)
06965  M01S05576.dsdi    +++|          PRINT  (=2C  )
06966  M01S05577.dsdi    +++|          SA1    F.TCMT      GET CORE ADDRESS
06967  M01S05578.dsdi    +++|          SA2    X1+PQRL     GET BASE LINK
06968  M01S05579.dsdi    +++| MTQ11    MX6    5
06969  M01S05580.dsdi    +++|          LX6    11-59
06970  M01S05581.dsdi    +++|          BX6    X6*X2       GET START OF CONTROL POINT AREA
06971  M01S05582.dsdi    +++|          ZR     X6,MTQ12    IF END OF QUEUE
06972  M01S05583.dsdi    +++|          SA6    FW          SAVE CONTROL POINT ADDRESS
06973  M01S05584.dsdi    +++|          MX6    -7
06974  M01S05585.dsdi    +++|          BX6    -X6*X2      GET INDEX INTO RCCW
06975  M01S05586.dsdi    +++|          SA6    TPPRA
06976  M01S05587.dsdi    +++|          SX6    X6+RECW-RCCW  GET INDEX INTO RECW
06977  M01S05588.dsdi    +++|          SA6    TPPRB
06978  M01S05589.dsdi    +++|          SX6    X6+REPW-RECW  GET INDEX INTO REPW
06979  M01S05590.dsdi    +++|          SA6    TPPRC
06980  M01S05591.dsdi    +++|          SB2    X1
06981  M01S05592.dsdi    +++|          SA1    TPPR
06982  M01S05593.dsdi    +++|          RJ     GTD         DUMP PP REQUEST QUEUE WORDS
06983  M01S05594.dsdi    +++|          RJ     CCQ
06984  M01S05595.dsdi    +++|          NG     X5,MTQ12    IF CIRCULAR QUEUE FOUND
06985  M01S05596.dsdi    +++|          SA2    FW          GET LINK TO NEXT ENTRY
06986  M01S05597.dsdi    +++|          SA1    F.TCMT
06987  M01S05598.dsdi    +++|          SA3    TPPRA
06988  M01S05599.dsdi    +++|          IX2    X2+X3
06989  M01S05600.dsdi    +++|          IX2    X2+X1
06990  M01S05601.dsdi    +++|          SA2    X2+
06991  M01S05602.dsdi    +++|          JP     MTQ11       PROCESS NEXT ENTRY
06992  M01S05603.dsdi    +++|
06993  M01S05604.dsdi    +++|*         PRINT CPUCIO REQUEST QUEUE.
06994  M01S05605.dsdi    +++|
06995  M01S05606.dsdi    +++| MTQ12    SA1    MTQB
06996  M01S05607.dsdi    +++|          NZ     X1,MTQ13    IF BOTH *P* AND *C* PROCESSED
06997  M01S05608.dsdi    +++|          SX6    B1
06998  M01S05609.dsdi    +++|          SA6    A1          SET *C* FLAG
06999  M01S05610.dsdi    +++|          SA1    MTQA
07000  M01S05611.dsdi    +++|          SX2    10B
07001  M01S05612.dsdi    +++|          BX2    X2*X1
07002  M01S05613.dsdi    +++|          ZR     X2,MTQ13    IF *C* NOT SELECTED
07003  M01S05614.dsdi    +++|          SX6    0           CLEAR QUEUE ENTRY COUNT
07004  M01S05615.dsdi    +++|          SA6    CCQB
07005  M01S05616.dsdi    +++|          PRINT  (=2C  )
07006  M01S05617.dsdi    +++|          PRINT  (=C*        CPUCIO REQUEST QUEUE*)
07007  M01S05618.dsdi    +++|          PRINT  (=2C  )
07008  M01S05619.dsdi    +++|          SA1    F.TCMT
07009  M01S05620.dsdi    +++|          SA2    X1+CQRL     GET BASE INDEX
07010  M01S05621.dsdi    +++|          JP     MTQ11       PROCESS ENTRY
07011  M01S05622.dsdi    +++|
07012  M01S05623.dsdi    +++|*         PROCESS RECALL QUEUE DUMP.
07013  M01S05624.dsdi    +++|
07014  M01S05625.dsdi    +++| MTQ13    SA1    MTQA        GET OPTIONS
07015  M01S05626.dsdi    +++|          SX2    2
07016  M01S05627.dsdi    +++|          BX2    X2*X1
07017  M01S05628.dsdi    +++|          ZR     X2,MTQ17    IF *R* NOT SELECTED
07018  M01S05629.dsdi    +++|          SX6    0           CLEAR QUEUE ENTRY COUNT
07019  M01S05630.dsdi    +++|          SA6    CCQB
07020  M01S05631.dsdi    +++|          PRINT  (=2C  )
07021  M01S05632.dsdi    +++|          PRINT  (=C*        RECALL QUEUE*)
07022  M01S05633.dsdi    +++|          PRINT  (=2C  )
07023  M01S05634.dsdi    +++|          SA1    F.TCMT      GET CORE ADDRESS
07024  M01S05635.dsdi    +++|          SA2    X1+RQRL     GET BASE  LINK
07025  M01S05636.dsdi    +++| MTQ14    MX6    5
07026  M01S05637.dsdi    +++|          LX6    11-59
07027  M01S05638.dsdi    +++|          BX6    X6*X2       GET START OF CONTROL POINT AREA
07028  M01S05639.dsdi    +++|          ZR     X6,MTQ17    IF END OF QUEUE
07029  M01S05640.dsdi    +++|          SA6    FW          SAVE CONTROL POINT ADDRESS
07030  M01S05641.dsdi    +++|          MX6    -7
07031  M01S05642.dsdi    +++|          BX6    -X6*X2
07032  M01S05643.dsdi    +++|          SA6    TPRLA       SAVE LINK INDEX
07033  M01S05644.dsdi    +++|          SX5    X6-CRCW
07034  M01S05645.dsdi    +++|          NZ     X5,MTQ15    IF PP RECALL
07035  M01S05646.dsdi    +++|          SB2    X1
07036  M01S05647.dsdi    +++|          SA1    TCRL
07037  M01S05648.dsdi    +++|          RJ     GTD         DUMP CPU RECALL WORD
07038  M01S05649.dsdi    +++|          RJ     CCQ
07039  M01S05650.dsdi    +++|          NG     X5,MTQ17    IF CIRCULAR QUEUE FOUND
07040  M01S05651.dsdi    +++|          JP     MTQ16       GET NEXT ENTRY
07041  M01S05652.dsdi    +++|
07042  M01S05653.dsdi    +++| MTQ15    SX6    X6+RECW-RCCW  GET INDEX INTO RECW
07043  M01S05654.dsdi    +++|          SA6    TPRLB
07044  M01S05655.dsdi    +++|          SX6    X6+REPW-RECW  GET INDEX INTO REPW
07045  M01S05656.dsdi    +++|          SA6    TPRLC
07046  M01S05657.dsdi    +++|          SB2    X1
07047  M01S05658.dsdi    +++|          SA1    TPRL
07048  M01S05659.dsdi    +++|          RJ     GTD         DUMP PP RECALL WORDS
07049  M01S05660.dsdi    +++|          RJ     CCQ
07050  M01S05661.dsdi    +++|          NG     X5,MTQ17    IF CIRCULAR QUEUE FOUND
07051  M01S05662.dsdi    +++| MTQ16    PRINT  (=2C  )
07052  M01S05663.dsdi    +++|          SA1    F.TCMT      GET LINK TO NEXT ENTRY
07053  M01S05664.dsdi    +++|          SA2    FW
07054  M01S05665.dsdi    +++|          SA3    TPRLA
07055  M01S05666.dsdi    +++|          IX2    X2+X3
07056  M01S05667.dsdi    +++|          IX2    X2+X1
07057  M01S05668.dsdi    +++|          SA2    X2
07058  M01S05669.dsdi    +++|          JP     MTQ14       PROCESS NEXT ENTRY
07059  M01S05670.dsdi    +++|
07060  M01S05671.dsdi    +++| MTQ17    JP     DSD1        RETURN
07061  M01S05672.dsdi    +++|
07062  M01S05673.dsdi    +++| MTQA     CON    0           SELECTED PARAMETERS
07063  M01S05674.dsdi    +++| MTQB     CON    0           *C* PROCESSED FLAG
07064  M01S05675.dsdi    +++| ODIS     SPACE  4,10
07065  M01S05676.dsdi    +++|***       ODIS.
07066  M01S05677.dsdi    +++|*
07067  M01S05678.dsdi    +++|*         DUMP THE OPERATOR DISPLAY BUFFER.
07068  M01S05679.dsdi    +++|
07069  M01S05680.dsdi    +++| ODIS     DATA   0LODIS
07070  M01S05681.dsdi    +++|
07071  M01S05682.dsdi    +++|          RJ     CEP         CHECK FOR EXTRANEOUS PARAMETERS
07072  M01S05683.dsdi    +++|          SA1    F.TCMT
07073  M01S05684.dsdi    +++|          SA2    X1+LDSP
07074  M01S05685.dsdi    +++|          AX2    12
07075  M01S05686.dsdi    +++|          SX6    X2-LODS     SET DUMP FWA
07076  M01S05687.dsdi    +++|          SX7    X2          SET DUMP LWA+1
07077  M01S05688.dsdi    +++|          SB3    B0
07078  M01S05689.dsdi    +++|          SX4    B0
07079  M01S05690.dsdi    +++|          SX5    =C*    OPERATOR-DISPLAY BUFFER*
07080  M01S05691.dsdi    +++|          RJ     DTB         DUMP BUFFER
07081  M01S05692.dsdi    +++|          EQ     DSD1        RETURN
07082  M01S05693.dsdi    +++| OUTPUT   SPACE  4,5
07083  M01S05694.dsdi    +++|***       OUTPUT,LFN.
07084  M01S05695.dsdi    +++|*         OUTPUT.            (*LFN* DEFAULT = *ALTRNT*)
07085  M01S05696.dsdi    +++|*
07086  M01S05697.dsdi    +++|*         ASSIGN OUTPUT TO ALTERNATE FILE *LFN*.  WHEN *LFN* IS
07087  M01S05698.dsdi    +++|*         DISPOSED (SEE DISPOSE), OUTPUT RESUMES ON THE ORIGINAL
07088  M01S05699.dsdi    +++|*         OUTPUT FILE.  ONLY ONE ALTERNATE FILE MAY BE ACTIVE AT A TIME.
07089  M01S05700.dsdi    +++|*         *LFN* MAY NOT BE THE SAME AS THE NORMAL OUTPUT FILE NAME.
07090  M01S05701.dsdi    +++|
07091  M01S05702.dsdi    +++|
07092  M01S05703.dsdi    +++| OUTPUT   DATA   0LOUTPUT
07093  M01S05704.dsdi    +++|
07094  M01S05705.dsdi    +++|          SA1    OF
07095  M01S05706.dsdi    +++|          SX1    X1-A
07096  M01S05707.dsdi    +++|          ZR     X1,ERR11    IF ALREADY PROCESSING ALTERNATE FILE
07097  M01S05708.dsdi    +++|          RJ     ASN         ASSEMBLE FILE NAME
07098  M01S05709.dsdi    +++|          NZ     X6,OTP1     IF NAME SPECIFIED
07099  M01S05710.dsdi    +++|          SA1    OTPC        SET DEFAULT NAME
07100  M01S05711.dsdi    +++|          BX6    X1
07101  M01S05712.dsdi    +++|          SB6    -36         SET SHIFT COUNT
07102  M01S05713.dsdi    +++| OTP1     SA1    L
07103  M01S05714.dsdi    +++|          MX2    42
07104  M01S05715.dsdi    +++|          BX1    X1-X6
07105  M01S05716.dsdi    +++|          BX1    X1*X2
07106  M01S05717.dsdi    +++|          ZR     X1,ERR12    IF SAME AS OUTPUT FILE NAME
07107  M01S05718.dsdi    +++|          SB6    B6+42
07108  M01S05719.dsdi    +++|          NG     B6,ERR12    IF NAME TOO LONG
07109  M01S05720.dsdi    +++|          SX7    3
07110  M01S05721.dsdi    +++|          BX6    X6+X7
07111  M01S05722.dsdi    +++|          SA6    A           SET ALTERNATE OUTPUT FILE NAME
07112  M01S05723.dsdi    +++|          SA1    A6+B1       READ FIRST
07113  M01S05724.dsdi    +++|          SX6    X1
07114  M01S05725.dsdi    +++|          SA6    A1+B1       SET IN = FIRST
07115  M01S05726.dsdi    +++|          SA6    A6+B1       OUT = FIRST
07116  M01S05727.dsdi    +++|          SX2    A
07117  M01S05728.dsdi    +++|          RJ     STF         CHECK IF TERMINAL
07118  M01S05729.dsdi    +++|          ZR     X6,ERR13    IF TERMINAL FILE
07119  M01S05730.dsdi    +++|          SX6    X2+0
07120  M01S05731.dsdi    +++|          SA6    OF          SET OUTPUT FILE FET POINTER
07121  M01S05732.dsdi    +++|          MOVE   6,CC,OTPA   SAVE CURRENT LIST CONTROLS
07122  M01S05733.dsdi    +++|          MOVE   6,OTPB,CC   RESET CONTROLS FOR NEW FILE
07123  M01S05734.dsdi    +++|          SA1    PRSB
07124  M01S05735.dsdi    +++|          RJ     RSP         RESET PRINT DENSITY
07125  M01S05736.dsdi    +++|          JP     DSD1        RETURN
07126  M01S05737.dsdi    +++|
07127  M01S05738.dsdi    +++| OTPA     BSS    6           LIST CONTROL SAVE AREA
07128  M01S05739.dsdi    +++|
07129  M01S05740.dsdi    +++| OTPB     BSS    0           LIST CONTROL RESET BLOCK
07130  M01S05741.dsdi    +++|          CON    0           CARRIAGE CONTROL CHARACTER
07131  M01S05742.dsdi    +++|          CON    0           NO AUTO EJECT FLAG
07132  M01S05743.dsdi    +++|          CON    100         LINE NUMBER
07133  M01S05744.dsdi    +++|          CON    0           NUMBER OF LINES PER PAGE
07134  M01S05745.dsdi    +++|          CON    1           PAGE NUMBER
07135  M01S05746.dsdi    +++|          CON    0           TERMINAL OUTPUT FLAG
07136  M01S05747.dsdi    +++| OTPC     DATA   6LALTRNT    DEFAULT ALTERNATE LIST FILE NAME
07137  M01S05748.dsdi    +++| P        SPACE  4,11
07138  M01S05749.dsdi    +++|***       P.
07139  M01S05750.dsdi    +++|*         DUMP ALL PPUS IN BLOCK FORMAT.
07140  M01S05751.dsdi    +++|*
07141  M01S05752.dsdi    +++|*         P,N1,N2,...,NN.
07142  M01S05753.dsdi    +++|*         DUMP SELECTED PPUS.
07143  M01S05754.dsdi    +++|*
07144  M01S05755.dsdi    +++|*         MEMORY IS DUMPED IN 100B WORD BLOCKS WITH 10B ROWS AND
07145  M01S05756.dsdi    +++|*         10B COLUMNS.  EACH BLOCK IS READ COLUMNWISE.  EACH PAGE
07146  M01S05757.dsdi    +++|*         CONTAINS TWO BLOCKS ACROSS THE PAGE AND SIX DOWN.
07147  M01S05758.dsdi    +++|*         ZERO BYTES ARE REPRESENTED AS *----*.  REPETITIVE DATA
07148  M01S05759.dsdi    +++|*         IS NOT SUPPRESSED.
07149  M01S05760.dsdi    +++|
07150  M01S05761.dsdi    +++|
07151  M01S05762.dsdi    +++| P        DATA   0LP
07152  M01S05763.dsdi    +++|
07153  M01S05764.dsdi    +++|          SX6    B0          INITIALIZE FOR PPU DUMP
07154  M01S05765.dsdi    +++| PPS1     RJ     IPD
07155  M01S05766.dsdi    +++| PPS2     RJ     SNP         SELECT NEXT PPU
07156  M01S05767.dsdi    +++|          ZR     X1,DSD1     IF NO MORE PPUS TO DUMP
07157  M01S05768.dsdi    +++|          RJ     DPP         DUMP PPU IN *P* FORMAT
07158  M01S05769.dsdi    +++|          EQ     PPS2        CONTINUE
07159  M01S00195.271l716 +++| PCP      SPACE  4,10
07160  M01S00196.271l716 +++|***       PCP.
07161  M01S00197.271l716 +++|*
07162  M01S00198.271l716 +++|*         DUMP PSEUDO-CONTROL POINTS (PCP-S).
07163  M01S00199.271l716 +++|*
07164  M01S00200.271l716 +++|*         PARAMETERS ARE THE SAME AS FOR THE *CP* DIRECTIVE.
07165  M01S00201.271l716 +++|
07166  M01S00202.271l716 +++|
07167  M01S00203.271l716 +++|
07168  M01S00204.271l716 +++| PCP      DATA   0LPCP
07169  M01S00205.271l716 +++|
07170  M01S00206.271l716 +++|          SA2    F.TCMT
07171  M01S00207.271l716 +++|          SA2    X2+PCPP
07172  M01S00208.271l716 +++|          SX2    X2
07173  M01S00209.271l716 +++|          ZR     X2,ERR48    IF NO PCP-S DEFINED
07174  M01S00210.271l716 +++|          SA1    NC
07175  M01S00211.271l716 +++|          SX1    X1+2        FIRST PCP NUMBER
07176  M01S00212.271l716 +++|          LX1    7
07177  M01S00213.271l716 +++|          IX6    X2-X1
07178  M01S00214.271l716 +++|          SA6    OP          SET PCPA FWA OFFSET
07179  M01S00215.271l716 +++|          SX7    X2-CPLEN
07180  M01S00216.271l716 +++|          SA7    FW          SET (PCPA FWA)-(CPLEN)
07181  M01S00217.271l716 +++|          SA1    TF
07182  M01S00218.271l716 +++|          ZR     X1,CPP0     IF PRINTER OUTPUT
07183  M01S00219.271l716 +++|          SA2    ME          SET LWA+1 OF PCPA-S
07184  M01S00220.271l716 +++|          EQ     CPN0        DISPLAY PCPA-S AT TERMINAL
07185  M01S05770.dsdi    +++| PD       SPACE  4,4
07186  M01S05771.dsdi    +++|***       PD,N.
07187  M01S05772.dsdi    +++|*
07188  M01S05773.dsdi    +++|*         RESET PRINT LINE DENSITY TO N LINES PER INCH.  N MAY BE
07189  M01S05774.dsdi    +++|*         3, 4, 6 OR 8.
07190  M01S05775.dsdi    +++|
07191  M01S05776.dsdi    +++|
07192  M01S05777.dsdi    +++| PD       DATA   0LPD
07193  M01S05778.dsdi    +++|
07194  M01S05779.dsdi    +++|          RJ     ASN         ASSEMBLE N
07195  M01S05780.dsdi    +++|          SA6    PRSB        SAVE DENSITY SELECTION
07196  M01S05781.dsdi    +++|          BX1    X6
07197  M01S05782.dsdi    +++|          RJ     RSP         RESET PRINT DENSITY
07198  M01S05783.dsdi    +++|          JP     DSD1        RETURN
07199  M01S05784.dsdi    +++| PF       SPACE  4,20
07200  M01S05785.dsdi    +++|***       PF.
07201  M01S05786.dsdi    +++|*         DUMP ALL FLPPS IN BLOCK FORMAT.
07202  M01S05787.dsdi    +++|*
07203  M01S05788.dsdi    +++|*         PF,N1,N2,...,NN.
07204  M01S05789.dsdi    +++|*         DUMP SELECTED FLPPS.
07205  M01S05790.dsdi    +++|*
07206  M01S05791.dsdi    +++|*         MEMORY IS DUMPED IN 100B WORD BLOCKS WITH 10B ROWS AND
07207  M01S05792.dsdi    +++|*         10B COLUMNS.  EACH BLOCK IS READ COLUMNWISE.  EACH PAGE
07208  M01S05793.dsdi    +++|*         CONTAINS TWO BLOCKS ACROSS THE PAGE AND SIX DOWN.
07209  M01S05794.dsdi    +++|*         ZERO BYTES ARE REPRESENTED AS *----*.  REPETITIVE DATA
07210  M01S05795.dsdi    +++|*         IS NOT SUPPRESSED.
07211  M01S05796.dsdi    +++|
07212  M01S05797.dsdi    +++|
07213  M01S05798.dsdi    +++| PF       DATA   0LPF
07214  M01S05799.dsdi    +++|
07215  M01S05800.dsdi    +++|          SX6    B1          INITIALIZE FOR FLPP DUMP
07216  M01S05801.dsdi    +++|          EQ     PPS1        DUMP FLPPS
07217  M01S05802.dsdi    +++| PLD      SPACE  4,3
07218  M01S05803.dsdi    +++|***       PLD.
07219  M01S05804.dsdi    +++|*
07220  M01S05805.dsdi    +++|*         DUMP PERIPHERAL LIBRARY DIRECTORY IN *D* FORMAT.
07221  M01S05806.dsdi    +++|
07222  M01S05807.dsdi    +++|
07223  M01S05808.dsdi    +++| PLD      DATA   0LPLD
07224  M01S05809.dsdi    +++|
07225  M01S05810.dsdi    +++|          RJ     CEP         CHECK FOR EXTRANEOUS PARAMETERS
07226  M01S05811.dsdi    +++|          SA1    F.TCMT
07227  M01S05812.dsdi    +++|          SA2    X1+PLDP
07228  M01S05813.dsdi    +++|          LX2    24
07229  M01S05814.dsdi    +++|          SX6    X2          FWA PP LIBRARY DIRECTORY
07230  M01S05815.dsdi    +++|          SA3    X1+PSTP
07231  M01S05816.dsdi    +++|          AX3    12
07232  M01S05817.dsdi    +++|          SX7    X3          LWA+1 PP LIBRARY DIRECTORY
07233  M01S05818.dsdi    +++|          SX5    =C*           PERIPHERAL LIBRARY DIRECTORY*
07234  M01S05819.dsdi    +++|          SB3    B1          SET *D* FORMAT
07235  M01S05820.dsdi    +++|          SX4    B0          SET READ FROM DUMP FILE
07236  M01S05821.dsdi    +++|          RJ     DTB         DUMP PLD
07237  M01S05822.dsdi    +++|          EQ     DSD1        RETURN
07238  M01S05823.dsdi    +++| PMS      SPACE  4,20
07239  M01S05824.dsdi    +++|***       PMS,N1.
07240  M01S05825.dsdi    +++|*         CYBER 170 PP MEMORY SELECT SWITCHES WERE PREVIOUSLY SET
07241  M01S05826.dsdi    +++|*         TO VALUE N1.
07242  M01S05827.dsdi    +++|*
07243  M01S05828.dsdi    +++|*         THE LOGICAL POSITION OF PP00 HAS BEEN CHANGED PRIOR TO THE
07244  M01S05829.dsdi    +++|*         FULL DUMP TO TAPE.  IF THE PP MEMORY SELECT SWITCHES HAVE
07245  M01S05830.dsdi    +++|*         BEEN CHANGED, THIS DIRECTIVE SHOULD BE SPECIFIED WITH THE
07246  M01S05831.dsdi    +++|*         BINARY VALUE OF THE SWITCHES PRIOR TO CHANGING THEM, I.E.,
07247  M01S05832.dsdi    +++|*         0 - 11B.  THE DUMP OF THE S/C REGISTER WILL BE READ TO FIND
07248  M01S05833.dsdi    +++|*         THE CURRENT VALUE OF THE SWITCHES AND DETERMINE THE CORRECT
07249  M01S05834.dsdi    +++|*         LOGICAL PP TO BE DUMPED.  IF THE MACHINE IS NOT A CYBER 170
07250  M01S05835.dsdi    +++|*         OR THE VALUE N1 SPECIFIED IS THE SAME AS THE VALUE READ
07251  M01S05836.dsdi    +++|*         FROM THE S/C REGISTER, THIS DIRECTIVE HAS NO MEANING.
07252  M01S05837.dsdi    +++|
07253  M01S05838.dsdi    +++|
07254  M01S05839.dsdi    +++| PMS      DATA   0LPMS
07255  M01S05840.dsdi    +++|
07256  M01S05841.dsdi    +++|*         MOVE TABLES TO TEMPORARY BUFFER.
07257  M01S05842.dsdi    +++|
Line S05843 Modification History
M01 (Added by) dsdi
M02 (Updated by) 271l739
Seq #  *Modification Id* Act 
----------------------------+
07258  M02S05843.271l739 ---|          SA1    =4LPP00     FIND TABLE ENTRY FOR FIRST PP
07259  M01S00161.271l739 +++|          SA1    .NPP        FIND TABLE ENTRY FOR FIRST PP
07260  M01S05844.dsdi    +++|          MX0    24
07261  M01S05845.dsdi    +++|          SEARCH TDIR,X1,X0  FIND PP00 TABLE ENTRY
07262  M01S05846.dsdi    +++|          ZR     X2,ERR7     IF NOT FOUND
07263  M01S05847.dsdi    +++|          SX6    A2+         SAVE TABLE ENTRY ADDRESS
07264  M01S05848.dsdi    +++|          SA6    PI
07265  M01S05849.dsdi    +++|          MOVE   40,A2,BUF   MOVE TABLE ENTRIES
07266  M01S05850.dsdi    +++|          MOVE   20,TLPP,BUF+40  MOVE LOGICAL PP TABLE
07267  M01S05851.dsdi    +++|
07268  M01S05852.dsdi    +++|*         CHECK FOR LEGAL SELECT SWITCH VALUE.
07269  M01S05853.dsdi    +++|
07270  M01S05854.dsdi    +++|          SA1    CH
07271  M01S05855.dsdi    +++|          SA1    X1+
07272  M01S05856.dsdi    +++|          SX1    X1-1R.
07273  M01S05857.dsdi    +++|          ZR     X1,ERR6     IF NO VALUE SPECIFIED
07274  M01S05858.dsdi    +++|          SB7    B0          ASSEMBLE SWITCH VALUE
07275  M01S05859.dsdi    +++|          RJ     ASD
07276  M01S05860.dsdi    +++|          NZ     X4,ERR6     IF ERROR
07277  M01S05861.dsdi    +++|          SX7    X6-12B
07278  M01S05862.dsdi    +++|          PL     X7,ERR6     IF INCORRECT VALUE
07279  M01S05863.dsdi    +++|          SA6    PMSA        SAVE OLD VAUE OF SWITCHES
07280  M01S05864.dsdi    +++|
07281  M01S05865.dsdi    +++|*         GET CURRENT VALUE OF SWITCHES.
07282  M01S05866.dsdi    +++|
Line S05867 Modification History
M01 (Added by) dsdi
M02 (Updated by) 271l739
Seq #  *Modification Id* Act 
----------------------------+
07283  M02S05867.271l739 ---|          SA1    =10HSCR
07284  M01S00162.271l739 +++|          SA1    .SCR        CHECK DIRECTORY FOR *SCR* RECORD
07285  M01S05868.dsdi    +++|          MX0    18
07286  M01S05869.dsdi    +++|          SEARCH TDIR,X1,X0  LOCATE S/C REGISTER RECORD
07287  M01S05870.dsdi    +++|          ZR     X2,ERR25    IF NOT A CYBER 170
07288  M01S05871.dsdi    +++|          SA2    A2+2
07289  M01S05872.dsdi    +++|          MX0    24
07290  M01S05873.dsdi    +++|          LX0    -12
07291  M01S05874.dsdi    +++|          SA3    =6L  SC16
07292  M01S05875.dsdi    +++|          BX4    X3-X2
07293  M01S05876.dsdi    +++|          BX2    X0*X4
07294  M01S05877.dsdi    +++|          NZ     X2,ERR2     IF NO SC16 RECORD FOUND
07295  M01S05878.dsdi    +++|          SA2    A2+B1       SET RANDOM INDEX OF S/C REGISTER
07296  M01S05879.dsdi    +++|          BX6    X2
07297  M01S05880.dsdi    +++|          SA6    RI
07298  M01S05881.dsdi    +++|          SX3    B1          POSITION DUMP FILE
07299  M01S05882.dsdi    +++|          RJ     PDF
07300  M01S05883.dsdi    +++|          READW  S,BUF,B1    READ S/C REGISTER DATA
07301  M01S05884.dsdi    +++|          SA1    BUF+PMSW*   GET PP SELECT SWITCHES CURRENT VALUE
07302  M01S05885.dsdi    +++|          MX0    -4
07303  M01S05886.dsdi    +++|          LX1    7
07304  M01S05887.dsdi    +++|          BX7    -X0*X1
07305  M01S05888.dsdi    +++|          SA2    PMSA        GET OLD VALUE
07306  M01S05889.dsdi    +++|          IX4    X2-X7
07307  M01S05890.dsdi    +++|          ZR     X4,ERR25    IF OLD SAME AS NEW VALUE
07308  M01S05891.dsdi    +++|          PL     X4,PMS1     IF OLD VALUE .GT. NEW
07309  M01S05892.dsdi    +++|          SX4    X4+10       BIAS VALUE DIFFERENCE FOR LOGICAL PP00
07310  M01S05893.dsdi    +++|
07311  M01S05894.dsdi    +++|*         MOVE BANK OF PP ADDRESSES AND LOGICAL PP NUMBERS.
07312  M01S05895.dsdi    +++|
07313  M01S05896.dsdi    +++| PMS1     SX0    X4          INITIALIZE INDICIES
07314  M01S05897.dsdi    +++|          SA5    PI
07315  M01S05898.dsdi    +++|          SX1    B0
07316  M01S05899.dsdi    +++|          SA0    12B         SET END OF LOWER BANK
07317  M01S05900.dsdi    +++| PMS2     LX2    X0,B1       FIND TABLE ENTRY
07318  M01S05901.dsdi    +++|          LX3    X1,B1
07319  M01S05902.dsdi    +++|          SX2    BUF+X2
07320  M01S05903.dsdi    +++|          SA2    X2+B1       TRANSFER ENTRY
07321  M01S05904.dsdi    +++|          BX7    X2
07322  M01S05905.dsdi    +++|          IX3    X5+X3
07323  M01S05906.dsdi    +++|          SA7    X3+B1
07324  M01S05907.dsdi    +++|          SA2    BUF+40+X0   TRANSFER LOGICAL PP NUMBER
07325  M01S05908.dsdi    +++|          SX7    X2+
07326  M01S05909.dsdi    +++|          SA7    TLPP+X1
07327  M01S05910.dsdi    +++|          SX1    X1+1        INCREMENT INDICIES
07328  M01S05911.dsdi    +++|          SX7    A0
07329  M01S05912.dsdi    +++|          IX6    X1-X7
07330  M01S05913.dsdi    +++|          ZR     X6,PMS3     IF END OF BANK
07331  M01S05914.dsdi    +++|          SX0    X0+B1
07332  M01S05915.dsdi    +++|          IX6    X0-X7
07333  M01S05916.dsdi    +++|          NG     X6,PMS2     IF NOT WRAP AROUND
07334  M01S05917.dsdi    +++|          SX0    A0-12B      WRAP AROUND BANK
07335  M01S05918.dsdi    +++|          EQ     PMS2        PROCESS NEXT PP
07336  M01S05919.dsdi    +++|
07337  M01S05920.dsdi    +++|*         CHECK FOR END OF PP-S.
07338  M01S05921.dsdi    +++|
07339  M01S05922.dsdi    +++| PMS3     SX6    A0-24B
07340  M01S05923.dsdi    +++|          ZR     X6,DSD1     IF BOTH BANKS PROCESSED
07341  M01S05924.dsdi    +++|          SA2    NP          CHECK FOR 20 PP-S
07342  M01S05925.dsdi    +++|          SX7    X2-20
07343  M01S05926.dsdi    +++|          NZ     X7,DSD1     IF NOT 20 PP MACHINE
07344  M01S05927.dsdi    +++|          SX0    X4+12B      INITIALIZE INDICIES FOR UPPER BANK
07345  M01S05928.dsdi    +++|          SX1    12B
07346  M01S05929.dsdi    +++|          SA0    24B         SET END OF UPPER BANK
07347  M01S05930.dsdi    +++|          EQ     PMS2        MOVE UPPER BANK
07348  M01S05931.dsdi    +++|
07349  M01S05932.dsdi    +++| PMSA     CON    0           OLD SELECT SWITCH VALUE
07350  M01S05933.dsdi    +++| PO       SPACE  4,25
07351  M01S05934.dsdi    +++|***       PO,N1,N2,...,NN.
07352  M01S05935.dsdi    +++|*
07353  M01S05936.dsdi    +++|*         DUMP 16-BIT PP MEMORY IN OCTAL BLOCK FORMAT.
07354  M01S05937.dsdi    +++|*
07355  M01S05938.dsdi    +++|*         NI     NUMBER OF PP TO BE DUMPED.  IF OMITTED, ALL
07356  M01S05939.dsdi    +++|*                PP-S ARE DUMPED.
07357  M01S05940.dsdi    +++|*
07358  M01S05941.dsdi    +++|*         THE *PO* DIRECTIVE CAUSES PP MEMORY TO BE DUMPED IN
07359  M01S05942.dsdi    +++|*         OCTAL BLOCK FORMAT, WHERE EACH BLOCK REPRESENTS
07360  M01S05943.dsdi    +++|*         64 WORDS.  EACH 16-BIT WORD IS REPRESENTED BY 6
07361  M01S05944.dsdi    +++|*         OCTAL DIGITS UNLESS THE UPPER 4 BITS OF THE WORD
07362  M01S05945.dsdi    +++|*         ARE ZERO.  THEN THE WORD IS REPRESENTED BY 4
07363  M01S05946.dsdi    +++|*         OCTAL DIGITS.  THE BLOCKS ARE READ BY COLUMN (TOP
07364  M01S05947.dsdi    +++|*         TO BOTTOM), WHERE EACH COLUMN CONTAINS EIGHT
07365  M01S05948.dsdi    +++|*         16-BIT WORDS NUMBERED 0 THRU 7.  THERE ARE EIGHT
07366  M01S05949.dsdi    +++|*         COLUMNS IN EACH BLOCK NUMBERED 0 THRU 7.
07367  M01S05950.dsdi    +++|*         REPETITIVE DATA IS NOT SUPPRESSED AND ZERO WORDS
07368  M01S05951.dsdi    +++|*         ARE REPRESENTED BY FOUR HYPHENS. THE CONTENTS
07369  M01S05952.dsdi    +++|*         OF THE R-REGISTER IN OCTAL PRECEDES THE FIRST
07370  M01S05953.dsdi    +++|*         BLOCK FOR EACH PP.  OUTPUT TO THE TERMINAL IS
07371  M01S05954.dsdi    +++|*         NOT PROVIDED.
07372  M01S05955.dsdi    +++|
07373  M01S05956.dsdi    +++|
07374  M01S05957.dsdi    +++| PO       DATA   0LPO
Line S05958 Modification History
M01 (Added by) dsdi
M02 (Updated by) ns2647
Seq #  *Modification Id* Act 
----------------------------+
07375  M02S05958.ns2647  ---|          SX6    B0          SET OCTAL BLOCK FORMAT
Line S05959 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi53
M03 (Updated by) ns2647
Seq #  *Modification Id* Act 
----------------------------+
07376  M03S05959.ns2647  ---| POD1     SA1    PODA+1
Line S00002 Modification History
M01 (Added by) dsdi53
M02 (Updated by) ns2647
Seq #  *Modification Id* Act 
----------------------------+
07377  M02S00002.ns2647  ---| POD1     SA1    //AP
Line S00003 Modification History
M01 (Added by) dsdi53
M02 (Updated by) ns2647
Seq #  *Modification Id* Act 
----------------------------+
07378  M02S00003.ns2647  ---|          ZR     X1,ERR25    IF NO *IOU* SUBSYSTEM
Line S00004 Modification History
M01 (Added by) dsdi53
M02 (Updated by) ns2647
Seq #  *Modification Id* Act 
----------------------------+
07379  M02S00004.ns2647  ---|          SA6    PODA+3      SET FORMAT CODE
Line S00005 Modification History
M01 (Added by) dsdi53
M02 (Updated by) ns2647
Seq #  *Modification Id* Act 
----------------------------+
07380  M02S00005.ns2647  ---|          SA6    PPOC
Line S00006 Modification History
M01 (Added by) dsdi53
M02 (Updated by) ns2647
Seq #  *Modification Id* Act 
----------------------------+
07381  M02S00006.ns2647  ---|          SA1    PS          SET FWA
Line S00007 Modification History
M01 (Added by) dsdi53
M02 (Updated by) ns2647
Seq #  *Modification Id* Act 
----------------------------+
07382  M02S00007.ns2647  ---|          BX7    X1
Line S00008 Modification History
M01 (Added by) dsdi53
M02 (Updated by) ns2647
Seq #  *Modification Id* Act 
----------------------------+
07383  M02S00008.ns2647  ---|          BX6    X6-X6       SET PP/CPP DUMP
Line S00009 Modification History
M01 (Added by) dsdi53
M02 (Updated by) ns2647
Seq #  *Modification Id* Act 
----------------------------+
07384  M02S00009.ns2647  ---|          SA7    PODA+1
Line S05960 Modification History
M01 (Added by) dsdi
M02 (Updated by) ns2647
Seq #  *Modification Id* Act 
----------------------------+
07385  M02S05960.ns2647  ---|          AX1    13
Line S05961 Modification History
M01 (Added by) dsdi
M02 (Updated by) ns2647
Seq #  *Modification Id* Act 
----------------------------+
07386  M02S05961.ns2647  ---|          LX7    X1,B1
Line S05962 Modification History
M01 (Added by) dsdi
M02 (Updated by) ns2647
Seq #  *Modification Id* Act 
----------------------------+
07387  M02S05962.ns2647  ---|          SA7    K4          SET BUFFER LENGTH
Line S05963 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi53
M03 (Updated by) ns2647
Seq #  *Modification Id* Act 
----------------------------+
07388  M03S05963.ns2647  ---|          SA1    //AP
Line S05964 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi53
M03 (Updated by) ns2647
Seq #  *Modification Id* Act 
----------------------------+
07389  M03S05964.ns2647  ---|          ZR     X1,ERR25    IF NO *IOU* SUBSYSTEM
Line S05965 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi53
M03 (Updated by) ns2647
Seq #  *Modification Id* Act 
----------------------------+
07390  M03S05965.ns2647  ---|          SA6    PODA+3      SET FORMAT CODE
Line S05966 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi53
M03 (Updated by) ns2647
Seq #  *Modification Id* Act 
----------------------------+
07391  M03S05966.ns2647  ---|          SA6    PPOC
Line S05967 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi53
M03 (Updated by) ns2647
Seq #  *Modification Id* Act 
----------------------------+
07392  M03S05967.ns2647  ---|          SX6    B0+
Line S05968 Modification History
M01 (Added by) dsdi
M02 (Updated by) ns2647
Seq #  *Modification Id* Act 
----------------------------+
07393  M02S05968.ns2647  ---|          RJ     IPD         INITIALIZE FOR 16-BIT PP DUMP
Line S05969 Modification History
M01 (Added by) dsdi
M02 (Updated by) ns2647
Seq #  *Modification Id* Act 
----------------------------+
07394  M02S05969.ns2647  ---| POD2     RJ     SNP         SELECT NEXT 16-BIT PP
Line S05970 Modification History
M01 (Added by) dsdi
M02 (Updated by) ns2647
Seq #  *Modification Id* Act 
----------------------------+
07395  M02S05970.ns2647  ---|          NZ     X1,POD3     IF MORE PP-S TO DUMP
Line S05971 Modification History
M01 (Added by) dsdi
M02 (Updated by) ns2647
Seq #  *Modification Id* Act 
----------------------------+
07396  M02S05971.ns2647  ---|          SX6    0           CLEAR FORMAT CODE FOR PP REGISTER DUMP
Line S05972 Modification History
M01 (Added by) dsdi
M02 (Updated by) ns2647
Seq #  *Modification Id* Act 
----------------------------+
07397  M02S05972.ns2647  ---|          SA6    PPOC
Line S05973 Modification History
M01 (Added by) dsdi
M02 (Updated by) ns2647
Seq #  *Modification Id* Act 
----------------------------+
07398  M02S05973.ns2647  ---|          EQ     DSD1        PROCESS NEXT DIRECTIVE
Line S05974 Modification History
M01 (Added by) dsdi
M02 (Updated by) ns2647
Seq #  *Modification Id* Act 
----------------------------+
07399  M02S05974.ns2647  ---|
Line S05975 Modification History
M01 (Added by) dsdi
M02 (Updated by) ns2647
Seq #  *Modification Id* Act 
----------------------------+
07400  M02S05975.ns2647  ---| POD3     RJ     CPD         COPY PP DATA TO BUFFER
Line S05976 Modification History
M01 (Added by) dsdi
M02 (Updated by) ns2647
Seq #  *Modification Id* Act 
----------------------------+
07401  M02S05976.ns2647  ---|          SA1    PODA        DUMP 16-BIT PP
Line S05977 Modification History
M01 (Added by) dsdi
M02 (Updated by) ns2647
Seq #  *Modification Id* Act 
----------------------------+
07402  M02S05977.ns2647  ---|          RJ     DSP
Line S05978 Modification History
M01 (Added by) dsdi
M02 (Updated by) ns2647
Seq #  *Modification Id* Act 
----------------------------+
07403  M02S05978.ns2647  ---|          EQ     POD2        SELECT NEXT PP TO DUMP
Line S05979 Modification History
M01 (Added by) dsdi
M02 (Updated by) ns2647
Seq #  *Modification Id* Act 
----------------------------+
07404  M02S05979.ns2647  ---|
Line S05980 Modification History
M01 (Added by) dsdi
M02 (Updated by) ns2647
Seq #  *Modification Id* Act 
----------------------------+
07405  M02S05980.ns2647  ---|
Line S05981 Modification History
M01 (Added by) dsdi
M02 (Updated by) ns2647
Seq #  *Modification Id* Act 
----------------------------+
07406  M02S05981.ns2647  ---| PODA     BSS    0           *DSP* PARAMETERS
Line S05982 Modification History
M01 (Added by) dsdi
M02 (Updated by) ns2647
Seq #  *Modification Id* Act 
----------------------------+
07407  M02S05982.ns2647  ---|          CON    0           FWA
Line S05983 Modification History
M01 (Added by) dsdi
M02 (Updated by) ns2647
Seq #  *Modification Id* Act 
----------------------------+
07408  M02S05983.ns2647  ---|          CON    4096        LWA+1
Line S05984 Modification History
M01 (Added by) dsdi
M02 (Updated by) ns2647
Seq #  *Modification Id* Act 
----------------------------+
07409  M02S05984.ns2647  ---|*         CON    8192        IF 8K PP
Line S05985 Modification History
M01 (Added by) dsdi
M02 (Updated by) ns2647
Seq #  *Modification Id* Act 
----------------------------+
07410  M02S05985.ns2647  ---|          CON    1RR         DUMP R-REGISTER
Line S05986 Modification History
M01 (Added by) dsdi
M02 (Updated by) ns2647
Seq #  *Modification Id* Act 
----------------------------+
07411  M02S05986.ns2647  ---|          CON    0           DUMP FORMAT
Line S05987 Modification History
M01 (Added by) dsdi
M02 (Updated by) ns2647
Seq #  *Modification Id* Act 
----------------------------+
07412  M02S05987.ns2647  ---|*                            0 = OCTAL BLOCK.
Line S05988 Modification History
M01 (Added by) dsdi
M02 (Updated by) ns2647
Seq #  *Modification Id* Act 
----------------------------+
07413  M02S05988.ns2647  ---|*                            1 = HEX   BLOCK.
Line S05989 Modification History
M01 (Added by) dsdi
M02 (Updated by) ns2647
Seq #  *Modification Id* Act 
----------------------------+
07414  M02S05989.ns2647  ---|*                            2 = OCTAL LINE DISPLAY INTERPRETATION.
Line S05990 Modification History
M01 (Added by) dsdi
M02 (Updated by) ns2647
Seq #  *Modification Id* Act 
----------------------------+
07415  M02S05990.ns2647  ---|*                            3 = OCTAL LINE  ASCII  INTERPRETATION.
Line S05991 Modification History
M01 (Added by) dsdi
M02 (Updated by) ns2647
Seq #  *Modification Id* Act 
----------------------------+
07416  M02S05991.ns2647  ---|*                            4 = HEX   LINE DISPLAY INTERPRETATION.
Line S05992 Modification History
M01 (Added by) dsdi
M02 (Updated by) ns2647
Seq #  *Modification Id* Act 
----------------------------+
07417  M02S05992.ns2647  ---|*                            5 = HEX   LINE  ASCII  INTERPRETATION.
07418  M01S00001.ns2647  +++|
07419  M01S00002.ns2647  +++|          SX6    0           SET OCTAL BLOCK FORMAT
07420  M01S00003.ns2647  +++|          EQ     QOD1        DUMP PP/CPP
07421  M01S05993.dsdi    +++| PP       SPACE  4,10
07422  M01S05994.dsdi    +++|***       PP.
07423  M01S05995.dsdi    +++|*
07424  M01S05996.dsdi    +++|*         DUMP PPU COMMUNICATION REGISTERS.  CONTROL POINT ASSIGNMENT,
07425  M01S05997.dsdi    +++|*         CHANNEL ASSIGNMENT AND MONITOR FUNCTION ARE LISTED WITH
07426  M01S05998.dsdi    +++|*         EACH COMMUNICATION AREA.  THE AREAS ARE DUMPED IN BYTE
07427  M01S05999.dsdi    +++|*         FORMAT WITH DISPLAY CODE INTERPRETATION.
07428  M01S06000.dsdi    +++|*
07429  M01S06001.dsdi    +++|*         FOR TERMINAL OUTPUT, THE PPU NUMBER, EXECUTING PROGRAM
07430  M01S06002.dsdi    +++|*         NAME, CONTROL POINT ASSIGNMENT AND INPUT REGISTER
07431  M01S06003.dsdi    +++|*         ADDRESS ARE LISTED FOR EACH COMMUNICATION AREA.
07432  M01S06004.dsdi    +++|
07433  M01S06005.dsdi    +++|
07434  M01S06006.dsdi    +++| PP       DATA   0LPP
07435  M01S06007.dsdi    +++|
07436  M01S06008.dsdi    +++|          RJ     CEP         CHECK FOR EXTRANEOUS PARAMETERS
07437  M01S06009.dsdi    +++|          SA1    TF
07438  M01S06010.dsdi    +++|          NZ     X1,PPTN     IF TERMINAL OUTPUT
07439  M01S06011.dsdi    +++|          SX6    0
07440  M01S06012.dsdi    +++|          RJ     SRA         SET REFERENCE ADDRESS
07441  M01S06013.dsdi    +++|          RJ     SCM         SET CENTRAL MEMORY
07442  M01S06014.dsdi    +++|          RJ     LDC         LIST DIRECTIVE CARD
07443  M01S06015.dsdi    +++|          RJ     ICT         INITIALIZE CHANNEL RESERVATION TABLE
07444  M01S06016.dsdi    +++|          RJ     SSB         SPACEFILL STRING BUFFER
07445  M01S06017.dsdi    +++|          SA1    F.TCMT
07446  M01S06018.dsdi    +++|          SA2    NP          GET NUMBER OF PP-S
07447  M01S06019.dsdi    +++|          SX2    X2-11
07448  M01S06020.dsdi    +++|          SX7    32B         SET LAST PP NUMBER FOR 20 PP CONFIGURATION
07449  M01S06021.dsdi    +++|          PL     X2,PPP1     IF 20 PP CONFIGURATION
07450  M01S06022.dsdi    +++|          SX7    12B         SET LAST PPU NUMBER
07451  M01S06023.dsdi    +++| PPP1     MX6    0
Line S06024 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi74
Seq #  *Modification Id* Act 
----------------------------+
07452  M02S06024.dsdi74  ---|          SA6    PPPA        INITIALIZE PPU NUMBER
07453  M01S00013.dsdi74  +++|          SA6    FW          INITIALIZE PPU NUMBER
07454  M01S06025.dsdi    +++|          SA7    A6+B1       SET LAST PPU NUMBER
07455  M01S00001.dsdi74a +++|          ERRNZ  LW-FW-1     CODE REQUIRES CONTIGUOUS WORDS
07456  M01S06026.dsdi    +++|          SA5    PC          GET PP COMMUNICATION AREA POINTER
07457  M01S06027.dsdi    +++|          IX5    X1+X5
07458  M01S06028.dsdi    +++|          SA5    X5          READ FIRST WORD OF PP COMMUNICATION AREA
07459  M01S06029.dsdi    +++| PPP3     SX1    11B
07460  M01S06030.dsdi    +++|          RJ     CPS         CHECK PAGE SPACE
07461  M01S06031.dsdi    +++|          RJ     FTR         FORMAT 2 COMMUNICATION BLOCKS
Line S06032 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi74
Seq #  *Modification Id* Act 
----------------------------+
07462  M02S06032.dsdi74  ---|          SA1    PPPA
07463  M01S00014.dsdi74  +++|          SA1    FW
07464  M01S06033.dsdi    +++|          SA2    A1+1
07465  M01S00002.dsdi74a +++|          ERRNZ  LW-FW-1     CODE REQUIRES CONTIGUOUS WORDS
07466  M01S06034.dsdi    +++|          SX6    X1+2        ADVANCE PPU NUMBER
07467  M01S06035.dsdi    +++|          IX7    X6-X2
07468  M01S06036.dsdi    +++|          PL     X7,PPP5     IF LAST PHYSICAL PP PROCESSED
07469  M01S06037.dsdi    +++|          SX7    X6-10
07470  M01S06038.dsdi    +++|          NZ     X7,PPP4     IF NOT END OF FIRST BANK
07471  M01S06039.dsdi    +++|          SX6    20B         RESET TO BEGINNING OF UPPER BANK
07472  M01S06040.dsdi    +++| PPP4     SA6    A1+         UPDATE PPU NUMBER
07473  M01S06041.dsdi    +++|          JP     PPP3        CONTINUE
07474  M01S06042.dsdi    +++|
07475  M01S06043.dsdi    +++| PPP5     SA1    C4          NUMBER OF CPP-S
07476  M01S06044.dsdi    +++|          ZR     X1,PPP8     IF NO CPP-S
07477  M01S06045.dsdi    +++|          BX6    X1
Line S06046 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi74
Seq #  *Modification Id* Act 
----------------------------+
07478  M02S06046.dsdi74  ---|          SA6    PPPA+1      INITIALIZE LAST CPP NUMBER
07479  M01S00015.dsdi74  +++|          SA6    LW          INITIALIZE LAST CPP NUMBER
Line S06047 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi78
Seq #  *Modification Id* Act 
----------------------------+
07480  M02S06047.dsdi78  ---|          SA6    FPLB        SET PROCESSING CPP FLAG
07481  M01S00006.dsdi78  +++|          SA6    IC          SET *CPP* PROCESSING FLAG
07482  M01S06048.dsdi    +++|          SX1    13B
07483  M01S06049.dsdi    +++|          RJ     CPS         CHECK PAGE SPACE
07484  M01S06050.dsdi    +++|          PRINT  (=2C  )
07485  M01S06051.dsdi    +++|          PRINT  (=C*       CONCURRENT PP-S COMMUNICATION AREA*)
07486  M01S06052.dsdi    +++|          PRINT  (=2C  )
07487  M01S06053.dsdi    +++|          MX6    0           INITIALIZE CPP NUMBER
Line S06054 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi74
Seq #  *Modification Id* Act 
----------------------------+
07488  M02S06054.dsdi74  ---|          SA6    PPPA
07489  M01S00016.dsdi74  +++|          SA6    FW
07490  M01S06055.dsdi    +++|          SA6    FTRB        RESET 2 PP FLAG
07491  M01S06056.dsdi    +++| PPP6     SX1    11B
07492  M01S06057.dsdi    +++|          RJ     CPS         CHECK PAGE SPACE
07493  M01S06058.dsdi    +++|          RJ     FTR         FORMAT 2 COMMUNICATION BLOCKS
Line S06059 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi74
Seq #  *Modification Id* Act 
----------------------------+
07494  M02S06059.dsdi74  ---|          SA1    PPPA
07495  M01S00017.dsdi74  +++|          SA1    FW
07496  M01S06060.dsdi    +++|          SX6    X1+2        ADVANCE CPP NUMBER
07497  M01S06061.dsdi    +++|          SA2    A1+B1
07498  M01S00003.dsdi74a +++|          ERRNZ  LW-FW-1     CODE REQUIRES CONTIGUOUS WORDS
07499  M01S06062.dsdi    +++|          IX7    X6-X2
07500  M01S06063.dsdi    +++|          PL     X7,PPP7     IF LAST PHYSICAL CPP PROCESSED
07501  M01S06064.dsdi    +++|          SA6    A1          UPDATE CPP NUMBER
07502  M01S06065.dsdi    +++|          SX0    X7+B1
07503  M01S06066.dsdi    +++|          NZ     X0,PPP6     IF EVEN NUMBER OF CPP-S
07504  M01S06067.dsdi    +++|          SX7    1           SET 1 PP FLAG
07505  M01S06068.dsdi    +++|          SA7    FTRB
07506  M01S06069.dsdi    +++|          JP     PPP6        CONTINUE
07507  M01S06070.dsdi    +++|
07508  M01S06071.dsdi    +++| PPP7     BX6    X6-X6       CLEAR PROCESSING CPP FLAG
Line S06072 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi78
Seq #  *Modification Id* Act 
----------------------------+
07509  M02S06072.dsdi78  ---|          SA6    FPLB
07510  M01S00007.dsdi78  +++|          SA6    IC
07511  M01S06073.dsdi    +++| PPP8     PRINT  (=2C  )
07512  M01S06074.dsdi    +++|          PRINT  (=C*        PSEUDO PP COMMUNICATION AREA*)
07513  M01S06075.dsdi    +++|          PRINT  (=2C  )
07514  M01S06076.dsdi    +++|          SA1    F.TCMT      GET ADDRESS OF FIRST PSEUDO AREA
07515  M01S06077.dsdi    +++|          SA2    PC
07516  M01S06078.dsdi    +++|          SA3    NP          GET NUMBER OF PP-S
07517  M01S06079.dsdi    +++|          SX6    B1+
07518  M01S06080.dsdi    +++|          SA6    FTRB        SET 1 PSEUDO PP FLAG
07519  M01S06081.dsdi    +++|          BX6    X6-X6
07520  M01S06082.dsdi    +++|          LX3    3
07521  M01S06083.dsdi    +++|          IX3    X2+X3
07522  M01S06084.dsdi    +++|          SA4    C4
07523  M01S06085.dsdi    +++|          LX4    3
07524  M01S06086.dsdi    +++|          IX3    X4+X3
Line S06087 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi74
Seq #  *Modification Id* Act 
----------------------------+
07525  M02S06087.dsdi74  ---|          SA6    PPPA        CLEAR PP NUMBER
07526  M01S00018.dsdi74  +++|          SA6    FW          CLEAR PP NUMBER
07527  M01S06088.dsdi    +++|          IX3    X1+X3
07528  M01S06089.dsdi    +++|          SA5    X3+         ADDRESS OF PSEUDO AREA
07529  M01S06090.dsdi    +++|          RJ     FTR         PROCESS PSEUDO PP-S
07530  M01S06091.dsdi    +++|          JP     DSD1        RETURN
Line S06092 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi74
Seq #  *Modification Id* Act 
----------------------------+
07531  M02S06092.dsdi74  ---|
Line S06093 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi74
Seq #  *Modification Id* Act 
----------------------------+
07532  M02S06093.dsdi74  ---| PPPA     BSS    1           CURRENT PPU NUMBER
Line S06094 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi74
Seq #  *Modification Id* Act 
----------------------------+
07533  M02S06094.dsdi74  ---|          BSS    1           LAST PPU NUMBER
07534  M01S06095.dsdi    +++|
07535  M01S06096.dsdi    +++|*         PROCESS TERMINAL OUTPUT.
07536  M01S06097.dsdi    +++|
07537  M01S06098.dsdi    +++| PPTN     SA0    B0          PRESET PPU NUMBER
07538  M01S06099.dsdi    +++|          SA5    PC          GET PP COMMUNICATION AREA POINTER
07539  M01S06100.dsdi    +++| PPT1     PRINT  (=2C  )
07540  M01S06101.dsdi    +++|
07541  M01S06102.dsdi    +++|*         PRINT PPU NAMES.
07542  M01S06103.dsdi    +++|
07543  M01S06104.dsdi    +++|          SA2    PPTA        GET LOOP COUNT
07544  M01S06105.dsdi    +++|          SB2    X2+
07545  M01S06106.dsdi    +++|          SB7    PRBF        PRINT STRING ADDRESS
07546  M01S06107.dsdi    +++| PPT2     SX6    A0+
07547  M01S06108.dsdi    +++|          SA6    //PP        SET PPU NUMBER
07548  M01S06109.dsdi    +++|          RJ     BPN         BUILD PPU NAME
07549  M01S06110.dsdi    +++|          BX2    X6
07550  M01S06111.dsdi    +++|          SB6    7
07551  M01S06112.dsdi    +++|          RJ     UPS         FORMAT PPU NAME
07552  M01S06113.dsdi    +++|          SB2    B2-B1
07553  M01S06114.dsdi    +++|          SA0    A0+B1       ADVANCE PPU NUMBER
07554  M01S06115.dsdi    +++|          GT     B2,B0,PPT2  IF MORE FOR THIS LINE
07555  M01S06116.dsdi    +++|          PRINT  PRBF,B7-PRBF
07556  M01S06117.dsdi    +++|
07557  M01S06118.dsdi    +++|*         PRINT EXECUTING PROGRAM NAMES AND CONTROL POINT ASSIGNMENTS.
07558  M01S06119.dsdi    +++|
07559  M01S06120.dsdi    +++|          SB7    PRBF
07560  M01S06121.dsdi    +++|          SB2    X5          PP COMMUNICATION AREA INDEX
07561  M01S06122.dsdi    +++|          MX3    18
07562  M01S06123.dsdi    +++|          SA4    F.TCMT
07563  M01S06124.dsdi    +++|          SA2    PPTA        GET LOOP COUNT
07564  M01S06125.dsdi    +++|          SB3    X2+
07565  M01S06126.dsdi    +++| PPT3     SA2    B2+X4       READ PP INPUT REGISTER
07566  M01S06127.dsdi    +++|          MX1    12
07567  M01S06128.dsdi    +++|          BX1    X1*X2
07568  M01S06129.dsdi    +++|          NZ     X1,PPT4     IF PPU ACTIVE
07569  M01S06130.dsdi    +++|          SA2    =4L----
07570  M01S06131.dsdi    +++|          SB6    7
07571  M01S06132.dsdi    +++|          RJ     UPS
07572  M01S06133.dsdi    +++|          JP     PPT5        CONTINUE
07573  M01S06134.dsdi    +++|
07574  M01S06135.dsdi    +++| PPT4     BX2    X3*X2       MASK NAME
07575  M01S06136.dsdi    +++|          SB6    3
07576  M01S06137.dsdi    +++|          RJ     UPS         SET NAME IN PRINT STRING
07577  M01S06138.dsdi    +++|          SX6    1R-
07578  M01S06139.dsdi    +++|          SA6    B7
07579  M01S06140.dsdi    +++|          SB7    B7+B1
07580  M01S06141.dsdi    +++|          SA2    A2          REREAD INPUT REGISTER
07581  M01S06142.dsdi    +++|          MX1    -5
07582  M01S06143.dsdi    +++|          LX2    24
07583  M01S06144.dsdi    +++|          BX1    -X1*X2      CONTROL POINT NUMBER
07584  M01S06145.dsdi    +++|          LX1    -6
07585  M01S06146.dsdi    +++|          SB6    B1+B1
07586  M01S06147.dsdi    +++|          RJ     CTS         SET CONTROL POINT NUMBER
07587  M01S06148.dsdi    +++|          SB7    B7+1        SPACE 1
07588  M01S06149.dsdi    +++| PPT5     SB2    B2+10B      ADVANCE COMMUNICATION AREA ADDRESS
07589  M01S06150.dsdi    +++|          SB3    B3-1
07590  M01S06151.dsdi    +++|          GT     B3,B0,PPT3  IF MORE FOR THIS LINE
07591  M01S06152.dsdi    +++|          PRINT  PRBF,B7-PRBF
07592  M01S06153.dsdi    +++|
07593  M01S06154.dsdi    +++|*         PRINT COMMUNICATION AREA ADDRESSES.
07594  M01S06155.dsdi    +++|
07595  M01S06156.dsdi    +++|          SB7    PRBF
07596  M01S06157.dsdi    +++|          SA1    PPTA        GET LOOP COUNT
07597  M01S06158.dsdi    +++|          SB2    X1+
07598  M01S06159.dsdi    +++| PPT6     BX1    X5
07599  M01S06160.dsdi    +++|          LX1    -12
07600  M01S06161.dsdi    +++|          SB6    4
07601  M01S06162.dsdi    +++|          RJ     CTS         CONVERT ADDRESS
07602  M01S06163.dsdi    +++|          SB6    3
07603  M01S06164.dsdi    +++|          RJ     SBL         SPACE 3
07604  M01S06165.dsdi    +++|          SX5    X5+10B      ADVANCE ADDRESS
07605  M01S06166.dsdi    +++|          SB2    B2-1
07606  M01S06167.dsdi    +++|          GT     B2,B0,PPT6  IF MORE FOR THIS LINE
07607  M01S06168.dsdi    +++|          PRINT  PRBF,B7-PRBF
07608  M01S06169.dsdi    +++|          SA1    NP
07609  M01S06170.dsdi    +++|          SX2    A0
07610  M01S06171.dsdi    +++|          IX2    X2-X1
07611  M01S06172.dsdi    +++|          SA0    A0-12B+20B  ADJUST PP NUMBER FOR UPPER BANK
07612  M01S06173.dsdi    +++|          SA3    PPTA
07613  M01S06174.dsdi    +++|          SX3    X3-2
Line S06175 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi78
Seq #  *Modification Id* Act 
----------------------------+
07614  M02S06175.dsdi78  ---|          SA4    PPTB
07615  M01S00008.dsdi78  +++|          SA4    IC
07616  M01S06176.dsdi    +++|          NZ     X4,PPT7     IF CPP-S ALREADY PROCESSED
07617  M01S06177.dsdi    +++|          NG     X3,PPT8     IF PSEUDO PP-S PROCESSED
07618  M01S06178.dsdi    +++|          NG     X2,PPT1     IF 10 MORE PPUS
07619  M01S06179.dsdi    +++|          SA2    C4
07620  M01S06180.dsdi    +++|          ZR     X2,PPT7     IF NO CPP-S
07621  M01S06181.dsdi    +++|          BX6    X2          RESET COUNT FOR CPP-S
07622  M01S06182.dsdi    +++|          SA6    PPTA
Line S06183 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi78
Seq #  *Modification Id* Act 
----------------------------+
07623  M02S06183.dsdi78  ---|          SA6    A6+B1       SET PROCESSING CPP-S FLAG
Line S06184 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi78
Seq #  *Modification Id* Act 
----------------------------+
07624  M02S06184.dsdi78  ---|          SA0    B0          SET CPP NUMBER
07625  M01S00009.dsdi78  +++|          SA6    IC          SET *CPP* PROCESSING FLAG
07626  M01S00010.dsdi78  +++| PPT6.1   SA0    0           SET *CPP* NUMBER
07627  M01S06185.dsdi    +++|          JP     PPT1        CONTINUE PROCESSING
07628  M01S06186.dsdi    +++|
07629  M01S06187.dsdi    +++| PPT7     SX6    B1
07630  M01S06188.dsdi    +++|          SA6    PPTA        SET COUNT FOR PSEUDO PP
Line S06189 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi78
Seq #  *Modification Id* Act 
----------------------------+
07631  M02S06189.dsdi78  ---|          SA0    B0          CLEAR PP NUMBER
Line S06190 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi78
Seq #  *Modification Id* Act 
----------------------------+
07632  M02S06190.dsdi78  ---|          SX6    B0
Line S06191 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi78
Seq #  *Modification Id* Act 
----------------------------+
07633  M02S06191.dsdi78  ---|          SA6    A6+B1       CLEAR CPP PROCESSED FLAG
Line S06192 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi78
Seq #  *Modification Id* Act 
----------------------------+
07634  M02S06192.dsdi78  ---|          JP     PPT1        PROCESS NEXT LINE
07635  M01S00011.dsdi78  +++|          SX6    B0          CLEAR *CPP* PROCESSING FLAG
07636  M01S00012.dsdi78  +++|          SA6    IC
07637  M01S00013.dsdi78  +++|          JP     PPT6.1      PROCESS NEXT LINE
07638  M01S06193.dsdi    +++|
07639  M01S06194.dsdi    +++| PPT8     SX6    10          RESET LOOP COUNT FOR NEXT CALL
07640  M01S06195.dsdi    +++|          SA6    PPTA
07641  M01S06196.dsdi    +++|          JP     DSD1        RETURN
07642  M01S06197.dsdi    +++|
07643  M01S00014.dsdi78  +++|
07644  M01S06198.dsdi    +++| PPTA     CON    10          LOOP COUNT
Line S06199 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi78
Seq #  *Modification Id* Act 
----------------------------+
07645  M02S06199.dsdi78  ---| PPTB     CON    0           CPP PROCESSED FLAG
Line S06200 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi78
Seq #  *Modification Id* Act 
----------------------------+
07646  M02S06200.dsdi78  ---|          ERRNZ  PPTB-PPTA-1  CODE DEPENDS ON VALUE
07647  M01S06201.dsdi    +++| PROBE    SPACE  4,10
07648  M01S06202.dsdi    +++|***       PROBE.
07649  M01S06203.dsdi    +++|*
07650  M01S06204.dsdi    +++|*         DUMP *PROBE* TABLES IN *D* FORMAT.
07651  M01S06205.dsdi    +++|
07652  M01S06206.dsdi    +++|
07653  M01S06207.dsdi    +++| PROBE    DATA   0LPROBE
07654  M01S06208.dsdi    +++|
07655  M01S06209.dsdi    +++|          RJ     CEP         CHECK FOR EXTRANEOUS PARAMETERS
07656  M01S06210.dsdi    +++|          SA1    F.TCMT
07657  M01S06211.dsdi    +++|          SA2    X1+SSTL
07658  M01S06212.dsdi    +++|          LX2    59-30
07659  M01S06213.dsdi    +++|          NG     X2,ERR27    IF PROBE NOT ENABLED
07660  M01S06214.dsdi    +++|          SA2    X1+PRBP
07661  M01S06215.dsdi    +++|          PL     X2,ERR26    IF PROBE TABLES INTERLOCKED
07662  M01S06216.dsdi    +++|          SX6    X2          SET FWA OF DUMP
07663  M01S06217.dsdi    +++|          LX2    -24         SET LWA+1 OF DUMP
07664  M01S06218.dsdi    +++|          SX2    X2
07665  M01S06219.dsdi    +++|          IX7    X2+X6
07666  M01S06220.dsdi    +++|          SX5    =C*           PROBE TABLES*
07667  M01S06221.dsdi    +++|          SB3    B1          SET *D* FORMAT
07668  M01S06222.dsdi    +++|          SX4    B0          SET READ FROM DUMP FILE
07669  M01S06223.dsdi    +++|          RJ     DTB         DUMP TABLES
07670  M01S06224.dsdi    +++|          EQ     DSD1        RETURN
Line S06225 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07671  M02S06225.dsdi67  ---| PROCA    SPACE  4,10
07672  M01S00007.dsdi67  +++| PROCA    SPACE  4,20
07673  M01S06226.dsdi    +++|***       PROCA.
07674  M01S06227.dsdi    +++|*
07675  M01S06228.dsdi    +++|*         SPECIFIES THAT THE ENTIRE PROCESSOR OPERAND CACHE
07676  M01S06229.dsdi    +++|*         SHOULD BE DUMPED.
07677  M01S06230.dsdi    +++|*
07678  M01S06231.dsdi    +++|*         PROCA,FIRST,LAST.
07679  M01S06232.dsdi    +++|*
07680  M01S06233.dsdi    +++|*         FIRST  SPECIFIES THE FIRST WORD (HEX) TO BE DUMPED.
07681  M01S06234.dsdi    +++|*                IF OMITTED, WORD 00 IS USED BY DEFAULT.
07682  M01S06235.dsdi    +++|*
07683  M01S06236.dsdi    +++|*         LAST   SPECIFIES THE LAST+1 WORD (HEX) TO BE DUMPED.
07684  M01S06237.dsdi    +++|*                IF OMITTED, WORD FIRST+1 IS USED BY DEFAULT.
07685  M01S06238.dsdi    +++|*                IF FIRST IS OMITTED, WORD 4095 IS DEFAULT FOR LAST.
07686  M01S06239.dsdi    +++|*
07687  M01S06240.dsdi    +++|*         THE *PROCA* DIRECTIVE IS APPLICABLE ONLY WHEN DUMPING A
07688  M01S06241.dsdi    +++|*         CYBER 180-990 MAINFRAME, AND CAUSES THE PROCESSOR LOAD/STORE
07689  M01S06242.dsdi    +++|*         UNIT (LSU) OPERAND CACHE MEMORY CONTENTS TO BE DUMPED.  THE
07690  M01S06243.dsdi    +++|*         RADIAL MCI IS PRINTED BEFORE PRINTING REGISTER 00.  EACH
07691  M01S06244.dsdi    +++|*         ROW CONTAINS THE WORD NUMBER, AND THE CONTENTS OF THE
07692  M01S06245.dsdi    +++|*         CORRESPONDING CONTROL WORD AND DATA WORD.
07693  M01S06246.dsdi    +++|
07694  M01S06247.dsdi    +++|
07695  M01S06248.dsdi    +++| PROCA    DATA   0LPROCA
07696  M01S06249.dsdi    +++|
07697  M01S06250.dsdi    +++| PCA1     RJ     LDC         LIST DIRECTIVE CARD
Line S06251 Modification History
M01 (Added by) dsdi
M02 (Updated by) 271l739
Seq #  *Modification Id* Act 
----------------------------+
07698  M02S06251.271l739 ---|          SA1    =3LPOC
07699  M01S00163.271l739 +++|          SA1    .POC
Line S06252 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07700  M02S06252.dsdi67  ---|          SA3    PCAA+2      NEXT DIRECTORY TABLE ENTRY
Line S06253 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07701  M02S06253.dsdi67  ---|          MX0    18
Line S06254 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07702  M02S06254.dsdi67  ---|          SA2    X3
Line S06255 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07703  M02S06255.dsdi67  ---|          NZ     X3,PCA2     IF NOT FIRST RECORD
Line S06256 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07704  M02S06256.dsdi67  ---|          SEARCH TDIR,X1,X0
Line S06257 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07705  M02S06257.dsdi67  ---|          ZR     X2,ERR14    IF RECORD ID NOT IN DIRECTORY
Line S06258 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07706  M02S06258.dsdi67  ---| PCA2     SA3    =3LPOC      RECORD ID
Line S06259 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07707  M02S06259.dsdi67  ---|          SB7    C.TDIR      TABLE ENTRY LENGTH
Line S06260 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07708  M02S06260.dsdi67  ---|          SB3    PCAA+2      NEXT TABLE ENTRY
Line S06261 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07709  M02S06261.dsdi67  ---|          RJ     CNR         CHECK NEXT RECORD
Line S06262 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07710  M02S06262.dsdi67  ---|          SX6    B0          PRESET *FIRST*
Line S06263 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07711  M02S06263.dsdi67  ---|          MX0    -6          SAVE RADIAL MCI
Line S06264 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07712  M02S06264.dsdi67  ---|          SA6    PCAB
Line S06265 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07713  M02S06265.dsdi67  ---|          SA6    PCAA
Line S06266 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07714  M02S06266.dsdi67  ---|          SX6    4095D       PRESET *LAST* TO 4095
Line S06267 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07715  M02S06267.dsdi67  ---|          SA6    A6+B1
Line S06268 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07716  M02S06268.dsdi67  ---|          AX2    36
Line S06269 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07717  M02S06269.dsdi67  ---|          BX6    -X0*X2
Line S06270 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07718  M02S06270.dsdi67  ---|          SA6    PRBF+13
Line S06271 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07719  M02S06271.dsdi67  ---|          SA2    A2+B1       SET RANDOM INDEX
Line S06272 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07720  M02S06272.dsdi67  ---|          BX6    X2
Line S06273 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07721  M02S06273.dsdi67  ---|          SA6    RI
Line S06274 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07722  M02S06274.dsdi67  ---|
Line S06275 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07723  M02S06275.dsdi67  ---|*         PRINT  *RADIAL MCI = N*.
Line S06276 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07724  M02S06276.dsdi67  ---|
Line S06277 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07725  M02S06277.dsdi67  ---|          PRINT  (=2C  )
Line S06278 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07726  M02S06278.dsdi67  ---|          SB7    PRBF
Line S06279 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07727  M02S06279.dsdi67  ---|          SA2    =13HRADIAL MCI =
Line S06280 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07728  M02S06280.dsdi67  ---|          SB6    13
Line S06281 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07729  M02S06281.dsdi67  ---|          RJ     UPS         UNPACK MESSAGE
Line S06282 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07730  M02S06282.dsdi67  ---|          PRINT  CCCH,15
Line S06283 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07731  M02S06283.dsdi67  ---|          PRINT  (=2C  )
Line S06284 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07732  M02S06284.dsdi67  ---|
Line S06285 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07733  M02S06285.dsdi67  ---|*         PRINT COLUMN HEADERS.
Line S06286 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07734  M02S06286.dsdi67  ---|
Line S06287 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07735  M02S06287.dsdi67  ---|          RJ     SSB         SPACE FILL STRING BUFFER
07736  M01S00008.dsdi67  +++|          SX6    B1+         DISPLAY RADIAL MCI
07737  M01S00009.dsdi67  +++|          RJ     FPR         FIND PROCESSOR RECORD
07738  M01S00010.dsdi67  +++|          ZR     X2,ERR14    IF RECORD NOT FOUND
07739  M01S00011.dsdi67  +++|          SX6    4095        SET DEFAULT LWA+1
07740  M01S00012.dsdi67  +++|          RJ     SHA         SET HEX ADDRESSES
07741  M01S06288.dsdi    +++|          PRINT  (=C*      CONTROL WORDS             DATA WORDS*)
07742  M01S06289.dsdi    +++|          PRINT  (=2C  )
Line S06290 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07743  M02S06290.dsdi67  ---|
Line S06291 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07744  M02S06291.dsdi67  ---|*         GET REGISTER NUMBERS OF FIRST AND LAST WORDS TO DUMP.
Line S06292 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07745  M02S06292.dsdi67  ---|
Line S06293 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07746  M02S06293.dsdi67  ---|          RJ     ASX         GET FIRST WORD NUMBER
Line S06294 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07747  M02S06294.dsdi67  ---|          NZ     X4,PCA3     IF NOT SPECIFIED
Line S06295 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07748  M02S06295.dsdi67  ---|          SA6    PCAA        SET FIRST WORD NUMBER
Line S06296 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07749  M02S06296.dsdi67  ---|          SX7    X6+B1
Line S06297 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07750  M02S06297.dsdi67  ---|          SA7    A6+B1       PRESET LAST WORD NUMBER TO FIRST+1
Line S06298 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07751  M02S06298.dsdi67  ---|          RJ     ASX         GET LAST WORD NUMBER
Line S06299 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07752  M02S06299.dsdi67  ---|          NZ     X4,PCA3     IF LAST WORD NUMBER NOT SPECIFIED
Line S06300 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07753  M02S06300.dsdi67  ---|          SX1    4095D       ENSURE *LAST* .LE. 4095
Line S06301 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07754  M02S06301.dsdi67  ---|          IX3    X1-X6
Line S06302 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07755  M02S06302.dsdi67  ---|          NG     X3,PCA3     IF NEW LAST IS TOO LARGE, DO NOT RESET
Line S06303 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07756  M02S06303.dsdi67  ---|          SA6    PCAA+1
Line S06304 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07757  M02S06304.dsdi67  ---|
Line S06305 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07758  M02S06305.dsdi67  ---|*         POSITION DUMP FILE.
Line S06306 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07759  M02S06306.dsdi67  ---|
Line S06307 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07760  M02S06307.dsdi67  ---| PCA3     SA3    PCAA        GET FWA
07761  M01S00013.dsdi67  +++|          RJ     SSB         CLEAR STRING BUFFER
07762  M01S00014.dsdi67  +++| PCA4     SA3    FW          GET FWA
07763  M01S06308.dsdi    +++|          LX3    2           CONVERT TO BYTE NUMBER
Line S06309 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07764  M02S06309.dsdi67  ---|          BX6    X3
Line S06310 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07765  M02S06310.dsdi67  ---|          SA6    PCAC
Line S06311 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07766  M02S06311.dsdi67  ---| PCA4     RJ     FBP         FIND BYTE POSITION
07767  M01S00015.dsdi67  +++|          RJ     FBP         FIND BYTE POSITION
07768  M01S06312.dsdi    +++|
07769  M01S06313.dsdi    +++|*         READ BLOCK OF 60 64-BIT REGISTER WORDS FROM CONTROL
07770  M01S06314.dsdi    +++|*         WORD AREA AND CORRESPONDING DATA WORD AREA.
07771  M01S06315.dsdi    +++|
07772  M01S06316.dsdi    +++|          SB6    B0+
07773  M01S06317.dsdi    +++|          SB7    240
07774  M01S06318.dsdi    +++| PCA5     RJ     NXB         READ 4*60 16-BIT BYTES (64 CM WORDS)
07775  M01S06319.dsdi    +++|          BX6    X1
07776  M01S06320.dsdi    +++|          SA6    BUF+B6      WRITE THEM INTO BUF+0 TO BUF+239
07777  M01S06321.dsdi    +++|          SB6    B6+B1
07778  M01S06322.dsdi    +++|          LT     B6,B7,PCA5  IF LESS THAN 60 WORDS READ
Line S06323 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07779  M02S06323.dsdi67  ---|          SA3    PCAC        GET POSITION
07780  M01S00016.dsdi67  +++|          SA3    FW          GET POSITION
07781  M01S00017.dsdi67  +++|          LX3    2
07782  M01S06324.dsdi    +++|          SX3    X3+4096*4   JUMP TO DATA WORD AREA
07783  M01S06325.dsdi    +++|          RJ     FBP         FIND BYTE POSITION
07784  M01S06326.dsdi    +++|          SB6    0
07785  M01S06327.dsdi    +++|          SB7    240         READ 60 DATA WORDS AND STORE THEM IN BUF
07786  M01S06328.dsdi    +++| PCA6     RJ     NXB
07787  M01S06329.dsdi    +++|          BX6    X1
07788  M01S06330.dsdi    +++|          SA6    BUF+240+B6  SAVE THEM IN BUF RIGHT AFTER CONTROL WORDS
07789  M01S06331.dsdi    +++|          SB6    B6+B1
07790  M01S06332.dsdi    +++|          LT     B6,B7,PCA6  IF LESS THAN 60 WORDS READ
Line S06333 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07791  M02S06333.dsdi67  ---|
Line S06334 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07792  M02S06334.dsdi67  ---|*         PRINT WORD NUMBER.
Line S06335 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07793  M02S06335.dsdi67  ---|
Line S06336 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07794  M02S06336.dsdi67  ---|          RJ     SSB
Line S06337 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07795  M02S06337.dsdi67  ---| PCA7     SA1    PCAA        GET CURRENT FWA
07796  M01S00018.dsdi67  +++|          SA0    0           INITIALIZE BUFFER POINTER
07797  M01S00019.dsdi67  +++| PCA7     SA1    FW          GET CURRENT FWA
07798  M01S06338.dsdi    +++|          SB7    PRBF
07799  M01S06339.dsdi    +++|          SB6    3
07800  M01S06340.dsdi    +++|          LX1    59-11
07801  M01S06341.dsdi    +++|          RJ     HTS         PLACE ENTRY NUMBER IN OUTPUT FIELD
Line S06342 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07802  M02S06342.dsdi67  ---|
Line S06343 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07803  M02S06343.dsdi67  ---|*         PRINT WORD CONTENTS - CONTROL WORD THEN DATA WORD.
Line S06344 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07804  M02S06344.dsdi67  ---|
Line S06345 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07805  M02S06345.dsdi67  ---| PCA8     SA3    PCAB        GET WORD COUNT DIFFERENCE
Line S06346 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07806  M02S06346.dsdi67  ---|          SB3    X3
Line S06347 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07807  M02S06347.dsdi67  ---|          SA1    BUF+B3-1    READ CONTENTS OF BUFFER
07808  M01S00020.dsdi67  +++|          SA1    BUF+A0-1    READ CONTENTS OF BUFFER
07809  M01S06348.dsdi    +++|          SX5    4
Line S06349 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07810  M02S06349.dsdi67  ---| PCA9     SA1    A1+1
07811  M01S00021.dsdi67  +++| PCA9     SA1    A1+B1
07812  M01S06350.dsdi    +++|          LX1    59-15
07813  M01S06351.dsdi    +++|          SB7    B7+2        READ ONE CONTROL WORD
07814  M01S06352.dsdi    +++|          SB6    4
07815  M01S06353.dsdi    +++|          RJ     HTS
07816  M01S06354.dsdi    +++|          SX5    X5-1
07817  M01S06355.dsdi    +++|          NZ     X5,PCA9     IF MORE DATA TO READ
Line S06356 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07818  M02S06356.dsdi67  ---|          SA1    BUF+240-1+B3  NOW READ CORRESPONDING DATA WORD
07819  M01S00022.dsdi67  +++|          SA1    BUF+240-1+A0  READ CORRESPONDING DATA WORD
07820  M01S06357.dsdi    +++|          SB7    B7+2
07821  M01S06358.dsdi    +++|          SX5    4
07822  M01S06359.dsdi    +++| PCA10    SA1    A1+B1
07823  M01S06360.dsdi    +++|          LX1    59-15
07824  M01S06361.dsdi    +++|          SB7    B7+2
07825  M01S06362.dsdi    +++|          SB6    4
07826  M01S06363.dsdi    +++|          RJ     HTS
07827  M01S06364.dsdi    +++|          SX5    X5-1
07828  M01S06365.dsdi    +++|          NZ     X5,PCA10    IF MORE DATA TO READ
07829  M01S06366.dsdi    +++|          PRINT  CCCH,B7-CCCH+1  PRINT OUT LINE
Line S06367 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07830  M02S06367.dsdi67  ---|          SA1    PCAA        FWA
Line S06368 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07831  M02S06368.dsdi67  ---|          SA2    A1+1        LWA
07832  M01S00023.dsdi67  +++|          SA1    FW          FWA
07833  M01S00024.dsdi67  +++|          SA2    A1+B1       LWA+1
07834  M01S00004.dsdi74a +++|          ERRNZ  LW-FW-1     CODE REQUIRES CONTIGUOUS WORDS
07835  M01S06369.dsdi    +++|          IX2    X1-X2
07836  M01S06370.dsdi    +++|          PL     X2,PCA11    IF REACHED LWA
07837  M01S06371.dsdi    +++|          SX6    X1+B1       INCREMENT FWA
07838  M01S06372.dsdi    +++|          SA6    A1
Line S06373 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07839  M02S06373.dsdi67  ---|          SA1    PCAB        GET WORD COUNT DIFFERENCE
Line S06374 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07840  M02S06374.dsdi67  ---|          SX6    X1+4        INCREMENT BY 4
Line S06375 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07841  M02S06375.dsdi67  ---|          SA6    A1
Line S06376 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07842  M02S06376.dsdi67  ---|          SB3    X6
Line S06377 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07843  M02S06377.dsdi67  ---|          SB4    240
Line S06378 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07844  M02S06378.dsdi67  ---|          LT     B3,B4,PCA7  IF BUFFER NOT EMPTY
Line S06379 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07845  M02S06379.dsdi67  ---|          SA3    PCAC        UPDATE LOCATION POINTER
Line S06380 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07846  M02S06380.dsdi67  ---|          SX3    X3+60*4     INCREMENT BYTE NUMBER FOR *FBP*
Line S06381 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07847  M02S06381.dsdi67  ---|          BX6    X3
Line S06382 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07848  M02S06382.dsdi67  ---|          SA6    A3
Line S06383 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07849  M02S06383.dsdi67  ---|          SX6    B0+
Line S06384 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07850  M02S06384.dsdi67  ---|          SA6    PCAB        RESET WORD COUNT BACK TO 0
07851  M01S00025.dsdi67  +++|          SA0    A0+4        INCREMENT BUFFER POINTER
07852  M01S00026.dsdi67  +++|          SX1    A0-240
07853  M01S00027.dsdi67  +++|          NZ     X1,PCA7     IF BUFFER NOT EMPTY
07854  M01S06385.dsdi    +++|          JP     PCA4        READ NEXT BLOCK OF WORDS
07855  M01S06386.dsdi    +++|
Line S06387 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07856  M02S06387.dsdi67  ---| PCA11    SA1    PCAA+2      NEXT TABLE ENTRY
07857  M01S00028.dsdi67  +++| PCA11    SA1    NR          NEXT TABLE ENTRY
07858  M01S06388.dsdi    +++|          ZR     X1,DSD1     IF NO MORE RECORDS TO PROCESS
07859  M01S06389.dsdi    +++|          JP     PCA1        PROCESS NEXT RECORD
Line S06390 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07860  M02S06390.dsdi67  ---|
Line S06391 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07861  M02S06391.dsdi67  ---| PCAA     CON    0           FWA
Line S06392 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07862  M02S06392.dsdi67  ---|          CON    0           LWA
Line S06393 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07863  M02S06393.dsdi67  ---|          CON    0           NEXT DIRECTORY TABLE ENTRY POINTER
Line S06394 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07864  M02S06394.dsdi67  ---| PCAB     CON    0           WORD COUNT DIFFERENCE
Line S06395 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07865  M02S06395.dsdi67  ---| PCAC     CON    0           BYTE COUNTER FOR FBP
Line S06396 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07866  M02S06396.dsdi67  ---|
07867  M01S06397.dsdi    +++| PROCW    SPACE  4,10
07868  M01S06398.dsdi    +++|***       PROCW.
07869  M01S06399.dsdi    +++|*
07870  M01S06400.dsdi    +++|*         THE *PROCW* DIRECTIVE CAUSES THE PROCESSOR CONTROLWARE
07871  M01S06401.dsdi    +++|*         PART NUMBER AND REVISION LEVEL TO BE DUMPED.
07872  M01S06402.dsdi    +++|
07873  M01S06403.dsdi    +++|
07874  M01S06404.dsdi    +++| PROCW    DATA   0LPROCW
07875  M01S06405.dsdi    +++|
07876  M01S06406.dsdi    +++|          RJ     CEP         CHECK FOR EXTRANEOUS PARAMETERS
Line S06407 Modification History
M01 (Added by) dsdi
M02 (Updated by) 271l739
Seq #  *Modification Id* Act 
----------------------------+
07877  M02S06407.271l739 ---|          SA1    =3LPMR
07878  M01S00164.271l739 +++|          SA1    .PMR
07879  M01S06408.dsdi    +++|          RJ     GID         GET ELEMENT ID
07880  M01S06409.dsdi    +++|          SA2    TMNO+X6
07881  M01S06410.dsdi    +++|          BX6    X2
07882  M01S06411.dsdi    +++|          NG     X6,ERR14    IF UNUSED MODEL
07883  M01S06412.dsdi    +++|          SA6    PCWA
07884  M01S06413.dsdi    +++| PCW1     RJ     LDC         LIST DIRECTIVE
Line S06414 Modification History
M01 (Added by) dsdi
M02 (Updated by) 271l739
Seq #  *Modification Id* Act 
----------------------------+
07885  M02S06414.271l739 ---|          SA1    =3LPCS
07886  M01S00165.271l739 +++|          SA1    .PCS
Line S06415 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07887  M02S06415.dsdi67  ---|          SA2    PCWB        NEXT DIECTORY TABLE ENTRY
Line S06416 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07888  M02S06416.dsdi67  ---|          ZR     X2,PCW2     IF FIRST RECORD
Line S06417 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07889  M02S06417.dsdi67  ---|          SB3    A2
Line S06418 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07890  M02S06418.dsdi67  ---|          SA2    X2
Line S06419 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07891  M02S06419.dsdi67  ---|          JP     PCW3        PROCESS NEXT RECORD
Line S06420 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07892  M02S06420.dsdi67  ---|
Line S06421 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07893  M02S06421.dsdi67  ---| PCW2     MX0    18
Line S06422 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07894  M02S06422.dsdi67  ---|          SEARCH TDIR,X1,X0
Line S06423 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07895  M02S06423.dsdi67  ---|          ZR     X2,ERR14    IF RECORD ID NOT IN DIRECTORY
Line S06424 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07896  M02S06424.dsdi67  ---| PCW3     SA3    =3LPCS      RECORD ID
Line S06425 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07897  M02S06425.dsdi67  ---|          SB7    C.TDIR      TABLE ENTRY LENGTH
Line S06426 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07898  M02S06426.dsdi67  ---|          SB3    PCWB        NEXT DIRECTORY TABLE ENTRY
Line S06427 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07899  M02S06427.dsdi67  ---|          RJ     CNR         CHECK NEXT RECORD
Line S06428 Modification History
M01 (Added by) dsdi
M02 (Updated by) dsdi67
Seq #  *Modification Id* Act 
----------------------------+
07900  M02S06428.dsdi67  ---|          SA2    A2+B1       RANDOM ADDRESS
Proceed to Part 6
cdc/nos2.source/opl.opl871/deck/dsdi.005.txt ยท Last modified: by 127.0.0.1