cdc:nos2.source:opl.opl871:deck:dsdi.018
Deck DSDI Part 018
70 Modifications
Listing Sections
- Deck DSDI Start
- Deck DSDI Part 1 (Line 1558)
- Deck DSDI Part 2 (Line 2598)
- Deck DSDI Part 3 (Line 3881)
- Deck DSDI Part 4 (Line 5540)
- Deck DSDI Part 5 (Line 6734)
- Deck DSDI Part 6 (Line 7901)
- Deck DSDI Part 7 (Line 9074)
- Deck DSDI Part 8 (Line 10431)
- Deck DSDI Part 9 (Line 11513)
- Deck DSDI Part 10 (Line 13137)
- Deck DSDI Part 11 (Line 14354)
- Deck DSDI Part 12 (Line 15316)
- Deck DSDI Part 13 (Line 16446)
- Deck DSDI Part 14 (Line 17804)
- Deck DSDI Part 15 (Line 19078)
- Deck DSDI Part 16 (Line 20802)
- Deck DSDI Part 17 (Line 22524)
- Deck DSDI Part 18 (Line 23646)
- Deck DSDI Part 19 (Line 25086)
- Deck DSDI Part 20 (Line 26414)
- Deck DSDI Part 21 (Line 27098)
Source
Seq # *Modification Id* Act ----------------------------+ 23646 M01S00066.dsdi78 +++|* EXIT (X1) = 0 IF NO MORE XP-S TO PROCESS. 23647 M01S00067.dsdi78 +++|* (X5) = 0 IF ONLY ONE XP TO PROCESS. 23648 M01S19179.dsdi +++|*
| Line S19180 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | dsdi78 |
Seq # *Modification Id* Act ----------------------------+ 23649 M02S19180.dsdi78 ---|* USES ALL REGISTERS. 23650 M01S00068.dsdi78 +++|* USES X - 1, 5. 23651 M01S00069.dsdi78 +++|* B - 7. 23652 M01S19181.dsdi +++|*
| Line S19182 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | dsdi78 |
Seq # *Modification Id* Act ----------------------------+ 23653 M02S19182.dsdi78 ---|* CALLS CPS,SXH,WOF. 23654 M01S00070.dsdi78 +++|* CALLS CPS, SXH. 23655 M01S00071.dsdi78 +++|* 23656 M01S00072.dsdi78 +++|* MACROS PRINT. 23657 M01S19183.dsdi +++| 23658 M01S19184.dsdi +++| 23659 M01S19185.dsdi +++| PXH SUBR 23660 M01S19186.dsdi +++| SB7 PRBF SET PRINT STRING ADDRESS 23661 M01S19187.dsdi +++| RJ SXH SET LEFT HEADING 23662 M01S19188.dsdi +++| ZR X1,PXHX IF NO MORE XPS TO PROCESS 23663 M01S19189.dsdi +++| SX1 20 23664 M01S19190.dsdi +++| RJ CPS CHECK PAGE SPACE 23665 M01S19191.dsdi +++| PRINT (=2C ) 23666 M01S19192.dsdi +++| SB7 PRBF+45 23667 M01S19193.dsdi +++| RJ SXH SET RIGHT HEADING 23668 M01S19194.dsdi +++| NZ X1,PXH1 IF BOTH XPS ARE PRESENT 23669 M01S19195.dsdi +++| SX5 B0 SET ONE XP FLAG 23670 M01S19196.dsdi +++| PXH1 PRINT CCCH,B7-CCCH 23671 M01S19197.dsdi +++| PRINT (=2C ) 23672 M01S00073.dsdi78 +++| SX1 1 ENSURE X1 NON-ZERO 23673 M01S19198.dsdi +++| JP PXHX EXIT 23674 M01S19199.dsdi +++| PXM SPACE 4,20 23675 M01S19200.dsdi +++|** PXM - PRINT MULTIPLE EXCHANGE PACKAGES. 23676 M01S19201.dsdi +++|* 23677 M01S19202.dsdi +++|* PRINT A PAIR OF EXCHANGE PACKAGES WITH THE HEADER 23678 M01S19203.dsdi +++|* POINTED TO BY THE CONTENTS OF X1. 23679 M01S19204.dsdi +++|* 23680 M01S19205.dsdi +++|* ENTRY (X1) = EXCHANGE PACKAGE HEADER ADDRESS. 23681 M01S19206.dsdi +++|* (PXMM) = PRINT 1 XP FLAG 23682 M01S19207.dsdi +++|* (B2) = DATA BUFFER OFFSET. 23683 M01S19208.dsdi +++|* (CPRA) = ADDRESS OF FIRST EXCHANGE PACKAGE. 23684 M01S19209.dsdi +++|* XP DATA IS IN *BUF*. 23685 M01S19210.dsdi +++|* 23686 M01S19211.dsdi +++|* EXIT CPRA IS UPDATED. 23687 M01S19212.dsdi +++|* (PXMM) = 0. 23688 M01S19213.dsdi +++|* (PXMP) = 0. 23689 M01S19214.dsdi +++|* 23690 M01S19215.dsdi +++|* USES ALL REGISTERS. 23691 M01S19216.dsdi +++|* 23692 M01S19217.dsdi +++|* CALLS CPS,CTS,FXW,SSB,UPS,WOF. 23693 M01S19218.dsdi +++| 23694 M01S19219.dsdi +++| 23695 M01S19220.dsdi +++| PXM SUBR 23696 M01S19221.dsdi +++| SX7 X1+ SAVE HEADER ADDRESS 23697 M01S19222.dsdi +++| SA7 PXME 23698 M01S19223.dsdi +++| SX6 BUF+B2 23699 M01S19224.dsdi +++| SA6 PXMB SET EXCHANGE PACKAGE DATA ADDRESS 23700 M01S19225.dsdi +++| 23701 M01S19226.dsdi +++|* PRINT HEADINGS. 23702 M01S19227.dsdi +++| 23703 M01S19228.dsdi +++| SX1 20 23704 M01S19229.dsdi +++| RJ CPS CHECK REMAINING PAGE SPACE 23705 M01S19230.dsdi +++| RJ SSB CLEAR PRINT STRING 23706 M01S19231.dsdi +++| SA2 PXME 23707 M01S19232.dsdi +++| SA2 X2+ READ FIRST WORD OF HEADER 23708 M01S19233.dsdi +++| SB6 90 23709 M01S19234.dsdi +++| SB7 PRBF 23710 M01S19235.dsdi +++| RJ UPS SET HEADING 23711 M01S19236.dsdi +++| 23712 M01S19237.dsdi +++|* SET EXCHANGE PACKAGE ADDRESSES. 23713 M01S19238.dsdi +++| 23714 M01S19239.dsdi +++| SA1 CPRA 23715 M01S19240.dsdi +++| LX1 -15 23716 M01S19241.dsdi +++| SB6 5 23717 M01S19242.dsdi +++| SB7 PRBF 23718 M01S19243.dsdi +++| RJ CTS CONVERT ADDRESS 23719 M01S19244.dsdi +++| SA2 PXMM 23720 M01S19245.dsdi +++| NZ X2,PXM0 IF ONLY 1 XP 23721 M01S19246.dsdi +++| SX1 X1+20B ADVANCE FOR SECOND PACKAGE 23722 M01S19247.dsdi +++| LX1 -15 23723 M01S19248.dsdi +++| SB6 5 23724 M01S19249.dsdi +++| SB7 PRBF+45 23725 M01S19250.dsdi +++| RJ CTS 23726 M01S19251.dsdi +++| PXM0 SX6 X1+20B 23727 M01S19252.dsdi +++| SA6 CPRA UPDATE XP ADDRESS 23728 M01S19253.dsdi +++| PRINT (=2C ) 23729 M01S19254.dsdi +++| PRINT CCCH,90 23730 M01S19255.dsdi +++| PRINT (=2C ) 23731 M01S19256.dsdi +++| 23732 M01S19257.dsdi +++|* FORMAT TWO EXCHANGE PACKAGES. 23733 M01S19258.dsdi +++| 23734 M01S19259.dsdi +++| SX6 0 23735 M01S19260.dsdi +++| SA6 PXMA CLEAR LINE INDEX 23736 M01S19261.dsdi +++| SA5 PXMB 23737 M01S19262.dsdi +++| SA5 X5+ READ FIRST XP WORD 23738 M01S19263.dsdi +++| PXM1 RJ SSB CLEAR PRINT STRING 23739 M01S19264.dsdi +++| SB7 PRBF+1 23740 M01S19265.dsdi +++| SA1 PXMA LINE INDEX 23741 M01S19266.dsdi +++| RJ FXW FORMAT EXCHANGE PACKAGE WORD 23742 M01S19267.dsdi +++| SA2 PXMM 23743 M01S19268.dsdi +++| NZ X2,PXM1.1 IF ONLY 1 XP 23744 M01S19269.dsdi +++| SA5 A5+17B ADVANCE TO NEXT EXCHANGE PACKAGE 23745 M01S19270.dsdi +++| SA1 PXMA LINE INDEX 23746 M01S19271.dsdi +++| SB7 PRBF+46 23747 M01S19272.dsdi +++| RJ FXW 23748 M01S19273.dsdi +++| SA5 A5-20B 23749 M01S19274.dsdi +++| PXM1.1 PRINT CCCH,B7-CCCH 23750 M01S19275.dsdi +++| SA1 PXMA 23751 M01S19276.dsdi +++| SX6 X1+B1 23752 M01S19277.dsdi +++| SA6 A1 ADVANCE LINE INDEX 23753 M01S19278.dsdi +++| SX7 X6-10B 23754 M01S19279.dsdi +++| NZ X7,PXM2 IF NOT END OF A AND B REGISTERS 23755 M01S19280.dsdi +++| PRINT (=2C ) 23756 M01S19281.dsdi +++| PXM2 SA1 PXMA 23757 M01S19282.dsdi +++| SX1 X1-20B 23758 M01S19283.dsdi +++| NG X1,PXM1 IF MORE LINES TO FORMAT 23759 M01S19284.dsdi +++| BX6 X6-X6 23760 M01S19285.dsdi +++| SA6 PXMM CLEAR 1 XP FLAG 23761 M01S19286.dsdi +++| JP PXMX EXIT 23762 M01S19287.dsdi +++| 23763 M01S19288.dsdi +++| PXMA BSS 1 EXCHANGE PACKAGE LINE INDEX 23764 M01S19289.dsdi +++| PXMB BSS 1 EXCHANGE PACKAGE DATA ADDRESS 23765 M01S19290.dsdi +++| PXMM CON 0 PRINT 1 XP FLAG 23766 M01S19291.dsdi +++| 23767 M01S19292.dsdi +++| 23768 M01S19293.dsdi +++| PXMC CON =90H - PP MONITOR XP
| Line S19294 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | 261l700 |
Seq # *Modification Id* Act ----------------------------+ 23769 M02S19294.261l700 ---|, 23770 M01S00127.261l700 +++|,- BREAKPOINT / HANG XP 23771 M01S19295.dsdi +++| PXMN CON =90H - IDLE 0 XP 23772 M01S19296.dsdi +++|, 23773 M01S19297.dsdi +++| PXMO CON =90H - IDLE 1 XP 23774 M01S19298.dsdi +++|, 23775 M01S19299.dsdi +++| PXMD CON =90H - CPU DEADSTART XP 23776 M01S19300.dsdi +++|,- REAL TIME CLOCK XP 23777 M01S19301.dsdi +++| PXMF CON =90H - ERROR EXIT XP 23778 M01S19302.dsdi +++|,- UNUSED XP 23779 M01S19303.dsdi +++| PXME CON 0 EXCHANGE PACKAGE HEADER ADDRESS 23780 M01S19304.dsdi +++| PXMG CON =90H - CHANNEL 2 INPUT XP 23781 M01S19305.dsdi +++|,- CHANNEL 2 OUTPUT XP 23782 M01S19306.dsdi +++| PXMH CON =90H - CHANNEL 3 INPUT XP 23783 M01S19307.dsdi +++|,- CHANNEL 3 OUTPUT XP 23784 M01S19308.dsdi +++| PXMI CON =90H - CHANNEL 4 INPUT XP 23785 M01S19309.dsdi +++|,- CHANNEL 4 OUTPUT XP 23786 M01S19310.dsdi +++| PXMJ CON =90H - CHANNEL 5 INPUT XP 23787 M01S19311.dsdi +++|,- CHANNEL 5 OUTPUT XP 23788 M01S19312.dsdi +++| PXMK CON =90H - CHANNEL 6 INPUT XP 23789 M01S19313.dsdi +++|,- CHANNEL 6 OUTPUT XP 23790 M01S19314.dsdi +++| PXML CON =90H - CHANNEL 7 INPUT XP 23791 M01S19315.dsdi +++|,- CHANNEL 7 OUTPUT XP 23792 M01S19316.dsdi +++| PXP SPACE 4,8 23793 M01S19317.dsdi +++|** PXP - PRINT PPU EXCHANGE PACKAGES. 23794 M01S19318.dsdi +++|* 23795 M01S19319.dsdi +++|* ENTRY CPRA = XP ADDRESS. 23796 M01S19320.dsdi +++|* 23797 M01S19321.dsdi +++|* USES ALL REGISTERS. 23798 M01S19322.dsdi +++|* 23799 M01S19323.dsdi +++|* CALLS FXW,PXH,SSB,WOF. 23800 M01S19324.dsdi +++| 23801 M01S19325.dsdi +++| 23802 M01S19326.dsdi +++| PXP SUBR 23803 M01S19327.dsdi +++| SX7 BUF PRESET PP EXCHANGE PACKAGE ADDRESS 23804 M01S19328.dsdi +++| SA7 FW 23805 M01S19329.dsdi +++| SX6 1 23806 M01S19330.dsdi +++| SA6 PP CLEAR PPU NUMBER 23807 M01S19331.dsdi +++| SA5 X7+ READ FIRST EXCHANGE PACKAGE WORD 23808 M01S19332.dsdi +++| PXP1 RJ PXH PRINT XP HEADING 23809 M01S19333.dsdi +++| ZR X1,PXPX IF NO MORE TO DUMP 23810 M01S19334.dsdi +++| NZ X5,PXP1.1 IF ONLY ONE XP LEFT 23811 M01S19335.dsdi +++| BX6 X5 23812 M01S19336.dsdi +++| SA6 PXPB 23813 M01S19337.dsdi +++| PXP1.1 SX6 0 23814 M01S19338.dsdi +++| SA6 PXPA CLEAR XP LINE INDEX 23815 M01S19339.dsdi +++| PXP2 SA1 PXPA 23816 M01S19340.dsdi +++| RJ SSB CLEAR PRINT STRING 23817 M01S19341.dsdi +++| SB7 PRBF+1 23818 M01S19342.dsdi +++| RJ FXW FORMAT LEFT XP 23819 M01S19343.dsdi +++| SA1 PXPB 23820 M01S19344.dsdi +++| ZR X1,PXP2.1 IF AT LAST XP 23821 M01S19345.dsdi +++| SA5 A5+20B READ DATA FROM NEXT XP 23822 M01S19346.dsdi +++| SA1 PXPA 23823 M01S19347.dsdi +++| SB7 PRBF+46 23824 M01S19348.dsdi +++| RJ FXW FORMAT RIGHT XP 23825 M01S19349.dsdi +++| SA5 A5-21B RESET FOR PREVIOUS XP 23826 M01S19350.dsdi +++| PXP2.1 PRINT CCCH,B7-CCCH 23827 M01S19351.dsdi +++| SA1 PXPA 23828 M01S19352.dsdi +++| SX6 X1+B1 23829 M01S19353.dsdi +++| SA6 A1 ADVANCE LINE INDEX 23830 M01S19354.dsdi +++| SX6 X6-10B 23831 M01S19355.dsdi +++| NZ X6,PXP3 IF NOT END OF A AND B REGISTERS 23832 M01S19356.dsdi +++| PRINT (=2C ) 23833 M01S19357.dsdi +++| PXP3 SA1 PXPA 23834 M01S19358.dsdi +++| SX1 X1-20B 23835 M01S19359.dsdi +++| NG X1,PXP2 IF MORE LINES 23836 M01S19360.dsdi +++| SA5 A5+22B ADVANCE TO NEXT XP PAIR 23837 M01S19361.dsdi +++| JP PXP1 CONTINUE 23838 M01S19362.dsdi +++| 23839 M01S19363.dsdi +++| PXPA BSS 1 XP LINE INDEX 23840 M01S19364.dsdi +++| PXPB CON 1 LAST XP FLAG 23841 M01S19365.dsdi +++| P4F SPACE 4,11 23842 M01S19366.dsdi +++|** P4F - PRINT FOUR BIT FLAGS. 23843 M01S19367.dsdi +++|* 23844 M01S19368.dsdi +++|* ENTRY X1 = FLAG BITS LEFT JUSTIFIED. 23845 M01S19369.dsdi +++|* B7 = PRINT STRING ADDRESS. 23846 M01S19370.dsdi +++|* 23847 M01S19371.dsdi +++|* EXIT X1 SHIFTED LEFT FOUR PLACES. 23848 M01S19372.dsdi +++|* B7 IS UPDATED. 23849 M01S19373.dsdi +++|* 23850 M01S19374.dsdi +++|* USES X - 1,6. 23851 M01S19375.dsdi +++|* B - 5,7. 23852 M01S19376.dsdi +++|* A - 6. 23853 M01S19377.dsdi +++| 23854 M01S19378.dsdi +++| 23855 M01S19379.dsdi +++| P4F SUBR 23856 M01S19380.dsdi +++| SB5 4 LOOP COUNT 23857 M01S19381.dsdi +++| P4F1 PL X1,P4F3 IF FLAG NOT SET 23858 M01S19382.dsdi +++| SX6 1R1 *ON* INDICATOR 23859 M01S19383.dsdi +++| P4F2 SA6 B7 STORE INDICATOR 23860 M01S19384.dsdi +++| SB7 B7+B1 ADVANCE PRINT STRING 23861 M01S19385.dsdi +++| SB5 B5-B1 23862 M01S19386.dsdi +++| LX1 1 SHIFT FLAGS 23863 M01S19387.dsdi +++| GT B5,B0,P4F1 IF MORE TO PRINT 23864 M01S19388.dsdi +++| JP P4FX EXIT 23865 M01S19389.dsdi +++| 23866 M01S19390.dsdi +++| P4F3 SX6 1R- *OFF* INDICATOR 23867 M01S19391.dsdi +++| JP P4F2 23868 M01S19392.dsdi +++| RBC SPACE 4,15 23869 M01S19393.dsdi +++|** RBC - READ BUFFER CONTROLLER MEMORY. 23870 M01S19394.dsdi +++|* 23871 M01S19395.dsdi +++|* ENTRY DUMP FILE POSITIONED TO CORRECT WORD 23872 M01S19396.dsdi +++|* 23873 M01S19397.dsdi +++|* EXIT (X1) .EQ. 0 IF TRANSFER COMPLETE. 23874 M01S19398.dsdi +++|* .NE. 0 IF TRANSFER NOT COMPLETE. 23875 M01S19399.dsdi +++|* (X7) = 20/0,8/B1,8/B2,8/B3,8/B4,8/B5. 23876 M01S19400.dsdi +++|* 23877 M01S19401.dsdi +++|* USES X - 0, 1, 6, 7. 23878 M01S19402.dsdi +++|* B - 2. 23879 M01S19403.dsdi +++|* 23880 M01S19404.dsdi +++|* MACROS READO. 23881 M01S19405.dsdi +++|* 23882 M01S19406.dsdi +++|* NOTES THE X7 EXIT CONDITION WILL BE SET ONLY IF THE 23883 M01S19407.dsdi +++|* TRANSFER COMPLETED NORMALLY (X1 .EQ. 0). IF THE 23884 M01S19408.dsdi +++|* TRANSFER COMPLETED NORMALLY, THE DUMP FILE WILL BE 23885 M01S19409.dsdi +++|* ADVANCED TO THE NEXT WORD. 23886 M01S19410.dsdi +++| 23887 M01S19411.dsdi +++| 23888 M01S19412.dsdi +++| RBC SUBR ENTRY/EXIT 23889 M01S19413.dsdi +++| READO S READ NEXT WORD 23890 M01S19414.dsdi +++| NZ X1,RBCX IF TRANSFER NOT COMPLETE 23891 M01S19415.dsdi +++| MX0 -8 23892 M01S19416.dsdi +++| BX7 X7-X7 CLEAR ASSEMBLY REGISTER 23893 M01S19417.dsdi +++| SB2 5 SET LOOP COUNT 23894 M01S19418.dsdi +++| 23895 M01S19419.dsdi +++|* CONVERT 8/12 FORMAT- 4/0,8/B1,4/0,8/B2 ... 23896 M01S19420.dsdi +++| 23897 M01S19421.dsdi +++| RBC1 LX6 12 23898 M01S19422.dsdi +++| LX7 8 23899 M01S19423.dsdi +++| BX1 -X0*X6 23900 M01S19424.dsdi +++| BX7 X7+X1 23901 M01S19425.dsdi +++| SB2 B2-1 23902 M01S19426.dsdi +++| NZ B2,RBC1 IF WORD NOT PACKED 23903 M01S19427.dsdi +++| BX1 X1-X1 INDICATE TRANSFER COMPLETE 23904 M01S19428.dsdi +++| EQ RBCX RETURN 23905 M01S19429.dsdi +++| RBF SPACE 4,15 23906 M01S19430.dsdi +++|** RBF - READ UP TO 512 WORDS OR TO EOR FROM FILE F. 23907 M01S19431.dsdi +++|* 23908 M01S19432.dsdi +++|* EXIT (X1) = NONZERO IF EOF. 23909 M01S19433.dsdi +++|* (EOFF) = NONZERO IF EOF. 23910 M01S19434.dsdi +++|* (EORF) = NEGATIVE IF EOR. 23911 M01S19435.dsdi +++|* (BWCF) = BLOCK WORD COUNT. 23912 M01S19436.dsdi +++|* (RWCF) = RECORD WORD COUNT. 23913 M01S19437.dsdi +++|* 23914 M01S19438.dsdi +++|* USES A - 1, 2, 6, 7. 23915 M01S19439.dsdi +++|* X - 0, 1, 2, 3, 5, 6, 7. 23916 M01S19440.dsdi +++|* 23917 M01S19441.dsdi +++|* MACROS READW. 23918 M01S19442.dsdi +++| 23919 M01S19443.dsdi +++| 23920 M01S19444.dsdi +++| RBF SUBR ENTRY/EXIT 23921 M01S00015.dsdi88 +++| SA1 RBHA CHECK FOR DEFERRED HEADER 23922 M01S19445.dsdi +++| SX0 BUF ADDRESS TO READ DATA 23923 M01S19446.dsdi +++| SA2 RBFA FILE TO READ 23924 M01S00016.dsdi88 +++| ZR X1,RBF1 IF NO DEFERRED HEADER 23925 M01S00017.dsdi88 +++| SX6 B0+ CLEAR HEADER WORD COUNT 23926 M01S00018.dsdi88 +++| BX5 X1 23927 M01S00019.dsdi88 +++| SA6 A1 23928 M01S00020.dsdi88 +++| EQ RBF1.1 PROCESS HEADER 23929 M01S00021.dsdi88 +++| 23930 M01S19447.dsdi +++| RBF1 READW X2,CONW,B1 READ HEADER CONTROL WORD 23931 M01S19448.dsdi +++| BX6 X1 SAVE EOF INFORMATION 23932 M01S19449.dsdi +++| SA6 EOFF 23933 M01S19450.dsdi +++| NZ X1,RBFX IF EOF 23934 M01S19451.dsdi +++| SA1 CONW COMPUTE WORD COUNT FOR PRU 23935 M01S19452.dsdi +++| SX6 5 23936 M01S19453.dsdi +++| SX3 X1+4 23937 M01S19454.dsdi +++| IX5 X3/X6 23938 M01S19455.dsdi +++| READW X2,X0,X5+B1 READ DATA PLUS TRAILER CONTROL WORD 23939 M01S19456.dsdi +++| ZR X5,RBF1 IF ZERO LENGTH PRU
| Line S19457 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | dsdi88 |
Seq # *Modification Id* Act ----------------------------+ 23940 M02S19457.dsdi88 ---| IX0 X0+X5 INCREMENT BUFFER ADDRESS 23941 M01S00022.dsdi88 +++| RBF1.1 IX0 X0+X5 INCREMENT BUFFER ADDRESS 23942 M01S19458.dsdi +++| SA1 CONW CHECK FOR SHORT PRU (EOR) 23943 M01S19459.dsdi +++| AX1 36 23944 M01S19460.dsdi +++| SX1 X1 23945 M01S19461.dsdi +++| IX6 X5-X1 23946 M01S19462.dsdi +++| MX1 0 CLEAR EOF FLAG 23947 M01S19463.dsdi +++| NG X6,RBF2 IF SHORT PRU (EOR) 23948 M01S19464.dsdi +++| SX6 X0-BUF-512 CHECK FOR 512 WORDS READ 23949 M01S19465.dsdi +++| NG X6,RBF1 IF NOT 512 WORDS 23950 M01S19466.dsdi +++| RBF2 SA6 EORF SET/CLEAR EOR 23951 M01S19467.dsdi +++| SX7 X0-BUF NUMBER OF WORDS IN BLOCK 23952 M01S19468.dsdi +++| SA7 BWCF 23953 M01S19469.dsdi +++| EQ RBFX RETURN 23954 M01S19470.dsdi +++| 23955 M01S19471.dsdi +++| 23956 M01S19472.dsdi +++| RBFA CON F INITIAL FILE TO READ 23957 M01S19473.dsdi +++| BWCF CON 0 BLOCK WORD COUNT
| Line S19474 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | dsdi56 |
Seq # *Modification Id* Act ----------------------------+ 23958 M02S19474.dsdi56 ---| RWCF CON 0 RECORD WORD COUNT 23959 M01S19475.dsdi +++| EOFF CON 0 NONZERO IF EOF 23960 M01S00023.dsdi88 +++| RBH SPACE 4,15 23961 M01S00024.dsdi88 +++|** RBH - READ BLOCK OR HEADER RECORD. 23962 M01S00025.dsdi88 +++|* 23963 M01S00026.dsdi88 +++|* EXIT (X1) .EQ. +0, IF NOT EOF OR DEFERRED HEADER EOR. 23964 M01S00027.dsdi88 +++|* .NE. 0, IF EOF. 23965 M01S00028.dsdi88 +++|* .EQ. -0, IF EOR WITH DEFERRED HEADER. 23966 M01S00029.dsdi88 +++|* (EOFF) = NONZERO IF EOF. 23967 M01S00030.dsdi88 +++|* (EORF) = NEGATIVE IF EOR. 23968 M01S00031.dsdi88 +++|* = NEGATIVE ZERO IF EOR WITH DEFERRED HEADER. 23969 M01S00032.dsdi88 +++|* (BWCF) = BLOCK WORD COUNT. 23970 M01S00033.dsdi88 +++|* (RWCF) = RECORD WORD COUNT. 23971 M01S00034.dsdi88 +++|* (RBHA) = WORD COUNT OF DEFERRED HEADER. 23972 M01S00035.dsdi88 +++|* 23973 M01S00036.dsdi88 +++|* USES A - 1, 6, 7. 23974 M01S00037.dsdi88 +++|* X - 1, 6, 7. 23975 M01S00038.dsdi88 +++|* 23976 M01S00039.dsdi88 +++|* CALLS DRT, RBF. 23977 M01S00040.dsdi88 +++| 23978 M01S00041.dsdi88 +++| 23979 M01S00042.dsdi88 +++| RBH SUBR ENTRY/EXIT 23980 M01S00043.dsdi88 +++| RJ RBF READ BLOCK OF UP TO 512 WORDS 23981 M01S00044.dsdi88 +++| NZ X1,RBHX IF EOF 23982 M01S00045.dsdi88 +++| SA1 EORF 23983 M01S00046.dsdi88 +++| ZR X1,RBHX IF NOT EOR 23984 M01S00047.dsdi88 +++| SA1 BWCF CHECK FOR HEADER 23985 M01S00048.dsdi88 +++| SX6 0 PRESET FOR EXIT CONDITION 23986 M01S00049.dsdi88 +++| SX1 X1-4 23987 M01S00050.dsdi88 +++| NZ X1,RBH1 IF NOT RIGHT SIZE FOR HEADER 23988 M01S00051.dsdi88 +++| SA1 BUF 23989 M01S00052.dsdi88 +++| RJ DRT DETERMINE RECORD TYPE 23990 M01S00053.dsdi88 +++| ZR X4,RBH1 IF NO MATCH ON RECORD TYPE 23991 M01S00054.dsdi88 +++| SA1 BWCF SAVE HEADER WORD COUNT 23992 M01S00055.dsdi88 +++| MX6 60 SET HEADER DEFERRED STATUS 23993 M01S00056.dsdi88 +++| BX7 X1 23994 M01S00057.dsdi88 +++| SA6 EORF 23995 M01S00058.dsdi88 +++| SA7 RBHA 23996 M01S00059.dsdi88 +++| RBH1 BX1 X6 SET EXIT CONDITION 23997 M01S00060.dsdi88 +++| EQ RBHX RETURN 23998 M01S00061.dsdi88 +++| 23999 M01S00062.dsdi88 +++| 24000 M01S00063.dsdi88 +++| RBHA CON 0 DEFERRED HEADER WORD COUNT
| Line S19476 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | 271l739 |
Seq # *Modification Id* Act ----------------------------+ 24001 M02S19476.271l739 ---| RBI SPACE 4,5 24002 M01S00449.271l739 +++| RBI SPACE 4,10 24003 M01S19477.dsdi +++|** RBI - RANDOMIZE BINARY INPUT FILE. 24004 M01S19478.dsdi +++|*
| Line S19479 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | 271l739 |
Seq # *Modification Id* Act ----------------------------+ 24005 M02S19479.271l739 ---|* USES A - 1, 2, 3, 6, 7.
| Line S19480 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | 271l739 |
Seq # *Modification Id* Act ----------------------------+ 24006 M02S19480.271l739 ---|* X - 0, 1, 2, 3, 4, 6, 7.
| Line S19481 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | 271l739 |
Seq # *Modification Id* Act ----------------------------+ 24007 M02S19481.271l739 ---|* B - 2, 3, 4.
| Line S19482 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | 271l739 |
Seq # *Modification Id* Act ----------------------------+ 24008 M02S19482.271l739 ---|*
| Line S19483 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | 271l739 |
Seq # *Modification Id* Act ----------------------------+ 24009 M02S19483.271l739 ---|* CALLS BPN, DRT, LDD, RBF.
| Line S19484 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | 271l739 |
Seq # *Modification Id* Act ----------------------------+ 24010 M02S19484.271l739 ---|*
| Line S19485 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | 271l739 |
Seq # *Modification Id* Act ----------------------------+ 24011 M02S19485.271l739 ---|* MACROS ADDWRD, ALLOC, MESSAGE, MOVE, READ, READCW, RECALL,
| Line S19486 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | 271l739 |
Seq # *Modification Id* Act ----------------------------+ 24012 M02S19486.271l739 ---|* RENAME, RETURN, REWIND, SEARCH, SETFS, WRITEF,
| Line S19487 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | 271l739 |
Seq # *Modification Id* Act ----------------------------+ 24013 M02S19487.271l739 ---|* WRITEO, WRITER, WRITEW. 24014 M01S00450.271l739 +++|* USES X - 0, 1, 2, 3, 5, 6, 7. 24015 M01S00451.271l739 +++|* A - 1, 2, 3, 5, 6, 7. 24016 M01S00452.271l739 +++|* 24017 M01S00453.271l739 +++|* CALLS BPN, DRT, LDD, RBF, RDR, SFR. 24018 M01S00454.271l739 +++|* 24019 M01S00455.271l739 +++|* MACROS ADDWRD, MESSAGE, READ, READW, READCW, RECALL, RENAME, 24020 M01S00456.271l739 +++|* RETURN, REWIND, SEARCH, SETFS, WRITEF, WRITEO, WRITER, 24021 M01S00457.271l739 +++|* WRITEW. 24022 M01S19488.dsdi +++| 24023 M01S19489.dsdi +++| 24024 M01S00458.271l739 +++| RBI10 BX6 X1 PLACE DUMP NUMBER IN HEADER 24025 M01S00459.271l739 +++| SA6 TITL2 24026 M01S00460.271l739 +++| 24027 M01S19490.dsdi +++| RBI SUBR 24028 M01S19491.dsdi +++| RJ LDD LOAD DUMP DIRECTORY 24029 M01S19492.dsdi +++| ZR X1,RBI6 IF DUMP INPUT RANDOM 24030 M01S19493.dsdi +++| 24031 M01S19494.dsdi +++|* INITIALIZE FOR RANDOM FILE GENERATION. 24032 M01S19495.dsdi +++| 24033 M01S00002.dsdi85 +++| SETFET F,ERP=E 24034 M01S19496.dsdi +++| RECALL F 24035 M01S00023.dsdi81 +++| SA1 DR 24036 M01S00024.dsdi81 +++| NG X1,RBI0 IF RANDOM FILE NAME SPECIFIED 24037 M01S19497.dsdi +++| RETURN S,R DELETE BINARY SCRATCH FILE
| Line S19498 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | dsdi81 |
Seq # *Modification Id* Act ----------------------------+ 24038 M02S19498.dsdi81 ---| MESSAGE (=C* COPYING DUMP TO RANDOM FILE.*),1,R 24039 M01S00025.dsdi81 +++| EQ RBI0.1 INITIATE COPY 24040 M01S00026.dsdi81 +++| 24041 M01S00027.dsdi81 +++| RBI0 REWIND S,R REWIND EXISTING SCRATCH FILE, IF PRESENT 24042 M01S00028.dsdi81 +++| RBI0.1 MESSAGE (=C* COPYING DUMP TO RANDOM FILE.*),1,R 24043 M01S19499.dsdi +++| SA1 RBIA 24044 M01S19500.dsdi +++| NZ X1,RBI1 IF NO REWIND REQUESTED 24045 M01S19501.dsdi +++| REWIND F,R 24046 M01S19502.dsdi +++| RBI1 SA2 RBFA INITIATE READ OF INPUT FILE 24047 M01S19503.dsdi +++| READCW X2,17B 24048 M01S19504.dsdi +++| 24049 M01S19505.dsdi +++|* PROCESS INPUT FILE. 24050 M01S19506.dsdi +++| 24051 M01S19507.dsdi +++| RBI2 RJ RBF READ UP TO 512 WORD BLOCK 24052 M01S19508.dsdi +++| NZ X1,RBI3 IF END OF FILE 24053 M01S19509.dsdi +++| RBI2.1 SA1 BUF SET RECORD ID = 1ST WORD OF RECORD 24054 M01S19510.dsdi +++| BX7 X1 24055 M01S19511.dsdi +++| SA7 ID 24056 M01S19512.dsdi +++| RJ DRT DETERMINE RECORD TYPE 24057 M01S19513.dsdi +++| JP B3 BRANCH ON RECORD TYPE 24058 M01S19514.dsdi +++| 24059 M01S19515.dsdi +++|* PROCESS END OF FILE. 24060 M01S19516.dsdi +++| 24061 M01S19517.dsdi +++| RBI3 SA1 DR 24062 M01S19518.dsdi +++| ZR X1,RBI3.1 IF *D* NOT SPECIFIED 24063 M01S00029.dsdi81 +++| NG X1,RBI3.1 IF *D=FILE* SPECIFIED 24064 M01S19519.dsdi +++| RETURN F 24065 M01S19520.dsdi +++| RBI3.1 SX6 B0+ MAKE *PP* ENTRIES FOR ALL IOU-S 24066 M01S19521.dsdi +++| SA6 PP 24067 M01S19522.dsdi +++| RBI4 RJ BPN BUILD PP NAME
| Line S19523 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | 271l739 |
Seq # *Modification Id* Act ----------------------------+ 24068 M02S19523.271l739 ---| SX1 3RI00+X3 FORM IOU IDENTIFIER 24069 M01S00461.271l739 +++| SA1 .IPP 24070 M01S19524.dsdi +++| MX0 18
| Line S19525 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | 271l739 |
Seq # *Modification Id* Act ----------------------------+ 24071 M02S19525.271l739 ---| LX1 59-17 24072 M01S00462.271l739 +++| LX3 42 FORM RECORD ID 24073 M01S19526.dsdi +++| SA2 PP 24074 M01S19527.dsdi +++| SX6 X2+B1 24075 M01S19528.dsdi +++| SA6 A2 INCREMENT PP NUMBER 24076 M01S19529.dsdi +++| SX2 X2-32B 24077 M01S19530.dsdi +++| ZR X2,RBI5 IF END OF POSSIBLE IOU-S
| Line S19531 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | 271l739 |
Seq # *Modification Id* Act ----------------------------+ 24078 M02S19531.271l739 ---| SEARCH TDIR,X1,X0 24079 M01S00463.271l739 +++| IX6 X1+X3 24080 M01S00464.271l739 +++| SEARCH TDIR,X6,X0 24081 M01S19532.dsdi +++| ZR X2,RBI4 IF IOU NOT FOUND 24082 M01S19533.dsdi +++| SA1 BPNA 24083 M01S19534.dsdi +++| SA5 A2+B1 FETCH SECOND WORD OF ENTRY 24084 M01S19535.dsdi +++| ADDWRD TDIR,X1 24085 M01S19536.dsdi +++| ADDWRD TDIR,X5 24086 M01S19537.dsdi +++| EQ RBI4 PROCESS NEXT IOU 24087 M01S19538.dsdi +++| 24088 M01S19539.dsdi +++| RBI5 WRITEW S,RBIB,RBIBL WRITE 7700 TABLE 24089 M01S19540.dsdi +++| SA1 L.TDIR 24090 M01S19541.dsdi +++| SA3 =0LDUMP 24091 M01S19542.dsdi +++| BX6 X1+X3 24092 M01S19543.dsdi +++| WRITEO X2 WRITE DIRECTORY LENGTH WORD 24093 M01S19544.dsdi +++| SA1 F.TDIR 24094 M01S19545.dsdi +++| WRITEW X2,X1,X6 WRITE DIRECTORY TABLE 24095 M01S19546.dsdi +++| WRITER X2,R 24096 M01S19547.dsdi +++| WRITEF X2,R TERMINATE DUMP FILE 24097 M01S19548.dsdi +++| SA1 DR 24098 M01S00030.dsdi81 +++| NG X1,RBI5.1 IF *D=FILE* SPECIFIED 24099 M01S19549.dsdi +++| ZR X1,RBI6 IF *D* NOT SPECIFIED 24100 M01S19550.dsdi +++| RENAME S,F RENAME SCRATCH FILE
| Line S19551 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | dsdi81 |
Seq # *Modification Id* Act ----------------------------+ 24101 M02S19551.dsdi81 ---| SETFS S,0 CLEAR ID 24102 M01S00031.dsdi81 +++| RBI5.1 SETFS S,0 24103 M01S19552.dsdi +++| RBI6 ADDWRD TDIR,X6-X6 TERMINATE DIRECTORY TABLE 24104 M01S19553.dsdi +++| ADDWRD A0,X6-X6
| Line S19554 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | 271l739 |
Seq # *Modification Id* Act ----------------------------+ 24105 M02S19554.271l739 ---| SX6 0 CLEAR RANDOM ADDRESS WORD 24106 M01S00465.271l739 +++| SA1 .EIC LOOK FOR *EIC* RECORD 24107 M01S00466.271l739 +++| MX0 18 24108 M01S00467.271l739 +++| SEARCH TDIR,X1,X0 24109 M01S00468.271l739 +++| ZR X2,RBI7 IF RECORD NOT FOUND 24110 M01S00469.271l739 +++| BX6 X2 24111 M01S00470.271l739 +++| SA3 A2+B1 24112 M01S00471.271l739 +++| SA6 EH SAVE RECORD HEADER 24113 M01S00472.271l739 +++| BX7 X3 SAVE RANDOM ADDRESS 24114 M01S00473.271l739 +++| SA7 A6+B1 24115 M01S00474.271l739 +++| RBI7 SA1 .MEM LOOK FOR *MEM* RECORD 24116 M01S00475.271l739 +++| SEARCH TDIR,X1,X0 24117 M01S00476.271l739 +++| ZR X2,RBI9 IF RECORD NOT FOUND 24118 M01S00477.271l739 +++| BX6 X2 24119 M01S00478.271l739 +++| SA3 A2+B1 24120 M01S00479.271l739 +++| SA6 MH SAVE RECORD HEADER 24121 M01S00480.271l739 +++| BX7 X3 SAVE RANDOM ADDRESS 24122 M01S00481.271l739 +++| SA7 A6+B1 24123 M01S00482.271l739 +++| SA1 .MMR LOCATE *MMR* RECORD 24124 M01S00483.271l739 +++| RJ RDR 24125 M01S00484.271l739 +++| ZR X2,ERR42 IF RECORD NOT FOUND 24126 M01S00485.271l739 +++| SX5 /IOU/MBRG ASSEMBLE MEMORY BOUNDS 24127 M01S00486.271l739 +++| RJ SFR 24128 M01S00487.271l739 +++| NG X1,ERR42 IF REGISTER NOT FOUND 24129 M01S00488.271l739 +++| MX0 -16
| Line S00489 Modification History | |
|---|---|
M01 (Added by) | 271l739 |
M02 (Updated by) | dsdi92 |
Seq # *Modification Id* Act ----------------------------+ 24130 M02S00489.dsdi92 ---| AX7 16 POSITION UPPER BOUND
| Line S00490 Modification History | |
|---|---|
M01 (Added by) | 271l739 |
M02 (Updated by) | dsdi92 |
Seq # *Modification Id* Act ----------------------------+ 24131 M02S00490.dsdi92 ---| BX7 -X0*X7 24132 M01S00001.dsdi92 +++| BX7 -X0*X7 UPPER BOUND 24133 M01S00491.271l739 +++| LX7 12 CONVERT TO FWA OF EI 24134 M01S00492.271l739 +++| SA7 XB 24135 M01S00493.271l739 +++| RBI9 SX6 0 CLEAR RANDOM ADDRESS IN FET 24136 M01S19555.dsdi +++| SA6 S+6 24137 M01S19556.dsdi +++| 24138 M01S19557.dsdi +++|* SET EXPRESS DUMP NUMBER IN TITLE LINE. 24139 M01S19558.dsdi +++| 24140 M01S19559.dsdi +++| REWIND S,R 24141 M01S19560.dsdi +++| SA1 X2+B1 RESET FET 24142 M01S19561.dsdi +++| SX6 X1 24143 M01S19562.dsdi +++| SA6 A1+B1 IN = FIRST 24144 M01S19563.dsdi +++| SA6 A6+B1 OUT = FIRST 24145 M01S19564.dsdi +++| READ X2 READ FIRST LABEL BLOCK 24146 M01S19565.dsdi +++| READW X2,BUF,4 READ DUMP HEADER 24147 M01S19566.dsdi +++| SA1 BUF+3 DUMP NUMBER FROM *EDD* 24148 M01S19567.dsdi +++| SA2 BD
| Line S19568 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | 271l739 |
Seq # *Modification Id* Act ----------------------------+ 24149 M02S19568.271l739 ---| NZ X2,RBI7 IF BINARY DUMP 24150 M01S00494.271l739 +++| NZ X2,RBI10 IF BINARY DUMP 24151 M01S19569.dsdi +++| SA2 =8R DUMP 24152 M01S19570.dsdi +++| MX3 12 24153 M01S19571.dsdi +++| BX6 X3*X1 24154 M01S19572.dsdi +++| BX6 X6+X2 24155 M01S19573.dsdi +++| LX6 18 24156 M01S19574.dsdi +++| SA6 TITL2 SET DUMP NUMBER IN HEADER 24157 M01S19575.dsdi +++| JP RBIX EXIT 24158 M01S19576.dsdi +++|
| Line S19577 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | 271l739 |
Seq # *Modification Id* Act ----------------------------+ 24159 M02S19577.271l739 ---| RBI7 BX6 X1 PLACE DUMP NUMBER IN HEADER
| Line S19578 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | 271l739 |
Seq # *Modification Id* Act ----------------------------+ 24160 M02S19578.271l739 ---| SA6 TITL2
| Line S19579 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | 271l739 |
Seq # *Modification Id* Act ----------------------------+ 24161 M02S19579.271l739 ---| EQ RBIX RETURN 24162 M01S19580.dsdi +++| 24163 M01S19581.dsdi +++| RBIA CON 0 NO REWIND FLAG 24164 M01S19582.dsdi +++| RBIB DATA 77000016000000000000B 24165 M01S19583.dsdi +++| DATA 0LDUMP 24166 M01S19584.dsdi +++| BSSZ 15B 24167 M01S19585.dsdi +++| RBIBL EQU *-RBIB
| Line S19586 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | dsdi56 |
Seq # *Modification Id* Act ----------------------------+ 24168 M02S19586.dsdi56 ---| BLCT CON 0 PRU COUNT FOR *CM* AND *EXTENDED MEMORY* 24169 M01S19587.dsdi +++| CONW CON 0 HEADER CONTROL WORD 24170 M01S19588.dsdi +++| EORF VFD 1/1,59/0 EOR FLAG 24171 M01S19589.dsdi +++| RBT SPACE 4,11 24172 M01S19590.dsdi +++|** RBT - READ DATA IN BYTE FORMAT. 24173 M01S19591.dsdi +++|*
| Line S19592 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | dsdi56 |
Seq # *Modification Id* Act ----------------------------+ 24174 M02S19592.dsdi56 ---|* ENTRY A0 = NUMBER OF BYTES TO READ.
| Line S19593 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | dsdi56 |
Seq # *Modification Id* Act ----------------------------+ 24175 M02S19593.dsdi56 ---|* RBTA = CURRENT BYTE NUMBER.
| Line S19594 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | dsdi56 |
Seq # *Modification Id* Act ----------------------------+ 24176 M02S19594.dsdi56 ---|* RBTA+1 = CURRENT WORD. 24177 M01S00258.dsdi56 +++|* ENTRY (A0) = NUMBER OF BYTES TO READ. 24178 M01S00259.dsdi56 +++|* (APPG) = PP DATA IN *PBUF* FLAG. 24179 M01S00260.dsdi56 +++|* (RBTA) = CURRENT BYTE NUMBER. 24180 M01S00261.dsdi56 +++|* (RBTA+1) = CURRENT WORD. 24181 M01S19595.dsdi +++|* 24182 M01S19596.dsdi +++|* EXIT BYTES STORED LEFT JUSTIFIED AT *BUF*. 24183 M01S19597.dsdi +++|* 24184 M01S19598.dsdi +++|* USES X - 0, 1, 5, 6, 7. 24185 M01S19599.dsdi +++|* A - 0, 1, 6, 7. 24186 M01S19600.dsdi +++|* B - 3, 4, 5. 24187 M01S19601.dsdi +++|* 24188 M01S19602.dsdi +++|* CALLS NXB. 24189 M01S19603.dsdi +++|* 24190 M01S19604.dsdi +++|* MACROS READO. 24191 M01S19605.dsdi +++| 24192 M01S19606.dsdi +++| 24193 M01S00262.dsdi56 +++| RBT9 SX7 B5 24194 M01S00263.dsdi56 +++| SA7 RBTA SAVE BYTE COUNTER 24195 M01S00264.dsdi56 +++| SA6 A7+B1 SAVE CURRENT WORD 24196 M01S00265.dsdi56 +++| 24197 M01S19607.dsdi +++| RBT SUBR
| Line S19608 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | dsdi56 |
Seq # *Modification Id* Act ----------------------------+ 24198 M02S19608.dsdi56 ---| SA1 AP
| Line S19609 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | dsdi56 |
Seq # *Modification Id* Act ----------------------------+ 24199 M02S19609.dsdi56 ---| NZ X1,RBT5 IF ADVANCED PROCESSOR PRESENT 24200 M01S19610.dsdi +++| SA1 RBTA 24201 M01S19611.dsdi +++| SB5 X1 SET CURRENT BYTE COUNTER 24202 M01S19612.dsdi +++| SA1 A1+B1 24203 M01S19613.dsdi +++| BX6 X1 SET CURRENT WORD 24204 M01S19614.dsdi +++| MX0 12 24205 M01S19615.dsdi +++| SB3 BUF 24206 M01S19616.dsdi +++| SB4 B3+A0 BUFFER LIMIT 24207 M01S00266.dsdi56 +++| SA1 APPG 24208 M01S00267.dsdi56 +++| NZ X1,RBT6 IF DATA IS IN *PBUF* 24209 M01S00268.dsdi56 +++| SA1 AP 24210 M01S00269.dsdi56 +++| NZ X1,RBT4 IF 16-BIT PP 24211 M01S19617.dsdi +++| JP RBT3 ENTER READ LOOP 24212 M01S00270.dsdi56 +++| 24213 M01S00271.dsdi56 +++|* GET 12-BIT BYTES FROM FILE. 24214 M01S19618.dsdi +++| 24215 M01S19619.dsdi +++| RBT1 SB5 5 RESET BYTE COUNTER 24216 M01S19620.dsdi +++| READO S READ NEXT WORD 24217 M01S19621.dsdi +++| RBT2 BX7 X0*X6 24218 M01S19622.dsdi +++| SA7 B3 STORE NEXT BYTE 24219 M01S19623.dsdi +++| SB5 B5-B1 COUNT BYTE 24220 M01S19624.dsdi +++| LX6 12 24221 M01S19625.dsdi +++| SB3 B3+1 ADVANCE BUFFER ADDRESS
| Line S19626 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | dsdi56 |
Seq # *Modification Id* Act ----------------------------+ 24222 M02S19626.dsdi56 ---| EQ B3,B4,RBT4 IF NO MORE TO READ 24223 M01S00272.dsdi56 +++| EQ B3,B4,RBT9 IF NO MORE TO READ 24224 M01S19627.dsdi +++| RBT3 NZ B5,RBT2 IF NOT END OF WORD 24225 M01S19628.dsdi +++| JP RBT1 READ NEXT WORD 24226 M01S19629.dsdi +++|
| Line S19630 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | dsdi56 |
Seq # *Modification Id* Act ----------------------------+ 24227 M02S19630.dsdi56 ---| RBT4 SX7 B5
| Line S19631 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | dsdi56 |
Seq # *Modification Id* Act ----------------------------+ 24228 M02S19631.dsdi56 ---| SA7 RBTA SAVE BYTE COUNTER
| Line S19632 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | dsdi56 |
Seq # *Modification Id* Act ----------------------------+ 24229 M02S19632.dsdi56 ---| SA6 A7+B1 SAVE CURRENT WORD
| Line S19633 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | dsdi56 |
Seq # *Modification Id* Act ----------------------------+ 24230 M02S19633.dsdi56 ---| JP RBTX EXIT 24231 M01S00273.dsdi56 +++|* GET 16-BIT BYTES FROM FILE. BYTES STORED 4 PER 64 BITS. 24232 M01S19634.dsdi +++|
| Line S19635 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | dsdi56 |
Seq # *Modification Id* Act ----------------------------+ 24233 M02S19635.dsdi56 ---|* PROCESS IOU DATA. BYTES STORED 4 PER 64 BITS.
| Line S19636 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | dsdi56 |
Seq # *Modification Id* Act ----------------------------+ 24234 M02S19636.dsdi56 ---|
| Line S19637 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | dsdi56 |
Seq # *Modification Id* Act ----------------------------+ 24235 M02S19637.dsdi56 ---| RBT5 SX5 A0 SAVE BYTE COUNT 24236 M01S00274.dsdi56 +++| RBT4 SX5 A0 SAVE BYTE COUNT 24237 M01S19638.dsdi +++| SA0 BUF NEXT ADDRESS TO STORE 24238 M01S19639.dsdi +++| MX0 12 PP BYTE MASK
| Line S19640 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | dsdi56 |
Seq # *Modification Id* Act ----------------------------+ 24239 M02S19640.dsdi56 ---| RBT6 RJ NXB READ NEXT IOU BYTE 24240 M01S00275.dsdi56 +++| RBT5 RJ NXB READ NEXT IOU BYTE 24241 M01S19641.dsdi +++| LX1 59-11 24242 M01S19642.dsdi +++| BX6 X0*X1 EXTRACT PP BYTE 24243 M01S19643.dsdi +++| SA6 A0 24244 M01S19644.dsdi +++| SA0 A0+B1 24245 M01S19645.dsdi +++| SX5 X5-1
| Line S19646 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | dsdi56 |
Seq # *Modification Id* Act ----------------------------+ 24246 M02S19646.dsdi56 ---| NZ X5,RBT6 IF MORE BYTES TO READ 24247 M01S00276.dsdi56 +++| NZ X5,RBT5 IF MORE BYTES TO READ 24248 M01S19647.dsdi +++| EQ RBTX RETURN 24249 M01S19648.dsdi +++| 24250 M01S00277.dsdi56 +++|* GET 12-BIT BYTES FROM *PBUF*. 24251 M01S00278.dsdi56 +++| 24252 M01S00279.dsdi56 +++| RBT6 SA1 RBTB GET CURRENT *PBUF* ADDRESS 24253 M01S00280.dsdi56 +++| SA1 X1+ 24254 M01S00281.dsdi56 +++| RBT7 NZ B5,RBT8 IF NOT END OF WORD 24255 M01S00282.dsdi56 +++| SA1 A1+1 READ NEXT WORD 24256 M01S00283.dsdi56 +++| SB5 5 RESET BYTE COUNTER 24257 M01S00284.dsdi56 +++| BX6 X1 24258 M01S00285.dsdi56 +++| RBT8 BX7 X0*X6 24259 M01S00286.dsdi56 +++| SB5 B5-B1 COUNT BYTE 24260 M01S00287.dsdi56 +++| SA7 B3 STORE NEXT BYTE 24261 M01S00288.dsdi56 +++| SB3 B3+B1 ADVANCE BUFFER ADDRESS 24262 M01S00289.dsdi56 +++| LX6 12 24263 M01S00290.dsdi56 +++| LT B3,B4,RBT7 IF MORE TO COPY 24264 M01S00291.dsdi56 +++| SX7 A1 24265 M01S00292.dsdi56 +++| SA7 RBTB SAVE CURRENT *PBUF* ADDRESS 24266 M01S00293.dsdi56 +++| EQ RBT9 RETURN 24267 M01S00294.dsdi56 +++| 24268 M01S00295.dsdi56 +++| 24269 M01S19649.dsdi +++| RBTA BSS 2 PARAMETER SAVE 24270 M01S00296.dsdi56 +++| RBTB CON 0 PBUF-1 OR LAST *PBUF* WORD READ 24271 M01S19650.dsdi +++| RCM SPACE 4,15 24272 M01S19651.dsdi +++|** RCM - READ 60-BIT CM. 24273 M01S19652.dsdi +++|* 24274 M01S19653.dsdi +++|* ENTRY (B6) = FWA OF BLOCK TO READ CM. 24275 M01S19654.dsdi +++|* (B7) = LENGTH OF BLOCK. 24276 M01S19655.dsdi +++|* 24277 M01S19656.dsdi +++|* EXIT 60-BIT CM WORDS READ FROM FILE. 24278 M01S19657.dsdi +++|* 24279 M01S19658.dsdi +++|* USES X - 1, 6. 24280 M01S19659.dsdi +++|* A - 1, 6. 24281 M01S19660.dsdi +++|* B - 5, 6, 7. 24282 M01S19661.dsdi +++|* 24283 M01S19662.dsdi +++|* CALLS RCW. 24284 M01S19663.dsdi +++|* 24285 M01S19664.dsdi +++|* MACROS READO, READW. 24286 M01S19665.dsdi +++| 24287 M01S19666.dsdi +++| 24288 M01S19667.dsdi +++| RCM SUBR ENTRY/EXIT 24289 M01S19668.dsdi +++| SA1 MT 24290 M01S19669.dsdi +++| NZ X1,RCM0 IF MEMORY TYPE IS ESM 24291 M01S19670.dsdi +++| SA1 AP 24292 M01S19671.dsdi +++| NZ X1,RCM2 IF ADVANCED PROCESSOR PRESENT 24293 M01S19672.dsdi +++| RCM0 ZR B6,RCM1 IF READING ONE WORD 24294 M01S19673.dsdi +++| READW S,B6,B7 24295 M01S19674.dsdi +++| EQ RCMX RETURN 24296 M01S19675.dsdi +++| 24297 M01S19676.dsdi +++| RCM1 READO S 24298 M01S19677.dsdi +++| EQ RCMX RETURN 24299 M01S19678.dsdi +++| 24300 M01S19679.dsdi +++| RCM2 NZ B6,RCM3 IF MULTIPLE WORD TRANSFER 24301 M01S19680.dsdi +++| RJ RCW READ CYBER WORD 24302 M01S19681.dsdi +++| EQ RCMX RETURN 24303 M01S19682.dsdi +++| 24304 M01S19683.dsdi +++| RCM3 SB5 B6 SAVE CM ADDRESS 24305 M01S19684.dsdi +++| RJ RCW READ CYBER WORD 24306 M01S19685.dsdi +++| NZ X1,RCMX IF EOR 24307 M01S19686.dsdi +++| SA6 B5 24308 M01S19687.dsdi +++| SB6 B5+B1 24309 M01S19688.dsdi +++| SB7 B7-B1 24310 M01S19689.dsdi +++| NZ B7,RCM3 IF BLOCK NOT READ 24311 M01S19690.dsdi +++| EQ RCMX RETURN 24312 M01S19691.dsdi +++| RCW SPACE 4,15 24313 M01S19692.dsdi +++|** RCW - READ CYBER WORD. 24314 M01S19693.dsdi +++|* 24315 M01S19694.dsdi +++|* ENTRY UBUF CONTAINS UNPACKED 60 BIT WORDS. 24316 M01S19695.dsdi +++|* BI = INDEX INTO UBUF. 24317 M01S19696.dsdi +++|* 24318 M01S19697.dsdi +++|* EXIT (X6) = NEXT CM WORD. 24319 M01S19698.dsdi +++|* (X1) = DUMP FILE STATUS. 24320 M01S19699.dsdi +++|* UBUF UPDATED. 24321 M01S19700.dsdi +++|* 24322 M01S19701.dsdi +++|* USES X - 1, 2, 3, 6, 7. 24323 M01S19702.dsdi +++|* A - 2, 3, 6, 7. 24324 M01S19703.dsdi +++|* B - 5, 7. 24325 M01S19704.dsdi +++|* 24326 M01S19705.dsdi +++|* CALLS UPW. 24327 M01S19706.dsdi +++| 24328 M01S19707.dsdi +++| 24329 M01S19708.dsdi +++| RCW SUBR ENTRY/EXIT 24330 M01S19709.dsdi +++| SA3 BI 24331 M01S19710.dsdi +++| SA2 UBUF+16+X3 24332 M01S19711.dsdi +++| SX7 X3+B1 24333 M01S19712.dsdi +++| SA7 A3 24334 M01S19713.dsdi +++| MX1 0 24335 M01S19714.dsdi +++| BX6 X2 24336 M01S19715.dsdi +++| NZ X7,RCWX IF NOT END OF BUFFER 24337 M01S19716.dsdi +++| SA6 RCWA 24338 M01S19717.dsdi +++| SX6 B7 24339 M01S19718.dsdi +++| SA6 A6+B1 24340 M01S19719.dsdi +++| SX6 B5 24341 M01S19720.dsdi +++| SA6 A6+B1 24342 M01S19721.dsdi +++| RJ UPW READ AND UNPACK WORDS 24343 M01S19722.dsdi +++| SX6 -15 24344 M01S19723.dsdi +++| SA6 BI SET WORD INDEX 24345 M01S19724.dsdi +++| SA3 RCWA 24346 M01S19725.dsdi +++| SA2 A3+B1 24347 M01S19726.dsdi +++| SB7 X2 24348 M01S19727.dsdi +++| SA2 A2+B1 24349 M01S19728.dsdi +++| SB5 X2 24350 M01S19729.dsdi +++| BX6 X3 24351 M01S19730.dsdi +++| EQ RCWX RETURN 24352 M01S19731.dsdi +++| 24353 M01S19732.dsdi +++| 24354 M01S19733.dsdi +++| RCWA BSS 3 SAVE AREA 24355 M01S19734.dsdi +++| RDC SPACE 4,12 24356 M01S19735.dsdi +++|** RDC - READ DIRECTIVE INPUT CARD. 24357 M01S19736.dsdi +++|* 24358 M01S19737.dsdi +++|* ENTRY AF = 0 READ FROM REGULAR INPUT FILE. 24359 M01S19738.dsdi +++|* = 1 READ FROM ALTERNATE FILE TO EOR. 24360 M01S19739.dsdi +++|* = 2 READ FROM ALTERNATE FILE TO EOF. 24361 M01S19740.dsdi +++|* 24362 M01S19741.dsdi +++|* EXIT X1.NE.0 IF END OF DIRECTIVES SENSED. 24363 M01S19742.dsdi +++|* DIRECTIVE READ IN 80R1 FORMAT TO *CHAR*. 24364 M01S19743.dsdi +++|* 24365 M01S19744.dsdi +++|* USES ALL REGISTERS. 24366 M01S19745.dsdi +++|* 24367 M01S19746.dsdi +++|* CALLS CIO=,PKS,RDS=,RDO=. 24368 M01S19747.dsdi +++| 24369 M01S19748.dsdi +++| 24370 M01S19749.dsdi +++| RDC SUBR 24371 M01S19750.dsdi +++| SA1 AF 24372 M01S19751.dsdi +++| NZ X1,RDC3 IF READING FROM ALTERNATE INPUT 24373 M01S19752.dsdi +++| SX1 B1+ SET END OF DIRECTIVES 24374 M01S19753.dsdi +++| SA2 I 24375 M01S19754.dsdi +++| ZR X2,RDCX IF ZERO FET 24376 M01S19755.dsdi +++| RDC1 READS I,CHAR,80 24377 M01S19756.dsdi +++| NZ X1,RDCX IF END OF RECORD SENSED 24378 M01S19757.dsdi +++| RDC2 SB6 50 24379 M01S19758.dsdi +++| SB7 TITL1 24380 M01S19759.dsdi +++| SB2 CHAR 24381 M01S19760.dsdi +++| RJ PKS MOVE DIRECTIVE TO TITLE LINE 24382 M01S19761.dsdi +++| SA1 DP 24383 M01S19762.dsdi +++| SX6 X1+B1 24384 M01S19763.dsdi +++| SA6 A1 ADVANCE DIRECTIVES PROCESSED COUNTER 24385 M01S19764.dsdi +++| MX1 0 24386 M01S19765.dsdi +++| JP RDCX EXIT 24387 M01S19766.dsdi +++| 24388 M01S19767.dsdi +++| RDC3 READS J,CHAR,80 READ ALTERNATE INPUT FILE 24389 M01S19768.dsdi +++| ZR X1,RDC2 IF NOT END OF RECORD 24390 M01S19769.dsdi +++| NG X1,RDC4 IF END OF FILE 24391 M01S19770.dsdi +++| SA3 AF 24392 M01S19771.dsdi +++| SX3 X3-2 24393 M01S19772.dsdi +++| NZ X3,RDC4 IF READING ONLY 1 RECORD 24394 M01S19773.dsdi +++| READ X2 READ NEXT RECORD 24395 M01S19774.dsdi +++| READO X2 READ RECORD NAME 24396 M01S19775.dsdi +++| JP RDC3 CONTINUE 24397 M01S19776.dsdi +++| 24398 M01S19777.dsdi +++| RDC4 SX6 0 24399 M01S19778.dsdi +++| SA6 AF CLEAR ALTERNATE INPUT FLAG 24400 M01S19779.dsdi +++| JP RDC1 RETURN TO NORMAL INPUT FILE 24401 M01S19780.dsdi +++| RDR SPACE 4,15 24402 M01S19781.dsdi +++|** RDR - READ DUMP RECORD. 24403 M01S19782.dsdi +++|* 24404 M01S19783.dsdi +++|* ENTRY (X1) = RECORD ID TO READ. 24405 M01S19784.dsdi +++|* 24406 M01S19785.dsdi +++|* EXIT (X2) = FIRST WORD OF RECORD. 24407 M01S19786.dsdi +++|* = 0, IF RECORD NOT FOUND. 24408 M01S19787.dsdi +++|*
| Line S19788 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | dsdi67 |
Seq # *Modification Id* Act ----------------------------+ 24409 M02S19788.dsdi67 ---|* USES X - 0, 1, 2, 3, 6.
| Line S19789 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | dsdi67 |
Seq # *Modification Id* Act ----------------------------+ 24410 M02S19789.dsdi67 ---|* A - 1, 2, 3, 6.
| Line S19790 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | dsdi67 |
Seq # *Modification Id* Act ----------------------------+ 24411 M02S19790.dsdi67 ---|* B - 3, 7. 24412 M01S00234.dsdi67 +++|* USES X - 1, 2, 3, 6. 24413 M01S00235.dsdi67 +++|* A - 1, 2, 6. 24414 M01S19791.dsdi +++|*
| Line S19792 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | dsdi67 |
Seq # *Modification Id* Act ----------------------------+ 24415 M02S19792.dsdi67 ---|* CALLS CNR, PDF. 24416 M01S00236.dsdi67 +++|* CALLS FPR, PDF. 24417 M01S19793.dsdi +++|*
| Line S19794 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | dsdi67 |
Seq # *Modification Id* Act ----------------------------+ 24418 M02S19794.dsdi67 ---|* MACROS READW, SEARCH. 24419 M01S00237.dsdi67 +++|* MACROS READW. 24420 M01S19795.dsdi +++| 24421 M01S19796.dsdi +++| 24422 M01S19797.dsdi +++| RDR SUBR ENTRY/EXIT
| Line S19798 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | dsdi67 |
Seq # *Modification Id* Act ----------------------------+ 24423 M02S19798.dsdi67 ---| ZR X1,RDR1 IF SECOND CALL FOR PROCESSOR REGISTERS
| Line S19799 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | dsdi67 |
Seq # *Modification Id* Act ----------------------------+ 24424 M02S19799.dsdi67 ---| MX0 18
| Line S19800 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | dsdi67 |
Seq # *Modification Id* Act ----------------------------+ 24425 M02S19800.dsdi67 ---| SEARCH TDIR,X1,X0
| Line S19801 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | dsdi67 |
Seq # *Modification Id* Act ----------------------------+ 24426 M02S19801.dsdi67 ---| ZR X2,RDRX IF RECORD NOT FOUND
| Line S19802 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | dsdi67 |
Seq # *Modification Id* Act ----------------------------+ 24427 M02S19802.dsdi67 ---| EQ RDR2 PROCESS FIRST RECORD
| Line S19803 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | dsdi67 |
Seq # *Modification Id* Act ----------------------------+ 24428 M02S19803.dsdi67 ---|
| Line S19804 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | dsdi67 |
Seq # *Modification Id* Act ----------------------------+ 24429 M02S19804.dsdi67 ---|
| Line S19805 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | dsdi67 |
Seq # *Modification Id* Act ----------------------------+ 24430 M02S19805.dsdi67 ---|* READ MAINTENANCE REGISTERS RECORD.
| Line S19806 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | dsdi67 |
Seq # *Modification Id* Act ----------------------------+ 24431 M02S19806.dsdi67 ---|
| Line S19807 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | dsdi67 |
Seq # *Modification Id* Act ----------------------------+ 24432 M02S19807.dsdi67 ---| RDR1 SA1 RDRB NEXT DIRECTORY TABLE ENTRY
| Line S19808 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | dsdi67 |
Seq # *Modification Id* Act ----------------------------+ 24433 M02S19808.dsdi67 ---| SA2 X1
| Line S19809 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | dsdi67 |
Seq # *Modification Id* Act ----------------------------+ 24434 M02S19809.dsdi67 ---| RDR2 SB3 RDRB
| Line S19810 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | dsdi67 |
Seq # *Modification Id* Act ----------------------------+ 24435 M02S19810.dsdi67 ---| SB7 C.TDIR
| Line S19811 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | dsdi67 |
Seq # *Modification Id* Act ----------------------------+ 24436 M02S19811.dsdi67 ---| SA3 DMRA
| Line S19812 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | dsdi67 |
Seq # *Modification Id* Act ----------------------------+ 24437 M02S19812.dsdi67 ---| RJ CNR CHECK NEXT RECORD
| Line S19813 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | dsdi67 |
Seq # *Modification Id* Act ----------------------------+ 24438 M02S19813.dsdi67 ---| BX6 X2 SAVE FIRST WORD OF RECORD
| Line S19814 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | dsdi67 |
Seq # *Modification Id* Act ----------------------------+ 24439 M02S19814.dsdi67 ---| SA1 A2+B1 SET RANDOM INDEX 24440 M01S00238.dsdi67 +++| SX6 B0+ SET NO RADIAL MCI DISPLAY 24441 M01S00239.dsdi67 +++| RJ FPR FIND RECORD 24442 M01S00240.dsdi67 +++| ZR X2,RDRX IF RECORD NOT FOUND 24443 M01S00241.dsdi67 +++| BX6 X2 SAVE FIRST WORD OF TABLE ENTRY 24444 M01S00242.dsdi67 +++| SX3 B0 24445 M01S19815.dsdi +++| SA6 RDRA
| Line S19816 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | dsdi67 |
Seq # *Modification Id* Act ----------------------------+ 24446 M02S19816.dsdi67 ---| BX6 X1
| Line S19817 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | dsdi67 |
Seq # *Modification Id* Act ----------------------------+ 24447 M02S19817.dsdi67 ---| SX3 B0 POSITION DUMP FILE
| Line S19818 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | dsdi67 |
Seq # *Modification Id* Act ----------------------------+ 24448 M02S19818.dsdi67 ---| SA6 RI
| Line S19819 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | dsdi67 |
Seq # *Modification Id* Act ----------------------------+ 24449 M02S19819.dsdi67 ---| RJ PDF 24450 M01S00243.dsdi67 +++| RJ PDF POSITION DUMP FILE 24451 M01S19820.dsdi +++| SA1 RI READ MAINTENANCE REGISTERS RECORD 24452 M01S19821.dsdi +++| AX1 30 24453 M01S19822.dsdi +++| BX6 X6-X6 24454 M01S19823.dsdi +++| SA6 BUF+X1 24455 M01S19824.dsdi +++| SA6 BUF+1+X1 24456 M01S19825.dsdi +++| READW S,BUF,X1
| Line S19826 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | dsdi67 |
Seq # *Modification Id* Act ----------------------------+ 24457 M02S19826.dsdi67 ---| SA2 RDRA RETURN FIRST WORD OF DUMP RECORD 24458 M01S00244.dsdi67 +++| SA2 RDRA RETURN FIRST WORD OF TABLE ENTRY 24459 M01S19827.dsdi +++| EQ RDRX RETURN 24460 M01S19828.dsdi +++| 24461 M01S19829.dsdi +++|
| Line S19830 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | dsdi67 |
Seq # *Modification Id* Act ----------------------------+ 24462 M02S19830.dsdi67 ---| RDRA DATA 0 FIRST WORD OF DUMP RECORD
| Line S19831 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | dsdi67 |
Seq # *Modification Id* Act ----------------------------+ 24463 M02S19831.dsdi67 ---| RDRB CON 0 NEXT DIRECTORY TABLE ENTRY POINTER 24464 M01S00245.dsdi67 +++| RDRA DATA 0 FIRST WORD OF DIRECTORY TABLE ENTRY
| Line S19832 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | ns2647 |
Seq # *Modification Id* Act ----------------------------+ 24465 M02S19832.ns2647 ---| RIU SPACE 4,15
| Line S19833 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | ns2647 |
Seq # *Modification Id* Act ----------------------------+ 24466 M02S19833.ns2647 ---|** RIU - READ IOU PP IMAGE.
| Line S19834 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | ns2647 |
Seq # *Modification Id* Act ----------------------------+ 24467 M02S19834.ns2647 ---|*
| Line S19835 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | ns2647 |
Seq # *Modification Id* Act ----------------------------+ 24468 M02S19835.ns2647 ---|* ENTRY (PP) = PP NUMBER.
| Line S19836 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | ns2647 |
Seq # *Modification Id* Act ----------------------------+ 24469 M02S19836.ns2647 ---|*
| Line S19837 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | ns2647 |
Seq # *Modification Id* Act ----------------------------+ 24470 M02S19837.ns2647 ---|* EXIT IOU IMAGE IN PBUF - PBUF+IUBUFL.
| Line S19838 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | ns2647 |
Seq # *Modification Id* Act ----------------------------+ 24471 M02S19838.ns2647 ---|*
| Line S19839 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | ns2647 |
Seq # *Modification Id* Act ----------------------------+ 24472 M02S19839.ns2647 ---|* USES A - 2.
| Line S19840 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | ns2647 |
Seq # *Modification Id* Act ----------------------------+ 24473 M02S19840.ns2647 ---|* X - 2.
| Line S19841 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | ns2647 |
Seq # *Modification Id* Act ----------------------------+ 24474 M02S19841.ns2647 ---|*
| Line S19842 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | ns2647 |
Seq # *Modification Id* Act ----------------------------+ 24475 M02S19842.ns2647 ---|* CALLS BPN, CPD, SPD.
| Line S19843 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | ns2647 |
Seq # *Modification Id* Act ----------------------------+ 24476 M02S19843.ns2647 ---|*
| Line S19844 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | ns2647 |
Seq # *Modification Id* Act ----------------------------+ 24477 M02S19844.ns2647 ---|* MACROS SEARCH.
| Line S19845 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | ns2647 |
Seq # *Modification Id* Act ----------------------------+ 24478 M02S19845.ns2647 ---|
| Line S19846 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | ns2647 |
Seq # *Modification Id* Act ----------------------------+ 24479 M02S19846.ns2647 ---|
| Line S19847 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | ns2647 |
Seq # *Modification Id* Act ----------------------------+ 24480 M02S19847.ns2647 ---| RIU SUBR ENTRY/EXIT
| Line S19848 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | ns2647 |
Seq # *Modification Id* Act ----------------------------+ 24481 M02S19848.ns2647 ---| RJ BPN BUILD PP NAME
| Line S19849 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | ns2647 |
Seq # *Modification Id* Act ----------------------------+ 24482 M02S19849.ns2647 ---| SEARCH TDIR,X7,X0 FIND SELECTED PP
| Line S19850 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | ns2647 |
Seq # *Modification Id* Act ----------------------------+ 24483 M02S19850.ns2647 ---| ZR X2,ERR7 IF NOT FOUND
| Line S19851 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | ns2647 |
Seq # *Modification Id* Act ----------------------------+ 24484 M02S19851.ns2647 ---| SA2 A2+B1 SET RANDOM INDEX
| Line S19852 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | ns2647 |
Seq # *Modification Id* Act ----------------------------+ 24485 M02S19852.ns2647 ---| RJ SPD SET UP PP/CPP DUMP
| Line S19853 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | ns2647 |
Seq # *Modification Id* Act ----------------------------+ 24486 M02S19853.ns2647 ---| RJ CPD COPY PP DATA TO BUFFER
| Line S19854 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | ns2647 |
Seq # *Modification Id* Act ----------------------------+ 24487 M02S19854.ns2647 ---| EQ RIUX RETURN 24488 M01S19855.dsdi +++| RMB SPACE 4,10 24489 M01S19856.dsdi +++|** RMB - READ MEMORY BYTES. 24490 M01S19857.dsdi +++|* 24491 M01S19858.dsdi +++|* ENTRY (X1) = SVA OF BYTES TO READ. 24492 M01S19859.dsdi +++|* (X6) = NUMBER OF WORDS OF BYTES TO READ. 24493 M01S19860.dsdi +++|* 24494 M01S19861.dsdi +++|* EXIT (BUF - BUF+X6*4-1) = 16 BIT DATA CHUNKS. 24495 M01S19862.dsdi +++|* 24496 M01S19863.dsdi +++|* USES A - 0, 2, 3, 6, 7. 24497 M01S19864.dsdi +++|* X - 4, 6. 24498 M01S19865.dsdi +++|* B - 2. 24499 M01S19866.dsdi +++|* 24500 M01S19867.dsdi +++|* CALLS CPC, NXB. 24501 M01S19868.dsdi +++| 24502 M01S19869.dsdi +++| 24503 M01S19870.dsdi +++| RMB SUBR ENTRY/EXIT 24504 M01S19871.dsdi +++| SA6 RMBA SAVE NUMBER OF WORDS TO READ 24505 M01S19872.dsdi +++| BX6 X1 24506 M01S19873.dsdi +++| SA6 A6+B1 SAVE CURRENT SVA 24507 M01S19874.dsdi +++| SA0 BUF+1 24508 M01S19875.dsdi +++| RMB1 SB2 RMBA+1 CHECK IF CROSSING A PAGE BOUNDARY 24509 M01S19876.dsdi +++| RJ CPC 24510 M01S19877.dsdi +++| NZ X2,ERR30 IF PAGE ENTRY NOT PRESENT 24511 M01S19878.dsdi +++| RJ NXB GET NEXT 16 BITS 24512 M01S19879.dsdi +++| BX6 X1 24513 M01S19880.dsdi +++| SA6 A0-B1 24514 M01S19881.dsdi +++| RJ NXB AND THE NEXT 24515 M01S19882.dsdi +++| BX6 X1 24516 M01S19883.dsdi +++| SA6 A0 24517 M01S19884.dsdi +++| RJ NXB AND THE NEXT 24518 M01S19885.dsdi +++| BX6 X1 24519 M01S19886.dsdi +++| SA6 A0+B1 24520 M01S19887.dsdi +++| RJ NXB AND THE LAST 24521 M01S19888.dsdi +++| SA2 RMBA FETCH SVA 24522 M01S19889.dsdi +++| SA3 A2+B1 24523 M01S19890.dsdi +++| BX6 X1 24524 M01S19891.dsdi +++| SA6 A0+2 24525 M01S19892.dsdi +++| SX6 X2-1 24526 M01S19893.dsdi +++| SX4 8 24527 M01S19894.dsdi +++| SA0 A0+4 24528 M01S19895.dsdi +++| IX7 X4+X3 24529 M01S19896.dsdi +++| SA6 A2 24530 M01S19897.dsdi +++| SA7 A3 INCREMENT SVA 24531 M01S19898.dsdi +++| NZ X2,RMB1 IF MORE WORDS TO READ 24532 M01S19899.dsdi +++| JP RMBX RETURN 24533 M01S19900.dsdi +++| 24534 M01S19901.dsdi +++| RMBA BSS 2 24535 M01S19902.dsdi +++| RMR SPACE 4,15 24536 M01S19903.dsdi +++|** RMR - READ MAINTENANCE REGISTER. 24537 M01S19904.dsdi +++|* 24538 M01S19905.dsdi +++|* ENTRY (LPWA+1) = WORD OFFSET. 24539 M01S19906.dsdi +++|* 24540 M01S19907.dsdi +++|* EXIT (X1) = 0 IF END OF REGISTERS. 24541 M01S19908.dsdi +++|* (RMRA) = REGISTER LENGTH. 24542 M01S19909.dsdi +++|* (RMRB) = REGISTER NUMBER. 24543 M01S19910.dsdi +++|* (MRBF,MRBF+7) = 1ST 64 BITS OF REGISTER. 24544 M01S19911.dsdi +++|* 24545 M01S19912.dsdi +++|* USES B - 3, 4. 24546 M01S19913.dsdi +++|* A - 6, 7. 24547 M01S19914.dsdi +++|* X - 1, 7. 24548 M01S19915.dsdi +++|* 24549 M01S19916.dsdi +++|* CALLS LPW. 24550 M01S19917.dsdi +++| 24551 M01S19918.dsdi +++| 24552 M01S19919.dsdi +++| RMR SUBR ENTRY/EXIT 24553 M01S19920.dsdi +++| RJ LPW GET REGISTER LENGTH 24554 M01S19921.dsdi +++| ZR X1,RMRX IF END OF REGISTERS 24555 M01S19922.dsdi +++| SX7 X6 24556 M01S19923.dsdi +++| RJ LPW GET REGISTER NUMBER 24557 M01S19924.dsdi +++| SA7 RMRA 24558 M01S19925.dsdi +++| SA6 A7+B1 24559 M01S19926.dsdi +++| SB4 B0 24560 M01S19927.dsdi +++| SB3 X7 24561 M01S19928.dsdi +++| RMR1 RJ LPW GET ANOTHER 8 BITS OF REGISTER 24562 M01S19929.dsdi +++| SA6 MRBF+B4 24563 M01S19930.dsdi +++| SB4 B4+B1 24564 M01S19931.dsdi +++| MX1 1 24565 M01S19932.dsdi +++| NE B3,B4,RMR1 IF MORE BYTES TO GET 24566 M01S19933.dsdi +++| EQ RMRX RETURN 24567 M01S19934.dsdi +++| 24568 M01S19935.dsdi +++| 24569 M01S19936.dsdi +++| RMRA CON 0 REGISTER LENGTH 24570 M01S19937.dsdi +++| RMRB CON 0 REGISTER NUMBER 24571 M01S19938.dsdi +++| RNF SPACE 4,20 24572 M01S19939.dsdi +++|** RNF - READ NEGATIVE FL OF CONTROL POINT. 24573 M01S19940.dsdi +++|*
| Line S19941 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | dsdi89 |
Seq # *Modification Id* Act ----------------------------+ 24574 M02S19941.dsdi89 ---|* ENTRY (CN) = CONTROL POINT NUMBER.
| Line S00402 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | dsdi89 |
Seq # *Modification Id* Act ----------------------------+ 24575 M02S00402.dsdi89 ---|* (OP) = PCPA FWA OFFSET (0 IF DUMPING CONTROL POINTS). 24576 M01S00135.dsdi89 +++|* ENTRY (X2) = CONTROL POINT NUMBER. 24577 M01S00136.dsdi89 +++|* (X1) = PCPA FWA OFFSET (0 IF DUMPING CONTROL POINTS). 24578 M01S19942.dsdi +++|* 24579 M01S19943.dsdi +++|* EXIT (RC) = RA. 24580 M01S19944.dsdi +++|* (FC) = FL. 24581 M01S19945.dsdi +++|* TABLE TNFL CONTAINS NFL DATA. 24582 M01S19946.dsdi +++|* 24583 M01S19947.dsdi +++|* ERROR TO *ERR8*, IF CONTROL POINT NUMBER IS ZERO. 24584 M01S19948.dsdi +++|*
| Line S19949 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | dsdi71a |
Seq # *Modification Id* Act ----------------------------+ 24585 M02S19949.dsdi71a ---|* USES X - 1, 2, 3, 6, 7.
| Line S19950 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | dsdi71a |
Seq # *Modification Id* Act ----------------------------+ 24586 M02S19950.dsdi71a ---|* A - 1, 2, 7. 24587 M01S00069.dsdi71a +++|* USES X - 1, 2, 6, 7. 24588 M01S00070.dsdi71a +++|* A - 1, 2, 6, 7. 24589 M01S19951.dsdi +++|* B - 2. 24590 M01S19952.dsdi +++|*
| Line S19953 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | dsdi71a |
Seq # *Modification Id* Act ----------------------------+ 24591 M02S19953.dsdi71a ---|* CALLS POM. 24592 M01S00071.dsdi71a +++|* CALLS GFL, POM. 24593 M01S19954.dsdi +++|* 24594 M01S19955.dsdi +++|* MACROS ALLOC, GETCM. 24595 M01S19956.dsdi +++| 24596 M01S19957.dsdi +++| 24597 M01S19958.dsdi +++| RNF SUBR ENTRY/EXIT
| Line S19959 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | dsdi71a |
Seq # *Modification Id* Act ----------------------------+ 24598 M02S19959.dsdi71a ---| SA1 F.TCMT FORM CONTROL POINT AREA ADDRESS
| Line S19960 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | dsdi89 |
Seq # *Modification Id* Act ----------------------------+ 24599 M02S19960.dsdi89 ---| SA2 CN
| Line S19961 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | dsdi69 |
Seq # *Modification Id* Act ----------------------------+ 24600 M02S19961.dsdi69 ---| ZR X2,ERR8 IF CONTROL POINT ZERO 24601 M01S00053.dsdi69 +++| ZR X2,ERR8.1 IF CONTROL POINT ZERO 24602 M01S19962.dsdi +++| LX2 7
| Line S19963 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | dsdi71a |
Seq # *Modification Id* Act ----------------------------+ 24603 M02S19963.dsdi71a ---| IX2 X1+X2
| Line S00403 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | dsdi89 |
Seq # *Modification Id* Act ----------------------------+ 24604 M02S00403.dsdi89 ---| SA1 OP ADD PCPA OFFSET
| Line S00404 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Updated by) | dsdi71a |
Seq # *Modification Id* Act ----------------------------+ 24605 M02S00404.dsdi71a ---| IX2 X1+X2
| Line S19964 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | dsdi71a |
Seq # *Modification Id* Act ----------------------------+ 24606 M02S19964.dsdi71a ---| SA2 X2+FLSW GET FL
| Line S19965 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | dsdi71a |
Seq # *Modification Id* Act ----------------------------+ 24607 M02S19965.dsdi71a ---| MX3 -12
| Line S19966 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | dsdi71a |
Seq # *Modification Id* Act ----------------------------+ 24608 M02S19966.dsdi71a ---| BX7 -X3*X2
| Line S19967 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | dsdi71a |
Seq # *Modification Id* Act ----------------------------+ 24609 M02S19967.dsdi71a ---| LX7 6
| Line S19968 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | dsdi71a |
Seq # *Modification Id* Act ----------------------------+ 24610 M02S19968.dsdi71a ---| AX2 12 GET RA 24611 M01S00072.dsdi71a +++| IX1 X1+X2 24612 M01S00073.dsdi71a +++| RJ GFL GET FL, RA 24613 M01S19969.dsdi +++| SA7 FC
| Line S19970 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | dsdi71a |
Seq # *Modification Id* Act ----------------------------+ 24614 M02S19970.dsdi71a ---| MX7 -15
| Line S19971 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | dsdi71a |
Seq # *Modification Id* Act ----------------------------+ 24615 M02S19971.dsdi71a ---| BX7 -X7*X2
| Line S19972 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | dsdi71a |
Seq # *Modification Id* Act ----------------------------+ 24616 M02S19972.dsdi71a ---| LX7 6
| Line S19973 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | dsdi71a |
Seq # *Modification Id* Act ----------------------------+ 24617 M02S19973.dsdi71a ---| SA7 RC 24618 M01S00074.dsdi71a +++| SA6 RC 24619 M01S19974.dsdi +++| AX2 36 GET NFL
| Line S19975 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | dsdi71a |
Seq # *Modification Id* Act ----------------------------+ 24620 M02S19975.dsdi71a ---| BX6 -X3*X2 24621 M01S00075.dsdi71a +++| MX6 -12 24622 M01S00076.dsdi71a +++| BX6 -X6*X2 24623 M01S19976.dsdi +++| LX6 6 24624 M01S19977.dsdi +++| SA2 L.TNFL ALLOCATE SPACE FOR NFL 24625 M01S19978.dsdi +++| IX1 X6-X2 24626 M01S19979.dsdi +++| ALLOC TNFL,X1 24627 M01S19980.dsdi +++| SA1 RC POSITION DUMP FILE 24628 M01S19981.dsdi +++| SA2 L.TNFL 24629 M01S19982.dsdi +++| IX7 X1-X2 24630 M01S19983.dsdi +++| SA7 CPRA 24631 M01S19984.dsdi +++| SB2 A7 24632 M01S19985.dsdi +++| RJ POM POSITION TO CM WORD 24633 M01S19986.dsdi +++| SA2 L.TNFL LENGTH TO READ 24634 M01S19987.dsdi +++| SA1 F.TNFL BUFFER ADDRESS 24635 M01S19988.dsdi +++| ZR X2,RNFX IF NO NFL TO READ 24636 M01S19989.dsdi +++| GETCM X1,X2 24637 M01S19990.dsdi +++| EQ RNFX RETURN 24638 M01S19991.dsdi +++| RPB SPACE 4,10 24639 M01S19992.dsdi +++|** RPB - READ PPU BYTE. 24640 M01S19993.dsdi +++|* 24641 M01S19994.dsdi +++|* ENTRY X1 = PPU ADDRESS TO READ. 24642 M01S19995.dsdi +++|* PPU DATA IS AT *PBUF*. 24643 M01S19996.dsdi +++|* 24644 M01S19997.dsdi +++|* EXIT X6 = PPU BYTE READ LEFT JUSTIFIED. 24645 M01S19998.dsdi +++|* 24646 M01S19999.dsdi +++|* USES X - 1,2,3,6. 24647 M01S20000.dsdi +++|* B - 7. 24648 M01S20001.dsdi +++|* A - 2. 24649 M01S20002.dsdi +++| 24650 M01S20003.dsdi +++| 24651 M01S20004.dsdi +++| RPB SUBR 24652 M01S20005.dsdi +++| BX3 X1 24653 M01S20006.dsdi +++| SX2 5 24654 M01S20007.dsdi +++| IX2 X3/X2 CPU WORD ORDINAL = AD/5 24655 M01S20008.dsdi +++| SX3 5 24656 M01S20009.dsdi +++| IX3 X2*X3 COMPUTE BYTE POS = AD-(AD/5)*5 24657 M01S20010.dsdi +++| IX3 X1-X3 24658 M01S20011.dsdi +++| SX1 12 24659 M01S20012.dsdi +++| IX1 X1*X3 24660 M01S20013.dsdi +++| SB7 X1 SHIFT COUNT 24661 M01S20014.dsdi +++| MX1 12 24662 M01S20015.dsdi +++| SA2 X2+PBUF READ WORD 24663 M01S20016.dsdi +++| LX2 X2,B7 POSITION TO BYTE 24664 M01S20017.dsdi +++| BX6 X1*X2 EXTRACT BYTE 24665 M01S20018.dsdi +++| JP RPBX EXIT 24666 M01S20019.dsdi +++| RPD SPACE 4,12 24667 M01S20020.dsdi +++|** RPD - READ PPU DATA TO CORE. 24668 M01S20021.dsdi +++|*
| Line S20022 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | ns2647 |
Seq # *Modification Id* Act ----------------------------+ 24669 M02S20022.ns2647 ---|* ENTRY PP = PPU NUMBER. 24670 M01S00315.ns2647 +++|* ENTRY (PP) = PPU NUMBER. 24671 M01S20023.dsdi +++|* 24672 M01S20024.dsdi +++|* EXIT ALL OF REQUESTED PPU STORED AT *PBUF*.
| Line S20025 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | ns2647 |
Seq # *Modification Id* Act ----------------------------+ 24673 M02S20025.ns2647 ---|* BPNA = PPU NAME.
| Line S20026 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | ns2647 |
Seq # *Modification Id* Act ----------------------------+ 24674 M02S20026.ns2647 ---|*
| Line S20027 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | ns2647 |
Seq # *Modification Id* Act ----------------------------+ 24675 M02S20027.ns2647 ---|* SAVES B - 1.
| Line S20028 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | ns2647 |
Seq # *Modification Id* Act ----------------------------+ 24676 M02S20028.ns2647 ---|* A - 0.
| Line S20029 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | ns2647 |
Seq # *Modification Id* Act ----------------------------+ 24677 M02S20029.ns2647 ---|*
| Line S20030 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | ns2647 |
Seq # *Modification Id* Act ----------------------------+ 24678 M02S20030.ns2647 ---|* CALLS BPN, CPD, NXB, PDF, SFN. 24679 M01S00316.ns2647 +++|* (BPNA) = PPU NAME. 24680 M01S00317.ns2647 +++|* 24681 M01S00318.ns2647 +++|* USES X - 0, 1, 2, 3, 4, 5, 6. 24682 M01S00319.ns2647 +++|* A - 1, 2, 3, 6. 24683 M01S00320.ns2647 +++|* B - 2, 6, 7. 24684 M01S00321.ns2647 +++|* 24685 M01S00322.ns2647 +++|* CALLS BPN, CPD, CPN, NXB, PDF, SFN. 24686 M01S20031.dsdi +++|* 24687 M01S20032.dsdi +++|* MACROS READW, SEARCH. 24688 M01S20033.dsdi +++| 24689 M01S20034.dsdi +++| 24690 M01S20035.dsdi +++| RPD SUBR 24691 M01S20036.dsdi +++| RJ BPN BUILD PPU NAME 24692 M01S20037.dsdi +++| SA1 F.TCMT 24693 M01S20038.dsdi +++| SB2 X1 SET TCMT TABLE ADDRESS 24694 M01S20039.dsdi +++| MX4 24 24695 M01S20040.dsdi +++| SA1 PC GET PP COMMUNICATION AREA POINTER
| Line S20041 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | ns2647 |
Seq # *Modification Id* Act ----------------------------+ 24696 M02S20041.ns2647 ---| SA2 PP PPU NUMBER
| Line S20042 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | ns2647 |
Seq # *Modification Id* Act ----------------------------+ 24697 M02S20042.ns2647 ---| SA3 NP
| Line S20043 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | ns2647 |
Seq # *Modification Id* Act ----------------------------+ 24698 M02S20043.ns2647 ---| SX7 X2-12B
| Line S20044 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | ns2647 |
Seq # *Modification Id* Act ----------------------------+ 24699 M02S20044.ns2647 ---| NG X7,RPD1 IF NOT UPPER PPUS
| Line S20045 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | ns2647 |
Seq # *Modification Id* Act ----------------------------+ 24700 M02S20045.ns2647 ---| SX2 X2+12B-20B CORRECT FOR UPPER PPU BANK
| Line S20046 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | ns2647 |
Seq # *Modification Id* Act ----------------------------+ 24701 M02S20046.ns2647 ---| RPD1 SA5 IC
| Line S20047 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | ns2647 |
Seq # *Modification Id* Act ----------------------------+ 24702 M02S20047.ns2647 ---| ZR X5,RPD1.0 IF *CPP* RECORDS NOT CHOSEN
| Line S20048 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | ns2647 |
Seq # *Modification Id* Act ----------------------------+ 24703 M02S20048.ns2647 ---| IX2 X2+X3 24704 M01S00323.ns2647 +++| RJ CPN CONVERT PP/CPP NUMBER 24705 M01S00324.ns2647 +++| ZR X3,RPD1 IF *CPP* RECORDS NOT CHOSEN 24706 M01S20049.dsdi +++| MX4 30
| Line S20050 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | ns2647 |
Seq # *Modification Id* Act ----------------------------+ 24707 M02S20050.ns2647 ---| RPD1.0 LX2 3
| Line S20051 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | ns2647 |
Seq # *Modification Id* Act ----------------------------+ 24708 M02S20051.ns2647 ---| IX1 X1+X2 24709 M01S00325.ns2647 +++| RPD1 LX6 3 24710 M01S00326.ns2647 +++| IX1 X1+X6 24711 M01S20052.dsdi +++| SA2 X1+B2 24712 M01S20053.dsdi +++| MX3 18 24713 M01S20054.dsdi +++| BX1 X3*X2 EXTRACT PROGRAM NAME 24714 M01S20055.dsdi +++| RJ SFN SPACEFILL NAME 24715 M01S20056.dsdi +++| LX6 24 24716 M01S20057.dsdi +++| SA1 BPNA+1 24717 M01S20058.dsdi +++| BX6 -X4*X6 24718 M01S20059.dsdi +++| BX6 X6+X1 MERGE PP AND PROGRAM NAMES 24719 M01S20060.dsdi +++| SA1 A1-B1 GET PP RECORD NAME 24720 M01S20061.dsdi +++| SA6 SBTL1 STORE IN SUBTITLE LINE 24721 M01S20062.dsdi +++| SEARCH TDIR,X1,X0 24722 M01S20063.dsdi +++| ZR X2,ERR7 IF NO SUCH PPU 24723 M01S20064.dsdi +++| SA1 A2+B1 24724 M01S20065.dsdi +++| BX6 X1 24725 M01S20066.dsdi +++| SA6 RI SET RANDOM ADDRESS OF REQUESTED PPU 24726 M01S20067.dsdi +++| SX3 0 24727 M01S20068.dsdi +++| RJ PDF POSITION DUMP FILE 24728 M01S20069.dsdi +++| SA3 AP 24729 M01S20070.dsdi +++| NZ X3,RPD2 IF IOU TO BE READ 24730 M01S20071.dsdi +++| READW X2,PBUF,PBUFL READ ENTIRE PPU TO CORE 24731 M01S20072.dsdi +++| JP RPDX EXIT 24732 M01S20073.dsdi +++| 24733 M01S20074.dsdi +++| RPD2 RJ CPD COPY PP DATA TO BUFFER 24734 M01S20075.dsdi +++| SB7 B0 STORING INDEX INTO PBUF
| Line S20076 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | dsdi56 |
Seq # *Modification Id* Act ----------------------------+ 24735 M02S20076.dsdi56 ---| SB6 5
| Line S20077 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | dsdi56 |
Seq # *Modification Id* Act ----------------------------+ 24736 M02S20077.dsdi56 ---| BX5 X5-X5 24737 M01S20078.dsdi +++| MX0 -12
| Line S20079 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | dsdi56 |
Seq # *Modification Id* Act ----------------------------+ 24738 M02S20079.dsdi56 ---| RPD3 RJ NXB GET FIRST BYTE OF DATA 24739 M01S00297.dsdi56 +++| RPD3 SB6 5 24740 M01S00298.dsdi56 +++| SX5 B0+ 24741 M01S00299.dsdi56 +++| RPD4 RJ NXB GET FIRST BYTE OF DATA 24742 M01S20080.dsdi +++| LX5 12 24743 M01S20081.dsdi +++| BX2 -X0*X1
| Line S20082 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | dsdi56 |
Seq # *Modification Id* Act ----------------------------+ 24744 M02S20082.dsdi56 ---| IX5 X5+X2 24745 M01S20083.dsdi +++| SB6 B6-B1
| Line S20084 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | dsdi56 |
Seq # *Modification Id* Act ----------------------------+ 24746 M02S20084.dsdi56 ---| NZ B6,RPD3 IF MORE BYTES TO COLLECT 24747 M01S00300.dsdi56 +++| BX5 X5+X2 24748 M01S00301.dsdi56 +++| NZ B6,RPD4 IF MORE BYTES TO COLLECT 24749 M01S00302.dsdi56 +++| SA1 PS BYTES IN PP (4096 OR 8192) 24750 M01S20085.dsdi +++| BX6 X5
| Line S20086 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | dsdi56 |
Seq # *Modification Id* Act ----------------------------+ 24751 M02S20086.dsdi56 ---| SA6 PBUF+B7 SAVE PP BYTES 24752 M01S00303.dsdi56 +++| SX5 B7+B1 WORDS MOVED 24753 M01S20087.dsdi +++| SB7 B7+B1
| Line S20088 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | dsdi56 |
Seq # *Modification Id* Act ----------------------------+ 24754 M02S20088.dsdi56 ---| SB6 5
| Line S20089 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | dsdi56 |
Seq # *Modification Id* Act ----------------------------+ 24755 M02S20089.dsdi56 ---| BX5 X5-X5
| Line S20090 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | dsdi56 |
Seq # *Modification Id* Act ----------------------------+ 24756 M02S20090.dsdi56 ---| SB4 PBUFL
| Line S20091 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | dsdi56 |
Seq # *Modification Id* Act ----------------------------+ 24757 M02S20091.dsdi56 ---| NE B7,B4,RPD3 IF MORE WORDS TO READ 24758 M01S00304.dsdi56 +++| LX5 2 24759 M01S00305.dsdi56 +++| SA6 PBUF-1+B7 SAVE PP BYTES 24760 M01S00306.dsdi56 +++| SX6 X5+B7 BYTES MOVED 24761 M01S00307.dsdi56 +++| IX6 X6-X1 24762 M01S00308.dsdi56 +++| NG X6,RPD3 IF MORE TO MOVE 24763 M01S20092.dsdi +++| EQ RPDX RETURN 24764 M01S20093.dsdi +++| RSP SPACE 4,14 24765 M01S20094.dsdi +++|** RSP - RESET PRINT DENSITY SELECTION. 24766 M01S20095.dsdi +++|* 24767 M01S20096.dsdi +++|* ENTRY X1 = 1L3 FOR 3 LINES PER INCH. 24768 M01S20097.dsdi +++|* 1L4 FOR 4 LINES PER INCH. 24769 M01S20098.dsdi +++|* 1L6 FOR 6 LINES PER INCH. 24770 M01S20099.dsdi +++|* 1L8 FOR 8 LINES PER INCH. 24771 M01S20100.dsdi +++|* 24772 M01S20101.dsdi +++|* EXIT CCCH = 1R0 FOR 3 OR 4 LINES PER INCH. 24773 M01S20102.dsdi +++|* 1R FOR 6 OR 8 LINES PER INCH. 24774 M01S20103.dsdi +++|* PD = NUMBER OF LINES PER PAGE. 24775 M01S20104.dsdi +++|* 24776 M01S20105.dsdi +++|* USES ALL REGISTERS. 24777 M01S20106.dsdi +++|* 24778 M01S20107.dsdi +++|* CALLS WTO=. 24779 M01S20108.dsdi +++| 24780 M01S20109.dsdi +++| 24781 M01S20110.dsdi +++| RSP SUBR 24782 M01S20111.dsdi +++| SB2 RSPA OPTION TABLE ADDRESS 24783 M01S20112.dsdi +++| MX0 6 24784 M01S20113.dsdi +++| RSP1 SA2 B2 READ OPTION TABLE 24785 M01S20114.dsdi +++| SB2 B2+B1 24786 M01S20115.dsdi +++| ZR X2,ERR9 IF OPTION NOT IN TABLE 24787 M01S20116.dsdi +++| BX3 X1-X2 24788 M01S20117.dsdi +++| BX3 X3*X0 24789 M01S20118.dsdi +++| NZ X3,RSP1 IF NO MATCH 24790 M01S20119.dsdi +++| SX6 X2 24791 M01S20120.dsdi +++| AX2 18 24792 M01S20121.dsdi +++| NG X6,ERR9 IF VALUE UNUSABLE 24793 M01S20122.dsdi +++| ZR X6,ERR9 IF VALUE UNUSABLE 24794 M01S20123.dsdi +++| SA6 PD SET NUMBER OF LINES PER PAGE 24795 M01S20124.dsdi +++| SX6 X2+ 24796 M01S20125.dsdi +++| SA6 CCCH SET CARRIAGE CONTROL CHARACTER 24797 M01S20126.dsdi +++| SA6 CC 24798 M01S20127.dsdi +++| SA1 TF 24799 M01S20128.dsdi +++| NZ X1,RSPX IF TERMINAL OUTPUT 24800 M01S20129.dsdi +++| AX2 18 24801 M01S20130.dsdi +++| SX6 X2 24802 M01S20131.dsdi +++| LX6 -18 24803 M01S20132.dsdi +++| SA2 OF 24804 M01S20133.dsdi +++| WRITEO X2 OUTPUT DENSITY SELECTION CONTROL CHAR 24805 M01S20134.dsdi +++| JP RSPX EXIT 24806 M01S20135.dsdi +++| 24807 M01S20136.dsdi +++| RSPA BSS 0 PRINT DENSITY OPTION TABLE 24808 M01S20137.dsdi +++| VFD 6/1L3,18/1LS,18/1R0,18/RSPC 24809 M01S20138.dsdi +++| VFD 6/1L4,18/1LT,18/1R0,18/RSPD 24810 M01S20139.dsdi +++| VFD 6/1L6,18/1LS,18/1R ,18/RSPB 24811 M01S20140.dsdi +++| VFD 6/1L8,18/1LT,18/1R ,18/RSPE 24812 M01S20141.dsdi +++| VFD 60/0 24813 M01S20142.dsdi +++| RSPB EQU LINP-3 6 LINES PER INCH DENSITY 24814 M01S20143.dsdi +++| RSPC EQU RSPB/2 3 LINES PER INCH DENSITY 24815 M01S20144.dsdi +++| RSPD EQU RSPB*2/3 4 LINES PER INCH DENSITY 24816 M01S20145.dsdi +++| RSPE EQU RSPB*4/3 8 LINES PER INCH DENSITY
| Line S20146 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | dsdi74 |
Seq # *Modification Id* Act ----------------------------+ 24817 M02S20146.dsdi74 ---| RST SPACE 4,11 24818 M01S00062.dsdi74 +++| RST SPACE 4,20 24819 M01S20147.dsdi +++|** RST - READ SYSTEM TABLES. 24820 M01S20148.dsdi +++|* 24821 M01S20149.dsdi +++|* READS ALL TABLES THROUGH THE SECDED ID TABLE 24822 M01S20150.dsdi +++|* FROM THE DUMP FILE TO TABLE *TCMT*. 24823 M01S20151.dsdi +++|* 24824 M01S20152.dsdi +++|* ENTRY (PF) = 0, IF TO READ LOW CORE WORDS FROM DUMP FILE. 24825 M01S20153.dsdi +++|* ELSE, READ LOW CORE WORDS FROM RUNNING SYSTEM. 24826 M01S20154.dsdi +++|* 24827 M01S20155.dsdi +++|* EXIT (CF) = NONZERO, IF CYBER 176. 24828 M01S00405.271l716 +++|* (ME) = NUMBER OF MEMORY CONTROL TABLE (MCT) ENTRIES. 24829 M01S20156.dsdi +++|* (NC) = NUMBER OF CONTROL POINTS - 1. 24830 M01S20157.dsdi +++|* (NP) = NUMBER OF PPU-S IN SYSTEM. 24831 M01S20158.dsdi +++|* (PC) = PP COMMUNICATION AREA POINTER. 24832 M01S20159.dsdi +++|* 24833 M01S20160.dsdi +++|* USES X - 0, 1, 2, 3, 6, 7. 24834 M01S20161.dsdi +++|* A - 1, 2, 3, 6, 7. 24835 M01S20162.dsdi +++|*
| Line S20163 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | dsdi74 |
Seq # *Modification Id* Act ----------------------------+ 24836 M02S20163.dsdi74 ---|* CALLS PCM. 24837 M01S00063.dsdi74 +++|* CALLS GID, PCM. 24838 M01S20164.dsdi +++|*
| Line S20165 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | dsdi74 |
Seq # *Modification Id* Act ----------------------------+ 24839 M02S20165.dsdi74 ---|* MACROS ALLOC, GETCM, SYSTEM. 24840 M01S00064.dsdi74 +++|* MACROS ALLOC, GETCM, SEARCH, SYSTEM. 24841 M01S20166.dsdi +++| 24842 M01S20167.dsdi +++| 24843 M01S20168.dsdi +++| RST SUBR 24844 M01S20169.dsdi +++| ALLOC TCMT,CPAS ALLOCATE LOW CORE POINTER SPACE 24845 M01S20170.dsdi +++| SA1 PF 24846 M01S20171.dsdi +++| NZ X1,RST6 IF POINTERS TO COME FROM RUNNING SYSTEM 24847 M01S20172.dsdi +++| SX3 0 24848 M01S20173.dsdi +++| RJ PCM 24849 M01S20174.dsdi +++| SA1 F.TCMT 24850 M01S20175.dsdi +++| SA2 L.TCMT 24851 M01S20176.dsdi +++| GETCM X1,X2 24852 M01S20177.dsdi +++| RST1 SA1 F.TCMT 24853 M01S20178.dsdi +++| SA1 X1+JBCP READ JOB CONTROL AREA POINTER 24854 M01S20179.dsdi +++| LX1 24 24855 M01S20180.dsdi +++| SX1 X1-CPAS LENGTH OF REMAINING CM TABLES 24856 M01S20181.dsdi +++| SX2 X1-110000B CHECK IF CMR SIZE REASONABLE 24857 M01S20182.dsdi +++| NG X1,RST2 IF UNREASONABLE SIZE 24858 M01S20183.dsdi +++| NG X2,RST3 IF SIZE WITHIN MAXIMUM 24859 M01S20184.dsdi +++| RST2 SX1 20000B SELECT LOAD LENGTH IF CMR BASHED 24860 M01S20185.dsdi +++| RST3 ALLOC TCMT,X1 ALLOCATE REMAINDER OF TABLE 24861 M01S20186.dsdi +++| GETCM X2+CPAS,X1 24862 M01S20187.dsdi +++| SA1 F.TCMT 24863 M01S20188.dsdi +++| SA2 X1+NCPL READ NUMBER OF CONTROL POINTS FROM SYSTEM 24864 M01S20189.dsdi +++| MX0 -12 24865 M01S20190.dsdi +++| SA3 X1+PPCP SET PP COMMUNICATION AREA POINTER 24866 M01S20191.dsdi +++| BX7 -X0*X3 24867 M01S20192.dsdi +++| LX2 24 24868 M01S20193.dsdi +++| LX3 36 SET EXTENDED MEMORY SHIFT COUNTS 24869 M01S20194.dsdi +++| ERRNZ MEFL-PPCP CODE ASSUMES SAME WORD 24870 M01S20195.dsdi +++| SA7 PC 24871 M01S20196.dsdi +++| BX7 -X0*X3 24872 M01S20197.dsdi +++| AX7 5
| Line S20198 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 24873 M02S20198.271l716 ---| MX1 -2
| Line S20199 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 24874 M02S20199.271l716 ---| BX6 -X1*X7 24875 M01S00406.271l716 +++| MX6 -2 24876 M01S00407.271l716 +++| BX6 -X6*X7 24877 M01S20200.dsdi +++| SA6 EM 24878 M01S20201.dsdi +++| AX7 4 24879 M01S20202.dsdi +++| SA7 UE 24880 M01S20203.dsdi +++| BX6 -X0*X2 EXTRACT NUMBER OF CONTROL POINTS 24881 M01S20204.dsdi +++| SX7 X6-/DSL/NCPS 24882 M01S20205.dsdi +++| NG X7,RST4 IF NOT MAXIMUM OR BAD POINTER 24883 M01S20206.dsdi +++| SX6 /DSL/NCPS SET MAXIMUM NUMBER OF CONTROL POINTS 24884 M01S20207.dsdi +++| RST4 SA6 NC 24885 M01S00408.271l716 +++| SA3 X1+MCTP SET NUMBER OF MCT ENTRIES 24886 M01S00409.271l716 +++| AX3 24 24887 M01S00410.271l716 +++| BX6 -X0*X3 24888 M01S00411.271l716 +++| SA6 ME 24889 M01S20208.dsdi +++| SX6 B0+
| Line S00065 Modification History | |
|---|---|
M01 (Added by) | dsdi74 |
M02 (Updated by) | 271l739 |
Seq # *Modification Id* Act ----------------------------+ 24890 M02S00065.271l739 ---| SA6 IO INITIALIZE *I4* IOU FLAG 24891 M01S00495.271l739 +++| SA6 IO INITIALIZE *I4A OR I4S IOU* FLAG 24892 M01S20209.dsdi +++| SA1 BD
| Line S20210 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | 271l739 |
Seq # *Modification Id* Act ----------------------------+ 24893 M02S20210.271l739 ---| NZ X1,RST5 IF *DMB* FILE, SKIP PP CHECKS
| Line S20211 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | ns2706 |
M03 (Updated by) | 271l739 |
Seq # *Modification Id* Act ----------------------------+ 24894 M03S20211.271l739 ---| SA1 =4LPP00
| Line S20212 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | ns2706 |
M03 (Updated by) | 271l739 |
Seq # *Modification Id* Act ----------------------------+ 24895 M03S20212.271l739 ---| MX0 24
| Line S00163 Modification History | |
|---|---|
M01 (Added by) | ns2706 |
M02 (Updated by) | 271l739 |
Seq # *Modification Id* Act ----------------------------+ 24896 M02S00163.271l739 ---| SA1 =2LPP
| Line S00164 Modification History | |
|---|---|
M01 (Added by) | ns2706 |
M02 (Updated by) | 271l739 |
Seq # *Modification Id* Act ----------------------------+ 24897 M02S00164.271l739 ---| MX0 12
| Line S20213 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | 271l739 |
Seq # *Modification Id* Act ----------------------------+ 24898 M02S20213.271l739 ---| SEARCH TDIR,X1,X0 24899 M01S00496.271l739 +++| NZ X1,RST5 IF *DMB* FILE, SKIP PP CHECKS 24900 M01S00497.271l739 +++| SA1 .NPP 24901 M01S00498.271l739 +++| MX0 12 24902 M01S00499.271l739 +++| SEARCH TDIR,X1,X0 24903 M01S20214.dsdi +++| ZR X2,ERR7 IF FIRST PP RECORD NOT FOUND 24904 M01S20215.dsdi +++| SX6 0 24905 M01S20216.dsdi +++| SA3 =2LPP 24906 M01S20217.dsdi +++| MX0 12 24907 M01S20218.dsdi +++| RST4.1 SX6 X6+B1 24908 M01S20219.dsdi +++| SA2 A2+2 GET NEXT DIRECTORY ENTRY 24909 M01S20220.dsdi +++| BX2 X0*X2 24910 M01S20221.dsdi +++| IX2 X3-X2 24911 M01S20222.dsdi +++| ZR X2,RST4.1 IF MORE PP RECORDS 24912 M01S20223.dsdi +++| SA6 AC NUMBER OF PP-S ON DUMP TAPE 24913 M01S20224.dsdi +++| SX7 X6-10D 24914 M01S20225.dsdi +++| ZR X7,RST5 IF 10 PP SYSTEM 24915 M01S20226.dsdi +++| SX6 MAXP SET MAXIMUM NUMBER OF PPU-S 24916 M01S20227.dsdi +++| RST5 SA6 NP SET NUMBER OF PP COMMUNICATION AREAS
| Line S20228 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | 271l739 |
Seq # *Modification Id* Act ----------------------------+ 24917 M02S20228.271l739 ---| SA1 RSTC 24918 M01S00500.271l739 +++| SA1 .CPP 24919 M01S20229.dsdi +++| MX0 24 24920 M01S20230.dsdi +++| SEARCH TDIR,X1,X0 24921 M01S20231.dsdi +++| SX6 0 24922 M01S20232.dsdi +++| ZR X2,RST5.2 IF NO *CPP* RECORDS 24923 M01S20233.dsdi +++| MX0 12
| Line S20234 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | 271l739 |
Seq # *Modification Id* Act ----------------------------+ 24924 M02S20234.271l739 ---| SA3 RSTC 24925 M01S00501.271l739 +++| SA3 .CPP 24926 M01S20235.dsdi +++| BX3 X0*X3 24927 M01S20236.dsdi +++| RST5.1 SX6 X6+1 24928 M01S20237.dsdi +++| SA2 A2+2 CHECK NEXT RECORD 24929 M01S20238.dsdi +++| BX2 X0*X2 24930 M01S20239.dsdi +++| IX2 X3-X2 24931 M01S20240.dsdi +++| ZR X2,RST5.1 IF CPP RECORD 24932 M01S20241.dsdi +++| RST5.2 SA6 C4 NUMBER OF CPP-S AND CPP COMM. AREAS 24933 M01S20242.dsdi +++| SA1 F.TCMT 24934 M01S20243.dsdi +++| SA2 X1+MABL GET HARDWARE OPTIONS 24935 M01S20244.dsdi +++| MX7 -2 SET CYBER 176 FLAG 24936 M01S20245.dsdi +++| LX2 0-45 24937 M01S20246.dsdi +++| BX6 -X7*X2 24938 M01S20247.dsdi +++| BX6 -X7-X6 24939 M01S20248.dsdi +++| SA6 CF 24940 M01S20249.dsdi +++| SX7 B1+ 24941 M01S20250.dsdi +++| LX2 0-47-0+45 24942 M01S20251.dsdi +++| BX6 X7*X2 24943 M01S20252.dsdi +++| NZ X6,RSTX IF NOT CYBER 8X5 24944 M01S20253.dsdi +++| SA7 CE SET CM EXTENSION 24945 M01S00001.dsdi84 +++| LX2 59-42-0+47-60 24946 M01S00002.dsdi84 +++| PL X2,RSTX IF CYBER 170-865/875 24947 M01S00066.dsdi74 +++| SA1 =3LIMR CHECK FOR *I4* IOU 24948 M01S00067.dsdi74 +++| RJ GID 24949 M01S00068.dsdi74 +++| SX6 X6-4
| Line S00069 Modification History | |
|---|---|
M01 (Added by) | dsdi74 |
M02 (Updated by) | 271l739 |
Seq # *Modification Id* Act ----------------------------+ 24950 M02S00069.271l739 ---| SA6 IO SAVE *I4* IOU FLAG 24951 M01S00502.271l739 +++| SA6 IO SAVE *I4A OR I4S IOU* FLAG 24952 M01S00503.271l739 +++| SX7 X7-0#44 24953 M01S00504.271l739 +++| ZR X5,ERR47 IF *I4C* IOU 24954 M01S20254.dsdi +++| EQ RSTX RETURN 24955 M01S20255.dsdi +++| 24956 M01S20256.dsdi +++|* READ LOW CORE FROM RUNNING SYSTEM. 24957 M01S20257.dsdi +++| 24958 M01S20258.dsdi +++| RST6 SA1 F.TCMT 24959 M01S20259.dsdi +++| SX6 -B1 24960 M01S20260.dsdi +++| SA6 X1 PRESET BUFFER FOR ABSOLUTE MEMORY READ 24961 M01S20261.dsdi +++| SA6 A6+100B 24962 M01S20262.dsdi +++| SA2 RSTA 24963 M01S20263.dsdi +++| SA3 RSTB UPDATE BUFFER ADDRESS IN *RSB* CALLS 24964 M01S20264.dsdi +++| IX6 X2+X1 24965 M01S20265.dsdi +++| IX7 X3+X1 24966 M01S20266.dsdi +++| SA6 A2 24967 M01S20267.dsdi +++| SA7 A3 24968 M01S20268.dsdi +++| SYSTEM RSB,R,RSTA 24969 M01S20269.dsdi +++| SYSTEM RSB,R,RSTB 24970 M01S20270.dsdi +++| SX3 CPAS 24971 M01S20271.dsdi +++| RJ PCM POSITION DUMP FILE PAST POINTER AREA 24972 M01S20272.dsdi +++| JP RST1 READ REST OF CM TABLES 24973 M01S20273.dsdi +++| 24974 M01S20274.dsdi +++| RSTA VFD 12/0,12/100B,18/0,18/0 *RSB* CALL PARAMETERS 24975 M01S20275.dsdi +++| RSTB VFD 12/0,12/100B,18/100B,18/100B
| Line S20276 Modification History | |
|---|---|
M01 (Added by) | dsdi |
M02 (Updated by) | 271l739 |
Seq # *Modification Id* Act ----------------------------+ 24976 M02S20276.271l739 ---| RSTC VFD 6/0,18/3LD00,36/0 *CPP* SEARCH MASK 24977 M01S20277.dsdi +++| RUC SPACE 4,11 24978 M01S20278.dsdi +++|** RUC - RESET USER SELECTED CONTROLS. 24979 M01S20279.dsdi +++|* RESTORES REFERENCE ADDRESS, SUBTITLE AND MEMORY TYPE 24980 M01S20280.dsdi +++|* TO THOSE SELECTED BY THE USER. 24981 M01S20281.dsdi +++|* 24982 M01S20282.dsdi +++|* ENTRY UA = USER SELECTED REFERENCE ADDRESS. 24983 M01S20283.dsdi +++|* UI = USER SELECTED MEMORY INDEX. 24984 M01S20284.dsdi +++|* US = SUBTITLE DISPLAY OF USER SELECTED RA. 24985 M01S20285.dsdi +++|* US+1 = SUBTITLE MEMORY BLOCK NAME. 24986 M01S20286.dsdi +++|* 24987 M01S20287.dsdi +++|* USES X - 1,2,6,7. 24988 M01S20288.dsdi +++|* A - 1,2,6,7. 24989 M01S20289.dsdi +++| 24990 M01S20290.dsdi +++| 24991 M01S20291.dsdi +++| RUC SUBR 24992 M01S20292.dsdi +++| SA1 UA 24993 M01S20293.dsdi +++| SA2 UI 24994 M01S20294.dsdi +++| BX6 X1 24995 M01S20295.dsdi +++| LX7 X2 24996 M01S20296.dsdi +++| SA6 BA RESTORE REFERENCE ADDRESS 24997 M01S20297.dsdi +++| SA7 MI RESTORE MEMORY BLOCK RANDOM INDEX 24998 M01S20298.dsdi +++| SA1 US 24999 M01S20299.dsdi +++| SA2 A1+1 25000 M01S20300.dsdi +++| BX6 X1 25001 M01S20301.dsdi +++| LX7 X2 25002 M01S20302.dsdi +++| SA6 SBTL RESTORE SUBTITLE 25003 M01S20303.dsdi +++| SA7 SBTL1 25004 M01S20304.dsdi +++| JP RUCX EXIT 25005 M01S20305.dsdi +++| SAI SPACE 4,15 25006 M01S20306.dsdi +++|** SAI - SET ASCII INTERPRETATION. 25007 M01S20307.dsdi +++|* 25008 M01S20308.dsdi +++|* ENTRY (X2) = ASCII 8 BIT CHARACTERS. 25009 M01S20309.dsdi +++|* (B6) = NUMBER OF CHARACTERS TO CONVERT. 25010 M01S20310.dsdi +++|* (B7) = POSITION TO PLACE CHARACTERS. 25011 M01S20311.dsdi +++|* 25012 M01S20312.dsdi +++|* EXIT (X1) = SHIFTED (B6)*8 BITS. 25013 M01S20313.dsdi +++|* (B7) = UPDATED. 25014 M01S20314.dsdi +++|* 25015 M01S20315.dsdi +++|* USES X - 1, 2, 3, 6, 7. 25016 M01S20316.dsdi +++|* A - 3, 7. 25017 M01S20317.dsdi +++|* B - 6, 7. 25018 M01S20318.dsdi +++| 25019 M01S20319.dsdi +++| 25020 M01S20320.dsdi +++| SAI SUBR ENTRY/EXIT 25021 M01S20321.dsdi +++| MX1 -7 STRIP PARITY BIT FROM CHARACTER 25022 M01S20322.dsdi +++| SAI1 LX2 8 25023 M01S20323.dsdi +++| BX6 -X1*X2 EXTRACT CHARACTER 25024 M01S20324.dsdi +++| SA3 X6+/COMTVDT/TVXD GET DISPLAY CODE EQUIVALENT 25025 M01S20325.dsdi +++| SX7 X3 25026 M01S20326.dsdi +++| PL X3,SAI2 IF CHARACTER IS PRINTABLE 25027 M01S20327.dsdi +++| SX7 1R CHANGE TO A SPACE 25028 M01S20328.dsdi +++| SAI2 SX6 X7 CHECK FOR 74/76 ESCAPE 25029 M01S20329.dsdi +++| AX6 6 25030 M01S20330.dsdi +++| SB6 B6-B1 DECREMENT CHARACTER COUNT 25031 M01S20331.dsdi +++| LX6 6 25032 M01S20332.dsdi +++| IX7 X7-X6 REMOVE ANY 74/76 ESCAPE 25033 M01S20333.dsdi +++| SA7 B7 25034 M01S20334.dsdi +++| SB7 B7+B1 25035 M01S20335.dsdi +++| NZ B6,SAI1 IF MORE CHARACTERS TO UNPACK 25036 M01S20336.dsdi +++| EQ SAIX RETURN 25037 M01S20337.dsdi +++| SBC SPACE 4,20 25038 M01S20338.dsdi +++|** SBC - SELECT NEXT BUFFER CONTROLLER CHANNEL. 25039 M01S20339.dsdi +++|* 25040 M01S20340.dsdi +++|* ENTRY (BCDA) = LAST DIRECTORY ENTRY ADDRESS. 25041 M01S20341.dsdi +++|* (PI) = 0, IF DUMPING ALL CHANNELS. 25042 M01S20342.dsdi +++|* (SBCB) = OPTION SELECTION IF DUMPING ALL CHANNELS. 25043 M01S20343.dsdi +++|* 25044 M01S20344.dsdi +++|* EXIT (X1) = 0, IF NO MORE CHANNELS TO DUMP. 25045 M01S20345.dsdi +++|* (A2) = DIRECTORY ENTRY ADDRESS. 25046 M01S20346.dsdi +++|* (SBCA) = CHANNEL NUMBER SELECTED. 25047 M01S20347.dsdi +++|* (SBCB) = PARAMETERS SELECTED FOR NEXT CHANNEL. 25048 M01S20348.dsdi +++|* 25049 M01S20349.dsdi +++|* USES X - 0, 1, 2, 6. 25050 M01S20350.dsdi +++|* A - 1, 2, 6. 25051 M01S20351.dsdi +++|* B - 7. 25052 M01S20352.dsdi +++|* 25053 M01S20353.dsdi +++|* CALLS ASD, ASN. 25054 M01S20354.dsdi +++|* 25055 M01S20355.dsdi +++|* MACROS SEARCH. 25056 M01S20356.dsdi +++| 25057 M01S20357.dsdi +++| 25058 M01S20358.dsdi +++| SBC SUBR ENTRY/EXIT 25059 M01S20359.dsdi +++| SA1 PI 25060 M01S20360.dsdi +++| NZ X1,SBC2 IF CHANNELS ON DIRECTIVE 25061 M01S20361.dsdi +++| SA1 /DIRECT/BCDA GET ADDRESS OF LAST DIRECTORY ENTRY 25062 M01S20362.dsdi +++| SA2 X1+2 GET NEXT ENTRY 25063 M01S20363.dsdi +++| SX1 2RCH CHECK IF STILL BUFFER CONTROLLER RECORD 25064 M01S20364.dsdi +++| LX1 -24 25065 M01S20365.dsdi +++| MX0 12 25066 M01S20366.dsdi +++| LX0 -12 25067 M01S20367.dsdi +++| BX2 X0*X2 25068 M01S20368.dsdi +++| BX2 X1-X2 25069 M01S20369.dsdi +++| ZR X2,SBC1 IF BUFFER CONTROLLER CHANNEL 25070 M01S20370.dsdi +++| MX1 0 FLAG END OF DUMP 25071 M01S20371.dsdi +++| EQ SBCX RETURN 25072 M01S20372.dsdi +++| 25073 M01S20373.dsdi +++| SBC1 SA2 A2 FORM CHANNEL NUMBER 25074 M01S20374.dsdi +++| AX2 24 25075 M01S20375.dsdi +++| MX0 -6 25076 M01S20376.dsdi +++| BX1 -X0*X2 25077 M01S20377.dsdi +++| AX2 6 25078 M01S20378.dsdi +++| BX2 -X0*X2 25079 M01S20379.dsdi +++| SX1 X1-1R0 25080 M01S20380.dsdi +++| SX2 X2-1R0 25081 M01S20381.dsdi +++| LX2 3 25082 M01S20382.dsdi +++| IX6 X2+X1 25083 M01S20383.dsdi +++| SA6 SBCA SAVE CHANNEL NUMBER 25084 M01S20384.dsdi +++| SX1 B1 FLAG CHANNEL FOUND 25085 M01S20385.dsdi +++| EQ SBCX RETURN
Proceed to Part 19
cdc/nos2.source/opl.opl871/deck/dsdi.018.txt · Last modified: by 127.0.0.1