Seq # *Modification Id* Act
----------------------------+
11633 M01S00002.dsdi79 +++|** CCM - PROCESS *CCM* (CRITICAL *NOS/VE* MEMORY) RECORDS.
11634 M01S00003.dsdi79 +++|*
11635 M01S00004.dsdi79 +++|* ENTRY VIA UNCONDITIONAL JUMP.
11636 M01S00005.dsdi79 +++|*
11637 M01S00006.dsdi79 +++|* CALLS ERF, RBF.
11638 M01S00007.dsdi79 +++|
11639 M01S00008.dsdi79 +++|
11640 M01S00009.dsdi79 +++| CCM BSS 0 ENTRY
11641 M01S00010.dsdi79 +++| RJ ERF POSITION TO EOR OF HEADER RECORD
11642 M01S00011.dsdi79 +++| RJ RBF INITIATE READ OF *CCM* DATA RECORD
11643 M01S00012.dsdi79 +++| RJ ERF SKIP TO EOR
11644 M01S00013.dsdi79 +++| EQ RBI2 READ NEXT RECORD
11645 M00S09313.dsdi +++| CCQ SPACE 4,10
11646 M00S09314.dsdi +++|** CCQ - CHECK FOR CIRCULAR QUEUE.
11647 M00S09315.dsdi +++|*
11648 M00S09316.dsdi +++|* EXIT (X5) .LT. 0, IF CIRCULAR QUEUE FOUND.
11649 M00S09317.dsdi +++|* ELSE, QUEUE ENTRY COUNT IS INCREMENTED.
11650 M00S09318.dsdi +++|*
11651 M00S09319.dsdi +++|* USES X - 5, 6.
11652 M00S09320.dsdi +++|* A - 5, 6.
11653 M00S09321.dsdi +++|*
11654 M00S09322.dsdi +++|* MACROS PRINT.
11655 M00S09323.dsdi +++|
11656 M00S09324.dsdi +++|
11657 M00S09325.dsdi +++| CCQ SUBR
11658 M00S09326.dsdi +++| SA5 CCQB INCREMENT QUEUE ENTRY COUNT
11659 M00S09327.dsdi +++| SX6 X5+1
11660 M00S09328.dsdi +++| SA6 CCQB
11661 M00S09329.dsdi +++| SA5 CCQA CHECK IF QUEUE ENTRY LIMIT EXCEEDED
11662 M00S09330.dsdi +++| IX5 X5-X6
11663 M00S09331.dsdi +++| PL X5,CCQX IF QUEUE ENTRY LIMIT NOT REACHED
11664 M00S09332.dsdi +++| PRINT (=2C )
11665 M00S09333.dsdi +++| PRINT (=C+ *********WARNING - QUEUE ENTRY LIMIT EXCEEDED+)
11666 M00S09334.dsdi +++| PRINT (=2C )
11667 M00S09335.dsdi +++| EQ CCQX RETURN
11668 M00S09336.dsdi +++|
11669 M00S09337.dsdi +++| CCQA CON 0 QUEUE ENTRY LIMIT
11670 M00S09338.dsdi +++| CCQB CON 0 QUEUE ENTRY COUNT
| Line S00223 Modification History |
M01 (Added by) | 271l739 |
Seq # *Modification Id* Act
----------------------------+
11671 M01S00223.271l739 +++| CEA SPACE 4,10
11672 M01S00224.271l739 +++|** CEA - CHECK *EI* ADDRESS.
11673 M01S00225.271l739 +++|*
11674 M01S00226.271l739 +++|* ENTRY (X3) = BYTE ADDRESS.
11675 M01S00227.271l739 +++|*
11676 M01S00228.271l739 +++|* USES X - 1, 2, 3, 7.
11677 M01S00229.271l739 +++|* A - 1, 2, 7.
11678 M01S00230.271l739 +++|*
11679 M01S00231.271l739 +++|* CALLS PCM.
11680 M01S00232.271l739 +++|
11681 M01S00233.271l739 +++|
11682 M01S00234.271l739 +++| CEA1 BX7 X1 SET RANDOM ADDRESS
11683 M01S00235.271l739 +++| AX3 3
11684 M01S00236.271l739 +++| SA7 RI
11685 M01S00237.271l739 +++| RJ PCM POSITION CM RECORD
11686 M01S00238.271l739 +++|
11687 M01S00239.271l739 +++| CEA SUBR ENTRY/EXIT
11688 M01S00240.271l739 +++| SA2 XB
11689 M01S00241.271l739 +++| SA1 MH+1 MEMORY RECORD RANDOM ADDRESS
11690 M01S00242.271l739 +++| IX7 X3-X2
11691 M01S00243.271l739 +++| NG X7,CEA1 IF NOT *EI* ADDRESS
11692 M01S00244.271l739 +++| BX3 X7
11693 M01S00245.271l739 +++| SA1 EH+1
11694 M01S00246.271l739 +++| EQ CEA1 PROCESS ENVIRONMENTAL INTERFACE ADDRESS
11695 M00S09339.dsdi +++| CEP SPACE 4,10
11696 M00S09340.dsdi +++|** CEP - CHECK FOR EXTRANEOUS PARAMETERS.
11697 M00S09341.dsdi +++|*
11698 M00S09342.dsdi +++|* ENTRY (CH) = DIRECTIVE CARD STRING POINTER.
11699 M00S09343.dsdi +++|*
11700 M00S09344.dsdi +++|* EXIT TO *ERR40* IF EXTRA PARAMETER DETECTED.
11701 M00S09345.dsdi +++|*
11702 M00S09346.dsdi +++|* USES X - 1.
11703 M00S09347.dsdi +++|* A - 1.
11704 M00S09348.dsdi +++|
11705 M00S09349.dsdi +++|
11706 M00S09350.dsdi +++| CEP SUBR ENTRY/EXIT
11707 M00S09351.dsdi +++| SA1 CH GET NEXT CHARACTER
11708 M00S09352.dsdi +++| SA1 X1+
11709 M00S09353.dsdi +++| SX1 X1-1R.
11710 M00S09354.dsdi +++| NG X1,ERR40 IF NOT END OF DIRECTIVE
11711 M00S09355.dsdi +++| EQ CEPX RETURN
11712 M00S09356.dsdi +++| CKC SPACE 4,12
11713 M00S09357.dsdi +++|** CKC - CRACK AND PROCESS DIRECTIVE CARD.
11714 M00S09358.dsdi +++|*
11715 M00S09359.dsdi +++|* ENTRY (B2) = DIRECTIVE PROCESSOR TABLE ADDRESS.
11716 M00S09360.dsdi +++|* DIRECTIVE BEGINS AT ADDRESS *CHAR* IN
11717 M00S09361.dsdi +++|* *S* FORMAT.
11718 M00S09362.dsdi +++|* (TF) = 0, IF OUTPUT NOT TO TERMINAL.
11719 M00S09363.dsdi +++|*
11720 M00S09364.dsdi +++|* EXIT (CH) = DIRECTIVE STRING POINTS TO FIRST ARGUMENT.
11721 M00S09365.dsdi +++|* TO DIRECTIVE PROCESSOR, IF FOUND IN TABLE AND VALID.
11722 M00S09366.dsdi +++|* TO CALLER, IF DIRECTIVE NOT FOUND IN TABLE.
11723 M00S09367.dsdi +++|* TO *ERR16*, IF PRINTER DIRECTIVE AND TERMINAL OUTPUT.
11724 M00S09368.dsdi +++|* TO *ERR17*, IF TERMINAL DIRECTIVE AND PRINTER OUTPUT.
11725 M00S09369.dsdi +++|*
11726 M00S09370.dsdi +++|* USES X - 1, 2, 3, 6.
11727 M00S09371.dsdi +++|* A - 1, 2, 6.
11728 M00S09372.dsdi +++|* B - 2, 3.
11729 M00S09373.dsdi +++|*
11730 M00S09374.dsdi +++|* CALLS ASN, DIRECTIVE PROCESSORS.
11731 M00S09375.dsdi +++|
11732 M00S09376.dsdi +++|
11733 M00S09377.dsdi +++| CKC SUBR
11734 M00S09378.dsdi +++| SX6 CHAR
11735 M00S09379.dsdi +++| SA6 CH SET DIRECTIVE STRING POINTER
11736 M00S09380.dsdi +++| RJ ASN ASSEMBLE DIRECTIVE NAME
11737 M00S09381.dsdi +++| CKC1 SA1 B2 READ PROCESSOR TABLE
11738 M00S09382.dsdi +++| SB2 B2+B1 ADVANCE TABLE POINTER
11739 M00S09383.dsdi +++| ZR X1,CKCX IF END OF TABLE
11740 M00S09384.dsdi +++| SA2 X1 READ PROCESSOR NAME
11741 M00S09385.dsdi +++| BX3 X2-X6
11742 M00S09386.dsdi +++| NZ X3,CKC1 IF NO MATCH
11743 M00S09387.dsdi +++| SB3 X1+B1 SET EXECUTION ADDRESS
11744 M00S09388.dsdi +++| LX3 X1,B1
11745 M00S09389.dsdi +++| SA2 TF CHECK TERMINAL FLAG
11746 M00S09390.dsdi +++| ZR X2,CKC2 IF OUTPUT NOT TO TERMINAL
11747 M00S09391.dsdi +++| NG X1,ERR16 IF DIRECTIVE RESTRICTED TO PRINTER
11748 M00S09392.dsdi +++| CKC2 NZ X2,CKC3 IF OUTPUT TO TERMINAL
11749 M00S09393.dsdi +++| NG X3,ERR17 IF DIRECTIVE RESTRICTED TO TERMINAL
| Line S09394 Modification History |
M01 (Removed by) | dsdi69 |
Seq # *Modification Id* Act
----------------------------+
11750 M01S09394.dsdi69 ---| CKC3 JP B3 EXECUTE SELECTED PROCESSOR
| Line S00046 Modification History |
M01 (Added by) | dsdi69 |
Seq # *Modification Id* Act
----------------------------+
11751 M01S00046.dsdi69 +++| CKC3 LX1 -18 SET/CLEAR ERROR RETURN ADDRESS
11752 M01S00047.dsdi69 +++| SX6 X1
11753 M01S00048.dsdi69 +++| SA6 ERRC+1
11754 M01S00049.dsdi69 +++| JP B3 EXECUTE SELECTED PROCESSOR
11755 M00S09395.dsdi +++| CLE SPACE 4,10
11756 M00S09396.dsdi +++|** CLE - CHECK FOR LAST TABLE ENTRY.
11757 M00S09397.dsdi +++|*
11758 M00S09398.dsdi +++|* ENTRY (X4) = TABLE ENTRY NUMBER.
11759 M00S09399.dsdi +++|* (BE) = BUFFERED DEVICE TABLE ENTRY.
11760 M00S09400.dsdi +++|*
11761 M00S09401.dsdi +++|* EXIT (X0) = ENTRY ADDRESS RELATIVE TO TABLE FWA.
11762 M00S09402.dsdi +++|* (X1) = ENTRY LENGTH.
11763 M00S09403.dsdi +++|* (X2) = TABLE LENGTH.
11764 M00S09404.dsdi +++|* (X3).LT.0, IF ENTRY WITHIN TABLE.
11765 M00S09405.dsdi +++|*
11766 M00S09406.dsdi +++|* USES X - 0, 1, 2, 3.
11767 M00S09407.dsdi +++|* A - 2.
11768 M00S09408.dsdi +++|
11769 M00S09409.dsdi +++|
11770 M00S09410.dsdi +++| CLE SUBR ENTRY/EXIT
11771 M00S09411.dsdi +++| SA2 BE GET TABLE *BDT* ENTRY
11772 M00S09412.dsdi +++| LX2 18
11773 M00S09413.dsdi +++| MX0 -6
11774 M00S09414.dsdi +++| BX1 -X0*X2 ENTRY LENGTH
11775 M00S09415.dsdi +++| IX0 X1*X4 ENTRY ADDRESS RELATIVE TO TABLE FWA
11776 M00S09416.dsdi +++| AX2 42 TABLE LENGTH
11777 M00S09417.dsdi +++| IX3 X0-X2 CHECK IF ENTRY NUMBER WITHIN TABLE
11778 M00S09418.dsdi +++| EQ CLEX RETURN
11779 M00S09419.dsdi +++| CMB SPACE 4,15
11780 M00S09420.dsdi +++|** CMB - CHECK MEMORY BOUNDS.
11781 M00S09421.dsdi +++|*
11782 M00S09422.dsdi +++|* ENTRY (B2) = DUMP PARAMETER BLOCK ADDRESS.
11783 M00S09423.dsdi +++|* (AM) = *ALLMEM* FLAG.
11784 M00S09424.dsdi +++|* (AP) = ADVANCED PROCESSOR FLAG.
11785 M00S09425.dsdi +++|*
11786 M00S09426.dsdi +++|* EXIT TO CALLER IF DUMP PARAMETERS OKAY.
11787 M00S09427.dsdi +++|* TO *ERR32* IF PARAMETERS ARE BAD.
11788 M00S09428.dsdi +++|*
11789 M00S09429.dsdi +++|* USES X - 1, 2.
11790 M00S09430.dsdi +++|* A - 1, 2.
11791 M00S09431.dsdi +++|
11792 M00S09432.dsdi +++|
11793 M00S09433.dsdi +++| CMB SUBR ENTRY/EXIT
11794 M00S09434.dsdi +++| SA1 CE
11795 M00S09435.dsdi +++| ZR X1,CMBX IF BOUNDS CHECKING NOT REQUIRED
11796 M00S09436.dsdi +++| SA1 AM
11797 M00S09437.dsdi +++| NZ X1,CMBX IF *ALLMEM* ENABLED
11798 M00S09438.dsdi +++| SA1 SBTL1
11799 M00S09439.dsdi +++| SA2 =10HCM
11800 M00S09440.dsdi +++| BX1 X1-X2
11801 M00S09441.dsdi +++| NZ X1,CMBX IF NOT DUMPING CM
11802 M00S09442.dsdi +++| SA2 F.TCMT GET CM SIZE
11803 M00S09443.dsdi +++| SA1 X2+MABL
11804 M00S09444.dsdi +++| MX2 -24
11805 M00S09445.dsdi +++| LX1 -12
11806 M00S09446.dsdi +++| BX1 -X2*X1
11807 M00S09447.dsdi +++| SA2 B2+B1 GET LWA+1 OF DUMP
11808 M00S09448.dsdi +++| LX1 6
11809 M00S09449.dsdi +++| IX1 X2-X1
11810 M00S09450.dsdi +++| NG X1,CMBX IF LWA+1 WITHIN CM BOUNDARY
11811 M00S09451.dsdi +++| EQ ERR32 PROCESS BOUNDARY ERROR
11812 M00S09452.dsdi +++| CMP SPACE 4,15
11813 M00S09453.dsdi +++|** CMP - PROCESS *CM* RECORD.
11814 M00S09454.dsdi +++|*
11815 M00S09455.dsdi +++|* ENTRY VIA UNCONDITIONAL JUMP.
11816 M00S09456.dsdi +++|*
11817 M00S09457.dsdi +++|* EXIT TO *RBI2* IF NORMAL.
| Line S09458 Modification History |
M01 (Removed by) | dsdi73 |
Seq # *Modification Id* Act
----------------------------+
11818 M01S09458.dsdi73 ---|* TO *ERR29* IF PREMATURE EOF.
| Line S00006 Modification History |
M01 (Added by) | dsdi73 |
Seq # *Modification Id* Act
----------------------------+
11819 M01S00006.dsdi73 +++|* TO *PPE* IF PREMATURE EOF.
11820 M00S09459.dsdi +++|*
11821 M00S09460.dsdi +++|* USES A - 1, 2, 3, 6, 7.
11822 M00S09461.dsdi +++|* X - 1, 2, 3, 6, 7.
11823 M00S09462.dsdi +++|*
| Line S09463 Modification History |
M01 (Removed by) | dsdi88 |
Seq # *Modification Id* Act
----------------------------+
11824 M01S09463.dsdi88 ---|* CALLS CRS, ERS, RBF, WBS.
| Line S00001 Modification History |
M01 (Added by) | dsdi88 |
Seq # *Modification Id* Act
----------------------------+
11825 M01S00001.dsdi88 +++|* CALLS CRS, ERS, RBH, WBS.
11826 M00S09464.dsdi +++|
11827 M00S09465.dsdi +++|
11828 M00S09466.dsdi +++| CMP BSS 0 ENTRY
11829 M00S09467.dsdi +++| SA1 BUF DETERMINE NUMBER OF WORDS TO COPY
11830 M00S09468.dsdi +++| SX6 X1 GET CM SIZE
11831 M00S09469.dsdi +++| PL X6,CMP1 IF NEW CM FORMAT
11832 M00S09470.dsdi +++| SX6 X6-1L DELETE UPPER SPACE
11833 M00S09471.dsdi +++| CMP1 LX6 9 CONVERT TO WORDS
11834 M00S09472.dsdi +++| SA6 CMPA
11835 M00S09473.dsdi +++| RJ CRS COPY RECORD TO S
11836 M00S09474.dsdi +++| SX7 B0 CLEAR NUMBER OF WORDS COPIED
11837 M00S09475.dsdi +++| SA7 CMPB
11838 M00S09476.dsdi +++| SA7 ID CLEAR RECORD ID
| Line S09477 Modification History |
M01 (Removed by) | dsdi88 |
Seq # *Modification Id* Act
----------------------------+
11839 M01S09477.dsdi88 ---| CMP2 RJ RBF READ BLOCK FROM F
| Line S00002 Modification History |
M01 (Added by) | dsdi88 |
Seq # *Modification Id* Act
----------------------------+
11840 M01S00002.dsdi88 +++| CMP2 RJ RBH READ BLOCK OR HEADER FROM FILE *F*
| Line S09478 Modification History |
M01 (Removed by) | dsdi73 |
Seq # *Modification Id* Act
----------------------------+
11841 M01S09478.dsdi73 ---| NZ X1,ERR29 IF PREMATURE EOF
| Line S00007 Modification History |
M01 (Added by) | dsdi73 |
Seq # *Modification Id* Act
----------------------------+
11842 M01S00007.dsdi73 +++| NZ X1,PPE IF PREMATURE EOF
| Line S00003 Modification History |
M01 (Added by) | dsdi88 |
Seq # *Modification Id* Act
----------------------------+
11843 M01S00003.dsdi88 +++| NG X1,PPE IF EOR WITH DEFERRED HEADER
11844 M00S09479.dsdi +++| SA1 BWCF SET NUMBER OF WORDS TO WRITE
11845 M00S09480.dsdi +++| BX6 X1
11846 M00S09481.dsdi +++| SA6 BWCS
11847 M00S09482.dsdi +++| RJ WBS WRITE BLOCK TO FILE *S*
11848 M00S09483.dsdi +++| SA1 CMPB UPDATE COUNT OF WORDS COPIED
11849 M00S09484.dsdi +++| SA2 BWCS
11850 M00S09485.dsdi +++| IX6 X1+X2
11851 M00S09486.dsdi +++| SA6 A1
11852 M00S09487.dsdi +++| SA3 CMPA TEST ALL WORDS COPIED
11853 M00S09488.dsdi +++| IX6 X6-X3
11854 M00S09489.dsdi +++| NG X6,CMP2 IF NOT DONE
11855 M00S09490.dsdi +++| RJ ERS END RECORD ON S
11856 M00S09491.dsdi +++| SX6 -1 FORCE EOR ON F
11857 M00S09492.dsdi +++| SA6 EORF
11858 M00S09493.dsdi +++| EQ RBI2 EXIT TO READ NEXT RECORD FROM F
11859 M00S09494.dsdi +++|
11860 M00S09495.dsdi +++|
11861 M00S09496.dsdi +++| CMPA BSS 1 NUMBER OF WORDS TO COPY
11862 M00S09497.dsdi +++| CMPB BSS 1 NUMBER OF WORDS COPIED
11863 M00S09498.dsdi +++| CNL SPACE 4,10
11864 M00S09499.dsdi +++|** CNL - CHECK NFL LENGTH.
11865 M00S09500.dsdi +++|*
11866 M00S09501.dsdi +++|* ENTRY (L.TNFL) = NFL/100 OF CURRENT CP.
11867 M00S09502.dsdi +++|*
11868 M00S09503.dsdi +++|* EXIT (X1) .GE. 0 IF SUFFICIENT NFL SPACE.
11869 M00S09504.dsdi +++|* (X1) .LT. 0 IF INSUFFICIENT NFL SPACE.
11870 M00S09505.dsdi +++|* WARNING MESSAGE PRINTED.
11871 M00S09506.dsdi +++|*
11872 M00S09507.dsdi +++|* USES X - 1, 6.
11873 M00S09508.dsdi +++|* A - 1.
11874 M00S09509.dsdi +++|*
11875 M00S09510.dsdi +++|* MACROS PRINT.
11876 M00S09511.dsdi +++|
11877 M00S09512.dsdi +++|
11878 M00S09513.dsdi +++| CNL SUBR ENTRY/EXIT
11879 M00S09514.dsdi +++| SA1 L.TNFL GET NFL/100
11880 M00S09515.dsdi +++| SX6 DNFL GET DEFAULT
11881 M00S09516.dsdi +++| IX1 X1-X6
11882 M00S09517.dsdi +++| PL X1,CNLX IF SUFFICIENT SPACE
11883 M00S09518.dsdi +++| PRINT (=2C )
11884 M00S09519.dsdi +++| PRINT (=C* INSUFFICIENT NFL SPACE.*)
11885 M00S09520.dsdi +++| PRINT (=2C )
11886 M00S09521.dsdi +++| MX1 1 SET ERROR STATUS
11887 M00S09522.dsdi +++| EQ CNLX RETURN
| Line S09523 Modification History |
M01 (Removed by) | dsdi67 |
Seq # *Modification Id* Act
----------------------------+
11888 M01S09523.dsdi67 ---| SPACE 4,10
11889 M01S09524.dsdi67 ---|** CNR - CHECK NEXT RECORD.
11890 M01S09525.dsdi67 ---|*
11891 M01S09526.dsdi67 ---|* ENTRY (A2) = POINTER TO CURRENT DIRECTORY TABLE ENTRY.
11892 M01S09527.dsdi67 ---|* (X2) = CONTENTS OF CURRENT DIRECTORY TABLE ENTRY
11893 M01S09528.dsdi67 ---|* (FIRST WORD).
11894 M01S09529.dsdi67 ---|* (X3) = 3 CHARACTER DUMP RECORD ID, LEFT JUSTIFIED,
11895 M01S09530.dsdi67 ---|* ZERO FILLED.
11896 M01S09531.dsdi67 ---|* (B7) = C.TDIR (LENGTH OF TDIR TABLE ENTRY)
11897 M01S09532.dsdi67 ---|* ((B3)) = ADDRESS OF LAST DUMP RECORD PROCESSED
11898 M01S09533.dsdi67 ---|* DIRECTORY TABLE ENTRY,
11899 M01S09534.dsdi67 ---|* = 0 IF FIRST RECORD WITH PARTICULAR
11900 M01S09535.dsdi67 ---|* DUMP RECORD ID TO BE PROCESSED.
11901 M01S09536.dsdi67 ---|*
11902 M01S09537.dsdi67 ---|* EXIT (A2) = SAME AS ENTRY.
11903 M01S09538.dsdi67 ---|* (X2) = SAME AS ENTRY.
11904 M01S09539.dsdi67 ---|* ((B3)) = ADDRESS OF THE NEXT DUMP RECORD-S
11905 M01S09540.dsdi67 ---|* DIRECTORY TABLE ENTRY IF THE NEXT
11906 M01S09541.dsdi67 ---|* RECORD HAS THE SAME RECORD ID,
11907 M01S09542.dsdi67 ---|* = 0 IF THE NEXT DUMP RECORD DOES NOT
11908 M01S09543.dsdi67 ---|* HAVE THE SAME RECORD ID.
11909 M01S09544.dsdi67 ---|*
11910 M01S09545.dsdi67 ---|* USES X - 1, 6.
11911 M01S09546.dsdi67 ---|* A - 0, 1, 6.
11912 M01S09547.dsdi67 ---|*
11913 M01S09548.dsdi67 ---|
11914 M01S09549.dsdi67 ---|
11915 M01S09550.dsdi67 ---| CNR SUBR
11916 M01S09551.dsdi67 ---| SA1 A2+B7 NEXT TDIR ENTRY
11917 M01S09552.dsdi67 ---| MX0 18
11918 M01S09553.dsdi67 ---| BX6 X0*X1
11919 M01S09554.dsdi67 ---| BX6 X6-X3
11920 M01S09555.dsdi67 ---| ZR X6,CNR1 IF MATCH
11921 M01S09556.dsdi67 ---| SX6 B0
11922 M01S09557.dsdi67 ---| SA6 B3
11923 M01S09558.dsdi67 ---| JP CNRX RETURN IF NO MATCH
11924 M01S09559.dsdi67 ---|
11925 M01S09560.dsdi67 ---| CNR1 SX6 A1
11926 M01S09561.dsdi67 ---| SA6 B3
11927 M01S09562.dsdi67 ---| JP CNRX RETURN
11928 M00S09563.dsdi +++| COF SPACE 4,10
11929 M00S09564.dsdi +++|** COF - COMPLETE OUTPUT FILES.
11930 M00S09565.dsdi +++|* RESET FIELD LENGTH TO ORIGINAL VALUE IF CHANGED.
11931 M00S09566.dsdi +++|*
11932 M00S09567.dsdi +++|* ENTRY OF = CURRENT OUTPUT FILE FET ADDRESS.
11933 M00S09568.dsdi +++|* FN = INITIAL FIELD LENGTH.
11934 M00S09569.dsdi +++|* FM = CURRENT FIELD LENGTH.
11935 M00S09570.dsdi +++|* BD = BINARY DUMP FLAG.
11936 M00S09571.dsdi +++|*
11937 M00S09572.dsdi +++|* USES X - 0, 1, 2, 6, 7.
11938 M00S09573.dsdi +++|* A - 1, 2, 6, 7.
11939 M00S09574.dsdi +++|*
11940 M00S09575.dsdi +++|* CALLS COD.
11941 M00S09576.dsdi +++|*
11942 M00S09577.dsdi +++|* MACROS MEMORY, RECALL, RETURN, SETFS, WRITER.
11943 M00S09578.dsdi +++|
11944 M00S09579.dsdi +++|
11945 M00S09580.dsdi +++| COF SUBR
11946 M00S09581.dsdi +++| RECALL L
11947 M00S09582.dsdi +++| WRITER X2,R
11948 M00S09583.dsdi +++| SETFS X2,0 CLEAR OUTPUT FILE ID
11949 M00S09584.dsdi +++| SA1 OF
11950 M00S09585.dsdi +++| IX2 X1-X2
11951 M00S09586.dsdi +++| ZR X2,COF1 IF NO ALTERNATE FILE ACTIVE
11952 M00S09587.dsdi +++| RECALL X1
11953 M00S09588.dsdi +++| WRITER X2,R
11954 M00S09589.dsdi +++| SETFS X2,0 CLEAR ALTERNATE FILE ID
11955 M00S09590.dsdi +++| COF1 SA1 BD
11956 M00S09591.dsdi +++| ZR X1,COF2 IF NOT BINARY DUMP
11957 M00S09592.dsdi +++| RETURN F1 DROP SCRATCH FILE
11958 M00S09593.dsdi +++| COF2 SA1 FM CURRENT FIELD LENGTH
11959 M00S09594.dsdi +++| RJ COD CONVERT TO DISPLAY CODE
11960 M00S09595.dsdi +++| MX0 -36
11961 M00S09596.dsdi +++| BX6 -X0*X6
11962 M00S09597.dsdi +++| LX6 12
11963 M00S09598.dsdi +++| SA2 MSG2A STORE FL USED INTO MESSAGE
11964 M00S09599.dsdi +++| BX7 X2+X6
11965 M00S09600.dsdi +++| SA7 A2
11966 M00S09601.dsdi +++| SA1 FN INITIAL FIELD LENGTH
11967 M00S09602.dsdi +++| SA2 FM CURRENT FIELD LENGTH
11968 M00S09603.dsdi +++| IX2 X2-X1
11969 M00S09604.dsdi +++| ZR X2,COFX IF NO FL CHANGE
11970 M00S09605.dsdi +++| LX1 30
11971 M00S09606.dsdi +++| BX6 X1
11972 M00S09607.dsdi +++| SA6 A1 SET RFL PARAMETER
11973 M00S09608.dsdi +++| MEMORY CM,FN,R
11974 M00S09609.dsdi +++| JP COFX EXIT
11975 M00S09610.dsdi +++| CPC SPACE 4,10
11976 M00S09611.dsdi +++|** CPC - CHECK PAGE CHANGE.
11977 M00S09612.dsdi +++|*
11978 M00S09613.dsdi +++|* CHECK IF THE FWA HAS ENTERED A NEW CM PAGE AND
11979 M00S09614.dsdi +++|* IF NECESSARY, POSITION TO THAT NEW PAGE.
11980 M00S09615.dsdi +++|*
11981 M00S09616.dsdi +++|* ENTRY (B2+0) - SVA TO DUMP NEXT.
11982 M00S09617.dsdi +++|*
11983 M00S09618.dsdi +++|* EXIT *NXB* - POSITIONED TO CORRECT ADDRESS.
11984 M00S09619.dsdi +++|* (X2) = 0, IF PAGE IS PRESENT.
11985 M00S09620.dsdi +++|* (X3) < 0, IF PAGE IS VALID.
11986 M00S09621.dsdi +++|* (A3) = *PTEVCUM*
11987 M00S09622.dsdi +++|*
11988 M00S09623.dsdi +++|* USES X - 1, 2, 6.
11989 M00S09624.dsdi +++|* A - 1, 2, 6.
11990 M00S09625.dsdi +++|*
11991 M00S09626.dsdi +++|* SAVES X - 5.
11992 M00S09627.dsdi +++|*
11993 M00S09628.dsdi +++|* CALLS PSM, SPT.
11994 M00S09629.dsdi +++|
11995 M00S09630.dsdi +++|
11996 M00S09631.dsdi +++| CPC SUBR ENTRY/EXIT
11997 M00S09632.dsdi +++| MX3 1
11998 M00S09633.dsdi +++| SA4 B2 ADDRESS TO BE DUMPED
11999 M00S09634.dsdi +++| SA1 XM PAGE SIZE MASK
12000 M00S09635.dsdi +++| BX6 X4*X1
12001 M00S09636.dsdi +++| SX2 B0
12002 M00S09637.dsdi +++| AX4 32
12003 M00S09638.dsdi +++| BX7 X5 SAVE X5
12004 M00S09639.dsdi +++| NZ X6,CPCX IF NO PAGE CHANGE
12005 M00S09640.dsdi +++| ZR X4,CPCX IF NOT VIRTUAL MEMORY DUMP
12006 M00S09641.dsdi +++| SA7 CPCA SAVE X5
12007 M00S09642.dsdi +++| RJ SPT SEARCH PAGE TABLE
12008 M00S09643.dsdi +++| NZ X2,CPCX IF PAGE MISSING
12009 M00S09644.dsdi +++| SB2 BRMA BYTE REAL MEMORY ADDRESS OF PAGE
12010 M00S09645.dsdi +++| RJ PSM POSITION TO THE RMA
12011 M00S09646.dsdi +++| SA1 CPCA RESTORE X5
12012 M00S09647.dsdi +++| SA3 PTEVCUM
12013 M00S09648.dsdi +++| BX5 X1
12014 M00S09649.dsdi +++| SX2 B0 DEFINE PAGE AS PRESENT
12015 M00S09650.dsdi +++| EQ CPCX RETURN
12016 M00S09651.dsdi +++|
12017 M00S09652.dsdi +++| CPCA CON 0
12018 M00S09653.dsdi +++| CPD SPACE 4,10
12019 M00S09654.dsdi +++|** CPD - COPY PP DATA TO BUFFER.
12020 M00S09655.dsdi +++|*
12021 M00S09656.dsdi +++|* ENTRY DUMP FILE POSITIONED TO PROPER PP RECORD.
12022 M00S09657.dsdi +++|*
12023 M00S09658.dsdi +++|* EXIT PP MEMORY COPIED TO BUFFER *PBUF*.
12024 M00S09659.dsdi +++|*
12025 M00S09660.dsdi +++|* USES X - 1, 6.
12026 M00S09661.dsdi +++|* A - 1, 6.
12027 M00S09662.dsdi +++|*
12028 M00S09663.dsdi +++|* MACROS READW.
12029 M00S09664.dsdi +++|
12030 M00S09665.dsdi +++|
12031 M00S09666.dsdi +++| CPD1 READW S,PBUF,IUBUFL1
12032 M00S09667.dsdi +++| SX6 IUBUFL1
12033 M00S09668.dsdi +++| CPD2 SA6 NXBA
12034 M00S09669.dsdi +++| BX6 X6-X6
12035 M00S09670.dsdi +++| SA6 A6+B1
12036 M00S09671.dsdi +++| SX6 PBUF-1
12037 M00S09672.dsdi +++| SA6 A6+1
12038 M00S09673.dsdi +++|
12039 M00S09674.dsdi +++| CPD SUBR ENTRY/EXIT
| Line S09675 Modification History |
M01 (Removed by) | dsdi74 |
Seq # *Modification Id* Act
----------------------------+
12040 M01S09675.dsdi74 ---| SA1 C4
12041 M01S09676.dsdi74 ---| ZR X1,CPD1 IF NOT I4 IOU
| Line S00027 Modification History |
M01 (Added by) | dsdi74 |
Seq # *Modification Id* Act
----------------------------+
12042 M01S00027.dsdi74 +++| SA1 IO
| Line S00028 Modification History |
M01 (Added by) | dsdi74 |
M02 (Removed by) | 271l739 |
Seq # *Modification Id* Act
----------------------------+
12043 M02S00028.271l739 ---| NZ X1,CPD1 IF NOT I4 IOU
| Line S00247 Modification History |
M01 (Added by) | 271l739 |
Seq # *Modification Id* Act
----------------------------+
12044 M01S00247.271l739 +++| NZ X1,CPD1 IF NOT I4A OR I4S IOU
12045 M00S09677.dsdi +++| READW S,PBUF,IUBUFL2
12046 M00S09678.dsdi +++| SX6 IUBUFL2
12047 M00S09679.dsdi +++| EQ CPD2 SET POINTERS FOR *NXB*
| Line S00080 Modification History |
M01 (Added by) | ns2647 |
Seq # *Modification Id* Act
----------------------------+
12048 M01S00080.ns2647 +++| CPN SPACE 4,10
12049 M01S00081.ns2647 +++|** CPN - CONVERT PP/CPP NUMBER.
12050 M01S00082.ns2647 +++|*
12051 M01S00083.ns2647 +++|* ENTRY (PP) = PP/CPP NUMBER FROM DUMP.
12052 M01S00084.ns2647 +++|*
12053 M01S00085.ns2647 +++|* EXIT (X2) = (PP).
12054 M01S00086.ns2647 +++|* (X3) .NE. 0 IF DUMPING A CPP.
12055 M01S00087.ns2647 +++|* (X6) = LOGICAL PP/CPP NUMBER.
12056 M01S00088.ns2647 +++|*
12057 M01S00089.ns2647 +++|* USES X - 2, 3, 6.
12058 M01S00090.ns2647 +++|* A - 2, 3.
12059 M01S00091.ns2647 +++|
12060 M01S00092.ns2647 +++|
12061 M01S00093.ns2647 +++| CPN SUBR ENTRY/EXIT
12062 M01S00094.ns2647 +++| SA2 PP GET PP/CPP NUMBER
12063 M01S00095.ns2647 +++| BX6 X2
12064 M01S00096.ns2647 +++| SX3 X2-20B
12065 M01S00097.ns2647 +++| NG X3,CPN1 IF NOT UPPER BANK
12066 M01S00098.ns2647 +++| SX6 X2-20B+12B CONVERT UPPER BANK PP NUMBER
12067 M01S00099.ns2647 +++| CPN1 SA3 IC
12068 M01S00100.ns2647 +++| ZR X3,CPNX IF NOT PROCESSING CPP-S
12069 M01S00101.ns2647 +++| SA3 NP CONVERT CPP NUMBER
12070 M01S00102.ns2647 +++| IX6 X2+X3
12071 M01S00103.ns2647 +++| EQ CPNX RETURN
12072 M00S09680.dsdi +++| CPS SPACE 4,12
12073 M00S09681.dsdi +++|** CPS - CHECK PAGE SPACE REMAINING.
12074 M00S09682.dsdi +++|*
12075 M00S09683.dsdi +++|* ENTRY X1 = NUMBER OF LINES DESIRED.
12076 M00S09684.dsdi +++|* LC = CURRENT LINE NUMBER.
12077 M00S09685.dsdi +++|* PD = NUMBER OF LINES PER FULL PAGE.
12078 M00S09686.dsdi +++|*
12079 M00S09687.dsdi +++|* EXIT X6 = NUMBER OF LINES AVAILABLE.
12080 M00S09688.dsdi +++|* A NEW PAGE IS FORCED IF THERE ARE .LT. (X1)
12081 M00S09689.dsdi +++|* LINES LEFT ON THE CURRENT PAGE.
12082 M00S09690.dsdi +++|*
12083 M00S09691.dsdi +++|* USES X - 2,3,6.
12084 M00S09692.dsdi +++|* A - 2,3,6.
12085 M00S09693.dsdi +++|
12086 M00S09694.dsdi +++|
12087 M00S09695.dsdi +++| CPS SUBR
12088 M00S09696.dsdi +++| SA2 LC CURRENT LINE COUNT
12089 M00S09697.dsdi +++| SA3 PD
12090 M00S09698.dsdi +++| IX6 X3-X2 NUMBER OF LINES LEFT ON THIS PAGE
12091 M00S09699.dsdi +++| IX2 X6-X1
12092 M00S09700.dsdi +++| PL X2,CPSX IF ENOUGH ROOM REMAINING
12093 M00S09701.dsdi +++| BX6 X3
12094 M00S09702.dsdi +++| SA6 A2 FORCE NEW PAGE
12095 M00S09703.dsdi +++| JP CPSX EXIT
| Line S09704 Modification History |
M01 (Removed by) | dsdi71a |
Seq # *Modification Id* Act
----------------------------+
12096 M01S09704.dsdi71a ---| CRA SPACE 4,9
| Line S00008 Modification History |
M01 (Added by) | dsdi71a |
Seq # *Modification Id* Act
----------------------------+
12097 M01S00008.dsdi71a +++| CRA SPACE 4,10
12098 M00S09705.dsdi +++|** CRA - COMPUTE CONTROL POINT REFERENCE ADDRESS.
12099 M00S09706.dsdi +++|*
| Line S09707 Modification History |
M01 (Removed by) | dsdi89 |
Seq # *Modification Id* Act
----------------------------+
12100 M01S09707.dsdi89 ---|* ENTRY X6 = CONTROL POINT NUMBER.
| Line S00020 Modification History |
M01 (Added by) | dsdi89 |
Seq # *Modification Id* Act
----------------------------+
12101 M01S00020.dsdi89 +++|* ENTRY (X6) = CONTROL POINT NUMBER.
12102 M00S09708.dsdi +++|*
| Line S09709 Modification History |
M01 (Removed by) | dsdi89 |
Seq # *Modification Id* Act
----------------------------+
12103 M01S09709.dsdi89 ---|* EXIT X6 = CONTROL POINT ADDRESS.
| Line S00021 Modification History |
M01 (Added by) | dsdi89 |
Seq # *Modification Id* Act
----------------------------+
12104 M01S00021.dsdi89 +++|* EXIT (X6) = CONTROL POINT RA.
12105 M01S00022.dsdi89 +++|* (X7) = CONTROL POINT FL.
12106 M00S09710.dsdi +++|*
| Line S09711 Modification History |
M01 (Removed by) | dsdi71a |
Seq # *Modification Id* Act
----------------------------+
12107 M01S09711.dsdi71a ---|* SAVES X - 5,7.
12108 M01S09712.dsdi71a ---|* B - 1.
12109 M01S09713.dsdi71a ---|* A - 0.
| Line S00009 Modification History |
M01 (Added by) | dsdi71a |
Seq # *Modification Id* Act
----------------------------+
12110 M01S00009.dsdi71a +++|* USES X - 1, 2.
12111 M01S00010.dsdi71a +++|* A - 2.
12112 M01S00011.dsdi71a +++|*
12113 M01S00012.dsdi71a +++|* CALLS GFL.
12114 M00S09714.dsdi +++|
12115 M00S09715.dsdi +++|
12116 M00S09716.dsdi +++| CRA SUBR
| Line S09717 Modification History |
M01 (Removed by) | dsdi71a |
Seq # *Modification Id* Act
----------------------------+
12117 M01S09717.dsdi71a ---| SA1 F.TCMT
12118 M00S09718.dsdi +++| SA2 NC
| Line S09719 Modification History |
M01 (Removed by) | dsdi71a |
Seq # *Modification Id* Act
----------------------------+
12119 M01S09719.dsdi71a ---| MX0 -15
12120 M00S09720.dsdi +++| SX2 X2+B1 ALLOW FOR SYSTEM CONTROL POINT
12121 M00S09721.dsdi +++| IX2 X2-X6
12122 M00S09722.dsdi +++| NG X2,ERR8 IF INCORRECT CONTROL POINT NUMBER
12123 M00S09723.dsdi +++| SX2 CPLEN
| Line S09724 Modification History |
M01 (Removed by) | dsdi71a |
Seq # *Modification Id* Act
----------------------------+
12124 M01S09724.dsdi71a ---| IX2 X2*X6
12125 M01S09725.dsdi71a ---| IX3 X2+X1
12126 M01S09726.dsdi71a ---| SA4 X3+FLSW GET RA/100
12127 M01S09727.dsdi71a ---| LX4 -12
12128 M01S09728.dsdi71a ---| BX6 -X0*X4
12129 M01S09729.dsdi71a ---| LX6 6 FORM CONTROL POINT RA
| Line S00013 Modification History |
M01 (Added by) | dsdi71a |
Seq # *Modification Id* Act
----------------------------+
12130 M01S00013.dsdi71a +++| IX1 X2*X6
12131 M01S00014.dsdi71a +++| RJ GFL GET RA
12132 M00S09730.dsdi +++| JP CRAX EXIT
12133 M00S09731.dsdi +++| CRS SPACE 4,10
12134 M00S09732.dsdi +++|** CRS - COPY RECORD TO S.
12135 M00S09733.dsdi +++|*
12136 M00S09734.dsdi +++|* ENTRY (BWCF) = NUMBER OF WORDS TO WRITE IN 1ST BLOCK.
12137 M00S09735.dsdi +++|*
12138 M00S09736.dsdi +++|* USES A - 1, 6.
12139 M00S09737.dsdi +++|* X - 1, 6.
12140 M00S09738.dsdi +++|*
| Line S09739 Modification History |
M01 (Removed by) | dsdi88 |
Seq # *Modification Id* Act
----------------------------+
12141 M01S09739.dsdi88 ---|* CALLS ERS, RBF, WBS.
| Line S00004 Modification History |
M01 (Added by) | dsdi88 |
Seq # *Modification Id* Act
----------------------------+
12142 M01S00004.dsdi88 +++|* CALLS ERS, RBH, WBS.
12143 M00S09740.dsdi +++|
12144 M00S09741.dsdi +++|
| Line S00021 Modification History |
M01 (Added by) | ns2706 |
Seq # *Modification Id* Act
----------------------------+
12145 M01S00021.ns2706 +++| CRS2 RJ ERS END RECORD ON S
12146 M01S00022.ns2706 +++|
12147 M00S09742.dsdi +++| CRS SUBR ENTRY/EXIT
12148 M00S09743.dsdi +++| CRS1 SA1 BWCF SET NUMBER OF WORDS TO WRITE
12149 M00S09744.dsdi +++| BX6 X1
12150 M00S09745.dsdi +++| SA6 BWCS
12151 M00S09746.dsdi +++| RJ WBS WRITE BLOCK TO S
12152 M00S09747.dsdi +++| SA1 EORF
12153 M00S09748.dsdi +++| NG X1,CRS2 IF EOR
| Line S09749 Modification History |
M01 (Removed by) | dsdi88 |
Seq # *Modification Id* Act
----------------------------+
12154 M01S09749.dsdi88 ---| RJ RBF READ BLOCK FROM F
| Line S00005 Modification History |
M01 (Added by) | dsdi88 |
Seq # *Modification Id* Act
----------------------------+
12155 M01S00005.dsdi88 +++| RJ RBH READ BLOCK OR HEADER
| Line S09750 Modification History |
M01 (Removed by) | dsdi73 |
Seq # *Modification Id* Act
----------------------------+
12156 M01S09750.dsdi73 ---| NZ X1,ERR29 IF PREMATURE EOF
| Line S00008 Modification History |
M01 (Added by) | dsdi73 |
Seq # *Modification Id* Act
----------------------------+
12157 M01S00008.dsdi73 +++| NZ X1,PPE IF PREMATURE EOF
| Line S00006 Modification History |
M01 (Added by) | dsdi88 |
Seq # *Modification Id* Act
----------------------------+
12158 M01S00006.dsdi88 +++| NG X1,CRS2 IF EOR WITH DEFERRED HEADER
12159 M00S09751.dsdi +++| EQ CRS1 CONTINUE COPY OF RECORD
| Line S09752 Modification History |
M01 (Removed by) | ns2706 |
Seq # *Modification Id* Act
----------------------------+
12160 M01S09752.ns2706 ---|
12161 M01S09753.ns2706 ---| CRS2 RJ ERS END RECORD ON S
12162 M01S09754.ns2706 ---| EQ CRSX RETURN
12163 M00S09755.dsdi +++| CSI SPACE 4,10
12164 M00S09756.dsdi +++|** CSI - COLLECT SEGMENT INFORMATION.
12165 M00S09757.dsdi +++|*
12166 M00S09758.dsdi +++|* ENTRY (BUF - BUF+53*4) = C170-8X5 EXCHANGE PACKAGE.
12167 M00S09759.dsdi +++|*
12168 M00S09760.dsdi +++|* EXIT X6 = 12/0, 16/STL, 32/STA.
12169 M00S09761.dsdi +++|*
12170 M00S09762.dsdi +++|* USES A - 1, 2, 3.
12171 M00S09763.dsdi +++|* X - 1, 2, 3, 6.
12172 M00S09764.dsdi +++|
12173 M00S09765.dsdi +++|
12174 M00S09766.dsdi +++| CSI SUBR ENTRY/EXIT
12175 M00S09767.dsdi +++| SA1 BUF+128/2 SEGMENT TABLE LENGTH
12176 M00S09768.dsdi +++| SA2 BUF+272/2 SEGMENT TABLE ADDRESS
12177 M00S09769.dsdi +++| SA3 BUF+280/2
12178 M00S09770.dsdi +++| LX1 32
12179 M00S09771.dsdi +++| LX2 16
12180 M00S09772.dsdi +++| BX3 X1+X3
12181 M00S09773.dsdi +++| BX6 X3+X2
12182 M00S09774.dsdi +++| JP CSIX RETURN
| Line S09775 Modification History |
M01 (Removed by) | 271l739 |
Seq # *Modification Id* Act
----------------------------+
12183 M01S09775.271l739 ---| CST SPACE 4,6
| Line S00248 Modification History |
M01 (Added by) | 271l739 |
Seq # *Modification Id* Act
----------------------------+
12184 M01S00248.271l739 +++| CST SPACE 4,10
12185 M00S09776.dsdi +++|** CST - CREATE SUBTITLE LINE.
12186 M00S09777.dsdi +++|* READS SYSTEM DATE LINE FROM CM RECORD TO LISTING SUBTITLE.
12187 M00S09778.dsdi +++|*
| Line S00001 Modification History |
M01 (Added by) | dsdi87 |
Seq # *Modification Id* Act
----------------------------+
12188 M01S00001.dsdi87 +++|* EXIT (ED) = 0 IF *EDD* DUMP.
12189 M01S00002.dsdi87 +++|* = 1 IF *DROPVE* DUMP.
12190 M01S00003.dsdi87 +++|* = 2 IF NO *CM* RECORD FOUND.
12191 M01S00004.dsdi87 +++|*
12192 M00S09779.dsdi +++|* USES X - 0, 1, 2, 3, 6.
12193 M00S09780.dsdi +++|* A - 1, 2, 3, 6.
12194 M00S09781.dsdi +++|* B - 2, 6, 7.
12195 M00S09782.dsdi +++|*
12196 M00S09783.dsdi +++|* CALLS PCM, PKS, UPS.
12197 M00S09784.dsdi +++|*
12198 M00S09785.dsdi +++|* MACROS GETCM, SEARCH.
12199 M00S09786.dsdi +++|
12200 M00S09787.dsdi +++|
| Line S00005 Modification History |
M01 (Added by) | dsdi87 |
Seq # *Modification Id* Act
----------------------------+
12201 M01S00005.dsdi87 +++| CST2 SX6 2
12202 M01S00006.dsdi87 +++| SA6 ED ED = 2 IF NO CM RECORD FOUND
12203 M01S00007.dsdi87 +++|
12204 M00S09788.dsdi +++| CST SUBR
12205 M00S09789.dsdi +++| MX0 18
| Line S09790 Modification History |
M01 (Removed by) | 271l739 |
Seq # *Modification Id* Act
----------------------------+
12206 M01S09790.271l739 ---| SA1 =10HCM
| Line S00249 Modification History |
M01 (Added by) | 271l739 |
Seq # *Modification Id* Act
----------------------------+
12207 M01S00249.271l739 +++| SA1 .CMM
12208 M00S09791.dsdi +++| SEARCH TDIR,X1,X0 LOCATE CM RECORD
12209 M00S09792.dsdi +++| SA3 A2+3
12210 M00S09793.dsdi +++| NZ X2,CST1 IF *CM* RECORD PRESET
| Line S09794 Modification History |
M01 (Removed by) | 271l739 |
Seq # *Modification Id* Act
----------------------------+
12211 M01S09794.271l739 ---| SA1 =3LMEM
12212 M01S09795.271l739 ---| SEARCH TDIR,X1,X0 LOCATE *MEM* RECORD
| Line S00250 Modification History |
M01 (Added by) | 271l739 |
Seq # *Modification Id* Act
----------------------------+
12213 M01S00250.271l739 +++| SA2 MH
| Line S09796 Modification History |
M01 (Removed by) | dsdi87 |
Seq # *Modification Id* Act
----------------------------+
12214 M01S09796.dsdi87 ---| ZR X2,ERR4 IF NO CENTRAL MEMORY
| Line S00008 Modification History |
M01 (Added by) | dsdi87 |
Seq # *Modification Id* Act
----------------------------+
12215 M01S00008.dsdi87 +++| ZR X2,CST2 IF NO CENTRAL MEMORY
| Line S09797 Modification History |
M01 (Removed by) | ns2706 |
Seq # *Modification Id* Act
----------------------------+
12216 M01S09797.ns2706 ---| SX6 B1+
| Line S00023 Modification History |
M01 (Added by) | ns2706 |
Seq # *Modification Id* Act
----------------------------+
12217 M01S00023.ns2706 +++| LX2 -18
| Line S00024 Modification History |
M01 (Added by) | ns2706 |
M02 (Removed by) | dsdi87 |
Seq # *Modification Id* Act
----------------------------+
12218 M02S00024.dsdi87 ---| SX6 X2 0 IF *EDD* DUMP, NON-ZERO IF *DROPVE* DUMP
12219 M02S00025.dsdi87 ---| SA6 ED
| Line S00009 Modification History |
M01 (Added by) | dsdi87 |
Seq # *Modification Id* Act
----------------------------+
12220 M01S00009.dsdi87 +++| SX6 X2
12221 M01S00010.dsdi87 +++| ZR X6,CST0 IF *EDD* DUMP
12222 M01S00011.dsdi87 +++| SX6 B1+
12223 M01S00012.dsdi87 +++| CST0 SA6 ED ED = 0 IF *EDD* DUMP, = 1 IF *DROPVE* DUMP
| Line S00026 Modification History |
M01 (Added by) | ns2706 |
Seq # *Modification Id* Act
----------------------------+
12224 M01S00026.ns2706 +++| SX6 B1
12225 M01S00027.ns2706 +++| SA3 A2+B1
12226 M00S09798.dsdi +++| SA6 AP SET ADVANCED PROCESSOR FLAG
12227 M00S09799.dsdi +++| SA6 CE SET CM EXTENSION FLAG
| Line S09800 Modification History |
M01 (Removed by) | ns2706 |
Seq # *Modification Id* Act
----------------------------+
12228 M01S09800.ns2706 ---| SA3 A2+B1
12229 M00S09801.dsdi +++| CST1 BX6 X3
12230 M00S09802.dsdi +++| ZR X6,ERR4 IF NO CENTRAL MEMORY
12231 M00S09803.dsdi +++| SA6 UI
12232 M00S09804.dsdi +++| SA6 RI
12233 M00S09805.dsdi +++| SA6 CI
12234 M00S09806.dsdi +++| SX3 TIML
12235 M00S09807.dsdi +++| RJ PCM POSITION DUMP FILE
12236 M00S09808.dsdi +++| GETCM CSTA,8 READ SYSTEM DATE/NAME LINE
12237 M00S09809.dsdi +++| SA2 CSTA
12238 M00S09810.dsdi +++| SB6 80
12239 M00S09811.dsdi +++| SB7 PRBF
12240 M00S09812.dsdi +++| RJ UPS UNPACK LINE
12241 M00S09813.dsdi +++| SB2 PRBF
12242 M00S09814.dsdi +++| SB6 80
12243 M00S09815.dsdi +++| SB7 SBTL2
12244 M00S09816.dsdi +++| RJ PKS REPACK LINE IN SUBTITLE
12245 M00S09817.dsdi +++| JP CSTX EXIT
12246 M00S09818.dsdi +++|
12247 M00S09819.dsdi +++| CSTA BSS 8
12248 M00S09820.dsdi +++| CTS SPACE 4,12
12249 M00S09821.dsdi +++|** CTS - CONVERT TO STRING BUFFER.
12250 M00S09822.dsdi +++|*
12251 M00S09823.dsdi +++|* ENTRY X1 = BINARY DIGITS LEFT JUSTIFIED.
12252 M00S09824.dsdi +++|* B6 = NUMBER OF DIGITS TO CONVERT.
12253 M00S09825.dsdi +++|* B7 = ADDRESS OF STRING BUFFER.
12254 M00S09826.dsdi +++|*
12255 M00S09827.dsdi +++|* EXIT B7 IS UPDATED.
12256 M00S09828.dsdi +++|* X1 IS LEFT SHIFTED (B6)*3 PLACES.
12257 M00S09829.dsdi +++|*
12258 M00S09830.dsdi +++|* SAVES X - 2,3,4,5,6.
12259 M00S09831.dsdi +++|* B - 1,2,3,4,5.
12260 M00S09832.dsdi +++|* A - 0,1.
12261 M00S09833.dsdi +++|
12262 M00S09834.dsdi +++|
12263 M00S09835.dsdi +++| CTS SUBR
12264 M00S09836.dsdi +++| SX0 7 DIGIT MASK
12265 M00S09837.dsdi +++| CTS1 LX1 3 SHIFT ASSEMBLY
12266 M00S09838.dsdi +++| BX7 X0*X1
12267 M00S09839.dsdi +++| SX7 X7+1R0 CONVERT DIGIT
12268 M00S09840.dsdi +++| SA7 B7 SET IN STRING BUFFER
12269 M00S09841.dsdi +++| SB7 B7+B1 ADVANCE INDEX
12270 M00S09842.dsdi +++| SB6 B6-1 DECREASE COUNT
12271 M00S09843.dsdi +++| NZ B6,CTS1 IF MORE DIGITS
12272 M00S09844.dsdi +++| JP CTSX EXIT
| Line S00028 Modification History |
M01 (Added by) | ns2706 |
Seq # *Modification Id* Act
----------------------------+
12273 M01S00028.ns2706 +++| CVB SPACE 4,10
12274 M01S00029.ns2706 +++|** CVB - CONVERT *NOS/VE* BUFFER.
12275 M01S00030.ns2706 +++|*
12276 M01S00031.ns2706 +++|* CONVERT 64-BIT WORDS IN *FBB* FORMAT TO 60-BIT FORMAT (BYTE 0
12277 M01S00032.ns2706 +++|* IS TRUNCATED) FOR PROCESSING *DROPVE* DUMPS.
12278 M01S00033.ns2706 +++|*
12279 M01S00034.ns2706 +++|* ENTRY (X3) = NUMBER OF WORDS TO CONVERT. MUST BE .GT. 0.
12280 M01S00035.ns2706 +++|* (CVBA) = CONVERTED BUFFER POINTER.
12281 M01S00036.ns2706 +++|*
12282 M01S00037.ns2706 +++|* EXIT (CVBA) UPDATED.
12283 M01S00038.ns2706 +++|*
12284 M01S00039.ns2706 +++|* USES X - 0, 1, 2, 3, 6.
12285 M01S00040.ns2706 +++|* A - 1, 2, 6.
12286 M01S00041.ns2706 +++|
12287 M01S00042.ns2706 +++|
12288 M01S00043.ns2706 +++| CVB SUBR ENTRY/EXIT
12289 M01S00044.ns2706 +++| SA1 ED
| Line S00045 Modification History |
M01 (Added by) | ns2706 |
M02 (Removed by) | dsdi87 |
Seq # *Modification Id* Act
----------------------------+
12290 M02S00045.dsdi87 ---| ZR X1,CVBX IF NOT *DROPVE* DUMP
| Line S00013 Modification History |
M01 (Added by) | dsdi87 |
Seq # *Modification Id* Act
----------------------------+
12291 M01S00013.dsdi87 +++| ZR X1,CVBX IF USING *CM* RECORD
| Line S00046 Modification History |
M01 (Added by) | ns2706 |
Seq # *Modification Id* Act
----------------------------+
12292 M01S00046.ns2706 +++| SA1 BUF-1
12293 M01S00047.ns2706 +++| SA2 CVBA GET POINTER
12294 M01S00048.ns2706 +++| CVB1 MX0 -28
12295 M01S00049.ns2706 +++| SA1 A1+B1 GET BYTES 0, 1
12296 M01S00050.ns2706 +++| BX6 -X0*X1 TRUNCATE BYTE 0
12297 M01S00051.ns2706 +++| LX6 32
12298 M01S00052.ns2706 +++| SA1 A1+B1 GET BYTES 3, 4
12299 M01S00053.ns2706 +++| BX6 X6+X1
12300 M01S00054.ns2706 +++| SA6 X2 STORE CONVERTED WORD
12301 M01S00055.ns2706 +++| SX2 X2+B1 UPDATE POINTER
12302 M01S00056.ns2706 +++| SX3 X3-1
12303 M01S00057.ns2706 +++| NZ X3,CVB1 IF MORE TO CONVERT
12304 M01S00058.ns2706 +++| BX6 X2 STORE UPDATED POINTER
12305 M01S00059.ns2706 +++| SA6 A2
12306 M01S00060.ns2706 +++| EQ CVBX RETURN
12307 M01S00061.ns2706 +++|
12308 M01S00062.ns2706 +++|
12309 M01S00063.ns2706 +++| CVBA CON 0 STORAGE ADDRESS
12310 M00S09845.dsdi +++| CVE SPACE 4,15
12311 M00S09846.dsdi +++|** CVE - CHECK CONTROLLER DATA VERIFICATION ERROR.
12312 M00S09847.dsdi +++|*
12313 M00S09848.dsdi +++|* ENTRY (B5) = LEFT SHIFT FOR LOGICAL DIFFERENCE.
12314 M00S09849.dsdi +++|* (X6) = VERIFICATION ERROR FLAG.
12315 M00S09850.dsdi +++|* 0 = NO ERROR.
12316 M00S09851.dsdi +++|* 10B = BIT 0 IN ERROR.
12317 M00S09852.dsdi +++|* 1-7 = CORRESPONDING BIT IN ERROR.
12318 M00S09853.dsdi +++|* 17B = MULTIPLE BIT FAILURE.
12319 M00S09854.dsdi +++|*
12320 M00S09855.dsdi +++|* EXIT (X6) = 0 IF NO VERIFICATION ERROR.
12321 M00S09856.dsdi +++|* (X6) .LT. 0 IF MULTIPLE BIT FAILURE.
12322 M00S09857.dsdi +++|* (X6) = SHIFTED LOGICAL DIFFERENCE FOR BIT IN ERROR.
12323 M00S09858.dsdi +++|*
12324 M00S09859.dsdi +++|* USES X - 6.
12325 M00S09860.dsdi +++|* B - 4.
12326 M00S09861.dsdi +++|
12327 M00S09862.dsdi +++|
12328 M00S09863.dsdi +++| CVE SUBR ENTRY/EXIT
12329 M00S09864.dsdi +++| ZR X6,CVEX IF NO ERROR
12330 M00S09865.dsdi +++| SB4 X6-10B
12331 M00S09866.dsdi +++| MX6 1
12332 M00S09867.dsdi +++| GT B4,CVEX IF MULTIPLE BIT FAILURE
12333 M00S09868.dsdi +++| SX6 B1
12334 M00S09869.dsdi +++| ZR B4,CVE1 IF BIT 0 IN ERROR
12335 M00S09870.dsdi +++| SB4 B4+10B VERIFICATION ERROR BIT NUMBER
12336 M00S09871.dsdi +++| CVE1 LX6 B4
12337 M00S09872.dsdi +++| LX6 B5
12338 M00S09873.dsdi +++| EQ CVEX RETURN
12339 M00S09874.dsdi +++| DBB SPACE 4,9
12340 M00S09875.dsdi +++|** DBB - DUMP BATCHIO BUFFER POINTS.
12341 M00S09876.dsdi +++|*
12342 M00S09877.dsdi +++|* ENTRY (A0) = RETURN ADDRESS.
12343 M00S09878.dsdi +++|* (CN) = CONTROL POINT NUMBER.
12344 M00S09879.dsdi +++|* (RC) = CONTROL POINT REFERENCE ADDRESS.
12345 M00S09880.dsdi +++|*
12346 M00S09881.dsdi +++|* USES X - ALL.
12347 M00S09882.dsdi +++|* A - 1, 2, 3, 4, 5, 6, 7.
12348 M00S09883.dsdi +++|* B - 2, 3, 4, 5, 6, 7.
12349 M00S09884.dsdi +++|*
12350 M00S09885.dsdi +++|* CALLS CTS, DFI, FDW, PCM, SDI, SSB, UPS.
12351 M00S09886.dsdi +++|*
12352 M00S09887.dsdi +++|* MACROS GETCM, PRINT.
12353 M00S09888.dsdi +++|
12354 M00S09889.dsdi +++|
12355 M00S09890.dsdi +++| DBB PRINT (=2C )
12356 M00S09891.dsdi +++| PRINT (=C* BATCHIO BUFFER POINTS*)
12357 M00S09892.dsdi +++|
12358 M00S09893.dsdi +++|* PROCESS AVAILABLE EQUIPMENT TABLE.
12359 M00S09894.dsdi +++|
12360 M00S09895.dsdi +++| SA2 SSBF+/BIO/TEQR
12361 M00S09896.dsdi +++| SB6 5*7+4 MAXIMUM NUMBER OF EQUIPMENTS AVAILABLE
12362 M00S09897.dsdi +++| SB7 DBBA
12363 M00S09898.dsdi +++| LX2 12 SKIP COUNT FIELD
12364 M00S09899.dsdi +++| MX0 -12
12365 M00S09900.dsdi +++| SB5 4 BYTE COUNT FIRST WORD
12366 M00S09901.dsdi +++| JP DBB2 ENTER LOOP
12367 M00S09902.dsdi +++|
12368 M00S09903.dsdi +++| DBB1 SB5 5 BYTE COUNT REMAINING WORDS
12369 M00S09904.dsdi +++| DBB2 LX2 12
12370 M00S09905.dsdi +++| BX1 -X0*X2 NEXT BYTE
12371 M00S09906.dsdi +++| SB5 B5-B1
12372 M00S09907.dsdi +++| SB6 B6-B1
12373 M00S09908.dsdi +++| ZR X1,DBB3 IF END OF TABLE
12374 M00S09909.dsdi +++| NG B6,DBB3 IF MAXIMUM REACHED
12375 M00S09910.dsdi +++| AX1 3
12376 M00S09911.dsdi +++| BX6 -X0*X2
12377 M00S09912.dsdi +++| LX6 9
12378 M00S09913.dsdi +++| BX6 -X0*X6
12379 M00S09914.dsdi +++| LX6 54-9
12380 M00S09915.dsdi +++| BX6 X6+X1
12381 M00S09916.dsdi +++| SA6 B7+ STORE ENTRY INTO EQUIPMENT TYPE TABLE
12382 M00S09917.dsdi +++| SB7 B7+1
12383 M00S09918.dsdi +++| NZ B5,DBB2 IF MORE BYTES IN THIS WORD
12384 M00S09919.dsdi +++| SA2 A2+1 READ NEXT WORD
12385 M00S09920.dsdi +++| JP DBB1 CONTINUE
12386 M00S09921.dsdi +++|
12387 M00S09922.dsdi +++| DBB3 SX6 B0
12388 M00S09923.dsdi +++| SA6 B7 INDICATE END
12389 M00S09924.dsdi +++|
12390 M00S09925.dsdi +++|* CHECK FOR TWO EQUIPMENTS AT SAME ORDINAL.
12391 M00S09926.dsdi +++|
12392 M00S09927.dsdi +++| SB5 DBBA
12393 M00S09928.dsdi +++| DBB4 SB7 B7-1
12394 M00S09929.dsdi +++| SB6 B7+
12395 M00S09930.dsdi +++| LE B7,B5,DBB6 IF NO EQUIPMENTS MATCH
12396 M00S09931.dsdi +++| SA1 B7+
12397 M00S09932.dsdi +++| DBB5 SB6 B6-B1
12398 M00S09933.dsdi +++| SA2 B6
12399 M00S09934.dsdi +++| LT B6,B5,DBB4 IF NO MATCH YET
12400 M00S09935.dsdi +++| BX3 X1-X2 COMPARE ORDINALS
12401 M00S09936.dsdi +++| BX4 -X0*X3
12402 M00S09937.dsdi +++| NZ X4,DBB5 IF NO MATCH
12403 M00S09938.dsdi +++| PRINT (=2C )
12404 M00S09939.dsdi +++| PRINT (=C+ *********WARNING - BATCHIO AVAILABLE EQUIPMENT TA
12405 M00S09940.dsdi +++|,BLE ERROR, TWO MATCHING ORDINALS+)
12406 M00S09941.dsdi +++|
12407 M00S09942.dsdi +++|* CLEAR FET ADDRESS TABLE.
12408 M00S09943.dsdi +++|
12409 M00S09944.dsdi +++| DBB6 SB5 DBBB
12410 M00S09945.dsdi +++| MX6 1
12411 M00S09946.dsdi +++| SB6 DBBB+/BIO/MXEQ
12412 M00S09947.dsdi +++| DBB7 SB6 B6-1
12413 M00S09948.dsdi +++| LT B6,B5,DBB8 IF FINISHED
12414 M00S09949.dsdi +++| SA6 B6+
12415 M00S09950.dsdi +++| JP DBB7
12416 M00S09951.dsdi +++|
12417 M00S09952.dsdi +++|* SET ACTIVE BUFFER POINT COUNT.
12418 M00S09953.dsdi +++|
12419 M00S09954.dsdi +++| DBB8 SA2 =3L1CD SET PP NAME MASK
12420 M00S09955.dsdi +++| BX0 X2
12421 M00S09956.dsdi +++| SX5 0 SET INITIAL COUNT
12422 M00S09957.dsdi +++| SB3 /BIO/D1AR SET 1ST DRIVER ASSIGNMENT WORD ADDRESS
12423 M00S09958.dsdi +++| DBB9 SA2 RC SET DRIVER WORD ADDRESS
12424 M00S09959.dsdi +++| SX7 B3 SAVE ADDRESS
12425 M00S09960.dsdi +++| IX3 X2+X7
12426 M00S09961.dsdi +++| SA7 DBBI
12427 M00S09962.dsdi +++| RJ PCM POSITION TO DRIVER ASSIGNMENT WORD
12428 M00S09963.dsdi +++| GETCM
12429 M00S09964.dsdi +++| BX3 X0-X6
12430 M00S09965.dsdi +++| AX3 42
12431 M00S09966.dsdi +++| NZ X3,DBB10 IF *1CD* NOT RUNNING
12432 M00S09967.dsdi +++| LX6 36
12433 M00S09968.dsdi +++| AX6 48
12434 M00S09969.dsdi +++| IX5 X5+X6 ADD INTO COUNT
12435 M00S09970.dsdi +++| DBB10 SA2 DBBI CHECK NEXT ASSIGNMENT WORD
12436 M00S09971.dsdi +++| SB3 X2+B1
12437 M00S09972.dsdi +++| SB6 /BIO/DRQR
12438 M00S09973.dsdi +++| NE B3,B6,DBB11 IF THREE WORDS NOT PROCESSED
12439 M00S09974.dsdi +++| MX0 -12 SET BUFFER POINT NUMBER MASK
12440 M00S09975.dsdi +++| SX7 X5 SAVE COUNT
12441 M00S09976.dsdi +++| SA7 DBBH
12442 M00S09977.dsdi +++|
12443 M00S09978.dsdi +++|* SET FET ADDRESS TABLE.
12444 M00S09979.dsdi +++|
12445 M00S09980.dsdi +++| SX5 /BIO/BUFR ADDRESS OF FIRST FET
12446 M00S09981.dsdi +++| SX7 /BIO/MXEQ
12447 M00S09982.dsdi +++| SA7 DBBC SET MAXIMUM NUMBER OF FETS TO PROCESS
12448 M00S09983.dsdi +++| DBB11 SA3 DBBH
12449 M00S09984.dsdi +++| ZR X3,DBB16 IF OUT OF FETS
12450 M00S09985.dsdi +++| SA2 RC
12451 M00S09986.dsdi +++| IX3 X2+X5
12452 M00S09987.dsdi +++| SX6 X5
12453 M00S09988.dsdi +++| SA6 DBBD SAVE CURRENT FET ADDRESS
12454 M00S09989.dsdi +++| RJ PCM
12455 M00S09990.dsdi +++| GETCM DBBE,6
12456 M00S09991.dsdi +++| SA2 DBBE+5
12457 M00S09992.dsdi +++| LX2 12
12458 M00S09993.dsdi +++| BX3 -X0*X2 BUFFER POINT INDEX
12459 M00S09994.dsdi +++| ZR X3,DBB13 IF NO BUFFER POINT
12460 M00S09995.dsdi +++| SX3 X3-/BIO/BFCW+2
12461 M00S09996.dsdi +++| AX3 1 BUFFER POINT
12462 M00S09997.dsdi +++| SX4 X3-/BIO/MXEQ-1
12463 M00S09998.dsdi +++| SB3 X3
12464 M00S09999.dsdi +++| NG X4,DBB12 IF VALID BUFFER POINT
12465 M00S10000.dsdi +++| PRINT (=2C )
12466 M00S10001.dsdi +++| PRINT (=C+ *********WARNING - INVALID BATCHIO FET BUFFER POI
12467 M00S10002.dsdi +++|,NT+)
12468 M00S10003.dsdi +++| SX7 X5 ADDRESS OF FET
12469 M00S10004.dsdi +++| SA1 CN
12470 M00S10005.dsdi +++| BX6 X1 CONTROL POINT NUMBER
12471 M00S10006.dsdi +++| SX5 -1
12472 M00S10007.dsdi +++| RJ DFI DUMP FILE INFORMATION
12473 M00S10008.dsdi +++| JP DBB13 ADVANCE FET ADDRESS
12474 M00S10009.dsdi +++|
12475 M00S10010.dsdi +++| DBB12 SX6 X5+
12476 M00S10011.dsdi +++| SA6 B3+DBBB SET FET ADDRESS INTO TABLE
12477 M00S10012.dsdi +++| DBB13 SA3 DBBE+4
12478 M00S10013.dsdi +++| SA5 DBBD CURRENT FET ADDRESS
12479 M00S10014.dsdi +++| SX4 X3 NEXT FET ADDRESS
12480 M00S10015.dsdi +++| IX1 X5-X4
12481 M00S10016.dsdi +++| NG X1,DBB14 IF CORRECT LINKAGE
12482 M00S10017.dsdi +++| PRINT (=2C )
12483 M00S10018.dsdi +++| PRINT (=C+ *********WARNING - BATCHIO FET LINKAGE ERROR+)
12484 M00S10019.dsdi +++| SX7 X5 ADDRESS OF FET
12485 M00S10020.dsdi +++| SA1 CN
12486 M00S10021.dsdi +++| BX6 X1 CONTROL POINT NUMBER
12487 M00S10022.dsdi +++| SX5 -1
12488 M00S10023.dsdi +++| RJ DFI DUMP FILE INFORMATION
12489 M00S10024.dsdi +++| JP DBB30 TERMINATE DIRECTIVE
12490 M00S10025.dsdi +++|
12491 M00S10026.dsdi +++| DBB14 SX5 X4+ SET FET ADDRESS
12492 M00S10027.dsdi +++| SA3 DBBE
12493 M00S10028.dsdi +++| MX6 24 CHECK FOR JSN
12494 M00S10029.dsdi +++| BX6 X6*X3
12495 M00S10030.dsdi +++| ZR X6,DBB15 IF NO JSN IN FET
12496 M00S10031.dsdi +++| SA3 DBBH DECREMENT BUFFER POINT COUNT
12497 M00S10032.dsdi +++| SX6 X3-1
12498 M00S10033.dsdi +++| SA6 A3+
12499 M00S10034.dsdi +++| DBB15 SA1 DBBC
12500 M00S10035.dsdi +++| SX6 X1-1
12501 M00S10036.dsdi +++| SA6 A1+ DECREMENT MAXIMUM NUMBER OF FETS
12502 M00S10037.dsdi +++| NZ X6,DBB11 IF MAXIMUM NOT PROCESSED
12503 M00S10038.dsdi +++|
12504 M00S10039.dsdi +++|* FIND LOCATION OF BUFFER POINTS IN NEGATIVE FL.
12505 M00S10040.dsdi +++|
12506 M00S10041.dsdi +++| DBB16 SX6 B0+
12507 M00S10042.dsdi +++| SA6 DBBG PRESET BUFFER POINT NUMBER
12508 M00S10043.dsdi +++| DBB17 SA1 F.TNFL FORM ADDRESS OF BUFFER POINTS IN *TNFL*
12509 M00S10044.dsdi +++| SA2 L.TNFL
12510 M00S10045.dsdi +++| SX5 /BIO/BFCW+2
12511 M00S10046.dsdi +++| IX1 X1+X2
12512 M00S10047.dsdi +++| IX6 X1-X5
12513 M00S10048.dsdi +++| SA6 DBBF LOCATION-2 OF BUFFER POINTS
12514 M00S10049.dsdi +++|
12515 M00S10050.dsdi +++|* DUMP BUFFER POINTS.
12516 M00S10051.dsdi +++|
12517 M00S10052.dsdi +++| SA1 DBBG
12518 M00S10053.dsdi +++| SX6 X1+1
12519 M00S10054.dsdi +++| SA6 A1+
12520 M00S10055.dsdi +++| SX2 X6-/BIO/MXEQ-1
12521 M00S10056.dsdi +++| SX5 X6+ BUFFER POINT NUMBER
12522 M00S10057.dsdi +++| ZR X2,DBB30 IF ALL BUFFER POINTS DUMPED
12523 M00S10058.dsdi +++| PRINT (=2C )
12524 M00S10059.dsdi +++| RJ SSB CLEAR PRINT STRING
12525 M00S10060.dsdi +++|
12526 M00S10061.dsdi +++|* SET BUFFER POINT, FIRST WORD.
12527 M00S10062.dsdi +++|
12528 M00S10063.dsdi +++| SA2 DBBF
12529 M00S10064.dsdi +++| LX0 X5,B1
12530 M00S10065.dsdi +++| IX4 X0+X2
12531 M00S10066.dsdi +++| SA1 X4
12532 M00S10067.dsdi +++| ZR X1,DBB30 IF ALL ACTIVE BUFFER POINTS DUMPED
12533 M00S10068.dsdi +++| BX6 X1 SAVE FIRST WORD
12534 M00S10069.dsdi +++| SA6 DBBJ
12535 M00S10070.dsdi +++| SB7 PRBF+36
12536 M00S10071.dsdi +++| SA2 =4000005B FORMAT CONTROL
12537 M00S10072.dsdi +++| RJ FDW
12538 M00S10073.dsdi +++| BX2 X1
12539 M00S10074.dsdi +++| SB6 10
12540 M00S10075.dsdi +++| RJ SDI
12541 M00S10076.dsdi +++|
12542 M00S10077.dsdi +++|* SET BUFFER POINT NUMBER.
12543 M00S10078.dsdi +++|
12544 M00S10079.dsdi +++| SB7 PRBF
12545 M00S10080.dsdi +++| SA2 =13HBUFFER POINT
12546 M00S10081.dsdi +++| SB6 13
12547 M00S10082.dsdi +++| RJ UPS
12548 M00S10083.dsdi +++| BX1 X5
12549 M00S10084.dsdi +++| LX1 -6
12550 M00S10085.dsdi +++| SB6 2
12551 M00S10086.dsdi +++| RJ CTS CONVERT BUFFER POINT NUMBER
12552 M00S10087.dsdi +++|
12553 M00S10088.dsdi +++|* SET EQUIPMENT TYPE.
12554 M00S10089.dsdi +++|
12555 M00S10090.dsdi +++| SA2 =17HEQUIPMENT TYPE =
12556 M00S10091.dsdi +++| SB6 17
12557 M00S10092.dsdi +++| SB7 PRBF+74
12558 M00S10093.dsdi +++| RJ UPS
12559 M00S10094.dsdi +++|
12560 M00S10095.dsdi +++|* FIND EQUIPMENT TYPE.
12561 M00S10096.dsdi +++|
12562 M00S10097.dsdi +++| MX6 -12
12563 M00S10098.dsdi +++| SA3 DBBJ GET FIRST WORD OF BUFFER POINT AREA
12564 M00S10099.dsdi +++| AX3 12
12565 M00S10100.dsdi +++| BX1 -X6*X3
12566 M00S10101.dsdi +++| ZR X1,DBB24 IF EST NOT SPECIFIED
12567 M00S10102.dsdi +++| SB4 DBBA-1
12568 M00S10103.dsdi +++| DBB18 SB4 B4+B1
12569 M00S10104.dsdi +++| SA2 B4
12570 M00S10105.dsdi +++| ZR X2,DBB23 IF NOT FOUND
12571 M00S10106.dsdi +++| BX3 X1-X2 COMPARE ENTRIES
12572 M00S10107.dsdi +++| BX4 -X6*X3
12573 M00S10108.dsdi +++| NZ X4,DBB18 IF MATCH NOT FOUND YET
12574 M00S10109.dsdi +++| AX2 54
12575 M00S10110.dsdi +++| BX3 -X6*X2
12576 M00S10111.dsdi +++| SX2 X3-/BIO/LPDT
12577 M00S10112.dsdi +++| ZR X2,DBB19 IF PRINTER
12578 M00S10113.dsdi +++| SX2 X3-/BIO/CPDT
12579 M00S10114.dsdi +++| ZR X2,DBB20 IF CARD PUNCH
12580 M00S10115.dsdi +++| SX2 X3-/BIO/CRDT
12581 M00S10116.dsdi +++| ZR X2,DBB21 IF CARD READER
12582 M00S10117.dsdi +++| SX2 X3-/BIO/NPDT
12583 M00S10118.dsdi +++| ZR X2,DBB22 IF NON-IMPACT PRINTER
12584 M00S10119.dsdi +++| SA2 =13HINCORRECT
12585 M00S10120.dsdi +++| JP DBB25 MOVE NAME TO BUFFER
12586 M00S10121.dsdi +++|
12587 M00S10122.dsdi +++| DBB19 SA2 =13HPRINTER
12588 M00S10123.dsdi +++| JP DBB25 MOVE NAME TO BUFFER
12589 M00S10124.dsdi +++|
12590 M00S10125.dsdi +++| DBB20 SA2 =13HCARD PUNCH
12591 M00S10126.dsdi +++| JP DBB25 MOVE NAME TO BUFFER
12592 M00S10127.dsdi +++|
12593 M00S10128.dsdi +++| DBB21 SA2 =13HCARD READER
12594 M00S10129.dsdi +++| JP DBB25 MOVE NAME TO BUFFER
12595 M00S10130.dsdi +++|
12596 M00S10131.dsdi +++| DBB22 SA2 =13HNIP PRINTER
12597 M00S10132.dsdi +++| JP DBB25 MOVE NAME TO BUFFER
12598 M00S10133.dsdi +++|
12599 M00S10134.dsdi +++| DBB23 SA2 =13HNOT FOUND
12600 M00S10135.dsdi +++| JP DBB25 MOVE NAME TO BUFFER
12601 M00S10136.dsdi +++|
12602 M00S10137.dsdi +++| DBB24 SA2 =13HNOT SPECIFIED
12603 M00S10138.dsdi +++| DBB25 SB6 13
12604 M00S10139.dsdi +++| RJ UPS
12605 M00S10140.dsdi +++| BX0 X1
12606 M00S10141.dsdi +++| PRINT CCCH,B7-CCCH
12607 M00S10142.dsdi +++|
12608 M00S10143.dsdi +++|* SET BUFFER POINT, SECOND WORD.
12609 M00S10144.dsdi +++|
12610 M00S10145.dsdi +++| RJ SSB CLEAR PRINT STRING
12611 M00S10146.dsdi +++| BX3 X0
12612 M00S10147.dsdi +++| SA2 DBBF
12613 M00S10148.dsdi +++| LX0 X5,B1
12614 M00S10149.dsdi +++| IX4 X0+X2
12615 M00S10150.dsdi +++| SA1 X4+B1
12616 M00S10151.dsdi +++| SB7 PRBF+36
12617 M00S10152.dsdi +++| SA2 =4000005B FORMAT CONTROL
12618 M00S10153.dsdi +++| RJ FDW
12619 M00S10154.dsdi +++| BX2 X1
12620 M00S10155.dsdi +++| SB6 10
12621 M00S10156.dsdi +++| RJ SDI
12622 M00S10157.dsdi +++| ZR X3,DBB26 IF NO EST SPECIFIED
12623 M00S10158.dsdi +++|
12624 M00S10159.dsdi +++|* SET EST.
12625 M00S10160.dsdi +++|
12626 M00S10161.dsdi +++| SA2 =6HEST -
12627 M00S10162.dsdi +++| SB6 6
12628 M00S10163.dsdi +++| SB7 PRBF+74
12629 M00S10164.dsdi +++| RJ UPS
12630 M00S10165.dsdi +++| SA1 F.TCMT
12631 M00S10166.dsdi +++| SB2 X1+
12632 M00S10167.dsdi +++| SA2 B2+ESTP
12633 M00S10168.dsdi +++| AX2 36
12634 M00S10169.dsdi +++| R= X4,ESTE
12635 M00S10170.dsdi +++| IX3 X3*X4
12636 M00S10171.dsdi +++| IX1 X2+X3 EST ADDRESS
12637 M00S10172.dsdi +++| SX1 X1+EQDE
12638 M00S10173.dsdi +++| SA3 B2+X1 EST
12639 M00S10174.dsdi +++| LX1 -18
12640 M00S10175.dsdi +++| SB6 6
12641 M00S10176.dsdi +++| RJ CTS
12642 M00S10177.dsdi +++| BX1 X3
12643 M00S10178.dsdi +++| SB7 B7+2
12644 M00S10179.dsdi +++| SA2 =4000005B FORMAT CONTROL
12645 M00S10180.dsdi +++| RJ FDW
12646 M00S10181.dsdi +++| BX2 X1
12647 M00S10182.dsdi +++| SB6 10
12648 M00S10183.dsdi +++| RJ SDI
12649 M00S10184.dsdi +++| DBB26 PRINT CCCH,B7-CCCH
12650 M00S10185.dsdi +++| PRINT (=2C )
12651 M00S10186.dsdi +++|
12652 M00S10187.dsdi +++|* DUMP FET.
12653 M00S10188.dsdi +++|
12654 M00S10189.dsdi +++| MX0 24
12655 M00S10190.dsdi +++| SA4 DBBJ GET BUFFER POINT JSN
12656 M00S10191.dsdi +++| BX4 X0*X4
12657 M00S10192.dsdi +++| ZR X4,DBB17 IF NO ASSOCIATED FET
12658 M00S10193.dsdi +++| SX0 /BIO/MXEQ
12659 M00S10194.dsdi +++| DBB27 SX0 X0-1 GET JSN OF FET
12660 M00S10195.dsdi +++| NG X0,DBB28 IF END OF TABLE
12661 M00S10196.dsdi +++| SA5 DBBB+X0
12662 M00S10197.dsdi +++| NG X5,DBB27 IF NULL ENTRY PROCESS NEXT ENTRY
12663 M00S10198.dsdi +++| NZ X5,DBB29 IF STILL SEARCHING FET ADDRESS TABLE
12664 M00S10199.dsdi +++| DBB28 PRINT (=2C )
12665 M00S10200.dsdi +++| PRINT (=C+ *********WARNING - EXPECTED FET ADDRESS NOT FOUND
12666 M00S10201.dsdi +++|,+)
12667 M00S10202.dsdi +++| EQ DBB17 CHECK NEXT BUFFER POINT
12668 M00S10203.dsdi +++|
12669 M00S10204.dsdi +++| DBB29 SA3 RC READ FIRST WORD OF FET
12670 M00S10205.dsdi +++| IX3 X5+X3
12671 M00S10206.dsdi +++| RJ PCM
12672 M00S10207.dsdi +++| GETCM
12673 M00S10208.dsdi +++| SA4 DBBJ
12674 M00S10209.dsdi +++| BX1 X6-X4
12675 M00S10210.dsdi +++| AX1 36
12676 M00S10211.dsdi +++| NZ X1,DBB27 IF NO MATCHING JSN
12677 M00S10212.dsdi +++| SX7 X5+ SET FET ADDRESS
12678 M00S10213.dsdi +++| SA1 CN
12679 M00S10214.dsdi +++| BX6 X1 CONTROL POINT NUMBER
12680 M00S10215.dsdi +++| SX5 -1
12681 M00S10216.dsdi +++| RJ DFI DUMP FILE INFORMATION
12682 M00S10217.dsdi +++| JP DBB17 CONTINUE
12683 M00S10218.dsdi +++|
12684 M00S10219.dsdi +++| DBB30 SB2 A0
12685 M00S10220.dsdi +++| JP B2 RETURN
12686 M00S10221.dsdi +++|
12687 M00S10222.dsdi +++| DBBA BSS 5*10B EQUIPMENT TYPE TABLE
12688 M00S10223.dsdi +++|*T DBBA 6/ TYPE, 42/, 12/ ORD
12689 M00S10224.dsdi +++|* TYPE = DEVICE TYPE, SEE *COMSBIO*.
12690 M00S10225.dsdi +++|* ORD = EST ORDINAL.
12691 M00S10226.dsdi +++| DBBB BSS /BIO/MXEQ FET ADDRESS TABLE
12692 M00S10227.dsdi +++| DBBC BSS 1 MAXIMUM NUMBER OF FETS REMAINING
12693 M00S10228.dsdi +++| DBBD BSS 1 CURRENT FET ADDRESS
12694 M00S10229.dsdi +++| DBBE BSS 6 FET
12695 M00S10230.dsdi +++| DBBF BSS 1 LOCATION-2 OF BUFFER POINTS
12696 M00S10231.dsdi +++| DBBG BSS 1 CURRENT BUFFER POINT NUMBER
12697 M00S10232.dsdi +++| DBBH BSS 1 NUMBER OF ACTIVE BUFFER POINTS
12698 M00S10233.dsdi +++| DBBI BSS 1 CURRENT DRIVER ASSIGNMENT WORD ADDRESS
12699 M00S10234.dsdi +++| DBBJ BSS 1 FIRST WORD OF CURRENT BUFFER POINT AREA
12700 M00S10235.dsdi +++| DBP SPACE 4,7
12701 M00S10236.dsdi +++|** DBP - DUMP BATCHIO PPUS.
12702 M00S10237.dsdi +++|*
12703 M00S10238.dsdi +++|* ENTRY A0 = RETURN ADDRESS.
12704 M00S10239.dsdi +++|*
12705 M00S10240.dsdi +++|* USES ALL REGISTERS.
12706 M00S10241.dsdi +++|*
12707 M00S10242.dsdi +++|* CALLS ASP.
12708 M00S10243.dsdi +++|
12709 M00S10244.dsdi +++|
12710 M00S10245.dsdi +++| DBP SX6 DBPA
12711 M00S10246.dsdi +++| JP ASP
12712 M00S10247.dsdi +++|
12713 M00S10248.dsdi +++| DBPA VFD 18/3L1CD,42/0
12714 M00S10249.dsdi +++| VFD 18/3L1IO,42/0
12715 M00S10250.dsdi +++| VFD 18/3LDSP,42/0
12716 M00S10251.dsdi +++| VFD 18/3LQAC,42/0
12717 M00S10252.dsdi +++| VFD 18/3LQAP,42/0
12718 M00S10253.dsdi +++| VFD 60/-1 END OF PARAMETER BLOCK
| Line S10254 Modification History |
M01 (Removed by) | dsdi91 |
Seq # *Modification Id* Act
----------------------------+
12719 M01S10254.dsdi91 ---| DBT SPACE 4,10
| Line S00001 Modification History |
M01 (Added by) | dsdi91 |
Seq # *Modification Id* Act
----------------------------+
12720 M01S00001.dsdi91 +++| DBT SPACE 4,25
12721 M00S10255.dsdi +++|** DBT - DUMP BUFFERED DEVICE TABLE.
12722 M00S10256.dsdi +++|*
12723 M00S10257.dsdi +++|* ENTRY (X5) = TABLE DESCRIPTION ADDRESS.
12724 M00S10258.dsdi +++|* (X6) = ADDRESS OF PRINTER FORMAT TABLE POINTERS.
12725 M00S10259.dsdi +++|* (X6)+1 = ADDRESS OF TERMINAL FORMAT TABLE POINTERS.
12726 M00S10260.dsdi +++|* (X7) = TABLE NAME ADDRESS.
12727 M00S10261.dsdi +++|* (B2) = TABLE ENTRY INDEX IN BUFFERED DEVICE TABLE.
12728 M00S10262.dsdi +++|*
12729 M00S10263.dsdi +++|* ERROR TO *ERR6*, IF CONVERSION ERROR ON SELECTED
12730 M00S10264.dsdi +++|* ENTRY NUMBER.
12731 M00S10265.dsdi +++|* TO *ERR16*, IF PROCESSING FULL TABLE DUMP WITH
12732 M00S10266.dsdi +++|* TERMINAL OUTPUT.
12733 M00S10267.dsdi +++|* TO *ERR34*, IF NO BUFFERED DEVICE TABLE ON
12734 M00S10268.dsdi +++|* DUMP FILE.
12735 M00S10269.dsdi +++|* TO *ERR35*, IF SELECTED ENTRY BEYOND TABLE BOUNDARY.
12736 M00S10270.dsdi +++|*
12737 M00S10271.dsdi +++|* USES X - 1, 2, 3, 4, 6.
12738 M00S10272.dsdi +++|* A - 1, 2, 3, 4, 6, 7.
12739 M00S10273.dsdi +++|* B - 2, 6, 7.
12740 M00S10274.dsdi +++|*
12741 M00S10275.dsdi +++|* CALLS ASD, CLE, GTD, GTE, LDC, PEN, POM, SCM, SRA.
12742 M00S10276.dsdi +++|*
12743 M00S10277.dsdi +++|* MACROS GETCM, PRINT.
12744 M00S10278.dsdi +++|
12745 M00S10279.dsdi +++|
12746 M00S10280.dsdi +++| DBT SUBR ENTRY/EXIT
12747 M00S10281.dsdi +++| SA6 DBTA STORE FORMAT TABLE POINTERS ADDRESS
12748 M00S10282.dsdi +++| SA7 DBTB STORE TABLE NAME ADDRESS
| Line S00002 Modification History |
M01 (Added by) | dsdi91 |
Seq # *Modification Id* Act
----------------------------+
12749 M01S00002.dsdi91 +++| RJ SCM SET CENTRAL MEMORY
12750 M01S00003.dsdi91 +++| SX1 B2 SAVE (B2) ACROSS *LDC* CALL
12751 M01S00004.dsdi91 +++| LX5 18
12752 M01S00005.dsdi91 +++| BX5 X5+X1
12753 M00S10283.dsdi +++| RJ LDC LIST DIRECTIVE
12754 M00S10284.dsdi +++| SA2 F.TCMT
| Line S00006 Modification History |
M01 (Added by) | dsdi91 |
Seq # *Modification Id* Act
----------------------------+
12755 M01S00006.dsdi91 +++| SB2 X5 RESTORE (B2), (X5)
12756 M01S00007.dsdi91 +++| AX5 18
12757 M00S10285.dsdi +++| SA1 X2+BIOL
12758 M00S10286.dsdi +++| AX1 24
12759 M00S10287.dsdi +++| SX1 X1
12760 M00S10288.dsdi +++| ZR X1,ERR34 IF TABLE NOT ON DUMP FILE
12761 M00S10289.dsdi +++| SX6 X1+B2
12762 M00S10290.dsdi +++| SA6 CPRA
12763 M00S10291.dsdi +++| PRINT (=2C )
12764 M00S10292.dsdi +++| PRINT X5 PRINT TABLE DESCRIPTION
12765 M00S10293.dsdi +++| PRINT (=2C )
12766 M00S10294.dsdi +++| PRINT (=2C )
12767 M00S10295.dsdi +++| SX6 B0
12768 M00S10296.dsdi +++| RJ SRA SET REFERENCE ADDRESS
12769 M00S10297.dsdi +++| SB2 CPRA
12770 M00S10298.dsdi +++| RJ POM POSITION TO *BDT* ENTRY
12771 M00S10299.dsdi +++| GETCM
12772 M00S10300.dsdi +++| SA6 BE STORE *BDT* ENTRY FOR TABLE
| Line S10301 Modification History |
M01 (Removed by) | dsdi91 |
Seq # *Modification Id* Act
----------------------------+
12773 M01S10301.dsdi91 ---| RJ SCM SET CENTRAL MEMORY
12774 M00S10302.dsdi +++| SB7 B0 ASSUME OCTAL BASE
12775 M00S10303.dsdi +++| RJ ASD GET NEXT ENTRY NUMBER
12776 M00S10304.dsdi +++| NZ X4,ERR6 IF CONVERSION ERROR
12777 M00S10305.dsdi +++| NZ B6,DBT5 IF PROCESSING SELECTED ENTRIES
12778 M00S10306.dsdi +++|
12779 M00S10307.dsdi +++|* PROCESS FULL TABLE DUMP.
12780 M00S10308.dsdi +++|
12781 M00S10309.dsdi +++| SA1 TF
12782 M00S10310.dsdi +++| NZ X1,ERR16 IF OUTPUT TO TERMINAL
12783 M00S10311.dsdi +++| SX6 -1 PRESET ENTRY NUMBER
12784 M00S10312.dsdi +++| SA6 DBTC
12785 M00S10313.dsdi +++| DBT1 SA4 DBTC
12786 M00S10314.dsdi +++| SX4 X4+1 INCREMENT ENTRY NUMBER
12787 M00S10315.dsdi +++| RJ CLE CHECK FOR LAST ENTRY
12788 M00S10316.dsdi +++| PL X3,DBTX IF ALL TABLE ENTRIES DUMPED
12789 M00S10317.dsdi +++| SX6 X1+ STORE ENTRY LENGTH
12790 M00S10318.dsdi +++| SA6 DBTD
12791 M00S10319.dsdi +++| SA3 BE GET TABLE FWA
12792 M00S10320.dsdi +++| SX3 X3
12793 M00S10321.dsdi +++| IX6 X0+X3
12794 M00S10322.dsdi +++| SA6 FW SET ENTRY ADDRESS IN DUMP FILE
12795 M00S10323.dsdi +++| SX6 X4+
12796 M00S10324.dsdi +++| SA6 DBTC STORE ENTRY NUMBER
12797 M00S10325.dsdi +++| ZR X4,DBT2 IF DUMPING FIRST ENTRY
12798 M00S10326.dsdi +++| SX3 0 CLEAR IF NOT FIRST CALL
12799 M00S10327.dsdi +++| DBT2 RJ GTE GET TABLE ENTRY FWA IN CORE
12800 M00S10328.dsdi +++| SB2 B0
12801 M00S10329.dsdi +++| SA1 DBTD GET ENTRY LENGTH
12802 M00S10330.dsdi +++| SB3 X1
12803 M00S10331.dsdi +++| DBT3 SA1 X5+B2 GET ENTRY WORD
12804 M00S10332.dsdi +++| NZ X1,DBT4 IF NONZERO ENTRY
12805 M00S10333.dsdi +++| SB2 B2+B1
12806 M00S10334.dsdi +++| LT B2,B3,DBT3 IF MORE WORDS TO CHECK
12807 M00S10335.dsdi +++| EQ DBT1 CHECK NEXT ENTRY
12808 M00S10336.dsdi +++|
12809 M00S10337.dsdi +++| DBT4 SB6 4
12810 M00S10338.dsdi +++| SA1 DBTC GET ENTRY NUMBER
12811 M00S10339.dsdi +++| LX1 -12
12812 M00S10340.dsdi +++| SA2 DBTB SET TABLE NAME ADDRESS
12813 M00S10341.dsdi +++| SA2 X2
12814 M00S10342.dsdi +++| RJ PEN PRINT ENTRY NUMBER
12815 M00S10343.dsdi +++| SA1 FW
12816 M00S10344.dsdi +++| IX6 X5-X1
12817 M00S10345.dsdi +++| SB2 X6 SET DATA ADDRESS IN CORE BUFFER
12818 M00S10346.dsdi +++| SA1 DBTA SET FORMAT TABLE POINTERS
12819 M00S10347.dsdi +++| SA1 X1+
12820 M00S10348.dsdi +++| RJ GTD GENERATE DETAILED TABLE ENTRY DUMP
12821 M00S10349.dsdi +++| PRINT (=2C )
12822 M00S10350.dsdi +++| EQ DBT1 DUMP NEXT ENTRY
12823 M00S10351.dsdi +++|
12824 M00S10352.dsdi +++|* PROCESS DUMP OF SELECTED TABLE ENTRIES.
12825 M00S10353.dsdi +++|
12826 M00S10354.dsdi +++| DBT5 SX4 X6+
12827 M00S10355.dsdi +++| SA6 DBTC SAVE ENTRY NUMBER
12828 M00S10356.dsdi +++| RJ CLE CHECK FOR VALID ENTRY NUMBER
12829 M00S10357.dsdi +++| PL X3,ERR35 IF ENTRY BEYOND END OF TABLE
12830 M00S10358.dsdi +++| SA3 BE
12831 M00S10359.dsdi +++| SX3 X3
12832 M00S10360.dsdi +++| IX6 X0+X3
12833 M00S10361.dsdi +++| SA6 FW SET ENTRY ADDRESS IN DUMP FILE
12834 M00S10362.dsdi +++| NZ B6,DBT6 IF FIRST ENTRY TO BE DUMPED
12835 M00S10363.dsdi +++| SX3 0 CLEAR IF NOT FIRST ENTRY
12836 M00S10364.dsdi +++| DBT6 RJ GTE GET TABLE ENTRY FWA IN CORE
12837 M00S10365.dsdi +++| SB6 4
12838 M00S10366.dsdi +++| SA1 DBTC GET ENTRY NUMBER
12839 M00S10367.dsdi +++| LX1 -12
12840 M00S10368.dsdi +++| SA2 DBTB SET TABLE NAME ADDRESS
12841 M00S10369.dsdi +++| SA2 X2+
12842 M00S10370.dsdi +++| RJ PEN PRINT ENTRY NUMBER
12843 M00S10371.dsdi +++| SA1 DBTA GET FORMAT TABLE POINTERS
12844 M00S10372.dsdi +++| SA3 TF
12845 M00S10373.dsdi +++| ZR X3,DBT7 IF PRINTER OUTPUT
12846 M00S10374.dsdi +++| SX1 X1+1 SET FOR TERMINAL OUTPUT
12847 M00S10375.dsdi +++| DBT7 SA1 X1
12848 M00S10376.dsdi +++| SA3 FW
12849 M00S10377.dsdi +++| IX6 X5-X3
12850 M00S10378.dsdi +++| SB2 X6 SET DATA ADDRESS IN CORE BUFFER
12851 M00S10379.dsdi +++| RJ GTD GENERATE DETAILED TABLE ENTRY DUMP
12852 M00S10380.dsdi +++| PRINT (=2C )
12853 M00S10381.dsdi +++| SB7 B0 ASSUME OCTAL BASE
12854 M00S10382.dsdi +++| RJ ASD GET NEXT ENTRY NUMBER
12855 M00S10383.dsdi +++| NZ X4,ERR6 IF CONVERSION ERROR
12856 M00S10384.dsdi +++| ZR B6,DBTX IF NO MORE ENTRIES TO DUMP
12857 M00S10385.dsdi +++| SB6 B0 SET AS NOT FIRST ENTRY DUMPED
12858 M00S10386.dsdi +++| EQ DBT5 DUMP NEXT ENTRY
12859 M00S10387.dsdi +++|
12860 M00S10388.dsdi +++| DBTA BSS 1 FORMAT TABLE POINTERS ADDRESS
12861 M00S10389.dsdi +++| DBTB BSS 1 TABLE NAME ADDRESS
12862 M00S10390.dsdi +++| DBTC BSS 1 ENTRY NUMBER
12863 M00S10391.dsdi +++| DBTD BSS 1 ENTRY LENGTH
12864 M00S10392.dsdi +++| DCA SPACE 4,9
12865 M00S10393.dsdi +++|** DCA - DUMP JOB DAYFILE POINTERS AND BUFFER.
12866 M00S10394.dsdi +++|*
12867 M00S10395.dsdi +++|* ENTRY (A0) = RETURN ADDRESS.
12868 M00S10396.dsdi +++|* (CN) = CONTROL POINT NUMBER.
12869 M00S10397.dsdi +++|* (NC) = NUMBER OF CONTROL POINTS - 1.
12870 M00S10398.dsdi +++|*
12871 M00S10399.dsdi +++|* USES X - 1, 2.
12872 M00S10400.dsdi +++|* A - 1, 2.
12873 M00S10401.dsdi +++|* B - 2.
12874 M00S10402.dsdi +++|*
12875 M00S10403.dsdi +++|* CALLS GDB, PDB, PDP.
12876 M00S10404.dsdi +++|*
12877 M00S10405.dsdi +++|* MACROS PRINT.
12878 M00S10406.dsdi +++|
12879 M00S10407.dsdi +++|
12880 M00S10408.dsdi +++| DCA SA1 CN
12881 M00S10409.dsdi +++| SA2 NC
| Line S00335 Modification History |
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
12882 M01S00335.271l716 +++| SX2 X2+B1
12883 M00S10410.dsdi +++| IX1 X2-X1
| Line S10411 Modification History |
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
12884 M01S10411.271l716 ---| NG X1,DCA2 IF SYSTEM CONTROL POINT
| Line S00336 Modification History |
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
12885 M01S00336.271l716 +++| ZR X1,DCA2 IF SYSTEM CONTROL POINT
12886 M00S10412.dsdi +++| PRINT (=2C )
12887 M00S10413.dsdi +++| PRINT (=C* DAYFILE POINTERS AND BUFFER*)
12888 M00S10414.dsdi +++| PRINT (=2C )
12889 M00S10415.dsdi +++| RJ GDB GET DAYFILE BUFFERS
12890 M00S10416.dsdi +++| NG X1,DCA2 IF INSUFFICIENT NFL SPACE
12891 M00S10417.dsdi +++| RJ PDP PRINT DAYFILE POINTERS
12892 M00S10418.dsdi +++| PRINT (=2C )
12893 M00S10419.dsdi +++| RJ PDB PRINT DAYFILE BUFFER
12894 M00S10420.dsdi +++| DCA2 SB2 A0 GET RETURN ADDRESS
12895 M00S10421.dsdi +++| JP B2 RETURN
| Line S10422 Modification History |
M01 (Removed by) | dsdi71a |
Seq # *Modification Id* Act
----------------------------+
12896 M01S10422.dsdi71a ---| DCC SPACE 4,10
| Line S00015 Modification History |
M01 (Added by) | dsdi71a |
Seq # *Modification Id* Act
----------------------------+
12897 M01S00015.dsdi71a +++| DCC SPACE 4,15
12898 M00S10423.dsdi +++|** DCC - DUMP FIELD LENGTH IN *C* FORMAT.
12899 M00S10424.dsdi +++|*
12900 M00S10425.dsdi +++|* ENTRY (A0) = RETURN ADDRESS.
12901 M00S10426.dsdi +++|* (CN) = CONTROL POINT NUMBER.
12902 M00S10427.dsdi +++|* (FW) = CONTROL POINT AREA ADDRESS.
12903 M00S10428.dsdi +++|* (NC) = NUMBER OF CONTROL POINTS - 1.
12904 M00S10429.dsdi +++|*
12905 M00S10430.dsdi +++|* USES X - 1, 2, 3, 6, 7.
| Line S10431 Modification History |
M01 (Removed by) | dsdi71a |
Seq # *Modification Id* Act
----------------------------+
12906 M01S10431.dsdi71a ---|* A - 1, 2, 6, 7.
| Line S00016 Modification History |
M01 (Added by) | dsdi71a |
Seq # *Modification Id* Act
----------------------------+
12907 M01S00016.dsdi71a +++|* USES X - 1, 2, 6, 7.
12908 M00S10432.dsdi +++|* B - 2.
12909 M00S10433.dsdi +++|*
| Line S10434 Modification History |
M01 (Removed by) | dsdi71a |
Seq # *Modification Id* Act
----------------------------+
12910 M01S10434.dsdi71a ---|* CALLS PMD, POM, SCM, SRA.
| Line S00017 Modification History |
M01 (Added by) | dsdi71a |
Seq # *Modification Id* Act
----------------------------+
12911 M01S00017.dsdi71a +++|* CALLS GFL, PMD, POM, SCM, SRA.
12912 M00S10435.dsdi +++|*
12913 M00S10436.dsdi +++|* MACROS PRINT.
12914 M00S10437.dsdi +++|
12915 M00S10438.dsdi +++|
12916 M00S10439.dsdi +++| DCC SX6 0
12917 M00S10440.dsdi +++| DCC1 SA1 CN
12918 M00S10441.dsdi +++| SA2 NC
| Line S00337 Modification History |
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
12919 M01S00337.271l716 +++| SX2 X2+B1
12920 M00S10442.dsdi +++| IX1 X2-X1
| Line S10443 Modification History |
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
12921 M01S10443.271l716 ---| NG X1,DCC2 IF SYSTEM CONTROL POINT
| Line S00338 Modification History |
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
12922 M01S00338.271l716 +++| ZR X1,DCC2 IF SYSTEM CONTROL POINT
12923 M00S10444.dsdi +++| SA6 CPRA+4 SET FORMAT CODE IN PARAMETER BLOCK
12924 M00S10445.dsdi +++| PRINT (=2C )
12925 M00S10446.dsdi +++| PRINT (=C* FIELD LENGTH*)
12926 M00S10447.dsdi +++| PRINT (=2C )
| Line S00018 Modification History |
M01 (Added by) | dsdi71a |
Seq # *Modification Id* Act
----------------------------+
12927 M01S00018.dsdi71a +++| SA1 FW CP AREA ADDRESS
12928 M01S00019.dsdi71a +++| RJ GFL GET FL, RA
12929 M00S10448.dsdi +++| SB2 CPRA SET PARAMETER BLOCK ADDRESS
| Line S10449 Modification History |
M01 (Removed by) | dsdi71a |
Seq # *Modification Id* Act
----------------------------+
12930 M01S10449.dsdi71a ---| SA1 FW CP AREA ADDRESS
12931 M01S10450.dsdi71a ---| SA2 F.TCMT
12932 M01S10451.dsdi71a ---| IX1 X1+X2
12933 M01S10452.dsdi71a ---| MX3 -12
12934 M01S10453.dsdi71a ---| SA2 X1+FLSW
12935 M01S10454.dsdi71a ---| BX7 -X3*X2
12936 M01S10455.dsdi71a ---| AX2 12
12937 M01S10456.dsdi71a ---| MX3 -15
12938 M01S10457.dsdi71a ---| BX6 -X3*X2
12939 M01S10458.dsdi71a ---| LX6 6 RA
12940 M01S10459.dsdi71a ---| LX7 6 FL
12941 M00S10460.dsdi +++| SA7 B2+B1 SET LWA+1 OF DUMP
| Line S10461 Modification History |
M01 (Removed by) | dsdi71a |
Seq # *Modification Id* Act
----------------------------+
12942 M01S10461.dsdi71a ---| SX7 0
| Line S00020 Modification History |
M01 (Added by) | dsdi71a |
Seq # *Modification Id* Act
----------------------------+
12943 M01S00020.dsdi71a +++| BX7 X7-X7
12944 M00S10462.dsdi +++| SA7 B2+ SET FWA
12945 M00S10463.dsdi +++| RJ SRA SET REFERENCE ADDRESS
12946 M00S10464.dsdi +++| RJ SCM SELECT CM DUMP
12947 M00S10465.dsdi +++| DCC1.1 SB2 CPRA
12948 M00S10466.dsdi +++| RJ POM POSITION DUMP FILE
12949 M00S10467.dsdi +++| SB2 CPRA
12950 M00S10468.dsdi +++| RJ PMD PROCESS DUMP
12951 M00S10469.dsdi +++| DCC2 SB2 A0
12952 M00S10470.dsdi +++| JP B2 RETURN
12953 M00S10471.dsdi +++| DCD SPACE 4
12954 M00S10472.dsdi +++|** DCD - DUMP FIELD LENGTH IN *D* FORMAT.
12955 M00S10473.dsdi +++|
12956 M00S10474.dsdi +++|
12957 M00S10475.dsdi +++| DCD SX6 1 FORMAT CODE
12958 M00S10476.dsdi +++| JP DCC1 PROCESS DUMP
12959 M00S10477.dsdi +++| DCE SPACE 4
12960 M00S10478.dsdi +++|** DCE - DUMP FIELD LENGTH IN *E* FORMAT.
12961 M00S10479.dsdi +++|
12962 M00S10480.dsdi +++|
12963 M00S10481.dsdi +++| DCE SX6 2 FORMAT CODE
12964 M00S10482.dsdi +++| JP DCC1 PROCESS DUMP
12965 M00S10483.dsdi +++| DCF SPACE 4,10
12966 M00S10484.dsdi +++|** DCF - DUMP ATTACHED FILES.
12967 M00S10485.dsdi +++|*
12968 M00S10486.dsdi +++|* ENTRY (A0) = RETURN ADDRESS.
12969 M00S10487.dsdi +++|* (CN) = CONTROL POINT NUMBER.
12970 M00S10488.dsdi +++|* (NC) = NUMBER OF CONTROL POINTS - 1.
12971 M00S10489.dsdi +++|*
12972 M00S10490.dsdi +++|* USES X - 1, 2, 6.
12973 M00S10491.dsdi +++|* A - 1, 2, 6.
12974 M00S10492.dsdi +++|* B - 2.
12975 M00S10493.dsdi +++|*
12976 M00S10494.dsdi +++|* CALLS CNL, GNF, PFS.
12977 M00S10495.dsdi +++|*
12978 M00S10496.dsdi +++|* MACROS PRINT.
12979 M00S10497.dsdi +++|
12980 M00S10498.dsdi +++|
12981 M00S10499.dsdi +++| DCF SA1 CN
12982 M00S10500.dsdi +++| SA2 NC
| Line S00339 Modification History |
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
12983 M01S00339.271l716 +++| SX2 X2+B1
12984 M00S10501.dsdi +++| IX1 X2-X1
| Line S10502 Modification History |
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
12985 M01S10502.271l716 ---| NG X1,DCF1.1 IF SYSTEM CONTROL POINT
| Line S00340 Modification History |
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
12986 M01S00340.271l716 +++| ZR X1,DCF1.1 IF SYSTEM CONTROL POINT
12987 M00S10503.dsdi +++| SX6 FNTN
12988 M00S10504.dsdi +++| SA6 FI PRESET SEARCH INDEX
12989 M00S10505.dsdi +++| PRINT (=2C )
12990 M00S10506.dsdi +++| PRINT (=C* ATTACHED FILES*)
12991 M00S10507.dsdi +++| PRINT (=2C )
12992 M00S10508.dsdi +++| RJ CNL CHECK NFL LENGTH
12993 M00S10509.dsdi +++| NG X1,DCF1.1 IF INSUFFICIENT NFL SPACE
12994 M00S10510.dsdi +++| DCF1 RJ GNF GET NEXT FILE
12995 M00S10511.dsdi +++| NZ X1,DCF2 IF FILE FOUND
12996 M00S10512.dsdi +++| DCF1.1 SB2 A0 GET RETURN ADDRESS
12997 M00S10513.dsdi +++| JP B2 RETURN
12998 M00S10514.dsdi +++|
12999 M00S10515.dsdi +++| DCF2 RJ PFS PRINT FILE SUMMARY
13000 M00S10516.dsdi +++| JP DCF1 CONTINUE
13001 M00S10517.dsdi +++| DCG SPACE 4,10
13002 M00S10518.dsdi +++|** DCG - DUMP CONTROL POINT AREA IN *C* FORMAT.
13003 M00S10519.dsdi +++|*
13004 M00S10520.dsdi +++|* ENTRY FW = CONTROL POINT AREA ADDRESS.
13005 M00S10521.dsdi +++|* A0 = RETURN ADDRESS.
13006 M00S10522.dsdi +++|*
13007 M00S10523.dsdi +++|* SAVES X - NONE.
13008 M00S10524.dsdi +++|* B - 1.
13009 M00S10525.dsdi +++|* A - 0.
13010 M00S10526.dsdi +++|*
13011 M00S10527.dsdi +++|* CALLS PMD,SCM,SRA,WOF.
13012 M00S10528.dsdi +++|
13013 M00S10529.dsdi +++|
13014 M00S10530.dsdi +++| DCG SX6 0
13015 M00S10531.dsdi +++| DCG1 SA6 DCGA+4 SET FORMAT CODE
13016 M00S10532.dsdi +++| PRINT (=2C )
13017 M00S10533.dsdi +++| PRINT (=C* CONTROL POINT AREA*)
13018 M00S10534.dsdi +++| PRINT (=2C )
13019 M00S10535.dsdi +++| SA1 FW
13020 M00S10536.dsdi +++| SA2 F.TCMT
13021 M00S10537.dsdi +++| IX6 X1+X2
13022 M00S10538.dsdi +++| BX7 X1
13023 M00S10539.dsdi +++| SA6 DCGA+2 CORE ADDRESS OF CP AREA DATA
13024 M00S10540.dsdi +++| SA7 DCGA DUMP FWA
13025 M00S10541.dsdi +++| SX6 X7+CPLEN
13026 M00S10542.dsdi +++| SA6 DCGA+1 DUMP LWA+1
13027 M00S10543.dsdi +++| SX6 0
13028 M00S10544.dsdi +++| RJ SRA RESET REFERENCE ADDRESS
13029 M00S10545.dsdi +++| SB2 DCGA DUMP PARAMETER BLOCK ADDRESS
13030 M00S10546.dsdi +++| RJ SCM SELECT CM
13031 M00S10547.dsdi +++| RJ PMD PROCESS DUMP
13032 M00S10548.dsdi +++| SB2 A0
13033 M00S10549.dsdi +++| JP B2 RETURN
13034 M00S10550.dsdi +++|
13035 M00S10551.dsdi +++| DCGA BSS 0 DUMP PARAMETER BLOCK
13036 M00S10552.dsdi +++| CON 0 FWA
13037 M00S10553.dsdi +++| CON 0 LWA+1
13038 M00S10554.dsdi +++| CON 0 CORE ADDRESS
13039 M00S10555.dsdi +++| CON 0 NO SUPPRESS FLAG
13040 M00S10556.dsdi +++| CON 0 FORMAT CODE
13041 M00S10557.dsdi +++| CON 0 COLUMN LENGTH
13042 M00S10558.dsdi +++| CON 0 INVERTED ADDRESS
13043 M00S10559.dsdi +++| DCI SPACE 4
13044 M00S10560.dsdi +++|** DCI - DUMP CONTROL POINT AREA IN *E* FORMAT.
13045 M00S10561.dsdi +++|
13046 M00S10562.dsdi +++|
13047 M00S10563.dsdi +++| DCI SX6 2 FORMAT CODE
13048 M00S10564.dsdi +++| JP DCG1 PROCESS DUMP
13049 M00S10565.dsdi +++| DCJ SPACE 4
13050 M00S10566.dsdi +++|** DCJ - DUMP CONTROL POINT AREA IN *D* FORMAT.
13051 M00S10567.dsdi +++|
13052 M00S10568.dsdi +++|
13053 M00S10569.dsdi +++| DCJ SX6 1 FORMAT CODE
13054 M00S10570.dsdi +++| JP DCG1 PROCESS DUMP
13055 M00S10571.dsdi +++| DCM SPACE 4,20
13056 M00S10572.dsdi +++|** DCM - DUMP CONTROL POINT EXTENDED MEMORY (USER ECS)
13057 M00S10573.dsdi +++|* IN *D* FORMAT.
13058 M00S10574.dsdi +++|*
13059 M00S10575.dsdi +++|* ENTRY (A0) = RETURN ADDRESS.
13060 M00S10576.dsdi +++|* (CN) = CONTROL POINT NUMBER.
13061 M00S10577.dsdi +++|* (FW) = CONTROL POINT AREA ADDRESS.
13062 M00S10578.dsdi +++|* (NC) = NUMBER OF CONTROL POINTS - 1.
13063 M00S10579.dsdi +++|* (UE) = USER EXTENDED MEMORY SHIFT COUNT.
13064 M00S10580.dsdi +++|*
13065 M00S10581.dsdi +++|* EXIT (A0) = RETURN ADDRESS.
13066 M00S10582.dsdi +++|* TO *DCC1.1* TO PROCESS USER EXTENDED MEMORY FL DUMP.
13067 M00S10583.dsdi +++|* TO *DCC2* IF NO USER EXTENDED MEMORY FL TO DUMP.
13068 M00S10584.dsdi +++|*
13069 M00S10585.dsdi +++|* USES X - 1, 2, 3, 6, 7.
| Line S10586 Modification History |
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
13070 M01S10586.271l716 ---|* A - 0, 1, 2, 6, 7.
| Line S00341 Modification History |
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
13071 M01S00341.271l716 +++|* A - 0, 1, 2, 3, 6, 7.
13072 M00S10587.dsdi +++|* B - 2.
13073 M00S10588.dsdi +++|*
| Line S10589 Modification History |
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
13074 M01S10589.271l716 ---|* CALLS SEM, SRA.
| Line S00342 Modification History |
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
13075 M01S00342.271l716 +++|* CALLS SEC, SEM, SRA.
13076 M00S10590.dsdi +++|*
13077 M00S10591.dsdi +++|* MACROS PRINT.
13078 M00S10592.dsdi +++|
13079 M00S10593.dsdi +++|
13080 M00S10594.dsdi +++| DCM SA1 CN
13081 M00S10595.dsdi +++| SA2 NC
13082 M00S10596.dsdi +++| SA3 UE
| Line S00343 Modification History |
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
13083 M01S00343.271l716 +++| SX2 X2+B1
13084 M00S10597.dsdi +++| IX1 X2-X1
| Line S10598 Modification History |
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
13085 M01S10598.271l716 ---| NG X1,DCC2 IF SYSTEM CONTROL POINT
| Line S00344 Modification History |
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
13086 M01S00344.271l716 +++| ZR X1,DCC2 IF SYSTEM CONTROL POINT
13087 M00S10599.dsdi +++| SX6 B1 SELECT *D* FORMAT DUMP
13088 M00S10600.dsdi +++| SB2 X3+9
13089 M00S10601.dsdi +++| SA6 CPRA+4
13090 M00S10602.dsdi +++| SA1 F.TCMT
13091 M00S10603.dsdi +++| SA2 FW CP AREA ADDRESS
13092 M00S10604.dsdi +++| IX2 X1+X2
13093 M00S10605.dsdi +++| MX3 -12
13094 M00S10606.dsdi +++| SA2 X2+ECSW GET CONTROL POINT RAE AND FLE
13095 M00S10607.dsdi +++| BX7 -X3*X2
13096 M00S10608.dsdi +++| LX2 -12
13097 M00S10609.dsdi +++| ZR X7,DCC2 IF NO USER EXTENDED MEMORY FL
13098 M00S10610.dsdi +++| MX6 -24
13099 M00S10611.dsdi +++| BX6 -X6*X2 EXTENDED MEMORY RA
13100 M00S10612.dsdi +++| LX7 B2
13101 M00S10613.dsdi +++| SA7 CPRA+1 SET LWA+1 OF DUMP
13102 M00S10614.dsdi +++| BX7 X7-X7
13103 M00S10615.dsdi +++| LX6 B2
13104 M00S10616.dsdi +++| SA7 A7-B1 SET FWA OF DUMP
13105 M00S10617.dsdi +++| SX7 A0+ SAVE RETURN ADDRESS
13106 M00S10618.dsdi +++| SA7 DCMA
13107 M00S10619.dsdi +++| RJ SRA SET REFERENCE ADDRESS
13108 M00S10620.dsdi +++| PRINT (=2C )
13109 M00S10621.dsdi +++| PRINT (=C* USER EXTENDED MEMORY FIELD LENGTH*)
13110 M00S10622.dsdi +++| PRINT (=2C )
| Line S00122 Modification History |
M01 (Added by) | dsdi71 |
Seq # *Modification Id* Act
----------------------------+
13111 M01S00122.dsdi71 +++| SA1 SBTL1 SAVE SUBTITLE
13112 M01S00123.dsdi71 +++| BX6 X1
13113 M01S00124.dsdi71 +++| SA6 DCMB
13114 M00S10623.dsdi +++| RJ SEM SET UNIFIED EXTENDED MEMORY (UEM)
13115 M00S10624.dsdi +++| NG X3,DCM1 IF UEM DEFINED
13116 M00S10625.dsdi +++| RJ SEC SET EXTENDED CORE STORAGE
| Line S10626 Modification History |
M01 (Removed by) | dsdi71 |
Seq # *Modification Id* Act
----------------------------+
13117 M01S10626.dsdi71 ---| DCM1 SA2 =10HUEC SET USER EXTENDED MEMORY SUBTITLE
13118 M01S10627.dsdi71 ---| BX7 X2
13119 M01S10628.dsdi71 ---| SA7 SBTL1
| Line S00125 Modification History |
M01 (Added by) | dsdi71 |
Seq # *Modification Id* Act
----------------------------+
13120 M01S00125.dsdi71 +++| DCM1 SA2 =3RUEC SET USER EXTENDED MEMORY SUBTITLE
13121 M01S00126.dsdi71 +++| SA1 DCMB
13122 M01S00127.dsdi71 +++| LX1 -6
13123 M01S00128.dsdi71 +++| MX7 -18
13124 M01S00129.dsdi71 +++| BX1 X7*X1
13125 M01S00130.dsdi71 +++| BX7 X1+X2
13126 M01S00131.dsdi71 +++| LX7 6
13127 M00S10629.dsdi +++| SA1 DCMA RESTORE RETURN ADDRESS
13128 M00S10630.dsdi +++| SA0 X1
| Line S00132 Modification History |
M01 (Added by) | dsdi71 |
Seq # *Modification Id* Act
----------------------------+
13129 M01S00132.dsdi71 +++| SA7 SBTL1
13130 M00S10631.dsdi +++| EQ DCC1.1 PROCESS DUMP
13131 M00S10632.dsdi +++|
13132 M00S10633.dsdi +++|
13133 M00S10634.dsdi +++| DCMA CON 0 RETURN ADDRESS
| Line S00133 Modification History |
M01 (Added by) | dsdi71 |
Seq # *Modification Id* Act
----------------------------+
13134 M01S00133.dsdi71 +++| DCMB CON 0 CONTROL POINT SUBTITLE
13135 M00S10635.dsdi +++| DCN SPACE 4,10
13136 M00S10636.dsdi +++|** DCN - DUMP NEGATIVE FIELD LENGTH IN *D* FORMAT.
13137 M00S10637.dsdi +++|*
13138 M00S10638.dsdi +++|* ENTRY (A0) = RETURN ADDRESS.
13139 M00S10639.dsdi +++|* (CN) = CONTROL POINT NUMBER.
13140 M00S10640.dsdi +++|* (NC) = NUMBER OF CONTROL POINTS - 1.
13141 M00S10641.dsdi +++|* (DCGA - DCGA+6) = DUMP PARAMETER INFORMATION.
13142 M00S10642.dsdi +++|*
13143 M00S10643.dsdi +++|* USES X - 0, 1, 2, 3, 6, 7.
13144 M00S10644.dsdi +++|* A - 1, 2, 6, 7.
13145 M00S10645.dsdi +++|* B - 2.
13146 M00S10646.dsdi +++|*
13147 M00S10647.dsdi +++|* CALLS CNL, PNF, SCM, SRA.
13148 M00S10648.dsdi +++|*
13149 M00S10649.dsdi +++|* MACROS PRINT.
13150 M00S10650.dsdi +++|
13151 M00S10651.dsdi +++|
13152 M00S10652.dsdi +++| DCN SA1 CN
13153 M00S10653.dsdi +++| SA2 NC
| Line S00345 Modification History |
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
13154 M01S00345.271l716 +++| SX2 X2+B1
13155 M00S10654.dsdi +++| IX1 X2-X1
| Line S10655 Modification History |
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
13156 M01S10655.271l716 ---| NG X1,DCN2 IF SYSTEM CONTROL POINT
| Line S00346 Modification History |
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act
----------------------------+
13157 M01S00346.271l716 +++| ZR X1,DCN2 IF SYSTEM CONTROL POINT
13158 M00S10656.dsdi +++|*
13159 M00S10657.dsdi +++| DBN BSS 0 *DBN* ENTRY POINT
13160 M00S10658.dsdi +++|*
13161 M00S10659.dsdi +++| SX6 B1 SET *D* FORMAT
13162 M00S10660.dsdi +++| SA6 DCGA+4
13163 M00S10661.dsdi +++| PRINT (=2C )
13164 M00S10662.dsdi +++| PRINT (=C* NEGATIVE FIELD LENGTH*)
13165 M00S10663.dsdi +++| PRINT (=2C )
13166 M00S10664.dsdi +++| RJ CNL CHECK NFL LENGTH
13167 M00S10665.dsdi +++| NG X1,DCN1 IF INSUFFICIENT NFL SPACE
13168 M00S10666.dsdi +++| PRINT (=2C )
13169 M00S10667.dsdi +++| PRINT (=C* LOCAL FNT-S*)
13170 M00S10668.dsdi +++| PRINT (=2C )
13171 M00S10669.dsdi +++| SA1 RC GET RA OF SELECTED CONTROL POINT
13172 M00S10670.dsdi +++| BX6 X1
13173 M00S10671.dsdi +++| RJ SRA SET REFERENCE ADDRESS = RA OF CONTROL POINT
13174 M00S10672.dsdi +++| RJ SCM SELECT CENTRAL MEMORY
13175 M00S10673.dsdi +++| SA2 L.TNFL GET NFL
13176 M00S10674.dsdi +++| SX3 DAYN SET ORDINAL OF LWA
13177 M00S10675.dsdi +++| BX0 X2 SET ORDINAL OF FWA
13178 M00S10676.dsdi +++| RJ PNF PRINT FNT AREA
13179 M00S10677.dsdi +++| PRINT (=2C )
13180 M00S10678.dsdi +++| PRINT (=C* DAYFILE BUFFER (DAYN)*)
13181 M00S10679.dsdi +++| PRINT (=2C )
13182 M00S10680.dsdi +++| SX3 CSBN SET ORDINAL OF LWA
13183 M00S10681.dsdi +++| SX0 DAYN SET ORDINAL OF FWA
13184 M00S10682.dsdi +++| RJ PNF PRINT DAYFILE BUFFER AREA
13185 M00S10683.dsdi +++| PRINT (=2C )
13186 M00S10684.dsdi +++| PRINT (=C* COMMAND BUFFER (CSBN)*)
13187 M00S10685.dsdi +++| PRINT (=2C )
| Line S00077 Modification History |
M01 (Added by) | ns2620 |
Seq # *Modification Id* Act
----------------------------+
13188 M01S00077.ns2620 +++| SX3 QFBN SET ORDINAL OF LWA
13189 M01S00078.ns2620 +++| SX0 CSBN SET ORDINAL OF FWA
13190 M01S00079.ns2620 +++| RJ PNF PRINT COMMAND BUFFER AREA
13191 M01S00080.ns2620 +++| PRINT (=2C )
13192 M01S00081.ns2620 +++| PRINT (=C* QUEUED FUNCTION BUFFER (QFBN)*)
13193 M01S00082.ns2620 +++| PRINT (=2C )
13194 M00S10686.dsdi +++| SX3 SSJN SET ORDINAL OF LWA
| Line S10687 Modification History |
M01 (Removed by) | ns2620 |
Seq # *Modification Id* Act
----------------------------+
13195 M01S10687.ns2620 ---| SX0 CSBN SET ORDINAL OF FWA
13196 M01S10688.ns2620 ---| RJ PNF PRINT COMMAND BUFFER AREA
| Line S00083 Modification History |
M01 (Added by) | ns2620 |
Seq # *Modification Id* Act
----------------------------+
13197 M01S00083.ns2620 +++| SX0 QFBN SET ORDINAL OF FWA
13198 M01S00084.ns2620 +++| RJ PNF PRINT QUEUED FUNCTION BUFFER
13199 M00S10689.dsdi +++| PRINT (=2C )
13200 M00S10690.dsdi +++| PRINT (=C* SSJ= SCRATCH AREA (SSJN)*)
13201 M00S10691.dsdi +++| PRINT (=2C )
13202 M00S10692.dsdi +++| SX3 SSDN SET ORDINAL OF LWA
13203 M00S10693.dsdi +++| SX0 SSJN SET ORDINAL OF FWA
13204 M00S10694.dsdi +++| RJ PNF PRINT SSJ= SCRATCH AREA
13205 M00S10695.dsdi +++| PRINT (=2C )
13206 M00S10696.dsdi +++| PRINT (=C* SSJ=/DMP= SCRATCH AREA (SSDN)*)
13207 M00S10697.dsdi +++| PRINT (=2C )
13208 M00S10698.dsdi +++| SX3 DMPN SET ORDINAL OF LWA
13209 M00S10699.dsdi +++| SX0 SSDN SET ORDINAL OF FWA
13210 M00S10700.dsdi +++| RJ PNF PRINT SSJ=/DMP= SCRATCH AREA
13211 M00S10701.dsdi +++| PRINT (=2C )
13212 M00S10702.dsdi +++| PRINT (=C* DMP= SCRATCH AREA (DMPN)*)
13213 M00S10703.dsdi +++| PRINT (=2C )
| Line S00010 Modification History |
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act
----------------------------+
13214 M01S00010.274l797 +++| SX3 TDFN SET ORDINAL OF LWA
13215 M01S00011.274l797 +++| SX0 DMPN SET ORDINAL OF FWA
13216 M01S00012.274l797 +++| RJ PNF PRINT DMP= SCRATCH AREA
13217 M01S00013.274l797 +++| PRINT (=2C )
13218 M01S00014.274l797 +++| PRINT (=C* JOB TAPE DEFAULTS (TDFN)*)
13219 M01S00015.274l797 +++| PRINT (=2C )
| Line S00016 Modification History |
M01 (Added by) | 274l797 |
M02 (Removed by) | 282l826 |
Seq # *Modification Id* Act
----------------------------+
13220 M02S00016.282l826 ---| SX3 IC1N SET ORDINAL OF LWA
| Line S00069 Modification History |
M01 (Added by) | 282l826 |
Seq # *Modification Id* Act
----------------------------+
13221 M01S00069.282l826 +++| SX3 ICAN SET ORDINAL OF LWA
| Line S00017 Modification History |
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act
----------------------------+
13222 M01S00017.274l797 +++| SX0 TDFN SET ORDINAL OF FWA
13223 M01S00018.274l797 +++| RJ PNF PRINT JOB TAPE DEFAULTS
13224 M01S00019.274l797 +++| PRINT (=2C )
| Line S00020 Modification History |
M01 (Added by) | 274l797 |
M02 (Removed by) | 282l826 |
Seq # *Modification Id* Act
----------------------------+
13225 M02S00020.282l826 ---| PRINT (=C* INTER-CP COMMUNICATION WORDS (IC1N)*)
| Line S00070 Modification History |
M01 (Added by) | 282l826 |
Seq # *Modification Id* Act
----------------------------+
13226 M01S00070.282l826 +++| PRINT (=C* INTER-CP COMMUNICATION (ICAN)*)
| Line S00021 Modification History |
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act
----------------------------+
13227 M01S00021.274l797 +++| PRINT (=2C )
| Line S00140 Modification History |
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act
----------------------------+
13228 M01S00140.271l750 +++| SX3 PUCN SET ORDINAL OF LWA
| Line S00141 Modification History |
M01 (Added by) | 271l750 |
M02 (Removed by) | 274l797 |
Seq # *Modification Id* Act
----------------------------+
13229 M02S00141.274l797 ---| SX0 DMPN SET ORDINAL OF FWA
13230 M02S00142.274l797 ---| RJ PNF PRINT DMP= SCRATCH AREA
| Line S00022 Modification History |
M01 (Added by) | 274l797 |
M02 (Removed by) | 282l826 |
Seq # *Modification Id* Act
----------------------------+
13231 M02S00022.282l826 ---| SX0 IC1N SET ORDINAL OF FWA
13232 M02S00023.282l826 ---| RJ PNF PRINT INTER-CP COMMUNICATION WORDS
| Line S00071 Modification History |
M01 (Added by) | 282l826 |
Seq # *Modification Id* Act
----------------------------+
13233 M01S00071.282l826 +++| SX0 ICAN SET ORDINAL OF FWA
13234 M01S00072.282l826 +++| RJ PNF PRINT INTER-CP COMMUNICATION WORD
| Line S00143 Modification History |
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act
----------------------------+
13235 M01S00143.271l750 +++| PRINT (=2C )
13236 M01S00144.271l750 +++| PRINT (=C* PF USER NAME CACHE (PUCN)*)
13237 M01S00145.271l750 +++| PRINT (=2C )
13238 M00S10704.dsdi +++| SX3 SCVN SET ORDINAL OF LWA
| Line S10705 Modification History |
M01 (Removed by) | 271l750 |
Seq # *Modification Id* Act
----------------------------+
13239 M01S10705.271l750 ---| SX0 DMPN SET ORDINAL OF FWA
13240 M01S10706.271l750 ---| RJ PNF PRINT DMP= SCRATCH AREA
| Line S00146 Modification History |
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act
----------------------------+
13241 M01S00146.271l750 +++| SX0 PUCN SET ORDINAL OF FWA
13242 M01S00147.271l750 +++| RJ PNF PRINT PF USER NAME CACHE
13243 M00S10707.dsdi +++| PRINT (=2C )
13244 M00S10708.dsdi +++| PRINT (=C* SERVICE CLASS VALIDATION (SCVN)*)
13245 M00S10709.dsdi +++| PRINT (=2C )
13246 M00S10710.dsdi +++| SX3 CHGN SET ORDINAL OF LWA
13247 M00S10711.dsdi +++| SX0 SCVN SET ORDINAL OF FWA
13248 M00S10712.dsdi +++| RJ PNF PRINT SERVICE CLASS VALIDATION
13249 M00S10713.dsdi +++| PRINT (=2C )
13250 M00S10714.dsdi +++| PRINT (=C* CHARGE/PROJECT NUMBER (CHGN)*)
13251 M00S10715.dsdi +++| PRINT (=2C )
13252 M00S10716.dsdi +++| SX3 SHCN SET ORDINAL OF LWA
13253 M00S10717.dsdi +++| SX0 CHGN SET ORDINAL OF FWA
13254 M00S10718.dsdi +++| RJ PNF PRINT CHARGE/PROJECT
13255 M00S10719.dsdi +++| PRINT (=2C )
13256 M00S10720.dsdi +++| PRINT (=C* SHELL CONTROL (SHCN)*)
13257 M00S10721.dsdi +++| PRINT (=2C )
13258 M00S10722.dsdi +++| SX3 SLMN SET ORDINAL OF LWA
13259 M00S10723.dsdi +++| SX0 SHCN SET ORDINAL OF FWA
13260 M00S10724.dsdi +++| RJ PNF PRINT SHELL CONTROL
13261 M00S10725.dsdi +++| PRINT (=2C )
13262 M00S10726.dsdi +++| PRINT (=C* TERMINAL WORD (SLMN)*)
13263 M00S10727.dsdi +++| PRINT (=2C )
13264 M00S10728.dsdi +++| SX3 LFCN SET ORDINAL OF LWA
13265 M00S10729.dsdi +++| SX0 SLMN SET ORDINAL OF FWA
13266 M00S10730.dsdi +++| RJ PNF PRINT TERMINAL WORD
13267 M00S10731.dsdi +++| PRINT (=2C )
13268 M00S10732.dsdi +++| PRINT (=C* LOCAL FILE COUNT (LFCN)*)
13269 M00S10733.dsdi +++| PRINT (=2C )
13270 M00S10734.dsdi +++| SX3 RC1N SET ORDINAL OF LWA
13271 M00S10735.dsdi +++| SX0 LFCN SET ORDINAL OF FWA
13272 M00S10736.dsdi +++| RJ PNF PRINT LOCAL FILE COUNT
13273 M00S10737.dsdi +++| PRINT (=2C )
13274 M00S10738.dsdi +++| PRINT (=C* RECOVERY WORD 1 (RC1N)*)
13275 M00S10739.dsdi +++| PRINT (=2C )
13276 M00S10740.dsdi +++| SX3 RC2N SET ORDINAL OF LWA
13277 M00S10741.dsdi +++| SX0 RC1N SET ORDINAL OF FWA
13278 M00S10742.dsdi +++| RJ PNF PRINT FIRST RECOVERY WORD
13279 M00S10743.dsdi +++| PRINT (=2C )
13280 M00S10744.dsdi +++| PRINT (=C* RECOVERY WORD 2 (RC2N)*)
13281 M00S10745.dsdi +++| PRINT (=2C )
13282 M00S10746.dsdi +++| SX3 JPPN SET ORDINAL OF LWA
13283 M00S10747.dsdi +++| SX0 RC2N SET ORDINAL OF FWA
13284 M00S10748.dsdi +++| RJ PNF PRINT SECOND RECOVERY WORD
13285 M00S10749.dsdi +++| PRINT (=2C )
13286 M00S10750.dsdi +++| PRINT (=C* JOB PAGE PARAMETERS (JPPN)*)
13287 M00S10751.dsdi +++| PRINT (=C* TMS CONTROL (TMSN)*)
13288 M00S10752.dsdi +++| PRINT (=2C )
13289 M00S10753.dsdi +++| SX3 INSN SET ORDINAL OF LWA
13290 M00S10754.dsdi +++| SX0 JPPN SET ORDINAL OF FWA
13291 M00S10755.dsdi +++| RJ PNF PRINT JOB PAGE PARAMETERS
13292 M00S10756.dsdi +++| PRINT (=2C )
13293 M00S10757.dsdi +++| PRINT (=C* INSTALLATION WORDS (INSN)*)
13294 M00S10758.dsdi +++| PRINT (=2C )
13295 M00S10759.dsdi +++| SX3 DAPN SET ORDINAL OF LWA
13296 M00S10760.dsdi +++| SX0 INSN SET ORDINAL OF FWA
13297 M00S10761.dsdi +++| RJ PNF PRINT INSTALLATION WORDS
13298 M00S10762.dsdi +++| PRINT (=2C )
13299 M00S10763.dsdi +++| PRINT (=C* DAYFILE BUFFER POINTERS (DAPN)*)
13300 M00S10764.dsdi +++| PRINT (=2C )
13301 M00S10765.dsdi +++| SX3 B0 SET ORDINAL OF LWA
13302 M00S10766.dsdi +++| SX0 DAPN SET ORDINAL OF FWA
13303 M00S10767.dsdi +++| RJ PNF PRINT DAYFILE BUFFER POINTERS
13304 M00S10768.dsdi +++| DCN1 BX7 X7-X7 CLEAR INVERTED ADDRESS
13305 M00S10769.dsdi +++| SA7 DCGA+6
13306 M00S10770.dsdi +++| DCN2 SB2 A0 GET RETURN ADDRESS
13307 M00S10771.dsdi +++| JP B2 RETURN
13308 M00S10772.dsdi +++| DCP SPACE 4,8
13309 M00S10773.dsdi +++|** DCP - DUMP CONTROL POINT.
13310 M00S10774.dsdi +++|*
13311 M00S10775.dsdi +++|* ENTRY CN = CONTROL POINT NUMBER.
13312 M00S10776.dsdi +++|* CL = LIST OPTION CHARACTER STRING LEFT JUSTIFIED.
13313 M00S10777.dsdi +++|*
13314 M00S10778.dsdi +++|* USES ALL REGISTERS.
13315 M00S10779.dsdi +++|*
| Line S10780 Modification History |
M01 (Removed by) | dsdi89 |
Seq # *Modification Id* Act
----------------------------+
13316 M01S10780.dsdi89 ---|* CALLS PCH,SCM,SNO,SRA,LIST OPTION PROCESSORS.
| Line S00023 Modification History |
M01 (Added by) | dsdi89 |
Seq # *Modification Id* Act
----------------------------+
13317 M01S00023.dsdi89 +++|* CALLS PCH, RNF, SCM, SNO, SRA, LIST OPTION PROCESSORS.
13318 M00S10781.dsdi +++|
13319 M00S10782.dsdi +++|
13320 M00S10783.dsdi +++| DCP SUBR
13321 M00S10784.dsdi +++| RJ PCH PRINT CONTROL POINT HEADER
13322 M00S10785.dsdi +++| DCP1 RJ SCM SET CENTRAL MEMORY
13323 M00S10786.dsdi +++| SX6 0
13324 M00S10787.dsdi +++| RJ SRA SET REFERENCE ADDRESS
13325 M00S10788.dsdi +++| SB2 DCPA PROCESSOR TABLE ADDRESS
13326 M00S10789.dsdi +++| SA1 CL OPTION STRING
13327 M00S10790.dsdi +++| RJ SNO SELECT NEXT LIST OPTION
13328 M00S10791.dsdi +++| ZR X3,DCPX IF NO MORE OPTIONS SELECTED
13329 M00S10792.dsdi +++| SX6 B3 SAVE (B3)
13330 M00S10793.dsdi +++| SA6 DCPB
| Line S00024 Modification History |
M01 (Added by) | dsdi89 |
Seq # *Modification Id* Act
----------------------------+
13331 M01S00024.dsdi89 +++| SA1 OP
13332 M01S00025.dsdi89 +++| SA2 CN
13333 M00S10794.dsdi +++| RJ RNF READ NEGATIVE FL FOR SELECTED CP
13334 M00S10795.dsdi +++| SA1 DCPB RESTORE (B3)
13335 M00S10796.dsdi +++| SB3 X1
13336 M00S10797.dsdi +++| SA0 DCP1 SET RETURN ADDRESS
13337 M00S10798.dsdi +++| JP B3 EXECUTE SELECTED PROCESSOR
13338 M00S10799.dsdi +++|
13339 M00S10800.dsdi +++| DCPA BSS 0 TABLE OF LIST OPTION PROCESSORS
13340 M00S10801.dsdi +++| VFD 36/0,6/1RA,18/DCA
13341 M00S10802.dsdi +++| VFD 36/0,6/1RC,18/DCC
13342 M00S10803.dsdi +++| VFD 36/0,6/1RD,18/DCD
13343 M00S10804.dsdi +++| VFD 36/0,6/1RE,18/DCE
13344 M00S10805.dsdi +++| VFD 36/0,6/1RF,18/DCF
13345 M00S10806.dsdi +++| VFD 36/0,6/1RG,18/DCG
13346 M00S10807.dsdi +++| VFD 36/0,6/1RI,18/DCI
13347 M00S10808.dsdi +++| VFD 36/0,6/1RH,18/DCJ