Seq # *Modification Id* Act
----------------------------+
16256 M01S00024.dsdi71a +++| RJ SCM SET CENTRAL MEMORY
16257 M01S00025.dsdi71a +++| SX1 CPAS GET IAF FL, RA
16258 M01S00026.dsdi71a +++| RJ GFL
16259 M00S12919.dsdi +++| SA7 DTLA SAVE LWA+1 OF IAF FIELD LENGTH
16260 M00S12920.dsdi +++| RJ SRA SET IAF CONTROL POINT RA
16261 M00S12921.dsdi +++| RJ SSB CLEAR PRINT STRING BUFFER
16262 M00S12922.dsdi +++| RJ LDC FORCE PAGE EJECT
16263 M00S12923.dsdi +++|
16264 M00S12924.dsdi +++|* DUMP POT LINK TABLE.
16265 M00S12925.dsdi +++|
16266 M00S12926.dsdi +++| PRINT (=2C )
16267 M00S12927.dsdi +++| PRINT (=C* POT LINK TABLE*)
16268 M00S12928.dsdi +++| PRINT (=2C )
16269 M00S12929.dsdi +++| MX6 1 PRESET FIRST CALL TO *SRD*
16270 M00S12930.dsdi +++| SA6 SRDA
16271 M00S12931.dsdi +++| SX6 B0
16272 M00S12932.dsdi +++| SA6 DTLB CLEAR PLT LINK ORDINAL
16273 M00S12933.dsdi +++| SA6 SRDC+4 SET DASHED LINE TO 40 CHARACTERS
16274 M00S12934.dsdi +++| SA5 SSBF+/REM/VPLP GET PLT POINTER WORD
16275 M00S12935.dsdi +++| SA2 RC GET IAF REFERENCE ADDRESS
16276 M00S12936.dsdi +++| SX6 X5 SAVE LWA+1 PLT
16277 M00S12937.dsdi +++| SA6 LW
16278 M00S12938.dsdi +++| AX5 24 SAVE FWA PLT
16279 M00S12939.dsdi +++| SX6 X5
16280 M00S12940.dsdi +++| SA6 FW
16281 M00S12941.dsdi +++| SX3 X5
16282 M00S12942.dsdi +++| IX3 X2+X3
16283 M00S12943.dsdi +++| AX5 24
16284 M00S12944.dsdi +++| RJ PCM READ PLT INTO CORE
16285 M00S12945.dsdi +++| GETCM BUF,X5
16286 M00S12946.dsdi +++| DTL1 SA1 DTLB CHECK FOR REPEATED DATA
16287 M00S12947.dsdi +++| SX1 X1+BUF
16288 M00S12948.dsdi +++| SB5 1
16289 M00S12949.dsdi +++| RJ SRD
16290 M00S12950.dsdi +++| NZ X1,DTL2 IF REPEAT SENSED
16291 M00S12951.dsdi +++| SB6 6 FORMAT PLT WORD ADDRESS
16292 M00S12952.dsdi +++| SB7 PRBF
16293 M00S12953.dsdi +++| SA1 FW
16294 M00S12954.dsdi +++| LX1 -18
16295 M00S12955.dsdi +++| RJ CTS
16296 M00S12956.dsdi +++| SB7 B7+B1 FORMAT PLT LINK ORDINAL
16297 M00S12957.dsdi +++| SX6 1R+
16298 M00S12958.dsdi +++| SA6 B7
16299 M00S12959.dsdi +++| SB7 B7+B1
16300 M00S12960.dsdi +++| SA1 DTLB
16301 M00S12961.dsdi +++| LX1 -10
16302 M00S12962.dsdi +++| SB6 4
16303 M00S12963.dsdi +++| RJ CTS
16304 M00S12964.dsdi +++| SB7 B7+2 FORMAT PLT WORD
16305 M00S12965.dsdi +++| SA2 =4000005B
16306 M00S12966.dsdi +++| AX1 2
16307 M00S12967.dsdi +++| SA1 X1+BUF
16308 M00S12968.dsdi +++| RJ FDW
16309 M00S12969.dsdi +++| PRINT CCCH,B7-CCCH
16310 M00S12970.dsdi +++| DTL2 SA1 DTLB INCREMENT PLT INDEX
16311 M00S12971.dsdi +++| SX7 X1+B1
16312 M00S12972.dsdi +++| SA7 A1
16313 M00S12973.dsdi +++| SA1 FW INCREMENT PLT WORD ADDRESS
16314 M00S12974.dsdi +++| SX6 X1+1
16315 M00S12975.dsdi +++| SA6 A1
16316 M00S12976.dsdi +++| SA1 LW CHECK IF ALL OF PLT DUMPED
16317 M00S12977.dsdi +++| IX7 X6-X1
16318 M00S12978.dsdi +++| NG X7,DTL1 IF MORE TO DUMP
16319 M00S12979.dsdi +++| SA1 SRDC+3 RESET DASHED LINE TO 136 CHARACTERS
16320 M00S12980.dsdi +++| BX6 X1
16321 M00S12981.dsdi +++| SA6 A1+B1
16322 M00S12982.dsdi +++|
16323 M00S12983.dsdi +++|* DUMP POTS IN *E* FORMAT.
16324 M00S12984.dsdi +++|
16325 M00S12985.dsdi +++| PRINT (=2C )
16326 M00S12986.dsdi +++| PRINT (=C* POTS*)
16327 M00S12987.dsdi +++| PRINT (=2C )
16328 M00S12988.dsdi +++| SA3 SSBF+/REM/VBMP GET POT STORAGE FWA
16329 M00S12989.dsdi +++| SA2 RC GET IAF REFERENCE ADDRESS
16330 M00S12990.dsdi +++| SX6 X3
16331 M00S12991.dsdi +++| SA6 CPRA+1
16332 M00S12992.dsdi +++| IX3 X2+X3
16333 M00S12993.dsdi +++| RJ PCM POSITION TO POT STORAGE
16334 M00S12994.dsdi +++| SX6 2
16335 M00S12995.dsdi +++| SA6 CPRA+3 SET NO SUPPRESSION OF REPEATED DATA
16336 M00S12996.dsdi +++| SA6 A6+B1 SET *E* FORMAT
16337 M00S12997.dsdi +++| SX6 B0
16338 M00S12998.dsdi +++| SA6 CPRA+5 COMPUTE COLUMN LENGTH
16339 M00S12999.dsdi +++| SA6 CPRA+6 SET NO INVERTED ADDRESS
16340 M00S13000.dsdi +++| SA6 CPRA+2 SET TO DUMP FROM DUMP FILE
16341 M00S13001.dsdi +++| SX6 -1
16342 M00S13002.dsdi +++| SA6 DTLB PRESET POT NUMBER
16343 M00S13003.dsdi +++| DTL3 SB7 PRBF PRINT POT NUMBER
16344 M00S13004.dsdi +++| SA2 =4LPOT
16345 M00S13005.dsdi +++| SB6 4
16346 M00S13006.dsdi +++| RJ UPS
16347 M00S13007.dsdi +++| SB6 4
16348 M00S13008.dsdi +++| SA1 DTLB INCREMENT POT NUMBER
16349 M00S13009.dsdi +++| SX6 X1+B1
16350 M00S13010.dsdi +++| SA6 A1
16351 M00S13011.dsdi +++| SX1 X6
16352 M00S13012.dsdi +++| LX1 -12
16353 M00S13013.dsdi +++| RJ CTS
16354 M00S13014.dsdi +++| PRINT CCCH,B7-CCCH
16355 M00S13015.dsdi +++| SA1 CPRA+1 SET POT FWA
16356 M00S13016.dsdi +++| SX7 X1
16357 M00S13017.dsdi +++| SA7 A1-B1
16358 M00S13018.dsdi +++| SX6 X1+8 SET POT LWA+1
16359 M00S13019.dsdi +++| SA6 A1
16360 M00S13020.dsdi +++| SB2 A7
16361 M00S13021.dsdi +++| RJ PMD PROCESS MEMORY DUMP
16362 M00S13022.dsdi +++| SA2 DTLA LWA+1 OF IAF FL
16363 M00S13023.dsdi +++| SA1 CPRA+1 LWA+1 OF LAST DUMPED POT
16364 M00S13024.dsdi +++| IX5 X1-X2
16365 M00S13025.dsdi +++| ZR X5,DTL4 IF ALL POTS DUMPED
16366 M00S13026.dsdi +++| NG X5,DTL3 IF MORE TO DUMP
16367 M00S13027.dsdi +++| PRINT (=2C )
16368 M00S13028.dsdi +++| SB7 PRBF
16369 M00S13029.dsdi +++| SB6 49
16370 M00S13030.dsdi +++| SA2 =49L*********WARNING - LAST POT OVERFLOWS IAF FL BY
16371 M00S13031.dsdi +++| RJ UPS
16372 M00S13032.dsdi +++| SB6 1 PRINT POT OVERFLOW
16373 M00S13033.dsdi +++| SX1 X5
16374 M00S13034.dsdi +++| LX1 -3
16375 M00S13035.dsdi +++| RJ CTS
16376 M00S13036.dsdi +++| SA2 =5LWORDS
16377 M00S13037.dsdi +++| SB6 5
16378 M00S13038.dsdi +++| SB7 B7+B1
16379 M00S13039.dsdi +++| RJ UPS
16380 M00S13040.dsdi +++| DTL4 SB2 A0
16381 M00S13041.dsdi +++| JP B2 RETURN
16382 M00S13042.dsdi +++|
16383 M00S13043.dsdi +++| DTLA BSS 1 LWA+1 OF POT MEMORY (LWA+1 IAF FL)
16384 M00S13044.dsdi +++| DTLB BSS 1 PLT INDEX AND LINK ORDINAL/POT NUMBER
| Line S13045 Modification History |
M01 (Removed by) | dsdi67 |
Seq # *Modification Id* Act
----------------------------+
16385 M01S13045.dsdi67 ---| DTM SPACE 4,10
16386 M01S13046.dsdi67 ---|** DTM - DUMP CYBER 180-990 MAP.
16387 M01S13047.dsdi67 ---|*
16388 M01S13048.dsdi67 ---|* ENTRY (X2) = RECORD ID.
16389 M01S13049.dsdi67 ---|* (X7) = MAXIMUM SET NUMBER.
16390 M01S13050.dsdi67 ---|*
| Line S13051 Modification History |
M01 (Removed by) | dsdi62 |
M02 (Removed by) | dsdi67 |
Seq # *Modification Id* Act
----------------------------+
16391 M02S13051.dsdi67 ---|* SAVES A - 4, 5.
16392 M02S13052.dsdi67 ---|* B - 1.
16393 M02S13053.dsdi67 ---|* X - 4.
| Line S00028 Modification History |
M01 (Added by) | dsdi62 |
M02 (Removed by) | dsdi67 |
Seq # *Modification Id* Act
----------------------------+
16394 M02S00028.dsdi67 ---|* USES X - 0, 1, 2, 3, 6, 7.
16395 M02S00029.dsdi67 ---|* A - 1, 2, 3, 6, 7.
16396 M02S00030.dsdi67 ---|* B - 3, 6, 7.
| Line S13054 Modification History |
M01 (Removed by) | dsdi67 |
Seq # *Modification Id* Act
----------------------------+
16397 M01S13054.dsdi67 ---|*
| Line S13055 Modification History |
M01 (Removed by) | dsdi62 |
M02 (Removed by) | dsdi67 |
Seq # *Modification Id* Act
----------------------------+
16398 M02S13055.dsdi67 ---|* CALLS CDD, CEP, CNR, HTS, LDC, NXB, PDF, SSB, UPS.
| Line S00031 Modification History |
M01 (Added by) | dsdi62 |
M02 (Removed by) | dsdi67 |
Seq # *Modification Id* Act
----------------------------+
16399 M02S00031.dsdi67 ---|* CALLS CDD, CEP, CNR, DHR, HTS, LDC, PDF, SSB, UPS.
| Line S13056 Modification History |
M01 (Removed by) | dsdi67 |
Seq # *Modification Id* Act
----------------------------+
16400 M01S13056.dsdi67 ---|*
16401 M01S13057.dsdi67 ---|* MACROS PRINT, SEARCH.
16402 M01S13058.dsdi67 ---|
16403 M01S13059.dsdi67 ---|
16404 M01S13060.dsdi67 ---| DTM5 SA2 DTMA NEXT TABLE ENTRY
| Line S13061 Modification History |
M01 (Removed by) | dsdi62 |
M02 (Removed by) | dsdi67 |
Seq # *Modification Id* Act
----------------------------+
16405 M02S13061.dsdi67 ---| NZ X2,DTM1 IF MORE RECORDS TO PROCESS
| Line S00032 Modification History |
M01 (Added by) | dsdi62 |
M02 (Removed by) | dsdi67 |
Seq # *Modification Id* Act
----------------------------+
16406 M02S00032.dsdi67 ---| ZR X2,DTMX IF NO MORE RECORDS TO PROCESS
16407 M02S00033.dsdi67 ---| SA2 X2+
16408 M02S00034.dsdi67 ---| EQ DTM1 PROCESS NEXT RECORD
| Line S13062 Modification History |
M01 (Removed by) | dsdi67 |
Seq # *Modification Id* Act
----------------------------+
16409 M01S13062.dsdi67 ---|
16410 M01S13063.dsdi67 ---| DTM SUBR ENTRY/EXIT
16411 M01S13064.dsdi67 ---| SA7 DTMD SAVE SET NUMBER
16412 M01S13065.dsdi67 ---| RJ CEP CHECK FOR EXTRANEOUS PARAMETERS
16413 M01S13066.dsdi67 ---| BX6 X2 SAVE RECORD ID
16414 M01S13067.dsdi67 ---| SA6 A7+B1
16415 M01S13068.dsdi67 ---| ERRNZ DTMD+1-DTME CODE ASSUMES CONTIGUOUS CELLS
16416 M01S13069.dsdi67 ---| BX7 X7-X7
16417 M01S13070.dsdi67 ---| MX0 18
16418 M01S13071.dsdi67 ---| BX1 X2
16419 M01S13072.dsdi67 ---| SA7 DTMA INITIALIZE DIRECTORY TABLE POINTER
16420 M01S13073.dsdi67 ---| SEARCH TDIR,X1,X0
16421 M01S13074.dsdi67 ---| ZR X2,ERR14 IF RECORD ID NOT IN DIRECTORY
16422 M01S13075.dsdi67 ---| DTM1 SB7 C.TDIR
16423 M01S13076.dsdi67 ---| SB3 DTMA NEXT TABLE ENTRY
16424 M01S13077.dsdi67 ---| SA3 DTME
16425 M01S13078.dsdi67 ---| RJ CNR CHECK NEXT RECORD
16426 M01S13079.dsdi67 ---| MX0 -6 SAVE RADIAL MCI
16427 M01S13080.dsdi67 ---| AX2 36
16428 M01S13081.dsdi67 ---| BX6 -X0*X2
16429 M01S13082.dsdi67 ---| BX7 X7-X7
16430 M01S13083.dsdi67 ---| SA6 PRBF+13
16431 M01S13084.dsdi67 ---| SA2 A2+B1 SET RANDOM INDEX
16432 M01S13085.dsdi67 ---| BX6 X2
16433 M01S13086.dsdi67 ---| SA6 RI
16434 M01S13087.dsdi67 ---| SA7 B3+B1 INITIALIZE RUNNING COUNTERS
16435 M01S13088.dsdi67 ---| ERRNZ DTMA+1-DTMB CODE ASSUMES CONTIGUOUS CELLS
16436 M01S13089.dsdi67 ---| SA7 A7+B1
16437 M01S13090.dsdi67 ---| ERRNZ DTMB+1-DTMC CODE ASSUMES CONTIGUOUS CELLS
16438 M01S13091.dsdi67 ---| SA7 NXBA
16439 M01S13092.dsdi67 ---| SA7 A7+B1
16440 M01S13093.dsdi67 ---| SX3 B0
16441 M01S13094.dsdi67 ---| RJ PDF POSITION DUMP FILE
16442 M01S13095.dsdi67 ---| RJ LDC LIST DIRECTIVE CARD
16443 M01S13096.dsdi67 ---|
16444 M01S13097.dsdi67 ---|* PRINT *RADIAL MCI = N*.
16445 M01S13098.dsdi67 ---|
16446 M01S13099.dsdi67 ---| PRINT (=2C )
16447 M01S13100.dsdi67 ---| SB7 PRBF
16448 M01S13101.dsdi67 ---| SA2 =13HRADIAL MCI =
16449 M01S13102.dsdi67 ---| SB6 13
16450 M01S13103.dsdi67 ---| RJ UPS UNPACK MESSAGE
16451 M01S13104.dsdi67 ---| PRINT CCCH,15
16452 M01S13105.dsdi67 ---| PRINT (=2C )
16453 M01S13106.dsdi67 ---|
16454 M01S13107.dsdi67 ---|* PRINT COLUMN HEADERS.
16455 M01S13108.dsdi67 ---|
16456 M01S13109.dsdi67 ---| RJ SSB SPACE FILL STRING BUFFER
16457 M01S13110.dsdi67 ---| PRINT (=C* SET ENTRY CONTENTS *)
16458 M01S13111.dsdi67 ---| PRINT (=2C )
16459 M01S13112.dsdi67 ---|
16460 M01S13113.dsdi67 ---|* TEST END CONDITIONS, INCREMENT CURRENT SET NUMBER IF NEEDED.
16461 M01S13114.dsdi67 ---|
16462 M01S13115.dsdi67 ---| DTM2 SA3 DTMB CURRENT ENTRY NUMBER
16463 M01S13116.dsdi67 ---| SX3 X3-32D
16464 M01S13117.dsdi67 ---| NG X3,DTM3 IF NOT FINISHED WITH SET
16465 M01S13118.dsdi67 ---| SA2 A3+B1 GET CURRENT SET NUMBER
16466 M01S13119.dsdi67 ---| SA1 A2+B1 GET MAXIMUM SET NUMBER
16467 M01S13120.dsdi67 ---| ERRNZ DTMC+1-DTMD CODE ASSUMES CONTIGUOUS CELLS
16468 M01S13121.dsdi67 ---| IX1 X1-X2
16469 M01S13122.dsdi67 ---| ZR X1,DTM5 IF MAXIMUM .EQ. CURRENT
16470 M01S13123.dsdi67 ---| SX7 X2+B1 INCREMENT CURRENT SET NUMBER
16471 M01S13124.dsdi67 ---| SA7 A2
16472 M01S13125.dsdi67 ---| BX7 X7-X7 RESET CURRENT ENTRY NUMBER
16473 M01S13126.dsdi67 ---| SA7 A3+
16474 M01S13127.dsdi67 ---|
16475 M01S13128.dsdi67 ---|* PRINT SET AND ENTRY NUMBERS.
16476 M01S13129.dsdi67 ---|
16477 M01S13130.dsdi67 ---| DTM3 SA1 DTMC DISPLAY SET NUMBER
16478 M01S13131.dsdi67 ---| LX1 59-3
16479 M01S13132.dsdi67 ---| SB6 B1
16480 M01S13133.dsdi67 ---| SB7 PRBF+1
16481 M01S13134.dsdi67 ---| RJ HTS
16482 M01S13135.dsdi67 ---| SA1 DTMB DISPLAY ENTRY NUMBER
16483 M01S13136.dsdi67 ---| RJ CDD
16484 M01S13137.dsdi67 ---| BX2 X6
16485 M01S13138.dsdi67 ---| LX2 59-11
16486 M01S13139.dsdi67 ---| SB7 PRBF+6
16487 M01S13140.dsdi67 ---| SB6 2
16488 M01S13141.dsdi67 ---| RJ UPS
| Line S13142 Modification History |
M01 (Removed by) | dsdi62 |
M02 (Removed by) | dsdi67 |
Seq # *Modification Id* Act
----------------------------+
16489 M02S13142.dsdi67 ---| SX5 4
16490 M02S13143.dsdi67 ---| DTM4 SA0 B7+2 SAVE CURRENT POSITION IN DISPLAY LINE
16491 M02S13144.dsdi67 ---| RJ NXB GET NEXT 16 BITS OF REGISTER
16492 M02S13145.dsdi67 ---| SB7 A0
16493 M02S13146.dsdi67 ---| SB6 4
16494 M02S13147.dsdi67 ---| LX1 59-15
16495 M02S13148.dsdi67 ---| RJ HTS DISPLAY 4 HEX DIGITS
16496 M02S13149.dsdi67 ---| SX5 X5-1
16497 M02S13150.dsdi67 ---| NZ X5,DTM4 IF MORE DATA TO DISPLAY
16498 M02S13151.dsdi67 ---| PRINT CCCH,B7-CCCH+1
| Line S00035 Modification History |
M01 (Added by) | dsdi62 |
M02 (Removed by) | dsdi67 |
Seq # *Modification Id* Act
----------------------------+
16499 M02S00035.dsdi67 ---| RJ DHR DISPLAY REGISTER
| Line S13152 Modification History |
M01 (Removed by) | dsdi67 |
Seq # *Modification Id* Act
----------------------------+
16500 M01S13152.dsdi67 ---| SA1 DTMB INCREMENT CURRENT ENTRY NUMBER
16501 M01S13153.dsdi67 ---| SX7 X1+B1
16502 M01S13154.dsdi67 ---| SA7 A1
16503 M01S13155.dsdi67 ---| EQ DTM2 DISPLAY NEXT REGISTER
16504 M01S13156.dsdi67 ---|
16505 M01S13157.dsdi67 ---| DTMA CON 0 NEXT DIRECTORY TABLE ENTRY POINTER
16506 M01S13158.dsdi67 ---| DTMB CON 0 CURRENT ENTRY NUMBER
16507 M01S13159.dsdi67 ---| DTMC CON 0 CURRENT SET NUMBER
16508 M01S13160.dsdi67 ---| DTMD CON 0 MAXIMUM SET NUMBER
16509 M01S13161.dsdi67 ---| DTME CON 0 RECORD ID
16510 M00S13162.dsdi +++| DTP SPACE 4,7
16511 M00S13163.dsdi +++|** DTP - DUMP IAF PPUS.
16512 M00S13164.dsdi +++|*
16513 M00S13165.dsdi +++|* ENTRY A0 = RETURN ADDRESS.
16514 M00S13166.dsdi +++|*
16515 M00S13167.dsdi +++|* USES ALL REGISTERS.
16516 M00S13168.dsdi +++|*
16517 M00S13169.dsdi +++|* CALLS ASP.
16518 M00S13170.dsdi +++|
16519 M00S13171.dsdi +++|
16520 M00S13172.dsdi +++| DTP SX6 DTPA
16521 M00S13173.dsdi +++| JP ASP
16522 M00S13174.dsdi +++|
16523 M00S13175.dsdi +++| DTPA VFD 18/3LTLX,42/0
16524 M00S13176.dsdi +++| VFD 18/3L1TA,42/0
16525 M00S13177.dsdi +++| VFD 18/3L1TN,42/0
16526 M00S13178.dsdi +++| VFD 18/3L1TO,42/0
16527 M00S13179.dsdi +++| VFD 18/3L1RO,6/0,1/1,18/0,5/TXOT,12/0
16528 M00S13180.dsdi +++| VFD 18/3L1RI,6/0,1/1,18/0,5/TXOT,12/0
16529 M00S13181.dsdi +++| VFD 60/-1 END OF PARAMETER BLOCK
16530 M00S13182.dsdi +++| DTQ SPACE 4,13
16531 M00S13183.dsdi +++|** DTQ - DUMP TEN BYTES IN *Q* FORMAT.
16532 M00S13184.dsdi +++|*
16533 M00S13185.dsdi +++|* ENTRY B2 = BYTE BUFFER ADDRESS.
16534 M00S13186.dsdi +++|* B7 = PRINT STRING ADDRESS.
16535 M00S13187.dsdi +++|* X4 = CURRENT PPU ADDRESS.
16536 M00S13188.dsdi +++|*
16537 M00S13189.dsdi +++|* EXIT B2 AND B7 ARE UPDATED.
16538 M00S13190.dsdi +++|*
16539 M00S13191.dsdi +++|* SAVES X - 3,4,5.
16540 M00S13192.dsdi +++|* B - NONE.
16541 M00S13193.dsdi +++|* A - 0,3,4,5.
16542 M00S13194.dsdi +++|*
16543 M00S13195.dsdi +++|* CALLS CTS,UPS.
16544 M00S13196.dsdi +++|
16545 M00S13197.dsdi +++|
16546 M00S13198.dsdi +++| DTQ SUBR
16547 M00S13199.dsdi +++| BX1 X4
16548 M00S13200.dsdi +++| LX1 -15
16549 M00S13201.dsdi +++| SB6 5
16550 M00S13202.dsdi +++| RJ CTS CONVERT ADDRESS
16551 M00S13203.dsdi +++| SB7 B7+2 SPACE 2
16552 M00S13204.dsdi +++| SB4 10B BYTE COUNTER
16553 M00S13205.dsdi +++| DTQ1 SA1 B2+ READ BYTE
16554 M00S13206.dsdi +++| SB6 4
16555 M00S13207.dsdi +++| NZ X1,DTQ2 IF NOT A ZERO BYTE
16556 M00S13208.dsdi +++| SA2 =4L----
16557 M00S13209.dsdi +++| RJ UPS STORE ZERO INDICATOR
16558 M00S13210.dsdi +++| JP DTQ3
16559 M00S13211.dsdi +++|
16560 M00S13212.dsdi +++| DTQ2 RJ CTS CONVERT BYTE
16561 M00S13213.dsdi +++| DTQ3 SB7 B7+B1
16562 M00S13214.dsdi +++| SB2 B2+B1
16563 M00S13215.dsdi +++| SB4 B4-1 COUNT BYTE
16564 M00S13216.dsdi +++| NZ B4,DTQ1 IF MORE TO DUMP
16565 M00S13217.dsdi +++|
16566 M00S13218.dsdi +++|* SET INTERPRETATION.
16567 M00S13219.dsdi +++|
16568 M00S13220.dsdi +++| SB5 B2
16569 M00S13221.dsdi +++| MX0 -6
16570 M00S13222.dsdi +++| SB2 B2-10B
16571 M00S13223.dsdi +++| SB7 B7+1
16572 M00S13224.dsdi +++| DTQ4 SA1 B2+
16573 M00S13225.dsdi +++| SB3 2
16574 M00S13226.dsdi +++| DTQ5 LX1 6
16575 M00S13227.dsdi +++| BX6 -X0*X1
16576 M00S13228.dsdi +++| ZR X6,DTQ6 IF COLON
16577 M00S13229.dsdi +++| SX7 X6-60B
16578 M00S13230.dsdi +++| NG X7,DTQ7 IF NOT A PRINTER SLOWER DOWNER
16579 M00S13231.dsdi +++| DTQ6 SX6 1R
16580 M00S13232.dsdi +++| DTQ7 SA6 B7 STORE CHARACTER
16581 M00S13233.dsdi +++| SB7 B7+B1
16582 M00S13234.dsdi +++| SB3 B3-1
16583 M00S13235.dsdi +++| NZ B3,DTQ5 IF ONE MORE CHARACTER
16584 M00S13236.dsdi +++| SB2 B2+1
16585 M00S13237.dsdi +++| LT B2,B5,DTQ4 IF MORE TO INTERPRET
16586 M00S13238.dsdi +++| JP DTQX EXIT
16587 M00S13239.dsdi +++| DTT SPACE 4,10
16588 M00S13240.dsdi +++|** DTT - DUMP IAF TERMINAL TABLES.
16589 M00S13241.dsdi +++|*
16590 M00S13242.dsdi +++|* ENTRY (A0) = RETURN ADDRESS.
16591 M00S13243.dsdi +++|* (RC) = CONTROL POINT REFERENCE ADDRESS.
16592 M00S13244.dsdi +++|* (TFMT) = MESSAGE STATUS TABLE FORMAT POINTERS.
16593 M00S13245.dsdi +++|* (TFTT) = TERMINAL TABLE FORMAT POINTERS.
16594 M00S13246.dsdi +++|*
16595 M00S13247.dsdi +++|* USES X - ALL.
16596 M00S13248.dsdi +++|* A - 1, 2, 5, 6, 7.
16597 M00S13249.dsdi +++|* B - 2, 6, 7.
16598 M00S13250.dsdi +++|*
16599 M00S13251.dsdi +++|* CALLS CTS, GTD, PCM, PCW, UPS.
16600 M00S13252.dsdi +++|*
16601 M00S13253.dsdi +++|* MACROS ALLOC, GETCM, PRINT.
16602 M00S13254.dsdi +++|
16603 M00S13255.dsdi +++|
16604 M00S13256.dsdi +++| DTT SX6 A0 SAVE RETURN ADDRESS
16605 M00S13257.dsdi +++| SA6 DTTF
16606 M00S13258.dsdi +++| PRINT (=2C )
16607 M00S13259.dsdi +++| PRINT (=C* IAF TERMINAL TABLES*)
16608 M00S13260.dsdi +++|
16609 M00S13261.dsdi +++|* READ MESSAGE STATUS TABLE INTO CORE.
16610 M00S13262.dsdi +++|
16611 M00S13263.dsdi +++| SA2 RC GET FWA MSG STATUS TABLE
16612 M00S13264.dsdi +++| SA1 SSBF+/REM/VMST
16613 M00S13265.dsdi +++| AX1 24
16614 M00S13266.dsdi +++| IX3 X1+X2
16615 M00S13267.dsdi +++| SA5 SSBF+/REM/VNTP GET FWA NETWORK ENTRIES
16616 M00S13268.dsdi +++| SB2 24D
16617 M00S13269.dsdi +++| AX0 X5,B2
16618 M00S13270.dsdi +++| SX6 X3+ PRESET FWA NETWORK ENTRIES
16619 M00S13271.dsdi +++| SA6 DTTE+1
16620 M00S13272.dsdi +++| SX6 X6-1
16621 M00S13273.dsdi +++| SA6 A6-B1
16622 M00S13274.dsdi +++| RJ PCM POSITION TO FIRST MST NETWORK ENTRY
16623 M00S13275.dsdi +++| IX2 X5-X0 SET NETWORK TERMINAL TABLE ENTRY COUNT
16624 M00S13276.dsdi +++| SX2 X2+B1
16625 M00S13277.dsdi +++| GETCM BUF+/REM/VTTL,X2
16626 M00S13278.dsdi +++|
16627 M00S13279.dsdi +++|* INITIALIZE DUMP OF TERMINAL TABLES.
16628 M00S13280.dsdi +++|
16629 M00S13281.dsdi +++| SA1 SSBF+/REM/VTTP
16630 M00S13282.dsdi +++| SX2 X1 LWA+1
16631 M00S13283.dsdi +++| AX1 24
16632 M00S13284.dsdi +++| SX6 X1 FWA
16633 M00S13285.dsdi +++| IX4 X2-X6
16634 M00S13286.dsdi +++| NG X4,DTT2 IF (LWA+1) .LT. (FWA)
16635 M00S13287.dsdi +++| SX6 X6-/REM/VTTL
16636 M00S13288.dsdi +++| SA6 DTTA PRESET FWA OF FIRST TABLE
16637 M00S13289.dsdi +++| SX5 /REM/VTTL
16638 M00S13290.dsdi +++| IX7 X4/X5
16639 M00S13291.dsdi +++| SX6 -1
16640 M00S13292.dsdi +++| SA7 DTTB TOTAL TERMINAL TABLES TO DUMP
16641 M00S13293.dsdi +++| SA6 DTTC PRESET TERMINAL NUMBER
16642 M00S13294.dsdi +++| SA2 RC
16643 M00S13295.dsdi +++| IX3 X1+X2
16644 M00S13296.dsdi +++| RJ PCM POSITION TO FIRST TERMINAL TABLE
16645 M00S13297.dsdi +++|
16646 M00S13298.dsdi +++|* DUMP ONLY THOSE TERMINAL TABLES WITH IMPORTANT INFORMATION.
16647 M00S13299.dsdi +++|
16648 M00S13300.dsdi +++| DTT1 SA2 DTTC UPDATE TERMINAL NUMBER
16649 M00S13301.dsdi +++| SX6 X2+1
16650 M00S13302.dsdi +++| SA6 A2
16651 M00S13303.dsdi +++| SA1 DTTB
16652 M00S13304.dsdi +++| IX3 X6-X1
16653 M00S13305.dsdi +++| ZR X3,DTT3 IF ALL TABLES DUMPED
16654 M00S13306.dsdi +++| SA1 DTTA SET NEXT TERMINAL FWA
16655 M00S13307.dsdi +++| SX6 X1+/REM/VTTL
16656 M00S13308.dsdi +++| SA6 DTTA
16657 M00S13309.dsdi +++| SA1 DTTE INCREMENT MSG STATUS TABLE INDEX
16658 M00S13310.dsdi +++| SX6 X1+B1
16659 M00S13311.dsdi +++| SA6 A1
16660 M00S13312.dsdi +++| GETCM BUF,/REM/VTTL READ TERMINAL TABLE
16661 M00S13313.dsdi +++| SB7 /REM/VTTL CHECK FOR EMPTY TERMINAL TABLE
16662 M00S13314.dsdi +++| SB6 -1
16663 M00S13315.dsdi +++| DTT1.1 SB6 B6+1
16664 M00S13316.dsdi +++| EQ B6,B7,DTT1 IF EMPTY TABLE FOUND
16665 M00S13317.dsdi +++| SA1 BUF+B6 READ TABLE ENTRY
16666 M00S13318.dsdi +++| SB2 B6-/REM/VROT
16667 M00S13319.dsdi +++| NZ B2,DTT1.2 IF NOT STATUS WORD
16668 M00S13320.dsdi +++| SX1 X1-1 ALLOW FOR STATUS BIT
16669 M00S13321.dsdi +++| DTT1.2 ZR X1,DTT1.1 IF ONLY STATUS BIT SET
16670 M00S13322.dsdi +++| PRINT (=2C )
16671 M00S13323.dsdi +++| SB7 PRBF
16672 M00S13324.dsdi +++| SA2 =5HTERM
16673 M00S13325.dsdi +++| SB6 5
16674 M00S13326.dsdi +++| RJ UPS STORE IN PRINT STRING
16675 M00S13327.dsdi +++| SB6 4
16676 M00S13328.dsdi +++| SA1 DTTC
16677 M00S13329.dsdi +++| LX1 -12
16678 M00S13330.dsdi +++| RJ CTS CONVERT TERMINAL NUMBER
16679 M00S13331.dsdi +++| PRINT CCCH,B7-CCCH
16680 M00S13332.dsdi +++| PRINT (=2C )
16681 M00S13333.dsdi +++| SA1 DTTA
16682 M00S13334.dsdi +++| BX6 X1
16683 M00S13335.dsdi +++| BX2 -X1
16684 M00S13336.dsdi +++| SB2 X2+BUF SET CORE ADDRESS OF TABLE DATA
16685 M00S13337.dsdi +++| SA6 FW SET PRINT ADDRESS
16686 M00S13338.dsdi +++| SA1 TFTT FORMAT TABLE POINTERS
16687 M00S13339.dsdi +++| RJ GTD GENERATE DETAILED TABLE DUMP
16688 M00S13340.dsdi +++|
16689 M00S13341.dsdi +++|* DUMP MESSAGE STATUS TABLE ENTRY, IF NETWORK TERMINAL TABLE.
16690 M00S13342.dsdi +++|
16691 M00S13343.dsdi +++| SA1 SSBF+/REM/VNTP GET FIRST NETWORK TERMINAL NUMBER
16692 M00S13344.dsdi +++| SA2 DTTC
16693 M00S13345.dsdi +++| AX1 24
16694 M00S13346.dsdi +++| SX1 X1+
16695 M00S13347.dsdi +++| IX1 X2-X1
16696 M00S13348.dsdi +++| NG X1,DTT1 IF MUX TERMINAL TABLE
16697 M00S13349.dsdi +++| PRINT (=2C )
16698 M00S13350.dsdi +++| SA1 DTTE SET MSG STATUS TABLE ENTRY ADDRESS
16699 M00S13351.dsdi +++| SX6 X1+
16700 M00S13352.dsdi +++| SA6 FW
16701 M00S13353.dsdi +++| SX1 BUF+/REM/VTTL SET CORE ADDRESS OF TABLE DATA
16702 M00S13354.dsdi +++| SA2 DTTE+1
16703 M00S13355.dsdi +++| IX1 X1-X2
16704 M00S13356.dsdi +++| SB2 X1+
16705 M00S13357.dsdi +++| SA1 TFMT SET NETWORK FORMAT TABLE POINTERS
16706 M00S13358.dsdi +++| RJ GTD GENERATE DETAILED DUMP OF MST WORD
16707 M00S13359.dsdi +++| EQ DTT1 DUMP NEXT TERMINAL TABLE
16708 M00S13360.dsdi +++|
16709 M00S13361.dsdi +++|* PRINT TERMINAL TABLE BOUNDARY ADDRESSES, IF NO TABLES FOUND.
16710 M00S13362.dsdi +++|
16711 M00S13363.dsdi +++| DTT2 SA5 DTTD
16712 M00S13364.dsdi +++| RJ PCW PRINT CONTENTS OF *VTTP* WORD
16713 M00S13365.dsdi +++| DTT3 SA1 DTTF RESTORE RETURN ADDRESS
16714 M00S13366.dsdi +++| SB2 X1+
16715 M00S13367.dsdi +++| JP B2 RETURN
16716 M00S13368.dsdi +++|
16717 M00S13369.dsdi +++| DTTA BSS 1 FWA OF TERMINAL TABLE
16718 M00S13370.dsdi +++| DTTB BSS 1 NUMBER OF TERMINALS TO DUMP
16719 M00S13371.dsdi +++| DTTC BSS 1 NUMBER OF TERMINALS DUMPED
16720 M00S13372.dsdi +++| DTTD VFD 36/6L*VTTP*,6/0,18//REM/VTTP PARAMETER LIST FOR PCW
16721 M00S13373.dsdi +++| DATA 40HIAF TERMINAL TABLE FWA, LWA+1
16722 M00S13374.dsdi +++| VFD 60/0
16723 M00S13375.dsdi +++| DTTE BSS 1 MSG STATUS TABLE ENTRY ADDRESS
16724 M00S13376.dsdi +++| BSS 1 FWA MSG STATUS TABLE
16725 M00S13377.dsdi +++| DTTF BSS 1 SAVED RETURN ADDRESS
16726 M00S13378.dsdi +++| ECS SPACE 4,10
16727 M00S13379.dsdi +++|** ECS - PROCESS *ECS* RECORD.
16728 M00S13380.dsdi +++|*
16729 M00S13381.dsdi +++|* ENTRY VIA UNCONDITIONAL JUMP.
16730 M00S13382.dsdi +++|*
16731 M00S13383.dsdi +++|* EXIT TO *CMP1* TO READ THE *ECS* RECORD.
16732 M00S13384.dsdi +++|*
16733 M00S13385.dsdi +++|* USES X - 1, 6.
16734 M00S13386.dsdi +++|* A - 1, 6.
16735 M00S13387.dsdi +++|
16736 M00S13388.dsdi +++|
16737 M00S13389.dsdi +++| ECS SA1 BUF+1 TRANSFER TITLE
16738 M00S13390.dsdi +++| BX6 X1
16739 M00S13391.dsdi +++| SA6 TITL2
16740 M00S13392.dsdi +++| SA1 BUF GET WORD COUNT
16741 M00S13393.dsdi +++| MX6 -12
16742 M00S13394.dsdi +++| BX6 -X6*X1 WORD COUNT/1000B
16743 M00S13395.dsdi +++| SA2 ECSA 3LESM = ESM RECORD HDR
16744 M00S13396.dsdi +++| BX2 X2-X1 COMPARE WITH EDD RECORD HDR
16745 M00S13397.dsdi +++| MX0 18D MASK 3 CHARACTERS
16746 M00S13398.dsdi +++| BX2 X2*X0 RELEVANT PART OF COMPARE
16747 M00S13399.dsdi +++| NZ X2,CMP1 IF NOT *ESM* RECORD
16748 M00S13400.dsdi +++| LX6 3 CONVERT WORD COUNT
16749 M00S13401.dsdi +++| EQ CMP1 READ *ESM* RECORD
16750 M00S13402.dsdi +++|
16751 M00S13403.dsdi +++| ECSA DATA 3LESM *ESM* RECORD HEADER
16752 M00S13404.dsdi +++| ESM EQU ECS
| Line S13405 Modification History |
M01 (Removed by) | 271l739 |
Seq # *Modification Id* Act
----------------------------+
16753 M01S13405.271l739 ---| EIC SPACE 4,15
16754 M01S13406.271l739 ---|** EIC - SKIP *EIC* BLOCK.
16755 M01S13407.271l739 ---|*
16756 M01S13408.271l739 ---|* ENTRY VIA UNCONDITIONAL JUMP.
16757 M01S13409.271l739 ---|*
16758 M01S13410.271l739 ---|* EXIT TO *RBI2* IF BLOCK READ COMPLETE.
16759 M01S13411.271l739 ---|* TO *RBI2.1* IF *MEM* HEADER RECORD READ.
16760 M01S13412.271l739 ---|*
| Line S13413 Modification History |
M01 (Removed by) | dsdi73 |
M02 (Removed by) | 271l739 |
Seq # *Modification Id* Act
----------------------------+
16761 M02S13413.271l739 ---|* ERROR TO *ERR29* IF PREMATURE END OF FILE DETECTED.
| Line S00011 Modification History |
M01 (Added by) | dsdi73 |
M02 (Removed by) | 271l739 |
Seq # *Modification Id* Act
----------------------------+
16762 M02S00011.271l739 ---|* ERROR TO *PPE1* IF PREMATURE EOF DETECTED.
| Line S13414 Modification History |
M01 (Removed by) | 271l739 |
Seq # *Modification Id* Act
----------------------------+
16763 M01S13414.271l739 ---|*
16764 M01S13415.271l739 ---|* USES X - 1, 2, 3, 5.
16765 M01S13416.271l739 ---|* A - 1, 3.
16766 M01S13417.271l739 ---|* B - NONE.
16767 M01S13418.271l739 ---|*
16768 M01S13419.271l739 ---|* CALLS RBF.
16769 M01S13420.271l739 ---|
16770 M01S13421.271l739 ---|
16771 M01S13422.271l739 ---| EIC BSS 0 ENTRY
16772 M01S13423.271l739 ---| EIC1 RJ RBF READ BLOCK FROM FILE *F*
| Line S13424 Modification History |
M01 (Removed by) | dsdi73 |
M02 (Removed by) | 271l739 |
Seq # *Modification Id* Act
----------------------------+
16773 M02S13424.271l739 ---| NZ X1,ERR29 IF PREMATURE EOF
| Line S00012 Modification History |
M01 (Added by) | dsdi73 |
M02 (Removed by) | 271l739 |
Seq # *Modification Id* Act
----------------------------+
16774 M02S00012.271l739 ---| NZ X1,PPE1 IF PREMATURE EOF
| Line S13425 Modification History |
M01 (Removed by) | 271l739 |
Seq # *Modification Id* Act
----------------------------+
16775 M01S13425.271l739 ---| SA1 BWCF
16776 M01S13426.271l739 ---| SX2 X1-512
16777 M01S13427.271l739 ---| ZR X2,EIC1 IF COMPLETE BLOCK READ
16778 M01S13428.271l739 ---| SX2 X1-4
16779 M01S13429.271l739 ---| NZ X2,RBI2 IF *EIC* BLOCK READ COMPLETE
16780 M01S13430.271l739 ---| SA3 BUF
16781 M01S13431.271l739 ---| LX3 18
16782 M01S13432.271l739 ---| SX5 X3-3RMEM
16783 M01S13433.271l739 ---| NZ X5,RBI2 IF *EIC* BLOCK READ COMPLETE
16784 M01S13434.271l739 ---| EQ RBI2.1 PROCESS *MEM* BLOCK
16785 M00S13435.dsdi +++| ERF SPACE 4,15
16786 M00S13436.dsdi +++|** ERF - POSITION TO EOR ON FILE F.
16787 M00S13437.dsdi +++|*
| Line S13438 Modification History |
M01 (Removed by) | dsdi73 |
Seq # *Modification Id* Act
----------------------------+
16788 M01S13438.dsdi73 ---|* EXIT TO *ERR26* IF PREMATURE EOF.
| Line S00013 Modification History |
M01 (Added by) | dsdi73 |
Seq # *Modification Id* Act
----------------------------+
16789 M01S00013.dsdi73 +++|* EXIT TO *PPE1* IF PREMATURE EOF.
16790 M00S13439.dsdi +++|*
16791 M00S13440.dsdi +++|* USES A - 1.
16792 M00S13441.dsdi +++|* X - 1.
16793 M00S13442.dsdi +++|*
| Line S13443 Modification History |
M01 (Removed by) | dsdi88 |
Seq # *Modification Id* Act
----------------------------+
16794 M01S13443.dsdi88 ---|* CALLS RBF.
| Line S00010 Modification History |
M01 (Added by) | dsdi88 |
Seq # *Modification Id* Act
----------------------------+
16795 M01S00010.dsdi88 +++|* CALLS RBH.
16796 M00S13444.dsdi +++|
16797 M00S13445.dsdi +++|
16798 M00S13446.dsdi +++| ERF SUBR ENTRY/EXIT
16799 M00S13447.dsdi +++| ERF1 SA1 EORF
16800 M00S13448.dsdi +++| NG X1,ERFX IF AT EOR
| Line S13449 Modification History |
M01 (Removed by) | dsdi88 |
Seq # *Modification Id* Act
----------------------------+
16801 M01S13449.dsdi88 ---| RJ RBF READ 512 WORDS
| Line S00011 Modification History |
M01 (Added by) | dsdi88 |
Seq # *Modification Id* Act
----------------------------+
16802 M01S00011.dsdi88 +++| RJ RBH READ BLOCK OR HEADER
16803 M00S13450.dsdi +++| ZR X1,ERF1 IF NOT EOF
| Line S13451 Modification History |
M01 (Removed by) | dsdi73 |
Seq # *Modification Id* Act
----------------------------+
16804 M01S13451.dsdi73 ---| EQ ERR29 PREMATURE EOF
| Line S00014 Modification History |
M01 (Added by) | dsdi73 |
Seq # *Modification Id* Act
----------------------------+
16805 M01S00014.dsdi73 +++| EQ PPE1 PREMATURE EOF
16806 M00S13452.dsdi +++| ERS SPACE 4,15
16807 M00S13453.dsdi +++|** ERS - END RECORD ON S-FILE.
16808 M00S13454.dsdi +++|*
16809 M00S13455.dsdi +++|* ENTRY (ID) = RECORD ID.
16810 M00S13456.dsdi +++|* (RWCS) = RECORD LENGTH.
16811 M00S13457.dsdi +++|*
16812 M00S13458.dsdi +++|* EXIT BUFFER WRITTEN TO *S*.
16813 M00S13459.dsdi +++|* *TDIR* DIRECTORY ENTRY MADE.
16814 M00S13460.dsdi +++|* (RWCS) = 0.
16815 M00S13461.dsdi +++|*
16816 M00S13462.dsdi +++|* USES A - 1, 2, 5, 6, 7.
16817 M00S13463.dsdi +++|* X - 1, 2, 5, 6, 7.
16818 M00S13464.dsdi +++|*
16819 M00S13465.dsdi +++|* MACROS ADDWORD, WRITER.
16820 M00S13466.dsdi +++|
16821 M00S13467.dsdi +++|
16822 M00S13468.dsdi +++| ERS SUBR ENTRY/EXIT
16823 M00S13469.dsdi +++| WRITER S,R WRITE BUFFER TO FILE
16824 M00S13470.dsdi +++| SA1 ID
16825 M00S13471.dsdi +++| ADDWRD TDIR,X1 PUT RECORD ID IN DIRECTORY ENTRY
16826 M00S13472.dsdi +++| ADDWRD A0,X1-X1 CLEAR DIRECTORY ENTRY WORD 2
16827 M00S13473.dsdi +++| SA5 ERSA RANDOM INDEX OF RECORD
16828 M00S13474.dsdi +++| SA2 RWCS
16829 M00S13475.dsdi +++| LX2 30
16830 M00S13476.dsdi +++| BX6 X2+X5
16831 M00S13477.dsdi +++| SA6 A6
16832 M00S13478.dsdi +++| SX7 B0 RESET RECORD LENGTH
16833 M00S13479.dsdi +++| SA7 RWCS
16834 M00S13480.dsdi +++| SX6 ERSA
16835 M00S13481.dsdi +++| SA6 S+6 GET RANDOM INDEX OF NEXT RECORD
16836 M00S13482.dsdi +++| EQ ERSX RETURN
16837 M00S13483.dsdi +++|
16838 M00S13484.dsdi +++|
16839 M00S13485.dsdi +++| ERSA DATA 1 CURRENT RANDOM INDEX
16840 M00S13486.dsdi +++| EVA SPACE 4,10
16841 M00S13487.dsdi +++|** EVA - EXPAND VIRTUAL ADDRESS.
16842 M00S13488.dsdi +++|*
16843 M00S13489.dsdi +++|* ENTRY (X6) = PROCESS VIRTUAL ADDRESS.
16844 M00S13490.dsdi +++|*
16845 M00S13491.dsdi +++|* EXIT (X6) = SEGMENT NUMBER.
16846 M00S13492.dsdi +++|* (X7) = BYTE OFFSET.
16847 M00S13493.dsdi +++|* (X2) = 0, IF THE ADDRESS IN X6 IS THE NIL POINTER.
16848 M00S13494.dsdi +++|*
16849 M00S13495.dsdi +++|* USES X - 1, 2, 6, 7.
16850 M00S13496.dsdi +++|* A - 1.
16851 M00S13497.dsdi +++|
16852 M00S13498.dsdi +++|
16853 M00S13499.dsdi +++| EVA SUBR ENTRY/EXIT
16854 M00S13500.dsdi +++| SA1 EVAA
16855 M00S13501.dsdi +++| BX2 X6*X1
16856 M00S13502.dsdi +++| BX2 X2-X1
16857 M00S13503.dsdi +++| ZR X2,EVAX IF NIL POINTER
16858 M00S13504.dsdi +++| MX2 -32-12
16859 M00S13505.dsdi +++| BX7 -X2*X6 ISOLATE BYTE OFFSET
16860 M00S13506.dsdi +++| BX2 X2*X6 ISOLATE RING NUMBER
16861 M00S13507.dsdi +++| BX6 X1*X7 ISOLATE SEGMENT NUMBER
16862 M00S13508.dsdi +++| BX2 X1*X2
16863 M00S13509.dsdi +++| ZR X2,ERR45 IF RING ZERO
16864 M00S13510.dsdi +++| JP EVAX RETURN
16865 M00S13511.dsdi +++|
16866 M00S13512.dsdi +++| EVAA DATA 0#FFFF80000000 NIL POINTER
16867 M00S13513.dsdi +++| FAC SPACE 4,13
16868 M00S13514.dsdi +++|** FAC - FIND ASSIGNED CHANNEL.
16869 M00S13515.dsdi +++|*
16870 M00S13516.dsdi +++|* ENTRY (B2) = PPU NUMBER.
16871 M00S13517.dsdi +++|* (BUF - BUF+MXCH) = CHANNEL RESERVATION BYTES
16872 M00S13518.dsdi +++|* FROM CHANNEL STATUS TABLE, ONE BYTE PER WORD,
16873 M00S13519.dsdi +++|* LEFT JUSTIFIED.
16874 M00S13520.dsdi +++|*
16875 M00S13521.dsdi +++|* EXIT (X1) = NUMBER OF ASSIGNED CHANNEL.
16876 M00S13522.dsdi +++|* .LT. 0, IF NO MORE CHANNELS ASSIGNED.
16877 M00S13523.dsdi +++|*
16878 M00S13524.dsdi +++|* USES X - 0, 1, 2, 3, 6.
16879 M00S13525.dsdi +++|* A - 1, 3, 6.
16880 M00S13526.dsdi +++|* B - 3, 5.
16881 M00S13527.dsdi +++|
16882 M00S13528.dsdi +++|
| Line S00021 Modification History |
M01 (Added by) | dsdi78 |
Seq # *Modification Id* Act
----------------------------+
16883 M01S00021.dsdi78 +++| FAC3 MX6 0 CLEAR RESERVATION ENTRY
16884 M01S00022.dsdi78 +++| SA6 B3
16885 M01S00023.dsdi78 +++| SX1 B3-BUF SET ASSIGNED CHANNEL NUMBER
16886 M01S00024.dsdi78 +++|
16887 M00S13529.dsdi +++| FAC SUBR
16888 M00S13530.dsdi +++| SX2 B2 CHANNEL NUMBER
16889 M00S13531.dsdi +++| MX0 -6
16890 M00S13532.dsdi +++| SX3 X2-20B
16891 M00S13533.dsdi +++| SB3 BUF CHANNEL TABLE ADDRESS
16892 M00S13534.dsdi +++| SB5 B3+MXCH CHANNEL STATUS TABLE LWA+1
| Line S13535 Modification History |
M01 (Removed by) | dsdi78 |
Seq # *Modification Id* Act
----------------------------+
16893 M01S13535.dsdi78 ---| SA1 FPLB
| Line S00025 Modification History |
M01 (Added by) | dsdi78 |
Seq # *Modification Id* Act
----------------------------+
16894 M01S00025.dsdi78 +++| SA1 IC
16895 M00S13536.dsdi +++| ZR X1,FAC0 IF NOT CPP
16896 M00S13537.dsdi +++| SX2 X2+24B
16897 M00S13538.dsdi +++| JP FAC1 PROCESS CHANNELS FOR CPP-S
16898 M00S13539.dsdi +++|
16899 M00S13540.dsdi +++| FAC0 NG X3,FAC1 IF NOT PP 20 - 31
16900 M00S13541.dsdi +++| SX2 X2-20B+12B CORRECT PPU INDEX
16901 M00S13542.dsdi +++| FAC1 SA3 B3+ READ TABLE
16902 M00S13543.dsdi +++| LX3 12
16903 M00S13544.dsdi +++| BX3 -X0*X3
16904 M00S13545.dsdi +++| ZR X3,FAC2 IF CHANNEL NOT ASSIGNED
16905 M00S13546.dsdi +++| BX3 X2-X3
16906 M00S13547.dsdi +++| ZR X3,FAC3 IF ASSIGNED TO THIS PPU
16907 M00S13548.dsdi +++| FAC2 SB3 B3+B1
16908 M00S13549.dsdi +++| LE B3,B5,FAC1 IF MORE TABLE ENTRIES
16909 M00S13550.dsdi +++| SX1 -B1 SET NO MORE CHANNELS ASSIGNED
16910 M00S13551.dsdi +++| JP FACX EXIT
| Line S13552 Modification History |
M01 (Removed by) | dsdi78 |
Seq # *Modification Id* Act
----------------------------+
16911 M01S13552.dsdi78 ---|
16912 M01S13553.dsdi78 ---| FAC3 MX6 0
16913 M01S13554.dsdi78 ---| SA6 B3 CLEAR RESERVATION ENTRY
16914 M01S13555.dsdi78 ---| SX1 B3-BUF SET ASSIGNED CHANNEL NUMBER
16915 M01S13556.dsdi78 ---| JP FACX EXIT
16916 M00S13557.dsdi +++| FBB SPACE 4,25
16917 M00S13558.dsdi +++|** FBB - FILL BYTE BUFFER.
16918 M00S13559.dsdi +++|*
16919 M00S13560.dsdi +++|* ENTRY (B2) = PARAMETER BLOCK ADDRESS.
16920 M00S13561.dsdi +++|* +0 = FWA OF DUMP.
16921 M00S13562.dsdi +++|* +1 = LWA OF DUMP.
16922 M00S13563.dsdi +++|*
16923 M00S13564.dsdi +++|* BUFFER CONSISTS OF TWO WORD ENTRIES.
16924 M00S13565.dsdi +++|*
16925 M00S13566.dsdi +++|* EITHER -
16926 M00S13567.dsdi +++|* 28/ADDRESS,16/BYTE1,16/BYTE2
16927 M00S13568.dsdi +++|* 28/0 ,16/BYTE3,16/BYTE4
16928 M00S13569.dsdi +++|*
16929 M00S13570.dsdi +++|* OR FOR REPEATED WORDS -
16930 M00S13571.dsdi +++|* 60/-0
16931 M00S13572.dsdi +++|* 60/
16932 M00S13573.dsdi +++|*
16933 M00S13574.dsdi +++|* EXIT (X1) = 2* WORDS IN BUFFER.
16934 M00S13575.dsdi +++|* (PARAMETER BLOCK+0) = NEW FWA.
16935 M00S13576.dsdi +++|*
16936 M00S13577.dsdi +++|* USES X - ALL.
16937 M00S13578.dsdi +++|* A - ALL.
16938 M00S13579.dsdi +++|*
16939 M00S13580.dsdi +++|* CALLS CPC, CPS, NXB.
16940 M00S13581.dsdi +++|
16941 M00S13582.dsdi +++|
16942 M00S13583.dsdi +++| FBB SUBR ENTRY/EXIT
16943 M00S13584.dsdi +++| SX1 10 CHECK FOR MINIMUM OF 10 WORDS
16944 M00S13585.dsdi +++| RJ CPS CHECK PAGE SPACE
16945 M00S13586.dsdi +++| SX3 6
16946 M00S13587.dsdi +++| IX2 X6*X3 MAXIMUM SIZE OF BUFFER FOR SIZE OF PAGE
16947 M00S13588.dsdi +++| SA1 B2+B1 LWA+1 OF DUMP
16948 M00S13589.dsdi +++| BX6 X1
16949 M00S13590.dsdi +++| SA6 FBBA
16950 M00S13591.dsdi +++| SA0 B2 SAVE PARAMETER ADDRESS
16951 M00S13592.dsdi +++| SX6 BUF BUFFER POINTER
16952 M00S13593.dsdi +++| SA6 A6+B1
16953 M00S13594.dsdi +++| IX7 X6+X2 MAXIMUM LWA+1 OF BUFFER
16954 M00S13595.dsdi +++| SA7 A6+B1
16955 M00S13596.dsdi +++| FBB1 RJ NXB GET UPPER PARCEL OF WORD
16956 M00S13597.dsdi +++| SA5 A0 CURRENT ADDRESS
16957 M00S13598.dsdi +++| SX3 8
16958 M00S13599.dsdi +++| MX2 -32
16959 M00S13600.dsdi +++| IX6 X3+X5 INCREMENT ADDRESS
16960 M00S13601.dsdi +++| BX5 -X2*X5
16961 M00S13602.dsdi +++| LX5 16
16962 M00S13603.dsdi +++| SA6 A0
16963 M00S13604.dsdi +++| IX5 X1+X5 COMBINE ADDRESS WITH DATA
16964 M00S13605.dsdi +++| RJ NXB READ SECOND PARCEL OF WORD
16965 M00S13606.dsdi +++| LX5 16
16966 M00S13607.dsdi +++| BX0 X5+X1
16967 M00S13608.dsdi +++| RJ NXB READ THIRD PARCEL OF WORD
16968 M00S13609.dsdi +++| BX5 X1
16969 M00S13610.dsdi +++| RJ NXB READ LAST PARCEL OF WORD
16970 M00S13611.dsdi +++| LX5 16
16971 M00S13612.dsdi +++| BX7 X5+X1
16972 M00S13613.dsdi +++| SA1 FBBD DATA FROM LAST WORD
16973 M00S13614.dsdi +++| SA2 A1+B1
16974 M00S13615.dsdi +++| BX6 X0
16975 M00S13616.dsdi +++| MX3 -32
16976 M00S13617.dsdi +++| SA6 A1 REFRESH FBBD
16977 M00S13618.dsdi +++| SA7 A2
16978 M00S13619.dsdi +++| BX1 X6-X1
16979 M00S13620.dsdi +++| SA4 FBBB BUFFER POINTER
16980 M00S13621.dsdi +++| BX2 X7-X2
16981 M00S13622.dsdi +++| SA6 X4
16982 M00S13623.dsdi +++| SA7 A6+B1
16983 M00S13624.dsdi +++| BX1 -X3*X1 DO NOT COMPARE ADDRESSES
16984 M00S13625.dsdi +++| IX3 X1+X2
16985 M00S13626.dsdi +++| SX6 A7+B1 NEW BUFFER POINTER
16986 M00S13627.dsdi +++| SA6 A4
16987 M00S13628.dsdi +++| NZ X3,FBB2 IF DATA NOT REPEATED
16988 M00S13629.dsdi +++| SX2 X4-BUF
16989 M00S13630.dsdi +++| ZR X2,FBB2 IF FIRST DATA IN BUFFER
16990 M00S13631.dsdi +++| MX7 1
16991 M00S13632.dsdi +++| SA7 X4 STORE FLAG IN BUFFER
16992 M00S13633.dsdi +++| SA1 X4-2 CHECK IF FLAG ALREADY SAVED
16993 M00S13634.dsdi +++| PL X1,FBB3 IF NO FLAG PRESENT YET
16994 M00S13635.dsdi +++| SX6 A7
16995 M00S13636.dsdi +++| SA6 A4 RESTORE NEW BUFFER POINTER
16996 M00S13637.dsdi +++| FBB2 SA2 A4+B1 MAXIMUM LWA OF BUFFER
16997 M00S13638.dsdi +++| IX3 X6-X2
16998 M00S13639.dsdi +++| PL X3,FBB4 IF BUFFER FULL
16999 M00S13640.dsdi +++| FBB3 SB2 A0
17000 M00S13641.dsdi +++| RJ CPC CHECK PAGE CHANGE
17001 M00S13642.dsdi +++| PL X3,FBB4 IF PAGE NOT VALID
17002 M00S13643.dsdi +++| SA1 FBBA LWA+1 OF DUMP
17003 M00S13644.dsdi +++| SA5 A0 CURRENT BYTE ADDRESS
17004 M00S13645.dsdi +++| IX6 X5-X1
| Line S13646 Modification History |
M01 (Removed by) | 271l739 |
Seq # *Modification Id* Act
----------------------------+
17005 M01S13646.271l739 ---| NZ X6,FBB1 IF END OF DATA NOT YET ENCOUNTERED
| Line S00348 Modification History |
M01 (Added by) | 271l739 |
Seq # *Modification Id* Act
----------------------------+
17006 M01S00348.271l739 +++| NG X6,FBB1 IF NOT END OF DATA
17007 M00S13647.dsdi +++| FBB4 SA1 FBBB
17008 M00S13648.dsdi +++| SA2 A1+B1
17009 M00S13649.dsdi +++| SX1 X1-BUF COMPUTE AMOUNT DATA IN BUFFER
17010 M00S13650.dsdi +++| EQ FBBX RETURN
17011 M00S13651.dsdi +++|
17012 M00S13652.dsdi +++|
17013 M00S13653.dsdi +++| FBBA DATA 0 LWA+1 OF DUMP
17014 M00S13654.dsdi +++| FBBB DATA 0 BUFFER POINTER
17015 M00S13655.dsdi +++| FBBC DATA 0 MAXIMUM LWA+1 OF BUFFER
17016 M00S13656.dsdi +++| FBBD BSS 2 PREVIOUS WORD PRINTED
17017 M00S13657.dsdi +++| FBP SPACE 4,11
17018 M00S13658.dsdi +++|** FBP - FIND BYTE POSITION.
17019 M00S13659.dsdi +++|*
17020 M00S13660.dsdi +++|* ENTRY (RI) = RANDOM ADDRESS OF CURRENT RECORD.
17021 M00S13661.dsdi +++|* (X3) = DESIRED BYTE NUMBER.
17022 M00S13662.dsdi +++|*
17023 M00S13663.dsdi +++|* EXIT BUFFER POSITIONED AT DESIRED 16 BIT BYTE.
17024 M00S13664.dsdi +++|*
17025 M00S13665.dsdi +++|* USES X - 2, 3, 4, 5, 6.
17026 M00S13666.dsdi +++|* A - 6.
17027 M00S13667.dsdi +++|* B - 7.
17028 M00S13668.dsdi +++|*
17029 M00S13669.dsdi +++|* CALLS PDF, NXB.
17030 M00S13670.dsdi +++|
17031 M00S13671.dsdi +++|
17032 M00S13672.dsdi +++| FBP SUBR ENTRY/EXIT
17033 M00S13673.dsdi +++| SX4 15
17034 M00S13674.dsdi +++| BX2 X3
17035 M00S13675.dsdi +++| IX3 X3/X4
17036 M00S13676.dsdi +++| SX4 15
17037 M00S13677.dsdi +++| IX5 X3*X4
17038 M00S13678.dsdi +++| IX5 X2-X5 BYTE POSITION WITHIN FOUR WORD GROUP
17039 M00S13679.dsdi +++| IX5 X4-X5
17040 M00S13680.dsdi +++| LX3 2 WORD OFFSET OF FOUR WORD GROUP
17041 M00S13681.dsdi +++| RJ PDF POSITION DUMP FILE
17042 M00S13682.dsdi +++| SX6 B0
17043 M00S13683.dsdi +++| SA6 NXBA
17044 M00S13684.dsdi +++| SA6 A6+B1
17045 M00S13685.dsdi +++| RJ NXB
17046 M00S13686.dsdi +++| BX6 X5 SAVE BYTE OFFSET INTO FOUR WORD STACK
17047 M00S13687.dsdi +++| SA6 NXBB
17048 M00S13688.dsdi +++| EQ FBPX RETURN
17049 M00S13689.dsdi +++| FDW SPACE 4,11
17050 M00S13690.dsdi +++|** FDW - FORMAT DATA WORD.
17051 M00S13691.dsdi +++|*
17052 M00S13692.dsdi +++|* ENTRY X1 = DATA WORD.
17053 M00S13693.dsdi +++|* B7 = PRINT STRING ADDRESS.
17054 M00S13694.dsdi +++|* X2 = 24/0,18/DIGITS PER BYTE,18/BYTES PER WORD.
17055 M00S13695.dsdi +++|*
17056 M00S13696.dsdi +++|* USES X - 0,1,2,6,7.
17057 M00S13697.dsdi +++|* B - 5,6,7.
17058 M00S13698.dsdi +++|* A - 6,7.
17059 M00S13699.dsdi +++|*
17060 M00S13700.dsdi +++|* CALLS CTS.
17061 M00S13701.dsdi +++|
17062 M00S13702.dsdi +++|
17063 M00S13703.dsdi +++| FDW SUBR
17064 M00S13704.dsdi +++| SB5 X2 NUMBER OF BYTES
17065 M00S13705.dsdi +++| AX2 18
17066 M00S13706.dsdi +++| SX6 1R PRESET SPACE
17067 M00S13707.dsdi +++| FDW1 SB6 X2+ DIGIT COUNT
17068 M00S13708.dsdi +++| RJ CTS CONVERT ONE BYTE
17069 M00S13709.dsdi +++| SA6 B7 SPACE 1
17070 M00S13710.dsdi +++| SB7 B7+B1
17071 M00S13711.dsdi +++| SB5 B5-1
17072 M00S13712.dsdi +++| NZ B5,FDW1 IF MORE BYTES
17073 M00S13713.dsdi +++| JP FDWX EXIT
17074 M00S13714.dsdi +++| FEM SPACE 4,10
17075 M00S13715.dsdi +++|** FEM - FORMAT ENTRY POINT MAP LINE.
17076 M00S13716.dsdi +++|*
17077 M00S13717.dsdi +++|* ENTRY X5 = LINE INDEX.
17078 M00S13718.dsdi +++|* PPU DATA IS AT *PBUF*.
17079 M00S13719.dsdi +++|*
17080 M00S13720.dsdi +++|* SAVES X - 5.
17081 M00S13721.dsdi +++|* B - 1.
17082 M00S13722.dsdi +++|* A - 0,5.
17083 M00S13723.dsdi +++|*
17084 M00S13724.dsdi +++|* CALLS CTS,RPB,UPS.
17085 M00S13725.dsdi +++|
17086 M00S13726.dsdi +++|
| Line S00080 Modification History |
M01 (Added by) | dsdi56 |
Seq # *Modification Id* Act
----------------------------+
17087 M01S00080.dsdi56 +++| FEM1 ZR X2,FEMX IF NO MESSAGE
17088 M01S00081.dsdi56 +++| SB6 X2-3
17089 M01S00082.dsdi56 +++| PL B6,FEMX IF NO MESSAGE
17090 M01S00083.dsdi56 +++| SA3 APPF
17091 M01S00084.dsdi56 +++| LX7 X2,B1
17092 M01S00085.dsdi56 +++| IX2 X2+X7
17093 M01S00086.dsdi56 +++| ZR X3,FEMX IF NOT DUMPING PP SAVE AREA DATA
17094 M01S00087.dsdi56 +++| SA2 FEMB-3+X2 READ MESSAGE
17095 M01S00088.dsdi56 +++| SB6 28
17096 M01S00089.dsdi56 +++| SB7 PRBF+4
17097 M01S00090.dsdi56 +++| RJ UPS SET NAME IN PRINT STRING
17098 M01S00091.dsdi56 +++|
17099 M00S13727.dsdi +++| FEM SUBR
17100 M00S13728.dsdi +++| SX2 X5-7
| Line S13729 Modification History |
M01 (Removed by) | dsdi56 |
Seq # *Modification Id* Act
----------------------------+
17101 M01S13729.dsdi56 ---| PL X2,FEMX IF END OF ENTRY POINTS.
| Line S00092 Modification History |
M01 (Added by) | dsdi56 |
Seq # *Modification Id* Act
----------------------------+
17102 M01S00092.dsdi56 +++| PL X2,FEM1 IF END OF ENTRY POINTS.
17103 M00S13730.dsdi +++| SA2 X5+FEMA READ ENTRY POINT NAME,ADDRESS
17104 M00S13731.dsdi +++| SB6 3
17105 M00S13732.dsdi +++| SB7 PRBF+10
17106 M00S13733.dsdi +++| RJ UPS SET NAME IN PRINT STRING
17107 M00S13734.dsdi +++| BX1 X2
17108 M00S13735.dsdi +++| SB6 4
17109 M00S13736.dsdi +++| SB7 B7+2
17110 M00S13737.dsdi +++| RJ CTS CONVERT LOCATION
17111 M00S13738.dsdi +++| MX2 -12
17112 M00S13739.dsdi +++| BX1 -X2*X1
17113 M00S13740.dsdi +++| SB6 B7 SAVE B7
17114 M00S13741.dsdi +++| RJ RPB READ RETURN ADDRESS FROM PPU
17115 M00S13742.dsdi +++| SB7 B6+2
17116 M00S13743.dsdi +++| SB6 4
17117 M00S13744.dsdi +++| BX1 X6
17118 M00S13745.dsdi +++| RJ CTS CONVERT RETURN ADDRESS
17119 M00S13746.dsdi +++| JP FEMX EXIT
17120 M00S13747.dsdi +++|
17121 M00S13748.dsdi +++| FEMA BSS 0 RESIDENT ENTRY POINT TABLE
17122 M00S13749.dsdi +++| LOC 0
17123 M00S13750.dsdi +++|
17124 M00S13751.dsdi +++| VFD 18/3LFTN,12/FTN,30/0
17125 M00S13752.dsdi +++| VFD 18/3LDFM,12/DFM,30/0
17126 M00S13753.dsdi +++| VFD 18/3LEXR,12/EXR,30/0
17127 M00S13754.dsdi +++| VFD 18/3LSMS,12/.SMS,30/0
17128 M00S13755.dsdi +++| VFD 18/3LRDS,12/RDS,30/0
17129 M00S13756.dsdi +++| VFD 18/3LWDS,12/WDS,30/0
17130 M00S13757.dsdi +++| VFD 18/3LEMS,12/.EMS,30/0
17131 M00S13758.dsdi +++| LOC *O
| Line S00093 Modification History |
M01 (Added by) | dsdi56 |
Seq # *Modification Id* Act
----------------------------+
17132 M01S00093.dsdi56 +++|
17133 M01S00094.dsdi56 +++| FEMB DATA 28H* ENTRY POINTS AND CONSTANTS
17134 M01S00095.dsdi56 +++| DATA 28H MAY NOT HAVE BEEN SAVED.
17135 M00S13759.dsdi +++| FFD SPACE 4,10
17136 M00S13760.dsdi +++|** FFD - FIND FWA OF DISK BUFFER AREA IN EXTENDED MEMORY.
17137 M00S13761.dsdi +++|*
17138 M00S13762.dsdi +++|* ENTRY (X5) = MACHINE ID, LEFT-JUSTIFIED AND ZERO-FILLED.
17139 M00S13763.dsdi +++|*
17140 M00S13764.dsdi +++|* EXIT (DA) = (X6) = FWA OF DISK BUFFER AREA.
17141 M00S13765.dsdi +++|*
17142 M00S13766.dsdi +++|* ERROR TO *ERR36*, IF INCORRECT MACHINE ID.
17143 M00S13767.dsdi +++|*
17144 M00S13768.dsdi +++|* USES X - 1, 2, 6.
17145 M00S13769.dsdi +++|* A - 1, 6.
17146 M00S13770.dsdi +++|* B - 2.
17147 M00S13771.dsdi +++|*
17148 M00S13772.dsdi +++|* CALLS POM, SEC.
17149 M00S13773.dsdi +++|*
17150 M00S13774.dsdi +++|* MACROS GETCM.
17151 M00S13775.dsdi +++|
17152 M00S13776.dsdi +++|
17153 M00S13777.dsdi +++| FFD SUBR ENTRY/EXIT
17154 M00S13778.dsdi +++| RJ SEC SET EXTENDED MEMORY
17155 M00S13779.dsdi +++| SX6 20B SET EM SECTOR LIMIT
17156 M00S13780.dsdi +++| SA1 EM
17157 M00S13781.dsdi +++| SB2 X1
17158 M00S13782.dsdi +++| LX6 B2
17159 M00S13783.dsdi +++| SX6 X6+ETLT*100B+IBDT
17160 M00S13784.dsdi +++| SA6 CPRA
17161 M00S13785.dsdi +++| SB2 A6
17162 M00S13786.dsdi +++| RJ POM POSITION TO FWA *IBDT*
17163 M00S13787.dsdi +++| GETCM FFDA,MXMF READ *IBDT* INTO CORE
17164 M00S13788.dsdi +++| SB2 MXMF PRESET *IBDT* INDEX
17165 M00S13789.dsdi +++| FFD1 SB2 B2-1
17166 M00S13790.dsdi +++| NG B2,ERR36 IF AT END OF *IBDT*
17167 M00S13791.dsdi +++| SA1 B2+FFDA
17168 M00S13792.dsdi +++| BX2 X1-X5
17169 M00S13793.dsdi +++| AX2 48
17170 M00S13794.dsdi +++| NZ X2,FFD1 IF MACHINE ID NOT FOUND
17171 M00S13795.dsdi +++| AX1 12
17172 M00S13796.dsdi +++| MX6 -12
17173 M00S13797.dsdi +++| BX6 -X6*X1
17174 M00S13798.dsdi +++| LX6 9
17175 M00S13799.dsdi +++| SA6 DA STORE FWA OF DISK BUFFER AREA
17176 M00S13800.dsdi +++| EQ FFDX RETURN
17177 M00S13801.dsdi +++|
17178 M00S13802.dsdi +++| FFDA BSS MXMF CORE BUFFER FOR *IBDT*
17179 M00S13803.dsdi +++| FLC SPACE 4,9
17180 M00S13804.dsdi +++|** FLC - FORMAT PPU LOW CORE ANALYSIS LINE.
17181 M00S13805.dsdi +++|*
| Line S13806 Modification History |
M01 (Removed by) | ns2647 |
Seq # *Modification Id* Act
----------------------------+
17182 M01S13806.ns2647 ---|* ENTRY X5 = LINE NUMBER.
17183 M01S13807.ns2647 ---|*
17184 M01S13808.ns2647 ---|* SAVES X - 5.
17185 M01S13809.ns2647 ---|* B - 1.
17186 M01S13810.ns2647 ---|* A - 0,5.
17187 M01S13811.ns2647 ---|*
17188 M01S13812.ns2647 ---|* CALLS CTS,RPB,UPS.
| Line S00109 Modification History |
M01 (Added by) | ns2647 |
Seq # *Modification Id* Act
----------------------------+
17189 M01S00109.ns2647 +++|* ENTRY (X5) = LINE NUMBER.
17190 M01S00110.ns2647 +++|*
17191 M01S00111.ns2647 +++|* USES X - 1, 2, 3, 4, 6, 7.
17192 M01S00112.ns2647 +++|* A - 1, 2, 3, 4, 6, 7.
17193 M01S00113.ns2647 +++|* B - 2, 6, 7.
17194 M01S00114.ns2647 +++|*
17195 M01S00115.ns2647 +++|* CALLS CPN, CTS, GRV, RPB, UPS.
17196 M00S13813.dsdi +++|
17197 M00S13814.dsdi +++|
17198 M00S13815.dsdi +++| FLC7 RJ GRV GET R-REGISTER VALUE
| Line S13816 Modification History |
M01 (Removed by) | ns2647 |
Seq # *Modification Id* Act
----------------------------+
17199 M01S13816.ns2647 ---| SB7 PRBF+45 STORE ACTUAL VALUE
| Line S00116 Modification History |
M01 (Added by) | ns2647 |
Seq # *Modification Id* Act
----------------------------+
17200 M01S00116.ns2647 +++| SB7 B7+3
17201 M00S13817.dsdi +++| SB6 8
| Line S13818 Modification History |
M01 (Removed by) | ns2647 |
Seq # *Modification Id* Act
----------------------------+
17202 M01S13818.ns2647 ---| BX6 X1
17203 M01S13819.ns2647 ---| SA6 FLCB+5 SAVE ACTUAL
17204 M00S13820.dsdi +++| RJ CTS CONVERT AND STORE IN PRINT LINE
| Line S00117 Modification History |
M01 (Added by) | ns2647 |
Seq # *Modification Id* Act
----------------------------+
17205 M01S00117.ns2647 +++| BX3 X1 SAVE ACTUAL
17206 M00S13821.dsdi +++| SA1 FLCB+3 GET CP ADDRESS
| Line S13822 Modification History |
M01 (Removed by) | ns2647 |
Seq # *Modification Id* Act
----------------------------+
17207 M01S13822.ns2647 ---| SA2 F.TCMT
17208 M01S13823.ns2647 ---| IX2 X1+X2
17209 M01S13824.ns2647 ---| SA1 X2+FLSW+1 GET EXPECTED R-REGISTER
| Line S00118 Modification History |
M01 (Added by) | ns2647 |
Seq # *Modification Id* Act
----------------------------+
17210 M01S00118.ns2647 +++| ZR X1,FLC4 IF PPU NOT ATTACHED
17211 M01S00119.ns2647 +++| SA1 FLCB+5 GET EXPECTED R-REGISTER
17212 M00S13825.dsdi +++| MX2 24
17213 M00S13826.dsdi +++| LX1 12
| Line S13827 Modification History |
M01 (Removed by) | ns2647 |
Seq # *Modification Id* Act
----------------------------+
17214 M01S13827.ns2647 ---| BX6 X2*X1
17215 M01S13828.ns2647 ---| SA6 FLCB+6 SAVE EXPECTED
17216 M01S13829.ns2647 ---| SB7 PRBF+55
| Line S00120 Modification History |
M01 (Added by) | ns2647 |
Seq # *Modification Id* Act
----------------------------+
17217 M01S00120.ns2647 +++| BX1 X2*X1
17218 M00S13830.dsdi +++| SB6 8
| Line S13831 Modification History |
M01 (Removed by) | ns2647 |
Seq # *Modification Id* Act
----------------------------+
17219 M01S13831.ns2647 ---| RJ CTS CONVERT AND STORE EXPECTED
17220 M01S13832.ns2647 ---| SA1 FLCB+5
17221 M01S13833.ns2647 ---| SA2 A1+B1
17222 M01S13834.ns2647 ---| BX2 X1-X2
17223 M01S13835.ns2647 ---| ZR X2,FLCX IF ACTUAL = EXPECTED
17224 M01S13836.ns2647 ---| SA2 =27H *** WARNING ***
17225 M01S13837.ns2647 ---| SB7 PRBF+65
17226 M01S13838.ns2647 ---| SB6 27
17227 M01S13839.ns2647 ---| RJ UPS STORE WARNING MESSAGE
| Line S00121 Modification History |
M01 (Added by) | ns2647 |
Seq # *Modification Id* Act
----------------------------+
17228 M01S00121.ns2647 +++| EQ FLC3.1 COMPARE VALUES
17229 M00S13840.dsdi +++|
| Line S13841 Modification History |
M01 (Removed by) | ns2647 |
Seq # *Modification Id* Act
----------------------------+
17230 M01S13841.ns2647 ---| FLC SUBR
| Line S00122 Modification History |
M01 (Added by) | ns2647 |
Seq # *Modification Id* Act
----------------------------+
17231 M01S00122.ns2647 +++| FLC SUBR ENTRY/EXIT
17232 M00S13842.dsdi +++| SA2 X5+FLCA
17233 M00S13843.dsdi +++| SB6 7
17234 M00S13844.dsdi +++| SB7 PRBF+35
17235 M00S13845.dsdi +++| RJ UPS SET NAME AND LOCATION
17236 M00S13846.dsdi +++| LX2 18
17237 M00S13847.dsdi +++| SX1 X2 PPU ADDRESS
| Line S00123 Modification History |
M01 (Added by) | ns2647 |
Seq # *Modification Id* Act
----------------------------+
17238 M01S00123.ns2647 +++| ZR X1,FLC7 IF R-REGISTER
17239 M00S13848.dsdi +++| SB6 B7 SAVE PRINT STRING ADDRESS
17240 M00S13849.dsdi +++| RJ RPB READ LOCATION CONTENTS
17241 M00S13850.dsdi +++| SB7 B6+3
17242 M00S13851.dsdi +++| SB6 4
17243 M00S13852.dsdi +++| BX1 X6
17244 M00S13853.dsdi +++| RJ CTS CONVERT CONTENTS
17245 M00S13854.dsdi +++| ZR X5,FLC1 IF LINE 0
17246 M00S13855.dsdi +++| SB2 X5+FLC6-1
17247 M00S13856.dsdi +++| JP B2 VERIFY WORD FOR LINES 1 - 9
17248 M00S13857.dsdi +++|
17249 M00S13858.dsdi +++|* COMPUTE EXPECTED LOW CORE VALUES.
17250 M00S13859.dsdi +++|
| Line S13860 Modification History |
M01 (Removed by) | ns2647 |
Seq # *Modification Id* Act
----------------------------+
17251 M01S13860.ns2647 ---| FLC1 SA3 F.TCMT
17252 M01S13861.ns2647 ---| SA4 PC GET PP COMMUNICATION AREA POINTER
17253 M01S13862.ns2647 ---| SA2 PP PPU NUMBER
17254 M01S13863.ns2647 ---| SX7 X2-12B
17255 M01S13864.ns2647 ---| NG X7,FLC2 IF NOT UPPER PPU BANK
17256 M01S13865.ns2647 ---| SX2 X2+12B-20B CORRECT FOR UPPER PPUS
17257 M01S13866.ns2647 ---| FLC2 LX2 3
17258 M01S13867.ns2647 ---| IX6 X2+X4 PP INPUT REGISTER ADDRESS
| Line S00124 Modification History |
M01 (Added by) | ns2647 |
Seq # *Modification Id* Act
----------------------------+
17259 M01S00124.ns2647 +++| FLC1 SA4 PC GET PP COMMUNICATION AREA POINTER
17260 M01S00125.ns2647 +++| RJ CPN CONVERT PP NUMBER
17261 M01S00126.ns2647 +++| LX6 3
17262 M01S00127.ns2647 +++| IX6 X6+X4 PP INPUT REGISTER ADDRESS
17263 M01S00128.ns2647 +++| SA3 F.TCMT
17264 M00S13868.dsdi +++| IX4 X6+X3
17265 M00S13869.dsdi +++| SA6 FLCB SAVE
17266 M00S13870.dsdi +++| SX7 X6+B1
17267 M00S13871.dsdi +++| SA7 A6+B1 SAVE OUTPUT REGISTER ADDRESS
17268 M00S13872.dsdi +++| SX6 X7+B1
17269 M00S13873.dsdi +++| SA6 A7+B1 SAVE MESSAGE AREA ADDRESS
17270 M00S13874.dsdi +++| SA4 X4 READ INPUT REGISTER
17271 M00S13875.dsdi +++| MX2 -5
17272 M00S13876.dsdi +++| AX4 36
17273 M00S13877.dsdi +++| BX6 -X2*X4 CONTROL POINT NUMBER
17274 M00S13878.dsdi +++| LX6 7 CONTROL POINT AREA ADDRESS
17275 M00S13879.dsdi +++| SA6 A6+B1 SAVE
17276 M00S13880.dsdi +++| ZR X6,FLC4 IF PPU NOT ASSIGNED TO CONTROL POINT
17277 M00S13881.dsdi +++| IX4 X6+X3
| Line S00129 Modification History |
M01 (Added by) | ns2647 |
Seq # *Modification Id* Act
----------------------------+
17278 M01S00129.ns2647 +++| SA2 OP ADD PCPA OFFSET
17279 M01S00130.ns2647 +++| IX4 X2+X4
17280 M00S13882.dsdi +++| SA2 X4+FLSW GET RA/100 AND FL/100
17281 M00S13883.dsdi +++| BX6 X2
17282 M00S13884.dsdi +++| SA6 A6+B1 SAVE RA/100 AND FL/100
17283 M00S13885.dsdi +++| SA3 CE
| Line S00131 Modification History |
M01 (Added by) | ns2647 |
Seq # *Modification Id* Act
----------------------------+
17284 M01S00131.ns2647 +++| SA4 A2+B1 GET R-REGISTER
17285 M00S13886.dsdi +++| ZR X3,FLC2.1 IF NO CM EXTENSION
| Line S13887 Modification History |
M01 (Removed by) | ns2647 |
Seq # *Modification Id* Act
----------------------------+
17286 M01S13887.ns2647 ---| SA2 X4+FLSW+1
| Line S00132 Modification History |
M01 (Added by) | ns2647 |
Seq # *Modification Id* Act
----------------------------+
17287 M01S00132.ns2647 +++| SA2 A2+1
17288 M00S13888.dsdi +++| FLC2.1 LX2 -12
| Line S00133 Modification History |
M01 (Added by) | ns2647 |
Seq # *Modification Id* Act
----------------------------+
17289 M01S00133.ns2647 +++| BX6 X4
17290 M01S00134.ns2647 +++| SA6 A6+1 SAVE R-REGISTER
17291 M00S13889.dsdi +++|
17292 M00S13890.dsdi +++|* COMPARE ACTUAL AND EXPECTED VALUES.
17293 M00S13891.dsdi +++|
17294 M00S13892.dsdi +++| FLC3 BX3 X1 SAVE ACTUAL DATA
17295 M00S13893.dsdi +++| MX1 -12
17296 M00S13894.dsdi +++| BX1 -X1*X2 EXPECTED DATA
| Line S00135 Modification History |
M01 (Added by) | ns2647 |
Seq # *Modification Id* Act
----------------------------+
17297 M01S00135.ns2647 +++| LX1 -12
17298 M00S13895.dsdi +++| SB6 4
| Line S13896 Modification History |
M01 (Removed by) | ns2647 |
Seq # *Modification Id* Act
----------------------------+
17299 M01S13896.ns2647 ---| SB7 B7+2
17300 M01S13897.ns2647 ---| LX1 -12
| Line S00136 Modification History |
M01 (Added by) | ns2647 |
Seq # *Modification Id* Act
----------------------------+
17301 M01S00136.ns2647 +++| FLC3.1 SB7 B7+2
17302 M00S13898.dsdi +++| RJ CTS FORMAT EXPECTED DATA
17303 M00S13899.dsdi +++| BX1 X1-X3
17304 M00S13900.dsdi +++| ZR X1,FLCX IF ACTUAL = EXPECTED
17305 M00S13901.dsdi +++| SA2 =27H *** WARNING ***
17306 M00S13902.dsdi +++| SB6 27
| Line S13903 Modification History |
M01 (Removed by) | ns2647 |
Seq # *Modification Id* Act
----------------------------+
17307 M01S13903.ns2647 ---| RJ UPS SET ERROR FLAG
| Line S00137 Modification History |
M01 (Added by) | ns2647 |
Seq # *Modification Id* Act
----------------------------+
17308 M01S00137.ns2647 +++| FLC3.2 RJ UPS SET MESSAGE
17309 M00S13904.dsdi +++| JP FLCX EXIT
17310 M00S13905.dsdi +++|
17311 M00S13906.dsdi +++|* PPU NOT ATTACHED - IGNORE CL, RA AND FL.
17312 M00S13907.dsdi +++|
17313 M00S13908.dsdi +++| FLC4 SA2 =4L----
17314 M00S13909.dsdi +++| SB6 4
17315 M00S13910.dsdi +++| SB7 B7+2
| Line S13911 Modification History |
M01 (Removed by) | ns2647 |
Seq # *Modification Id* Act
----------------------------+
17316 M01S13911.ns2647 ---| RJ UPS
17317 M01S13912.ns2647 ---| JP FLCX EXIT
| Line S00138 Modification History |
M01 (Added by) | ns2647 |
Seq # *Modification Id* Act
----------------------------+
17318 M01S00138.ns2647 +++| JP FLC3.2 SET MESSAGE
17319 M00S13913.dsdi +++|
17320 M00S13914.dsdi +++|* CHECK CONTROL POINT RELATED DATA.
17321 M00S13915.dsdi +++|
17322 M00S13916.dsdi +++| FLC5 SA3 FLCB+3 READ CONTROL POINT AREA ADDRESS
17323 M00S13917.dsdi +++| ZR X3,FLC4 IF PPU NOT ATTACHED
17324 M00S13918.dsdi +++| JP FLC3 CHECK VALUE
17325 M00S13919.dsdi +++|
17326 M00S13920.dsdi +++|* SET EXPECTED VALUES.
17327 M00S13921.dsdi +++|
17328 M00S13922.dsdi +++| FLC6 BSS 0
17329 M00S13923.dsdi +++|
17330 M00S13924.dsdi +++|+ SA2 FLCB+4 FL
17331 M00S13925.dsdi +++| JP FLC5
17332 M00S13926.dsdi +++|
17333 M00S13927.dsdi +++|+ SX2 1 ON
17334 M00S13928.dsdi +++| JP FLC3
17335 M00S13929.dsdi +++|
17336 M00S13930.dsdi +++|+ SX2 100B HN
17337 M00S13931.dsdi +++| JP FLC3
17338 M00S13932.dsdi +++|
17339 M00S13933.dsdi +++|+ SX2 1000B TH
17340 M00S13934.dsdi +++| JP FLC3
17341 M00S13935.dsdi +++|
17342 M00S13936.dsdi +++|+ SX2 3 TR
17343 M00S13937.dsdi +++| JP FLC3
17344 M00S13938.dsdi +++|
17345 M00S13939.dsdi +++|+ SA2 FLCB+3 CP
17346 M00S13940.dsdi +++| JP FLC5
17347 M00S13941.dsdi +++|
17348 M00S13942.dsdi +++|+ SA2 FLCB+0 IA
17349 M00S13943.dsdi +++| JP FLC5
17350 M00S13944.dsdi +++|
17351 M00S13945.dsdi +++|+ SA2 FLCB+1 OA
17352 M00S13946.dsdi +++| JP FLC5
17353 M00S13947.dsdi +++|
17354 M00S13948.dsdi +++|+ SA2 FLCB+2 MA
17355 M00S13949.dsdi +++| JP FLC5
| Line S13950 Modification History |
M01 (Removed by) | ns2647 |
Seq # *Modification Id* Act
----------------------------+
17356 M01S13950.ns2647 ---|
17357 M01S13951.ns2647 ---|+ JP FLC7 PROCESS R-REGISTER LINE
17358 M00S13952.dsdi +++|
17359 M00S13953.dsdi +++|
17360 M00S13954.dsdi +++| FLCA BSS 0
17361 M00S13955.dsdi +++| VFD 42/7LRA 55 ,18/RA
17362 M00S13956.dsdi +++| VFD 42/7LFL 56 ,18/FL
17363 M00S13957.dsdi +++| VFD 42/7LON 70 ,18/ON
17364 M00S13958.dsdi +++| VFD 42/7LHN 71 ,18/HN
17365 M00S13959.dsdi +++| VFD 42/7LTH 72 ,18/TH
17366 M00S13960.dsdi +++| VFD 42/7LTR 73 ,18/TR
17367 M00S13961.dsdi +++| VFD 42/7LCP 74 ,18/CP
17368 M00S13962.dsdi +++| VFD 42/7LIA 75 ,18/IA
17369 M00S13963.dsdi +++| VFD 42/7LOA 76 ,18/OA
17370 M00S13964.dsdi +++| VFD 42/7LMA 77 ,18/MA
17371 M00S13965.dsdi +++| VFD 42/7LR-REG ,18/0
17372 M00S13966.dsdi +++|
17373 M00S13967.dsdi +++| FLCB BSS 0 EXPECTED LOW CORE DATA
17374 M00S13968.dsdi +++| LOC 0
17375 M00S13969.dsdi +++|
17376 M00S13970.dsdi +++| BSS 1 IA
17377 M00S13971.dsdi +++| BSS 1 OA
17378 M00S13972.dsdi +++| BSS 1 MA
17379 M00S13973.dsdi +++| BSS 1 CP
17380 M00S13974.dsdi +++| BSS 1 RA/100, FL/100
| Line S13975 Modification History |
M01 (Removed by) | ns2647 |
Seq # *Modification Id* Act
----------------------------+
17381 M01S13975.ns2647 ---| BSS 1 ACTUAL R-REGISTER
17382 M01S13976.ns2647 ---| BSS 1 EXPECTED R-REGISTER
| Line S00139 Modification History |
M01 (Added by) | ns2647 |
Seq # *Modification Id* Act
----------------------------+
17383 M01S00139.ns2647 +++| BSS 1 R-REGISTER
17384 M00S13977.dsdi +++| LOC *O
17385 M00S13978.dsdi +++| FOL SPACE 4,9
17386 M00S13979.dsdi +++|** FOL - FORMAT ONE LINE OF *P* DUMP.
17387 M00S13980.dsdi +++|*
17388 M00S13981.dsdi +++|* ENTRY X5 = ROW NUMBER.
17389 M00S13982.dsdi +++|*
17390 M00S13983.dsdi +++|* SAVES X - 5.
17391 M00S13984.dsdi +++|* B - NONE.
17392 M00S13985.dsdi +++|* A - 5.
17393 M00S13986.dsdi +++|*
17394 M00S13987.dsdi +++|* CALLS CTS,UPS,WOF.
17395 M00S13988.dsdi +++|
17396 M00S13989.dsdi +++|
17397 M00S13990.dsdi +++| FOL SUBR
17398 M00S13991.dsdi +++| BX1 X5
17399 M00S13992.dsdi +++| SB6 2
17400 M00S13993.dsdi +++| LX1 -6
17401 M00S13994.dsdi +++| SB7 PRBF+7
17402 M00S13995.dsdi +++| RJ CTS SET ROW ADDRESS IN LEFT BLOCK
17403 M00S13996.dsdi +++| LX1 -6
17404 M00S13997.dsdi +++| SB6 B1+B1
17405 M00S13998.dsdi +++| SB7 PRBF+71
17406 M00S13999.dsdi +++| RJ CTS CONVERT FOR RIGHT BLOCK
17407 M00S14000.dsdi +++| SB2 X5+BUF
17408 M00S14001.dsdi +++| SB7 PRBF+11
17409 M00S14002.dsdi +++| SB3 2
17410 M00S14003.dsdi +++| FOL1 SB4 10B
17411 M00S14004.dsdi +++| FOL2 SB6 4 DIGIT COUNT
17412 M00S14005.dsdi +++| SA1 B2+ READ BYTE
17413 M00S14006.dsdi +++| NZ X1,FOL3 IF NOT ZERO
17414 M00S14007.dsdi +++| SA2 =4L----
17415 M00S14008.dsdi +++| RJ UPS SET ZERO INDICATOR
17416 M00S14009.dsdi +++| JP FOL4
17417 M00S14010.dsdi +++|
17418 M00S14011.dsdi +++| FOL3 RJ CTS CONVERT BYTE
17419 M00S14012.dsdi +++| FOL4 SB2 B2+10B ADVANCE ADDRESS
17420 M00S14013.dsdi +++| SB7 B7+2 SPACE 2
17421 M00S14014.dsdi +++| SB4 B4-1 COUNT BYTE
17422 M00S14015.dsdi +++| NZ B4,FOL2 IF MORE BYTES IN THIS BLOCK
17423 M00S14016.dsdi +++| SB7 B7+16 SPACE TO RIGHT BLOCK
17424 M00S14017.dsdi +++| SB3 B3-1
17425 M00S14018.dsdi +++| NZ B3,FOL1 IF NOT DONE WITH RIGHT BLOCK
17426 M00S14019.dsdi +++| PRINT CCCH,B7-CCCH-18
17427 M00S14020.dsdi +++| JP FOLX EXIT
17428 M00S14021.dsdi +++| FON SPACE 4,15
17429 M00S14022.dsdi +++|** FON - FORMAT PPU OVERLAY NAME LINE.
17430 M00S14023.dsdi +++|*
17431 M00S14024.dsdi +++|* ENTRY B4 = LINE INDEX.
17432 M00S14025.dsdi +++|* PPU DATA IS AT *PBUF*.
17433 M00S14026.dsdi +++|*
17434 M00S14027.dsdi +++|* USES X - 1, 2, 6, 7.
17435 M00S14028.dsdi +++|* A - 1, 2.
17436 M00S14029.dsdi +++|* B - 3, 6, 7.
17437 M00S14030.dsdi +++|*
17438 M00S14031.dsdi +++|* SAVES X - 5.
17439 M00S14032.dsdi +++|* A - 0, 5.
17440 M00S14033.dsdi +++|* B - 1.
17441 M00S14034.dsdi +++|*
17442 M00S14035.dsdi +++|* CALLS RPB, UPS.
17443 M00S14036.dsdi +++|
17444 M00S14037.dsdi +++|
17445 M00S14038.dsdi +++| FON SUBR ENTRY/EXIT
17446 M00S14039.dsdi +++| SB3 3
17447 M00S14040.dsdi +++| GE B4,B3,FONX IF NO MORE NAMES TO FORMAT
17448 M00S14041.dsdi +++| SB7 B7+6 SET PRINT STRING ADDRESS
17449 M00S14042.dsdi +++| JP FONA+B4 PROCESS APPROPRIATE LINE
17450 M00S14043.dsdi +++|
17451 M00S14044.dsdi +++|* LIST LAST MAIN PROGRAM LOADED.
17452 M00S14045.dsdi +++|
17453 M00S14046.dsdi +++| FON1 SA2 =27HLAST MAIN PROGRAM LOADED -
17454 M00S14047.dsdi +++| SB6 27
17455 M00S14048.dsdi +++| RJ UPS
17456 M00S14049.dsdi +++| SX1 IR
17457 M00S14050.dsdi +++| SB6 B7+ SAVE PRINT STRING ADDRESS
17458 M00S14051.dsdi +++| RJ RPB READ INPUT REGISTER BYTE
17459 M00S14052.dsdi +++| SX1 IR+1
17460 M00S14053.dsdi +++| BX7 X6 SAVE (IR)
17461 M00S14054.dsdi +++| RJ RPB
17462 M00S14055.dsdi +++| LX6 -12
17463 M00S14056.dsdi +++| FON2 BX2 X6+X7 SET PROGRAM NAME
17464 M00S14057.dsdi +++| SB7 B6 PRINT STRING ADDRESS
17465 M00S14058.dsdi +++| SB6 3
17466 M00S14059.dsdi +++| RJ UPS SET NAME IN PRINT STRING
17467 M00S14060.dsdi +++| JP FONX EXIT
17468 M00S14061.dsdi +++|
17469 M00S14062.dsdi +++|* LIST LAST OVERLAY LOADED.
17470 M00S14063.dsdi +++|
17471 M00S14064.dsdi +++| FON3 SA2 =27HLAST OVERLAY LOADED -
17472 M00S14065.dsdi +++| SB6 27
17473 M00S14066.dsdi +++| RJ UPS
17474 M00S14067.dsdi +++| SB6 B7+ SAVE B7
17475 M00S14068.dsdi +++| SX1 PLLA
17476 M00S14069.dsdi +++| RJ RPB READ OVERLAY NAME
17477 M00S14070.dsdi +++| SX1 PLLB
17478 M00S14071.dsdi +++| BX7 X6
17479 M00S14072.dsdi +++| RJ RPB
17480 M00S14073.dsdi +++| MX2 6
17481 M00S14074.dsdi +++| BX7 -X2*X7
17482 M00S14075.dsdi +++| LX7 6
17483 M00S14076.dsdi +++| LX6 -6
17484 M00S14077.dsdi +++| JP FON2 SET NAME IN PRINT STRING
17485 M00S14078.dsdi +++|
17486 M00S14079.dsdi +++|* LIST LAST MASS STORAGE DRIVER LOADED.
17487 M00S14080.dsdi +++|
17488 M00S14081.dsdi +++| FON4 SA2 =27HLAST MASS STORAGE DRIVER -
17489 M00S14082.dsdi +++| SB6 27
17490 M00S14083.dsdi +++| RJ UPS
17491 M00S14084.dsdi +++| SB6 B7+
17492 M00S14085.dsdi +++| SX1 MSD
17493 M00S14086.dsdi +++| RJ RPB READ DRIVER IDENTIFICATION BYTE
17494 M00S14087.dsdi +++| SX7 B0 ASSUME NO DRIVER
17495 M00S14088.dsdi +++| LX6 6 POSITION MASS STORAGE DRIVER INDEX
17496 M00S14089.dsdi +++| BX6 X1*X6
17497 M00S14090.dsdi +++| LX6 6
17498 M00S14091.dsdi +++| ZR X6,FON2 IF NO DRIVER
17499 M00S14092.dsdi +++| SA1 TFON-1+X6 INDEX INTO DRIVER DESIGNATOR TABLE
17500 M00S14093.dsdi +++| BX6 X1
17501 M00S14094.dsdi +++| SX7 1R6
17502 M00S14095.dsdi +++| LX7 -6
17503 M00S14096.dsdi +++| JP FON2 PROCESS DRIVER NAME
17504 M00S14097.dsdi +++|
17505 M00S14098.dsdi +++| FONA BSS 0 LINE PROCESSOR JUMP TABLE
17506 M00S14099.dsdi +++|+ JP FON1 PRINT LINE 0
17507 M00S14100.dsdi +++|+ JP FON3 PRINT LINE 1
17508 M00S14101.dsdi +++|+ JP FON4 PRINT LINE 2
17509 M00S14102.dsdi +++|
17510 M00S14103.dsdi +++| TFON BSS 0 TABLE OF MASS STORAGE DRIVER DESIGNATORS
17511 M00S14104.dsdi +++| LOC 1
17512 M00S14105.dsdi +++| ERRNZ /MSP/LA6DI-* ADJUST TABLE IF VALUE CHANGES
17513 M00S14106.dsdi +++| VFD 6/0,12/2RDI,42/0 *6DI*
17514 M00S14107.dsdi +++| ERRNZ /MSP/LA6DJ-* ADJUST TABLE IF VALUE CHANGES
17515 M00S14108.dsdi +++| VFD 6/0,12/2RDJ,42/0 *6DJ*
17516 M00S14109.dsdi +++| ERRNZ /MSP/LA6DP-* ADJUST TABLE IF VALUE CHANGES
17517 M00S14110.dsdi +++| VFD 6/0,12/2RDP,42/0 *6DP*
17518 M00S14111.dsdi +++| ERRNZ /MSP/LA6DE-* ADJUST TABLE IF VALUE CHANGES
17519 M00S14112.dsdi +++| VFD 6/0,12/2RDE,42/0 *6DE*
17520 M00S14113.dsdi +++| ERRNZ /MSP/LA6DX-* ADJUST TABLE IF VALUE CHANGES
17521 M00S14114.dsdi +++| VFD 6/0,12/2RDX,42/0 *6DX*
17522 M00S14115.dsdi +++| LOC *O
17523 M00S14116.dsdi +++| FPB SPACE 4,22
17524 M00S14117.dsdi +++|** FPB - FILL PAGE BUFFER.
17525 M00S14118.dsdi +++|*
17526 M00S14119.dsdi +++|* ENTRY (B2) = ADDRESS OF DUMP PARAMETERS. PARAMETER BLOCK
17527 M00S14120.dsdi +++|* IS DOCUMENTED IN *PMD*.
17528 M00S14121.dsdi +++|* (LC) = CURRENT LINE COUNTER.
17529 M00S14122.dsdi +++|* (PD) = NUMBER OF LINES PER PAGE.
17530 M00S14123.dsdi +++|*
17531 M00S14124.dsdi +++|* EXIT (X1) = PAGE BUFFER LENGTH.
17532 M00S14125.dsdi +++|* PARAMETER BLOCK IS UPDATED. FOR EACH WORD DUMPED,
17533 M00S14126.dsdi +++|* *BUF* CONTAINS A TWO WORD ENTRY -
17534 M00S14127.dsdi +++|*
17535 M00S14128.dsdi +++|* 36/0,24/ADDRESS
17536 M00S14129.dsdi +++|* 60/DATA FOR DATA, OR
17537 M00S14130.dsdi +++|*
17538 M00S14131.dsdi +++|* 60/MINUS
17539 M00S14132.dsdi +++|* 60/GARBAGE FOR REPEAT INDICATOR.
17540 M00S14133.dsdi +++|*
17541 M00S14134.dsdi +++|* USES X - 1, 2, 3, 5, 6, 7.
17542 M00S14135.dsdi +++|* A - 1, 2, 3, 5, 6, 7.
17543 M00S14136.dsdi +++|* B - 5, 7.
17544 M00S14137.dsdi +++|*
17545 M00S14138.dsdi +++|* CALLS CPS.
17546 M00S14139.dsdi +++|*
17547 M00S14140.dsdi +++|* MACROS GETCM.
17548 M00S14141.dsdi +++|
17549 M00S14142.dsdi +++|
17550 M00S14143.dsdi +++| FPB SUBR
17551 M00S14144.dsdi +++| SA5 B2+6 SAVE INVERTED ADDRESS FLAG
17552 M00S14145.dsdi +++| BX6 X5
17553 M00S14146.dsdi +++| SA5 B2
17554 M00S14147.dsdi +++| SA6 FPBA
17555 M00S14148.dsdi +++| SX1 1
17556 M00S14149.dsdi +++| RJ CPS CHECK PAGE SPACE
17557 M00S14150.dsdi +++| SX7 -1 SET SKIP FLAG
17558 M00S14151.dsdi +++| SX3 6
17559 M00S14152.dsdi +++| IX3 X3*X6 PAGE BUFFER LENGTH = 6*LINES
17560 M00S14153.dsdi +++| SB5 BUF SET BUFFER POINTER
17561 M00S14154.dsdi +++| SB7 B5+X3 SET LWA+1
17562 M00S14155.dsdi +++| SA7 FPBA+1
17563 M00S14156.dsdi +++| FPB1 SA1 A5+2
17564 M00S14157.dsdi +++| ZR X1,FPB2 IF DATA NOT IN CORE
17565 M00S14158.dsdi +++| SA2 X1 READ DATA WORD
17566 M00S14159.dsdi +++| SX6 X1+B1
17567 M00S14160.dsdi +++| SA6 A1 UPDATE CORE ADDRESS
17568 M00S14161.dsdi +++| BX6 X2 SET DATA WORD
17569 M00S14162.dsdi +++| EQ FPB3 PROCESS WORD
17570 M00S14163.dsdi +++|
17571 M00S14164.dsdi +++| FPB2 GETCM READ DATA FROM DUMP FILE
17572 M00S14165.dsdi +++| FPB3 SA3 FPBA CHECK IF INVERTED ADDRESS IS PRESENT
17573 M00S14166.dsdi +++| SA2 A5+6
17574 M00S14167.dsdi +++| SX1 B1+
17575 M00S14168.dsdi +++| ZR X3,FPB3.1 IF INVERTED ADDRESS NOT PRESENT
17576 M00S14169.dsdi +++| IX7 X2-X1 UPDATE INVERTED ADDRESS
17577 M00S14170.dsdi +++| SA7 A2
17578 M00S14171.dsdi +++| FPB3.1 SA2 A5 GET DUMP ADDRESS
17579 M00S14172.dsdi +++| IX7 X2+X1
17580 M00S14173.dsdi +++| SA7 A2
17581 M00S14174.dsdi +++| SA1 A2+3
17582 M00S14175.dsdi +++| SA3 FPBA+1
17583 M00S14176.dsdi +++| NZ X1,FPB5 IF NO SUPPRESS REQUESTED
17584 M00S14177.dsdi +++| NG X3,FPB5 IF FIRST TIME THROUGH LOOP
17585 M00S14178.dsdi +++| BX1 X6-X5 COMPARE WITH PREVIOUS WORD
17586 M00S14179.dsdi +++| ZR X1,FPB4 IF DATA IS SAME OR LOGICAL OPPOSITE
17587 M00S14180.dsdi +++| EQ FPB5 STORE NEW WORD
17588 M00S14181.dsdi +++|
17589 M00S14182.dsdi +++| FPB4 NG X1,FPB5 IF DATA IS LOGICAL OPPOSITE
17590 M00S14183.dsdi +++| NZ X3,FPB7 IF REPEAT ALREADY FLAGGED
17591 M00S14184.dsdi +++| MX6 1
17592 M00S14185.dsdi +++| SA6 B5 STORE REPEAT FLAG
17593 M00S14186.dsdi +++| SX6 B1 SET SKIPPING FLAG
17594 M00S14187.dsdi +++| SA6 A3
17595 M00S14188.dsdi +++| EQ FPB6 CONTINUE
17596 M00S14189.dsdi +++|
17597 M00S14190.dsdi +++| FPB5 BX5 X6 SAVE WORD FOR NEXT COMPARE
17598 M00S14191.dsdi +++| SA6 B5+B1 STORE DATA WORD
17599 M00S14192.dsdi +++| SX2 B1
17600 M00S14193.dsdi +++| IX6 X7-X2
17601 M00S14194.dsdi +++| SA1 FPBA GET INVERTED ADDRESS FLAG
17602 M00S14195.dsdi +++| SA6 B5
17603 M00S14196.dsdi +++| MX7 0 CLEAR SKIP FLAG
17604 M00S14197.dsdi +++| SA3 A5+6
17605 M00S14198.dsdi +++| SA7 FPBA+1
17606 M00S14199.dsdi +++| ZR X1,FPB6 IF NO INVERTED ADDRESS
17607 M00S14200.dsdi +++| IX6 X3+X2
17608 M00S14201.dsdi +++| SA6 B5 STORE ADDRESS
17609 M00S14202.dsdi +++| FPB6 SB5 B5+2 ADVANCE BUFFER ADDRESS
17610 M00S14203.dsdi +++| GE B5,B7,FPB8 IF BUFFER FULL
17611 M00S14204.dsdi +++| FPB7 SA1 A5+B1 LWA+1
17612 M00S14205.dsdi +++| SA2 A5 FWA
17613 M00S14206.dsdi +++| IX1 X2-X1
17614 M00S14207.dsdi +++| NG X1,FPB1 IF MORE TO DUMP
17615 M00S14208.dsdi +++| FPB8 SX1 B5-BUF SET BUFFER LENGTH
17616 M00S14209.dsdi +++| EQ FPBX RETURN
17617 M00S14210.dsdi +++|
17618 M00S14211.dsdi +++| FPBA BSS 1 INVERTED ADDRESS FLAG
17619 M00S14212.dsdi +++| BSS 1 SKIP FLAG
| Line S14213 Modification History |
M01 (Removed by) | dsdi78 |
Seq # *Modification Id* Act
----------------------------+
17620 M01S14213.dsdi78 ---| FPL SPACE 4,11
| Line S00026 Modification History |
M01 (Added by) | dsdi78 |
Seq # *Modification Id* Act
----------------------------+
17621 M01S00026.dsdi78 +++| FPL SPACE 4,15
17622 M00S14214.dsdi +++|** FPL - FORMAT PPU COMMUNICATION REGISTER WORD.
17623 M00S14215.dsdi +++|*
| Line S14216 Modification History |
M01 (Removed by) | dsdi78 |
Seq # *Modification Id* Act
----------------------------+
17624 M01S14216.dsdi78 ---|* ENTRY A5 = ADDRESS OF REGISTER WORD.
17625 M01S14217.dsdi78 ---|* X5 = REGISTER WORD.
17626 M01S14218.dsdi78 ---|* B2 = PPU NUMBER.
17627 M01S14219.dsdi78 ---|* B4 = LINE INDEX.
17628 M01S14220.dsdi78 ---|* B7 = PRINT STRING ADDRESS.
17629 M01S14221.dsdi78 ---|* (FPLB) = 0, IF NOT PROCESSING A CPP.
17630 M01S14222.dsdi78 ---|* .NE. 0, IF PROCESSING A CPP.
17631 M01S14223.dsdi78 ---|*
17632 M01S14224.dsdi78 ---|* USES ALL REGISTERS.
17633 M01S14225.dsdi78 ---|*
17634 M01S14226.dsdi78 ---|* CALLS CTS,FAC,FDW,SDI,UPS.
| Line S00027 Modification History |
M01 (Added by) | dsdi78 |
Seq # *Modification Id* Act
----------------------------+
17635 M01S00027.dsdi78 +++|* ENTRY (A5) = ADDRESS OF REGISTER WORD.
17636 M01S00028.dsdi78 +++|* (X5) = REGISTER WORD.
17637 M01S00029.dsdi78 +++|* (B2) = PPU NUMBER.
17638 M01S00030.dsdi78 +++|* (B4) = LINE INDEX.
17639 M01S00031.dsdi78 +++|* (B7) = PRINT STRING ADDRESS.
17640 M01S00032.dsdi78 +++|* (IC) = *CPP* PROCESSING FLAG.
17641 M01S00033.dsdi78 +++|*
17642 M01S00034.dsdi78 +++|* USES X - 0, 1, 2, 3, 6.
17643 M01S00035.dsdi78 +++|* A - 1, 2, 6.
17644 M01S00036.dsdi78 +++|* B - 6, 7.
17645 M01S00037.dsdi78 +++|*
17646 M01S00038.dsdi78 +++|* CALLS CTS, FAC, FDW, SDI, UPS.
17647 M00S14227.dsdi +++|
17648 M00S14228.dsdi +++|
17649 M00S14229.dsdi +++| FPL SUBR
17650 M00S14230.dsdi +++| JP FPLA+B4 PROCESS SELECTED LINE
17651 M00S14231.dsdi +++|
17652 M00S14232.dsdi +++| FPLA BSS 0
17653 M00S14233.dsdi +++| LOC 0
17654 M00S14234.dsdi +++|+ JP FPL0
17655 M00S14235.dsdi +++|+ JP FPL3
17656 M00S14236.dsdi +++|+ JP FPL4
17657 M00S14237.dsdi +++|+ JP FPL5
17658 M00S14238.dsdi +++|+ JP FPL5
17659 M00S14239.dsdi +++|+ JP FPL5
17660 M00S14240.dsdi +++|+ JP FPL5
17661 M00S14241.dsdi +++|+ JP FPL5
17662 M00S14242.dsdi +++| LOC *O
17663 M00S14243.dsdi +++|
17664 M00S14244.dsdi +++|* PROCESS WORD 0.
17665 M00S14245.dsdi +++|
| Line S14246 Modification History |
M01 (Removed by) | dsdi78 |
Seq # *Modification Id* Act
----------------------------+
17666 M01S14246.dsdi78 ---| FPL0 SA2 FPLB
| Line S00039 Modification History |
M01 (Added by) | dsdi78 |
Seq # *Modification Id* Act
----------------------------+
17667 M01S00039.dsdi78 +++| FPL0 SA2 IC
17668 M00S14247.dsdi +++| ZR X2,FPL1 IF NOT PROCESSING A CPP
17669 M00S14248.dsdi +++| SX6 1RC
17670 M00S14249.dsdi +++| SA6 B7-1
17671 M00S14250.dsdi +++| FPL1 SX6 1RP
17672 M00S14251.dsdi +++| SA6 B7 *PP* TO PRINT STRING
17673 M00S14252.dsdi +++| SA6 A6+B1
17674 M00S14253.dsdi +++| SB7 A6+1
17675 M00S14254.dsdi +++| SX1 B2
17676 M00S14255.dsdi +++| LX1 -6
17677 M00S14256.dsdi +++| SB6 2
17678 M00S14257.dsdi +++| RJ CTS CONVERT PPU NUMBER
17679 M00S14258.dsdi +++| SB7 B7+3 SPACE 3
17680 M00S14259.dsdi +++| BX2 X5
17681 M00S14260.dsdi +++| SB6 3
17682 M00S14261.dsdi +++| RJ UPS PROGRAM NAME TO PRINT STRING
17683 M00S14262.dsdi +++| SX6 1R
17684 M00S14263.dsdi +++| SA6 B7+
17685 M00S14264.dsdi +++| SB7 B7+3
17686 M00S14265.dsdi +++| FPL2 BX1 X5 DATA WORD TO PRINT STRING
17687 M00S14266.dsdi +++| SA2 =4000005B
17688 M00S14267.dsdi +++| RJ FDW FORMAT DATA WORD
17689 M00S14268.dsdi +++| SB6 10 CHARACTER COUNT
17690 M00S14269.dsdi +++| BX2 X5 DATA WORD
17691 M00S14270.dsdi +++| SB7 B7+B1
17692 M00S14271.dsdi +++| RJ SDI SET DISPLAY CODE INTERPRETATION
17693 M00S14272.dsdi +++| JP FPLX EXIT
17694 M00S14273.dsdi +++|
17695 M00S14274.dsdi +++|* PROCESS WORD 1.
17696 M00S14275.dsdi +++|
17697 M00S14276.dsdi +++| FPL3 SX6 1R BLANK OUT PPU NUMBER
17698 M00S14277.dsdi +++| SA6 B7-1 CLEAR *C* FOR CPP-S
17699 M00S14278.dsdi +++| SA6 B7
17700 M00S14279.dsdi +++| SA6 A6+B1
17701 M00S14280.dsdi +++| SA6 A6+B1
17702 M00S14281.dsdi +++| SA6 A6+B1
17703 M00S14282.dsdi +++| SB7 A6+4
17704 M00S14283.dsdi +++| MX0 7
17705 M00S14284.dsdi +++| LX0 -5
17706 M00S14285.dsdi +++| BX1 X0*X5 EXTRACT MTR FUNCTION CODE
17707 M00S14286.dsdi +++| LX1 12
17708 M00S14287.dsdi +++| SX0 X1-MXFM-1
17709 M00S14288.dsdi +++| SB6 4
17710 M00S14289.dsdi +++| NG X0,FPL3.1 IF FUNCTION WITHIN TABLE
17711 M00S14290.dsdi +++| SX1 MXFM SET MAXIMUM FUNCTION CODE
17712 M00S14291.dsdi +++| FPL3.1 SA2 TFTN+X1 READ CODE NAME FROM *COMDTFN*
17713 M00S14292.dsdi +++| RJ UPS MTR FUNCTION NAME TO PRINT STRING
17714 M00S14293.dsdi +++| SB7 B7+2
17715 M00S14294.dsdi +++| JP FPL2 CONVERT DATA WORD
17716 M00S14295.dsdi +++|
17717 M00S14296.dsdi +++|* PROCESS WORD 2.
17718 M00S14297.dsdi +++|
17719 M00S14298.dsdi +++| FPL4 SX6 1RC *CL* TO PRINT STRING
17720 M00S14299.dsdi +++| SA6 B7+7
17721 M00S14300.dsdi +++| SX6 1RP
| Line S14301 Modification History |
M01 (Removed by) | dsdi78 |
Seq # *Modification Id* Act
----------------------------+
17722 M01S14301.dsdi78 ---| SA6 A6+B1
17723 M01S14302.dsdi78 ---| SB7 A6+B1
17724 M00S14303.dsdi +++| SA1 A5-2 READ WORD 0
17725 M00S14304.dsdi +++| MX0 -5
17726 M00S14305.dsdi +++| LX1 24
17727 M00S14306.dsdi +++| BX1 -X0*X1 CONTROL POINT NUMBER
| Line S00040 Modification History |
M01 (Added by) | dsdi78 |
Seq # *Modification Id* Act
----------------------------+
17728 M01S00040.dsdi78 +++| FPL4.1 SA6 A6+B1
17729 M01S00041.dsdi78 +++| SB7 A6+B1
17730 M00S14307.dsdi +++| LX1 -6
17731 M00S14308.dsdi +++| SB6 2
17732 M00S14309.dsdi +++| RJ CTS CONVERT CONTROL POINT NUMBER ASSIGNMENT
17733 M00S14310.dsdi +++| SB7 B7+2
17734 M00S14311.dsdi +++| JP FPL2 CONVERT DATA WORD
17735 M00S14312.dsdi +++|
17736 M00S14313.dsdi +++|* PROCESS WORDS 3 - 7.
17737 M00S14314.dsdi +++|
17738 M00S14315.dsdi +++| FPL5 RJ FAC FIND ASSIGNED CHANNEL
17739 M00S14316.dsdi +++| NG X1,FPL6 IF NO MORE CHANNELS ASSIGNED
17740 M00S14317.dsdi +++| SX6 1RC *CH* TO PRINT STRING
17741 M00S14318.dsdi +++| SX3 X1-40B
17742 M00S14319.dsdi +++| NG X3,FPL5.1 IF NOT PROCESSING A *CCH*
17743 M00S14320.dsdi +++| SA6 B7+6
17744 M00S14321.dsdi +++| FPL5.1 SA6 B7+7
17745 M00S14322.dsdi +++| SX6 1RH
| Line S14323 Modification History |
M01 (Removed by) | dsdi78 |
Seq # *Modification Id* Act
----------------------------+
17746 M01S14323.dsdi78 ---| SA6 A6+1
17747 M01S14324.dsdi78 ---| SB7 A6+B1
17748 M01S14325.dsdi78 ---| LX1 -6
17749 M01S14326.dsdi78 ---| SB6 2
17750 M01S14327.dsdi78 ---| RJ CTS CHANNEL NUMBER TO PRINT STRING
17751 M01S14328.dsdi78 ---| SB7 B7+2
17752 M01S14329.dsdi78 ---| JP FPL2 CONVERT DATA WORD
| Line S00042 Modification History |
M01 (Added by) | dsdi78 |
Seq # *Modification Id* Act
----------------------------+
17753 M01S00042.dsdi78 +++| JP FPL4.1 CONVERT DATA WORD
17754 M00S14330.dsdi +++|
17755 M00S14331.dsdi +++| FPL6 SX6 1R
17756 M00S14332.dsdi +++| SA6 B7+6
| Line S14333 Modification History |
M01 (Removed by) | dsdi78 |
Seq # *Modification Id* Act
----------------------------+
17757 M01S14333.dsdi78 ---| SA6 B7+7
17758 M01S14334.dsdi78 ---| SA6 A6+1
| Line S00043 Modification History |
M01 (Added by) | dsdi78 |
Seq # *Modification Id* Act
----------------------------+
17759 M01S00043.dsdi78 +++| SA6 A6+B1
17760 M01S00044.dsdi78 +++| SA6 A6+B1
17761 M00S14335.dsdi +++| SA6 A6+B1
17762 M00S14336.dsdi +++| SA6 A6+B1
17763 M00S14337.dsdi +++| SB7 A6+3
17764 M00S14338.dsdi +++| JP FPL2 CONVERT DATA WORD
| Line S14339 Modification History |
M01 (Removed by) | dsdi78 |
Seq # *Modification Id* Act
----------------------------+
17765 M01S14339.dsdi78 ---|
17766 M01S14340.dsdi78 ---| FPLB CON 0 PROCESSING *CPP* FLAG
| Line S00140 Modification History |
M01 (Added by) | ns2647 |
M02 (Removed by) | ns2647a |
Seq # *Modification Id* Act
----------------------------+
17767 M02S00140.ns2647a ---| FPO SPACE 4,10
| Line S00026 Modification History |
M01 (Added by) | ns2647a |
Seq # *Modification Id* Act
----------------------------+
17768 M01S00026.ns2647a +++| FPO SPACE 4,15
| Line S00141 Modification History |
M01 (Added by) | ns2647 |
Seq # *Modification Id* Act
----------------------------+
17769 M01S00141.ns2647 +++|** FPO - FORMAT PP OPERATING REGISTERS LINE.
17770 M01S00142.ns2647 +++|*
17771 M01S00143.ns2647 +++|* ENTRY (X5) = LINE NUMBER.
| Line S00027 Modification History |
M01 (Added by) | ns2647a |
Seq # *Modification Id* Act
----------------------------+
17772 M01S00027.ns2647a +++|* (B7) = FWA OF STRING BUFFER.
17773 M01S00028.ns2647a +++|* (CPRA+3) = HEX/OCTAL FLAG.
17774 M01S00029.ns2647a +++|*
17775 M01S00030.ns2647a +++|* EXIT (X6) = 0 IF END OF REGISTERS.
| Line S00144 Modification History |
M01 (Added by) | ns2647 |
Seq # *Modification Id* Act
----------------------------+
17776 M01S00144.ns2647 +++|*
17777 M01S00145.ns2647 +++|* USES X - 1, 2, 6.
| Line S00146 Modification History |
M01 (Added by) | ns2647 |
M02 (Removed by) | ns2647a |
Seq # *Modification Id* Act
----------------------------+
17778 M02S00146.ns2647a ---|* A - 1, 2.
| Line S00031 Modification History |
M01 (Added by) | ns2647a |
Seq # *Modification Id* Act
----------------------------+
17779 M01S00031.ns2647a +++|* A - 1, 2, 6.
| Line S00147 Modification History |
M01 (Added by) | ns2647 |
Seq # *Modification Id* Act
----------------------------+
17780 M01S00147.ns2647 +++|* B - 6, 7.
17781 M01S00148.ns2647 +++|*
| Line S00149 Modification History |
M01 (Added by) | ns2647 |
M02 (Removed by) | ns2647a |
Seq # *Modification Id* Act
----------------------------+
17782 M02S00149.ns2647a ---|* CALLS CTS, UPS.
| Line S00032 Modification History |
M01 (Added by) | ns2647a |
Seq # *Modification Id* Act
----------------------------+
17783 M01S00032.ns2647a +++|* CALLS CTS, HTS, UPS.
| Line S00150 Modification History |
M01 (Added by) | ns2647 |
Seq # *Modification Id* Act
----------------------------+
17784 M01S00150.ns2647 +++|
| Line S00033 Modification History |
M01 (Added by) | ns2647a |
Seq # *Modification Id* Act
----------------------------+
17785 M01S00033.ns2647a +++|
17786 M01S00034.ns2647a +++| FPO3 LX1 59-15 DISPLAY HEX REGISTERS
17787 M01S00035.ns2647a +++| SB6 4
17788 M01S00036.ns2647a +++| SB7 B7+B1
17789 M01S00037.ns2647a +++| RJ HTS
17790 M01S00038.ns2647a +++| SA1 A1+B1 GET Q-REGISTER
17791 M01S00039.ns2647a +++| LX1 59-15
17792 M01S00040.ns2647a +++| SB6 4
17793 M01S00041.ns2647a +++| SB7 B7+3
17794 M01S00042.ns2647a +++| RJ HTS
17795 M01S00043.ns2647a +++| SA1 A1+B1 GET K-REGISTER
17796 M01S00044.ns2647a +++| LX1 59-15
17797 M01S00045.ns2647a +++| SB6 4
17798 M01S00046.ns2647a +++| SB7 B7+4
17799 M01S00047.ns2647a +++| RJ HTS
17800 M01S00048.ns2647a +++| SA1 A1+B1 GET A-REGISTER
17801 M01S00049.ns2647a +++| LX1 59-19
17802 M01S00050.ns2647a +++| SB6 5
17803 M01S00051.ns2647a +++| SB7 B7+3
17804 M01S00052.ns2647a +++| RJ HTS
| Line S00151 Modification History |
M01 (Added by) | ns2647 |
Seq # *Modification Id* Act
----------------------------+
17805 M01S00151.ns2647 +++|
17806 M01S00152.ns2647 +++| FPO SUBR ENTRY/EXIT
| Line S00153 Modification History |
M01 (Added by) | ns2647 |
M02 (Removed by) | ns2647a |
Seq # *Modification Id* Act
----------------------------+
17807 M02S00153.ns2647a ---| SX1 X5-2
17808 M02S00154.ns2647a ---| ZR X1,FPOX IF BETWEEN REGISTER SETS
| Line S00155 Modification History |
M01 (Added by) | ns2647 |
Seq # *Modification Id* Act
----------------------------+
17809 M01S00155.ns2647 +++| NZ X5,FPO1 IF NOT FIRST LINE
17810 M01S00156.ns2647 +++| SX6 B0+ INITIALIZE REGISTER POINTER
17811 M01S00157.ns2647 +++| SA6 FPOA
17812 M01S00158.ns2647 +++| FPO1 SA2 FPOA
17813 M01S00159.ns2647 +++| SX6 X2-4
| Line S00160 Modification History |
M01 (Added by) | ns2647 |
M02 (Removed by) | ns2647a |
Seq # *Modification Id* Act
----------------------------+
17814 M02S00160.ns2647a ---| PL X6,FPOX IF END OF REGISTERS
| Line S00053 Modification History |
M01 (Added by) | ns2647a |
Seq # *Modification Id* Act
----------------------------+
17815 M01S00053.ns2647a +++| ZR X6,FPOX IF END OF REGISTERS
17816 M01S00054.ns2647a +++| SX1 X5-2
17817 M01S00055.ns2647a +++| ZR X1,FPOX IF BETWEEN REGISTER SETS
| Line S00161 Modification History |
M01 (Added by) | ns2647 |
Seq # *Modification Id* Act
----------------------------+
17818 M01S00161.ns2647 +++| SX6 X2+B1
17819 M01S00162.ns2647 +++| SA6 A2 UPDATE POINTER
17820 M01S00163.ns2647 +++| LX2 2
17821 M01S00164.ns2647 +++| SA1 X2+PPOB GET P-REGISTER
17822 M01S00165.ns2647 +++| NG X1,FPO1 IF NO REGISTERS PRESENT
17823 M01S00166.ns2647 +++| LX2 -1 SET DESCRIPTOR
17824 M01S00167.ns2647 +++| ERRNZ FPOBE-2 CODE DEPENDS ON VALUE
17825 M01S00168.ns2647 +++| SA2 X2+FPOB
17826 M01S00169.ns2647 +++| SB6 12
| Line S00170 Modification History |
M01 (Added by) | ns2647 |
M02 (Removed by) | ns2647a |
Seq # *Modification Id* Act
----------------------------+
17827 M02S00170.ns2647a ---| SB7 PRBF+76
| Line S00171 Modification History |
M01 (Added by) | ns2647 |
Seq # *Modification Id* Act
----------------------------+
17828 M01S00171.ns2647 +++| RJ UPS
| Line S00172 Modification History |
M01 (Added by) | ns2647 |
M02 (Removed by) | ns2647a |
Seq # *Modification Id* Act
----------------------------+
17829 M02S00172.ns2647a ---| LX1 59-14 SET P-REGISTER
| Line S00056 Modification History |
M01 (Added by) | ns2647a |
Seq # *Modification Id* Act
----------------------------+
17830 M01S00056.ns2647a +++| SB7 B7+3
17831 M01S00057.ns2647a +++| SA2 CPRA+3 GET FORMAT CODE
17832 M01S00058.ns2647a +++| SX6 2
17833 M01S00059.ns2647a +++| ZR X2,FPO2 IF OCTAL
17834 M01S00060.ns2647a +++| BX2 X6*X2
17835 M01S00061.ns2647a +++| ZR X2,FPO3 IF HEX
17836 M01S00062.ns2647a +++| FPO2 LX1 59-14 SET P-REGISTER
| Line S00173 Modification History |
M01 (Added by) | ns2647 |
Seq # *Modification Id* Act
----------------------------+
17837 M01S00173.ns2647 +++| SB6 5
| Line S00174 Modification History |
M01 (Added by) | ns2647 |
M02 (Removed by) | ns2647a |
Seq # *Modification Id* Act
----------------------------+
17838 M02S00174.ns2647a ---| SB7 B7+3
| Line S00175 Modification History |
M01 (Added by) | ns2647 |
Seq # *Modification Id* Act
----------------------------+
17839 M01S00175.ns2647 +++| RJ CTS
17840 M01S00176.ns2647 +++| SA1 A1+B1 GET Q-REGISTER
17841 M01S00177.ns2647 +++| LX1 59-14
17842 M01S00178.ns2647 +++| SB6 5
17843 M01S00179.ns2647 +++| SB7 B7+2
17844 M01S00180.ns2647 +++| RJ CTS
17845 M01S00181.ns2647 +++| SA1 A1+B1 GET K-REGISTER
17846 M01S00182.ns2647 +++| LX1 59-17
17847 M01S00183.ns2647 +++| SB6 6
17848 M01S00184.ns2647 +++| SB7 B7+2
17849 M01S00185.ns2647 +++| RJ CTS
17850 M01S00186.ns2647 +++| SA1 A1+B1 GET A-REGISTER
17851 M01S00187.ns2647 +++| LX1 59-17
17852 M01S00188.ns2647 +++| SB6 6
17853 M01S00189.ns2647 +++| SB7 B7+2
17854 M01S00190.ns2647 +++| RJ CTS
17855 M01S00191.ns2647 +++| EQ FPOX RETURN
17856 M01S00192.ns2647 +++|
17857 M01S00193.ns2647 +++|
17858 M01S00194.ns2647 +++| FPOA CON 0 REGISTER SET POINTER
17859 M01S00195.ns2647 +++| FPOB DATA C* BEFORE IDLE*
17860 M01S00196.ns2647 +++| FPOBE EQU *-FPOB ENTRY LENGTH
17861 M01S00197.ns2647 +++| DATA C* AFTER IDLE*
17862 M01S00198.ns2647 +++| DATA C*DFT BUFFER 1*
17863 M01S00199.ns2647 +++| DATA C*DFT BUFFER 2*
17864 M00S14341.dsdi +++| FPP SPACE 4,13
17865 M00S14342.dsdi +++|** FPP - FIND PPU PROGRAM.
17866 M00S14343.dsdi +++|*
17867 M00S14344.dsdi +++|* ENTRY X4 = PROGRAM NAME.
17868 M00S14345.dsdi +++|* FI = 0 IF INITIAL ENTRY.
17869 M00S14346.dsdi +++|* = CURRENT SEARCH INDEX IF NOT FIRST ENTRY.
17870 M00S14347.dsdi +++|*
17871 M00S14348.dsdi +++|* EXIT X6 = PPU NUMBER.
17872 M00S14349.dsdi +++|* FI IS UPDATED.
17873 M00S14350.dsdi +++|* X1=FI=0 IF NO MORE PPS EXECUTING REQUESTED PROGRAM.
17874 M00S14351.dsdi +++|*
17875 M00S14352.dsdi +++|* SAVES X - 5.
17876 M00S14353.dsdi +++|* B - 1,5,6,7.
17877 M00S14354.dsdi +++|* A - 0,5.
17878 M00S14355.dsdi +++|
17879 M00S14356.dsdi +++|
17880 M00S14357.dsdi +++| FPP SUBR
17881 M00S14358.dsdi +++| SA1 NP GET NUMBER OF PP-S
17882 M00S14359.dsdi +++| SA2 PC GET PP COMMUNICATION AREA POINTER
17883 M00S14360.dsdi +++| SA3 IC
17884 M00S14361.dsdi +++| ZR X3,FPP1 IF NOT DUMPING CPP-S
17885 M00S14362.dsdi +++| LX1 3
17886 M00S14363.dsdi +++| IX2 X1+X2 SET CPP COMMUNICATION AREA POINTER
17887 M00S14364.dsdi +++| SA1 C4 GET NUMBER OF CPP-S
17888 M00S14365.dsdi +++| FPP1 LX1 3
17889 M00S14366.dsdi +++| SB4 X2
17890 M00S14367.dsdi +++| SB3 X1+B4 SET LWA+1 OF SEARCH AREA
17891 M00S14368.dsdi +++| MX0 18
17892 M00S14369.dsdi +++| SA1 FI READ SEARCH INDEX
17893 M00S14370.dsdi +++| SA2 F.TCMT
17894 M00S14371.dsdi +++| SB2 X1
17895 M00S14372.dsdi +++| NZ X1,FPP2 IF NOT INITIAL ENTRY
17896 M00S14373.dsdi +++| SB2 B4 PRESET SEARCH INDEX
17897 M00S14374.dsdi +++| FPP2 GE B2,B3,FPP3 IF END OF SEARCH
17898 M00S14375.dsdi +++| SA1 X2+B2
17899 M00S14376.dsdi +++| BX3 X1-X4
17900 M00S14377.dsdi +++| BX3 X0*X3
17901 M00S14378.dsdi +++| ZR X3,FPP4 IF PROGRAM NAME MATCH
17902 M00S14379.dsdi +++| SB2 B2+10B ADVANCE SEARCH
17903 M00S14380.dsdi +++| EQ FPP2 CONTINUE SEARCH
17904 M00S14381.dsdi +++|
17905 M00S14382.dsdi +++| FPP3 SX6 0
17906 M00S14383.dsdi +++| SA6 FI CLEAR SEARCH INDEX
17907 M00S14384.dsdi +++| SX1 0 SET END OF SEARCH
17908 M00S14385.dsdi +++| JP FPPX EXIT
17909 M00S14386.dsdi +++|
17910 M00S14387.dsdi +++| FPP4 SX6 B2+10B
17911 M00S14388.dsdi +++| SA6 FI UPDATE SEARCH INDEX
17912 M00S14389.dsdi +++| SX6 B2-B4
17913 M00S14390.dsdi +++| AX6 3 SET PPU NUMBER
17914 M00S14391.dsdi +++| SX1 1 SET PPU FOUND
17915 M00S14392.dsdi +++| SX7 X6-12B
17916 M00S14393.dsdi +++| NG X7,FPPX IF NOT PPUS 20 - 31
17917 M00S14394.dsdi +++| SX6 X6+20B-12B CORRECT PPU NUMBER
17918 M00S14395.dsdi +++| JP FPPX EXIT
| Line S00133 Modification History |
M01 (Added by) | dsdi67 |
Seq # *Modification Id* Act
----------------------------+
17919 M01S00133.dsdi67 +++| FPR SPACE 4,20
17920 M01S00134.dsdi67 +++|** FPR - FIND PROCESSOR RECORD.
17921 M01S00135.dsdi67 +++|*
17922 M01S00136.dsdi67 +++|* ENTRY (X1) = THREE CHARACTER RECORD ID.
17923 M01S00137.dsdi67 +++|* (X6) = RADIAL MCI FLAG.
17924 M01S00138.dsdi67 +++|*
17925 M01S00139.dsdi67 +++|* EXIT (X2) = FIRST WORD OF TABLE DIRECTORY IF FOUND.
17926 M01S00140.dsdi67 +++|* = 0 IF RECORD NOT FOUND.
17927 M01S00141.dsdi67 +++|* (RI) = RANDOM INDEX.
17928 M01S00142.dsdi67 +++|* RADIAL MCI PRINTED IF (X6) .NE. 0 ON ENTRY.
17929 M01S00143.dsdi67 +++|*
17930 M01S00144.dsdi67 +++|* USES X - 0, 1, 2, 3, 5, 6.
17931 M01S00145.dsdi67 +++|* A - 1, 2, 3, 6.
17932 M01S00146.dsdi67 +++|* B - 6, 7.
17933 M01S00147.dsdi67 +++|*
17934 M01S00148.dsdi67 +++|* CALLS SSB, UPS.
17935 M01S00149.dsdi67 +++|*
17936 M01S00150.dsdi67 +++|* MACROS PRINT, SEARCH.
17937 M01S00151.dsdi67 +++|
17938 M01S00152.dsdi67 +++|
17939 M01S00153.dsdi67 +++| FPR SUBR ENTRY/EXIT
17940 M01S00154.dsdi67 +++| SA6 FPRA SAVE RADIAL MCI FLAG
17941 M01S00155.dsdi67 +++| SA3 NR NEXT DIRECTIVE TABLE ENTRY
17942 M01S00156.dsdi67 +++| MX0 18
17943 M01S00157.dsdi67 +++| ZR X3,FPR1 IF FIRST RECORD
17944 M01S00158.dsdi67 +++| SA2 X3 GET PREVIOUS RECORD ID
17945 M01S00159.dsdi67 +++| BX3 X1-X2
17946 M01S00160.dsdi67 +++| BX3 X0*X3
17947 M01S00161.dsdi67 +++| ZR X3,FPR2 IF RECORD ID MATCHES PREVIOUS RECORD ID
17948 M01S00162.dsdi67 +++| FPR1 SEARCH TDIR,X1,X0
17949 M01S00163.dsdi67 +++| ZR X2,FPRX IF RECORD ID NOT IN DIRECTORY
17950 M01S00164.dsdi67 +++| FPR2 SA1 A2+C.TDIR CHECK NEXT *TDIR* ENTRY
17951 M01S00165.dsdi67 +++| BX1 X1-X2
17952 M01S00166.dsdi67 +++| BX1 X0*X1
17953 M01S00167.dsdi67 +++| SX6 A1
17954 M01S00168.dsdi67 +++| ZR X1,FPR3 IF RECORD NAMES MATCH
17955 M01S00169.dsdi67 +++| SX6 B0
17956 M01S00170.dsdi67 +++| FPR3 SA6 NR
17957 M01S00171.dsdi67 +++| SA3 A2+B1 SET RANDOM INDEX
17958 M01S00172.dsdi67 +++| BX6 X3
17959 M01S00173.dsdi67 +++| SA6 RI
17960 M01S00174.dsdi67 +++| SA1 FPRA
17961 M01S00175.dsdi67 +++| ZR X1,FPRX IF NOT TO DISPLAY THE RADIAL MCI
17962 M01S00176.dsdi67 +++| BX5 X2 SAVE FIRST WORD OF DIRECTORY ENTRY
17963 M01S00177.dsdi67 +++| MX0 -6 SET RADIAL MCI
17964 M01S00178.dsdi67 +++| AX2 36
17965 M01S00179.dsdi67 +++| BX6 -X0*X2
17966 M01S00180.dsdi67 +++| SA6 PRBF+13
17967 M01S00181.dsdi67 +++| PRINT (=2C )
17968 M01S00182.dsdi67 +++| SB7 PRBF
17969 M01S00183.dsdi67 +++| SA2 =13HRADIAL MCI =
17970 M01S00184.dsdi67 +++| SB6 13
17971 M01S00185.dsdi67 +++| RJ UPS UNPACK MESSAGE
17972 M01S00186.dsdi67 +++| PRINT CCCH,15
17973 M01S00187.dsdi67 +++| RJ SSB CLEAR STRING BUFFER
17974 M01S00188.dsdi67 +++| PRINT (=2C )
17975 M01S00189.dsdi67 +++| BX2 X5 RESTORE FIRST WORD OF ENTRY
17976 M01S00190.dsdi67 +++| EQ FPRX RETURN
17977 M01S00191.dsdi67 +++|
17978 M01S00192.dsdi67 +++|
17979 M01S00193.dsdi67 +++| FPRA CON 0 RADIAL MCI FLAG
| Line S14396 Modification History |
M01 (Removed by) | dsdi71 |
Seq # *Modification Id* Act
----------------------------+
17980 M01S14396.dsdi71 ---| FPW SPACE 4,10
| Line S00209 Modification History |
M01 (Added by) | dsdi71 |
Seq # *Modification Id* Act
----------------------------+
17981 M01S00209.dsdi71 +++| FPW SPACE 4,15
17982 M00S14397.dsdi +++|** FPW - FORMAT CONTROL POINT PARAMETER LINE.
17983 M00S14398.dsdi +++|*
17984 M00S14399.dsdi +++|* ENTRY (X1) = LINE INDEX.
17985 M00S14400.dsdi +++|* (CN) = CONTROL POINT NUMBER.
17986 M00S14401.dsdi +++|* (FW) = CONTROL POINT AREA ADDRESS.
17987 M00S14402.dsdi +++|* (GDBB) = DAYFILE BUFFER LENGTH.
17988 M00S14403.dsdi +++|* (NC) = NUMBER OF CONTROL POINTS - 1.
17989 M00S14404.dsdi +++|*
17990 M00S14405.dsdi +++|* USES X - 0, 1, 2, 3, 4, 6, 7.
17991 M00S14406.dsdi +++|* A - 1, 2, 3, 4, 6, 7.
17992 M00S14407.dsdi +++|* B - 2, 3, 4, 5, 6, 7.
17993 M00S14408.dsdi +++|*
| Line S14409 Modification History |
M01 (Removed by) | dsdi71 |
Seq # *Modification Id* Act
----------------------------+
17994 M01S14409.dsdi71 ---|* CALLS CNL, CTS, GDB, POM, SCM, UPS.
| Line S00210 Modification History |
M01 (Added by) | dsdi71 |
M02 (Removed by) | dsdi71a |
Seq # *Modification Id* Act
----------------------------+
17995 M02S00210.dsdi71a ---|* CALLS CNL, CTS, DMB, DOS, GCS, GDB, GEE, POM, SCM, UPS.
| Line S00027 Modification History |
M01 (Added by) | dsdi71a |
Seq # *Modification Id* Act
----------------------------+
17996 M01S00027.dsdi71a +++|* CALLS CNL, CTS, DMB, DOS, GCS, GDB, GEE, GFL, POM, SCM, UPS.
17997 M00S14410.dsdi +++|*
17998 M00S14411.dsdi +++|* MACROS GETCM.
17999 M00S14412.dsdi +++|
18000 M00S14413.dsdi +++|
18001 M00S14414.dsdi +++| FPW SUBR
18002 M00S14415.dsdi +++| SB7 PRBF+1 SET PRINT STRING ADDRESS
18003 M00S14416.dsdi +++| SA2 F.TCMT
18004 M00S14417.dsdi +++| SA3 FW
18005 M00S14418.dsdi +++| IX3 X2+X3
18006 M00S14419.dsdi +++| SB2 X3 SET CONTROL POINT AREA ADDRESS
18007 M00S14420.dsdi +++| SB3 X1+FPWA SET JUMP TABLE ADDRESS
18008 M00S14421.dsdi +++| JP B3 EXECUTE SELECTED PROCESSOR
18009 M00S14422.dsdi +++|
18010 M00S14423.dsdi +++|* LINE 0 - USER NAME, SENSE SWITCHES.
18011 M00S14424.dsdi +++|
18012 M00S14425.dsdi +++| FPW1 SA2 =45HUSER NAME SENSE SWITCHES