User Tools

Site Tools


cdc:nos2.source:opl.opl871:deck:dsd.011

Deck DSD Part 011

169 Modifications

Listing Sections

Source

Seq #  *Modification Id* Act 
----------------------------+
11993  M01S07484.dsd     +++|          STD    YC
11994  M01S07485.dsd     +++|          LDD    AB          CHECK FORMAT
11995  M01S07486.dsd     +++|          LPN    1
11996  M01S07487.dsd     +++|          NJN    DSK6        IF CODED FORMAT
11997  M01S07488.dsd     +++|
11998  M01S07489.dsd     +++|*         DISPLAY PROGRAM FORMAT.
11999  M01S07490.dsd     +++|
12000  M01S07491.dsd     +++| DSK5     RJM    RNW         READ NEXT WORD
12001  M01S07492.dsd     +++|          ZJN    DSK7        IF END OF DATA
12002  M01S07493.dsd     +++|          LDN    5           DISPLAY WORD
12003  M01S07494.dsd     +++|          OAM    CM,CH
12004  M01S07495.dsd     +++|          UJN    DSK5        DISPLAY NEXT WORD
12005  M01S07496.dsd     +++|
12006  M01S07497.dsd     +++|*         DISPLAY CODED FORMAT.
12007  M01S07498.dsd     +++|
Line S07499 Modification History
M01 (Added by) dsd
M02 (Updated by) dsd31
Seq #  *Modification Id* Act 
----------------------------+
12008  M02S07499.dsd31   ---| DSK6     LDN    2           OUTPUT COORDINATES
Line S07500 Modification History
M01 (Added by) dsd
M02 (Updated by) dsd31
Seq #  *Modification Id* Act 
----------------------------+
12009  M02S07500.dsd31   ---|          OAM    XC,CH
Line S07501 Modification History
M01 (Added by) dsd
M02 (Updated by) dsd31
Seq #  *Modification Id* Act 
----------------------------+
12010  M02S07501.dsd31   ---|          STD    T4          CLEAR DISPLAY COUNT
Line S07502 Modification History
M01 (Added by) dsd
M02 (Updated by) dsd31
Seq #  *Modification Id* Act 
----------------------------+
12011  M02S07502.dsd31   ---|          RJM    RNW         READ NEXT WORD
Line S07503 Modification History
M01 (Added by) dsd
M02 (Updated by) dsd31
Seq #  *Modification Id* Act 
----------------------------+
12012  M02S07503.dsd31   ---| DSK7     ZJN    DSK12       IF END OF DATA
12013  M01S00001.dsd31   +++| DSK6     RJM    RNW         READ NEXT WORD
12014  M01S00002.dsd31   +++| DSK7     ZJN    DSK12       IF END OF DATA
12015  M01S00003.dsd31   +++|          LDN    2           OUTPUT COORDINATES
12016  M01S00004.dsd31   +++|          OAM    XC,CH
12017  M01S00005.dsd31   +++|          STD    T4          CLEAR DISPLAY COUNT
Line S07504 Modification History
M01 (Added by) dsd
M02 (Updated by) dsd60
Seq #  *Modification Id* Act 
----------------------------+
12018  M02S07504.dsd60   ---| DSK8     AOD    T4          COUNT WORD DISPLAYED
12019  M01S00001.dsd60   +++| DSK8     LDD    CM+4        SAVE END OF WORD
12020  M01S00002.dsd60   +++|          STD    T1
12021  M01S00003.dsd60   +++|          AOD    T4          COUNT WORD DISPLAYED
12022  M01S07505.dsd     +++|          SBD    T3
Line S07506 Modification History
M01 (Added by) dsd
M02 (Updated by) dsd60
Seq #  *Modification Id* Act 
----------------------------+
12023  M02S07506.dsd60   ---|          PJN    DSK9        IF FULL LINE DISPLAYED
Line S07507 Modification History
M01 (Added by) dsd
M02 (Updated by) dsd60
Seq #  *Modification Id* Act 
----------------------------+
12024  M02S07507.dsd60   ---|          RJM    DWD         DISPLAY WORD
Line S07508 Modification History
M01 (Added by) dsd
M02 (Updated by) dsd60
Seq #  *Modification Id* Act 
----------------------------+
12025  M02S07508.dsd60   ---| DSK9     LDD    CM+4
12026  M01S00004.dsd60   +++|          MJN    DSK8.1      IF NOT LAST WORD
12027  M01S00005.dsd60   +++|          NJN    DSK9        IF FULL LINE DISPLAYED
12028  M01S00006.dsd60   +++|          STD    CM+2        DISPLAY CHARACTERS 61-64
12029  M01S00007.dsd60   +++|          STD    CM+3
12030  M01S00008.dsd60   +++|          STD    CM+4
12031  M01S00009.dsd60   +++| DSK8.1   RJM    DWD         DISPLAY WORD
12032  M01S00010.dsd60   +++| DSK9     LDD    T1
12033  M01S07509.dsd     +++|          ZJN    DSK10       IF END OF LINE
12034  M01S07510.dsd     +++|          RJM    RNW         READ NEXT WORD
12035  M01S07511.dsd     +++|          UJN    DSK8        LOOP TO END OF LINE
12036  M01S07512.dsd     +++|
12037  M01S07513.dsd     +++| DSK10    LCN    YINC        DECREMENT Y-COORDINATE
12038  M01S07514.dsd     +++| DSKD     EQU    *-1         (COORDINATE POSITIONS PER LINE)
12039  M01S07515.dsd     +++|          RAD    YC
12040  M01S07516.dsd     +++|          ADC    -Y545+YINC  CHECK SCREEN BOTTOM FOR BOTH CONSOLE TYPES
12041  M01S07517.dsd     +++|          PJN    DSK6        IF NOT BOTTOM OF SCREEN
12042  M01S07518.dsd     +++|
12043  M01S07519.dsd     +++|*         SET DISPLAY STATUS.
12044  M01S07520.dsd     +++|
12045  M01S07521.dsd     +++| DSK12    LDC    0           GET STATUS UPDATE FLAG
12046  M01S07522.dsd     +++| DSKA     EQU    *-1
12047  M01S07523.dsd     +++|          NJN    DSK13       IF NO STATUS UPDATE REQUIRED
Line S07524 Modification History
M01 (Added by) dsd
M02 (Updated by) dsd34
Seq #  *Modification Id* Act 
----------------------------+
12048  M02S07524.dsd34   ---|          LDD    CY
12049  M01S00002.dsd34   +++| DSKE     LDD    CY
12050  M01S00003.dsd34   +++|*         PSN    1           (IF NOT A *CC545*)
12051  M01S07525.dsd     +++|          LPN    17
12052  M01S07526.dsd     +++|          NJN    DSK13       IF NOT TIME TO SET COMPLETE BIT
Line S07527 Modification History
M01 (Added by) dsd
M02 (Updated by) ns2726
Seq #  *Modification Id* Act 
----------------------------+
12053  M02S07527.ns2726  ---|          LDD    MA          SET *SCRS* SUBFUNCTION FOR *UADM*
Line S07528 Modification History
M01 (Added by) dsd
M02 (Updated by) ns2726
Seq #  *Modification Id* Act 
----------------------------+
12054  M02S07528.ns2726  ---|          CWM    DSKB,ON
Line S07529 Modification History
M01 (Added by) dsd
M02 (Updated by) ns2726
Seq #  *Modification Id* Act 
----------------------------+
12055  M02S07529.ns2726  ---|          LDN    1           SET COUNT FOR *UADM*
Line S00007 Modification History
M01 (Added by) ns2726
M02 (Updated by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
12056  M02S00007.273l780 ---|          LDD    NC          SET SYSTEM CP FOR *FTN*
Line S00008 Modification History
M01 (Added by) ns2726
M02 (Updated by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
12057  M02S00008.273l780 ---|          STD    CN
12058  M01S00009.ns2726  +++|          LDN    SKCS        SET *K* DISPLAY COMPLETE BIT
12059  M01S00010.ns2726  +++|          ADC    0           SET LEFT/RIGHT SCREEN FLAG
12060  M01S00011.ns2726  +++|*         ADC    100         RIGHT SCREEN
12061  M01S00012.ns2726  +++| DSKF     EQU    *-1         LEFT/RIGHT SCREEN FLAG
12062  M01S07530.dsd     +++|          STD    CM+1
Line S07531 Modification History
M01 (Added by) dsd
M02 (Updated by) ns2726
Seq #  *Modification Id* Act 
----------------------------+
12063  M02S07531.ns2726  ---|          MONITOR  UADM      SET COMPLETE BIT AND RECALL CPU
12064  M01S00013.ns2726  +++|          LDD    CP          SET CP ADDRESS OF JOB
12065  M01S00014.ns2726  +++|          STD    CM+2
12066  M01S00015.ns2726  +++|          MONITOR  DSRM      REQUEST *MTR* TO SET COMPLETE BIT
12067  M01S07532.dsd     +++| DSK13    LJM    DSKX        RETURN
Line S07533 Modification History
M01 (Added by) dsd
M02 (Updated by) ns2726
Seq #  *Modification Id* Act 
----------------------------+
12068  M02S07533.ns2726  ---|
Line S00005 Modification History
M01 (Added by) dsd96
M02 (Updated by) ns2726
Seq #  *Modification Id* Act 
----------------------------+
12069  M02S00005.ns2726  ---|
Line S07534 Modification History
M01 (Added by) dsd
M02 (Updated by) ns2726
Seq #  *Modification Id* Act 
----------------------------+
12070  M02S07534.ns2726  ---| DSKB     VFD    12/SCRS,12/0,12/0,6/0,18/0
Line S07535 Modification History
M01 (Added by) dsd
M02 (Updated by) dsd96
Seq #  *Modification Id* Act 
----------------------------+
12071  M02S07535.dsd96   ---| DSKC     VFD    60/0        CM BUFFER CONTROL WORD HOLD
12072  M01S07536.dsd     +++| DTL      SPACE  4,15
12073  M01S07537.dsd     +++|**        DTL - DISPLAY TITLE LINE.
12074  M01S07538.dsd     +++|*
12075  M01S07539.dsd     +++|*         ENTRY  (SR+1) = RA/100.
12076  M01S07540.dsd     +++|*                (SR+4) = FL/100.
12077  M01S07541.dsd     +++|*                (T1) = TERMINATE FLAG.
12078  M01S07542.dsd     +++|*                       0 = CONTINUE PROCESSING.
12079  M01S07543.dsd     +++|*                       1 = EXIT TO *DSKX*.
12080  M01S07544.dsd     +++|*                (AB - AB+4) = LEFT OR RIGHT SCREEN CONTROL WORD.
12081  M01S07545.dsd     +++|*
12082  M01S07546.dsd     +++|*         EXIT   TO *DSKX* IF (T1) .NE. 0.
12083  M01S07547.dsd     +++|*
Line S07548 Modification History
M01 (Added by) dsd
M02 (Updated by) dsd60
Seq #  *Modification Id* Act 
----------------------------+
12084  M02S07548.dsd60   ---|*         USES   CM - CM+4, SH - SH+4.
12085  M01S00011.dsd60   +++|*         USES   T0, CM - CM+4.
12086  M01S07549.dsd     +++|*
12087  M01S07550.dsd     +++|*         CALLS  DWD.
12088  M01S07551.dsd     +++|
12089  M01S07552.dsd     +++|
12090  M01S07553.dsd     +++| DTL6     LDD    T1
12091  M01S07554.dsd     +++|          NJN    DSK13       IF TERMINATING
12092  M01S07555.dsd     +++|
12093  M01S07556.dsd     +++| DTL      SUBR               ENTRY/EXIT
12094  M01S07557.dsd     +++|          LDD    T1          CHECK TERMINATION FLAG
12095  M01S07558.dsd     +++|          NJN    DTL1        IF TERMINATING
12096  M01S07559.dsd     +++|          LDD    AB+1        CHECK FOR LEGAL ADDRESS
12097  M01S07560.dsd     +++|          LPN    37
12098  M01S07561.dsd     +++|          SHN    14
12099  M01S07562.dsd     +++|          LMD    AB+2
12100  M01S07563.dsd     +++|          ZJN    DTL1        IF *TBUF* = 0
12101  M01S07564.dsd     +++|          ADN    1
12102  M01S07565.dsd     +++|          SHN    -6
12103  M01S07566.dsd     +++|          SBD    SR+4
12104  M01S07567.dsd     +++|          PJN    DTL1        IF *TBUF* .GE. FL
12105  M01S07568.dsd     +++|          LDD    AB+1        READ THE TITLE
12106  M01S07569.dsd     +++|          LPN    37
12107  M01S07570.dsd     +++|          SHN    6
12108  M01S07571.dsd     +++|          ADD    SR+1
12109  M01S07572.dsd     +++|          SHN    6
12110  M01S07573.dsd     +++|          ADD    AB+2
12111  M01S07574.dsd     +++|          CRD    CM
12112  M01S07575.dsd     +++|          LDD    CM
12113  M01S07576.dsd     +++|          NJN    DTL4        IF (*TBUF*) .NE. 0
12114  M01S07577.dsd     +++| DTL1     LDD    CP          DETERMINE DEFAULT TITLE
12115  M01S07578.dsd     +++|          ADK    JCIW
12116  M01S07579.dsd     +++|          CRD    CM
12117  M01S07580.dsd     +++|          LDD    CM+2
12118  M01S07581.dsd     +++|          SBK    LSSI+1
12119  M01S07582.dsd     +++|          PJN    DTL6        IF SUBSYSTEM
12120  M01S07583.dsd     +++|          LDD    SR+1        GET PROGRAM NAME FROM (RA+*PGNR*)
12121  M01S07584.dsd     +++|          SHN    6
12122  M01S07585.dsd     +++|          ADK    PGNR
12123  M01S07586.dsd     +++|          CRD    CM
12124  M01S07587.dsd     +++|          LDD    CM+3        CLEAR PARAMETER COUNT
12125  M01S07588.dsd     +++|          SCN    77
12126  M01S07589.dsd     +++|          STD    CM+3
12127  M01S07590.dsd     +++|          LDN    0
12128  M01S07591.dsd     +++|          STD    CM+4
12129  M01S07592.dsd     +++|          LDN    CM-1        APPEND PERIOD TO PROGRAM NAME
12130  M01S07593.dsd     +++|          STD    T0
12131  M01S07594.dsd     +++| DTL2     AOD    T0
12132  M01S07595.dsd     +++|          LDI    T0
12133  M01S07596.dsd     +++|          ZJN    DTL3        IF END OF NAME
12134  M01S07597.dsd     +++|          LPN    77
12135  M01S07598.dsd     +++|          NJN    DTL2        IF NOT END OF NAME
12136  M01S07599.dsd     +++|          LDC    1R.&2R.
12137  M01S07600.dsd     +++| DTL3     LMC    2R.
12138  M01S07601.dsd     +++|          RAI    T0
12139  M01S07602.dsd     +++| DTL4     LDC    CH05
12140  M01S07603.dsd     +++|          OAN    CH+40       SET X-COORDINATE
12141  M01S07604.dsd     +++|          RJM    DWD         DISPLAY THE FIRST WORD
12142  M01S07605.dsd     +++|          LDD    CM+4
12143  M01S07606.dsd     +++|          ZJN    DTL5        IF ONLY ONE WORD
12144  M01S07607.dsd     +++|          LDD    AB+1
12145  M01S07608.dsd     +++|          LPN    37
12146  M01S07609.dsd     +++|          SHN    6
12147  M01S07610.dsd     +++|          ADD    SR+1
12148  M01S07611.dsd     +++|          SHN    6
12149  M01S07612.dsd     +++|          ADD    AB+2
12150  M01S07613.dsd     +++|          ADN    1
12151  M01S07614.dsd     +++|          CRD    CM
12152  M01S07615.dsd     +++|          LDN    0
12153  M01S07616.dsd     +++|          STD    CM+3
12154  M01S07617.dsd     +++|          STD    CM+4
12155  M01S07618.dsd     +++|          RJM    DWD         DISPLAY THE SECOND WORD
12156  M01S07619.dsd     +++| DTL5     LJM    DTL6        RETURN
12157  M01S07620.dsd     +++|
12158  M01S07621.dsd     +++| RNW      SPACE  4,20
12159  M01S07622.dsd     +++|**        RNW - READ NEXT WORD.
12160  M01S07623.dsd     +++|*
12161  M01S07624.dsd     +++|*         ENTRY  (T6 - T7) = ABSOLUTE MEMORY ADDRESS.
12162  M01S07625.dsd     +++|*                (T2) = COUNT OF WORDS READ.
12163  M01S07626.dsd     +++|*                (SR) = COUNT TILL END OF FL
12164  M01S07627.dsd     +++|*
12165  M01S07628.dsd     +++|*         EXIT   (CM - CM+4) = NEXT WORD.
12166  M01S07629.dsd     +++|*                (T2) UPDATED.
12167  M01S07630.dsd     +++|*                (SR) UPDATED.
12168  M01S07631.dsd     +++|*                (T6 - T7) UPDATED.
12169  M01S07632.dsd     +++|*                (A) = 0, IF END OF DATA FOUND.
12170  M01S07633.dsd     +++|*
12171  M01S07634.dsd     +++|*         ERROR  TO *DSK11*, IF THE COUNT EXCEEDS 1000B OR
12172  M01S07635.dsd     +++|*                READ PAST FL IS FOUND.
12173  M01S07636.dsd     +++|*
12174  M01S07637.dsd     +++|*         USES   SR, T0, T2, AB+3 - AB+4, CM - CM+4, T6 - T7.
12175  M01S07638.dsd     +++|*
12176  M01S07639.dsd     +++|*         CALLS  SMA.
12177  M01S07640.dsd     +++|
12178  M01S07641.dsd     +++|
12179  M01S07642.dsd     +++| RNW      SUBR               ENTRY/EXIT
12180  M01S07643.dsd     +++|          SOD    SR          UPDATE COUNT TILL END OF FL
12181  M01S07644.dsd     +++|          NJN    RNW2        IF WITHIN FL
12182  M01S07645.dsd     +++| RNW1     LJM    DSK12       PROCESS END OF DATA
12183  M01S07646.dsd     +++|
12184  M01S07647.dsd     +++| RNW2     AOD    T2          UPDATE READ COUNT
12185  M01S07648.dsd     +++|          SHN    -11
12186  M01S07649.dsd     +++|          NJN    RNW1        IF 1000B WORDS READ
12187  M01S07650.dsd     +++|          LDD    T6          GET MEMORY ADDRESS
12188  M01S07651.dsd     +++|          SHN    14
12189  M01S07652.dsd     +++|          ADD    T7
12190  M01S07653.dsd     +++|          CRD    CM          READ NEXT WORD
12191  M01S07654.dsd     +++|          ADN    1           UPDATE MEMORY ADDRESS
12192  M01S07655.dsd     +++|          STD    T7
12193  M01S07656.dsd     +++|          SHN    -14
12194  M01S07657.dsd     +++|          STD    T6
12195  M01S07658.dsd     +++|          LDD    CM
12196  M01S07659.dsd     +++|          ZJN    RNWX        IF END OF DATA WORD
12197  M01S07660.dsd     +++|          LMC    7777
12198  M01S07661.dsd     +++| RNWA     NJN    RNWX        IF NOT INDEX WORD
12199  M01S07662.dsd     +++|*         NJN    RNW3        (PROGRAM FORMAT REQUEST FOR A *CDC721*)
12200  M01S07663.dsd     +++|          LDD    CM+3        SET NEW MEMORY ADDRESS
12201  M01S07664.dsd     +++|          STD    AB+3
12202  M01S07665.dsd     +++|          LDD    CM+4
12203  M01S07666.dsd     +++|          STD    AB+4
12204  M01S00001.dsd28   +++|          ADD    CM+3
12205  M01S00002.dsd28   +++|          ZJN    RNW1        IF END OF CHAIN
12206  M01S07667.dsd     +++|          RJM    SMA         SET ABSOLUTE MEMORY ADDRESS
12207  M01S07668.dsd     +++|          UJN    RNW2        PROCESS NEXT READ
12208  M01S07669.dsd     +++|
12209  M01S07670.dsd     +++| RNW3     LDN    CM          CHECK Y-COORDINATES
12210  M01S07671.dsd     +++|          STD    T0
12211  M01S07672.dsd     +++| RNW4     LDI    T0
12212  M01S07673.dsd     +++|          ADC    -LN51
12213  M01S07674.dsd     +++|          MJN    RNW6        IF BYTE IS NOT A Y-COORDINATE
12214  M01S07675.dsd     +++|          ADK    -LN46+LN51
12215  M01S07676.dsd     +++|          MJN    RNW5        IF Y-COORDINATE IS IN THE TRAILER AREA
12216  M01S07677.dsd     +++|          ADK    -LN05-1+LN46
12217  M01S07678.dsd     +++|          MJN    RNW6        IF Y-COORDINATE IS NOT IN THE HEADER AREA
12218  M01S07679.dsd     +++| RNW5     LDC    BL01        FORCE Y-COORDINATE TO FIRST LINE OF BODY
12219  M01S07680.dsd     +++|          STI    T0
12220  M01S07681.dsd     +++| RNW6     AOD    T0
12221  M01S07682.dsd     +++|          SBN    CM+5
12222  M01S07683.dsd     +++|          MJN    RNW4        IF MORE BYTES TO CHECK
12223  M01S07684.dsd     +++|          LDN    1           DATA FOUND
12224  M01S07685.dsd     +++|          LJM    RNWX        RETURN
12225  M01S07686.dsd     +++|
12226  M01S07687.dsd     +++|
12227  M01S07688.dsd     +++| RNWB     BSS    0
12228  M01S07689.dsd     +++|          LOC    RNWA
12229  M01S07690.dsd     +++|          NJN    RNWX        IF NOT INDEX WORD
12230  M01S07691.dsd     +++|          LOC    RNWA
12231  M01S07692.dsd     +++|          NJN    RNW3        IF NOT INDEX WORD
12232  M01S07693.dsd     +++|          LOC    *O
12233  M01S07694.dsd     +++| SMA      SPACE  4,15
12234  M01S07695.dsd     +++|**        SMA - SET MEMORY ADDRESS.
12235  M01S07696.dsd     +++|*
12236  M01S07697.dsd     +++|*         ENTRY  (AB+3 - AB+4) = RELATIVE ADDRESS.
12237  M01S07698.dsd     +++|*                (SR+2 - SR+3) = RA/100B.
12238  M01S07699.dsd     +++|*                (SR+4) = FL/100B.
12239  M01S07700.dsd     +++|*
12240  M01S07701.dsd     +++|*         EXIT   (T6 - T7) = ABSOLUTE ADDRESS.
12241  M01S07702.dsd     +++|*                (SR) = COUNT UNTIL END OF FL.
12242  M01S07703.dsd     +++|*                (SR+1) = RA/100B IF NOT CME.
12243  M01S07704.dsd     +++|*                       = 4000B IF CME.
12244  M01S07705.dsd     +++|*
12245  M01S07706.dsd     +++|*         ERROR  TO *DSK12*, IF ADDRESS IS OUTSIDE OF FL.
12246  M01S07707.dsd     +++|*
12247  M01S07708.dsd     +++|*         USES   SR, SR+1, T0, T7, T2 - T6.
12248  M01S07709.dsd     +++|
12249  M01S07710.dsd     +++|
12250  M01S07711.dsd     +++| SMA      SUBR               ENTRY/EXIT
12251  M01S07712.dsd     +++|          LDD    AB+3        GET RELATIVE ADDRESS
12252  M01S07713.dsd     +++|          LPN    37
12253  M01S07714.dsd     +++|          SHN    14
12254  M01S07715.dsd     +++|          ADD    AB+4
12255  M01S07716.dsd     +++|          SHN    -6          RELATIVE ADDRESS/100B
12256  M01S07717.dsd     +++|          STD    SR
12257  M01S07718.dsd     +++|          LDD    SR+3
12258  M01S07719.dsd     +++|          STD    SR+1
12259  M01S07720.dsd     +++|          LDM.   CMEI
12260  M01S07721.dsd     +++|          ZJN    SMA1        IF NOT CENTRAL MEMORY EXTENSION
12261  M01S07722.dsd     +++|          LRD    SR+2        (R) = REFERENCE ADDRESS
12262  M01S07723.dsd     +++|          LDC    4000
12263  M01S07724.dsd     +++|          STD    SR+1
12264  M01S07725.dsd     +++| SMA1     LDD    SR+4
12265  M01S07726.dsd     +++|          SBD    SR
12266  M01S07727.dsd     +++|          MJN    SMA2        IF INCORRECT ADDRESS
12267  M01S07728.dsd     +++|          NJN    SMA3        IF VALID ADDRESS
12268  M01S07729.dsd     +++| SMA2     LJM    DSK12       PROCESS END OF DATA
12269  M01S07730.dsd     +++|
12270  M01S07731.dsd     +++| SMA3     STD    SR
12271  M01S07732.dsd     +++|          SBN    21
12272  M01S07733.dsd     +++|          MJN    SMA4        IF WITHIN 2000B WORDS OF FL
12273  M01S07734.dsd     +++|          LDC    1001        SET COUNT
12274  M01S07735.dsd     +++|          STD    SR
12275  M01S07736.dsd     +++|          UJN    SMA5        FORM ADDRESS
12276  M01S07737.dsd     +++|
12277  M01S07738.dsd     +++| SMA4     LDD    AB+4        FORM COUNT
12278  M01S07739.dsd     +++|          LPN    77
12279  M01S07740.dsd     +++|          STD    T0
12280  M01S07741.dsd     +++|          LDD    SR
12281  M01S07742.dsd     +++|          SHN    6
12282  M01S07743.dsd     +++|          SBD    T0
12283  M01S07744.dsd     +++|          STD    SR
12284  M01S07745.dsd     +++| SMA5     LDD    AB+3        FORM ABSOLUTE ADDRESS
12285  M01S07746.dsd     +++|          LPN    37
12286  M01S07747.dsd     +++|          SHN    6
12287  M01S07748.dsd     +++|          ADD    SR+1
12288  M01S07749.dsd     +++|          SHN    6
12289  M01S07750.dsd     +++|          ADD    AB+4
12290  M01S07751.dsd     +++|          STD    T7
12291  M01S07752.dsd     +++|          SHN    -14
12292  M01S07753.dsd     +++|          STD    T6
12293  M01S07754.dsd     +++|          LJM    SMAX        RETURN
12294  M01S07755.dsd     +++| SMC      SPACE  4,10
12295  M01S07756.dsd     +++|**        SMC - SET MEDIMUM CHARACTER SIZE
12296  M01S07757.dsd     +++|
12297  M01S07758.dsd     +++|
12298  M01S07759.dsd     +++| SMC      SUBR               ENTRY/EXIT
12299  M01S07760.dsd     +++|          FJM    *,CH
12300  M01S07761.dsd     +++|          DCN    CH+40
12301  M01S07762.dsd     +++|          LDD    LA          CHECK SCREEN
12302  M01S07763.dsd     +++|          LMC    .FLFT
12303  M01S07764.dsd     +++|          ZJN    SMC1        IF LEFT SCREEN
12304  M01S07765.dsd     +++|          LDD    HN          SET RIGHT SCREEN
12305  M01S07766.dsd     +++|          ERRNZ  SLMF+100-SRMF  CODE DEPENDS ON VALUE
12306  M01S07767.dsd     +++| SMC1     LMC    SLMF        SELECT MEDIUM CHARACTERS
12307  M01S07768.dsd     +++|          CFNC
12308  M01S07769.dsd     +++|          UJN    SMCX        RETURN
12309  M01S00597.274l797 +++|          SPACE  4,10
12310  M01S00598.274l797 +++|          DSPEND
12311  M01S07770.dsd     +++|          DISPLAY (DISPLAY L - CENTRAL PROGRAM BUFFER.)
12312  M01S07771.dsd     +++|          ENTRY  DSL,D
12313  M01S07772.dsd     +++|          SPACE  4,10
12314  M01S07773.dsd     +++|***       *L* DISPLAY.
12315  M01S07774.dsd     +++|*
12316  M01S07775.dsd     +++|*         DISPLAY DATA FROM CMR BUFFER.
12317  M01S07776.dsd     +++|
12318  M01S07777.dsd     +++|
12319  M01S07778.dsd     +++| DSL      SUBR               ENTRY/EXIT
12320  M01S07779.dsd     +++|          DISPHD (L.  )      DISPLAY SCREEN NAME
12321  M01S07780.dsd     +++|*         LDN    0           STORE *L* DISPLAY ACTIVE FLAG
12322  M01S07781.dsd     +++|          STM.   /COMDSYS/SYSB
12323  M01S07782.dsd     +++|          LDM.   /COMDSYS/SYSC  READ *L* DISPLAY CONTROL WORD
12324  M01S07783.dsd     +++|          LPN    77
12325  M01S07784.dsd     +++|          STD    CM+3
12326  M01S07785.dsd     +++|          SHN    14
12327  M01S07786.dsd     +++|          LMM.   /COMDSYS/SYSC+1
12328  M01S07787.dsd     +++|          STD    CM+4
12329  M01S07788.dsd     +++|          CRD    AB
12330  M01S07789.dsd     +++|          ADN    LCOM+1
12331  M01S07790.dsd     +++|          STD    T7          SAVE DATA ADDRESS
12332  M01S07791.dsd     +++|          SHN    -14
12333  M01S07792.dsd     +++|          STD    T6
12334  M01S07793.dsd     +++|          LDD    AB+4
12335  M01S07794.dsd     +++|          SHN    21-3
12336  M01S07795.dsd     +++|          PJN    DSL1        IF NO DATA TO DISPLAY
12337  M01S07796.dsd     +++|          SHN    21-0-21+3
12338  M01S07797.dsd     +++|          PJN    DSL2        IF *L* DISPLAY REQUESTED
12339  M01S07798.dsd     +++|          LDN    0           CLEAR *L* DISPLAY REQUESTED FLAG
12340  M01S07799.dsd     +++|          STD    CM+2
12341  M01S07800.dsd     +++|          LDN    2
12342  M01S07801.dsd     +++|          STD    CM+1        STORE WORD COUNT OF OPTIONS
12343  M01S07802.dsd     +++|          LDD    MA
12344  M01S07803.dsd     +++|          CWM    DSLB,CM+1
12345  M01S07804.dsd     +++|          MONITOR  UTEM
12346  M01S07805.dsd     +++|          LDD    CM+1
12347  M01S07806.dsd     +++|          ZJN    DSL2        IF VERIFICATION PASSED
12348  M01S07807.dsd     +++| DSL1     DISPLA ,,(DISPLAY NOT ACTIVE.)
12349  M01S07808.dsd     +++|          DISPLA CH01,LN07,(L DISPLAY NOT ACTIVE)
12350  M01S07809.dsd     +++|          LJM    DSLX        RETURN
12351  M01S07810.dsd     +++|
12352  M01S07811.dsd     +++| DSL2     LDD    T6          DISPLAY THE REST OF THE TITLE
12353  M01S07812.dsd     +++|          SHN    14
12354  M01S07813.dsd     +++|          LMD    T7
12355  M01S07814.dsd     +++|          ADK    LDSY+2
12356  M01S07815.dsd     +++|          CRD    CM
12357  M01S07816.dsd     +++|          RJM    DWD         DISPLAY WORD
12358  M01S07817.dsd     +++|          LDD    CM+4
12359  M01S07818.dsd     +++|          ZJN    DSL2.1      IF THIS IS A ONE WORD TITLE
12360  M01S07819.dsd     +++|          LDD    T6
12361  M01S07820.dsd     +++|          SHN    14
12362  M01S07821.dsd     +++|          LMD    T7
12363  M01S07822.dsd     +++|          ADK    LDSY+3
12364  M01S07823.dsd     +++|          CRD    CM
12365  M01S07824.dsd     +++|          RJM    DWD         DISPLAY WORD
12366  M01S07825.dsd     +++| DSL2.1   LDD    AB+4        CHECK FOR INPUT REQUESTED
12367  M01S07826.dsd     +++|          LPN    20
12368  M01S07827.dsd     +++|          ZJN    DSL3        IF INPUT NOT REQUESTED
12369  M01S07828.dsd     +++|          LDC    0           (*L.* NOT PROCESSED)
12370  M01S07829.dsd     +++|*         LDC    2           (*L.* PROCESSED)
12371  M01S07830.dsd     +++| DSLA     EQU    *-1
12372  M01S07831.dsd     +++|          NJN    DSL4        IF *L.* ALREADY PROCESSED
12373  M01S07832.dsd     +++|          LDD    KI
12374  M01S07833.dsd     +++|          ADD    KE
12375  M01S07834.dsd     +++|          NJN    DSL4        IF KEYBOARD ACTIVE
12376  M01S07835.dsd     +++|          LDN    1RL         SET *L.* INTO *KBUF*
12377  M01S07836.dsd     +++|          STM    KBUF
12378  M01S07837.dsd     +++|          LDN    1R.
12379  M01S07838.dsd     +++|          STM    KBUF+1
12380  M01S07839.dsd     +++|          LDN    2           ADJUST KEYBOARD INDEX
12381  M01S07840.dsd     +++|          STD    KI
12382  M01S07841.dsd     +++| DSL3     STM    DSLA
12383  M01S07842.dsd     +++| DSL4     LDN    7           WORD COUNT/LINE=6
12384  M01S07843.dsd     +++|          STD    T3
12385  M01S07844.dsd     +++|          LDN    YINC        INITIALIZE LINE SPACING
12386  M01S07845.dsd     +++|          STD    T4
12387  M01S07846.dsd     +++|          LDM    DCTY
12388  M01S07847.dsd     +++|          NJN    DSL5        IF THE CONSOLE IS NOT A *CC545*
12389  M01S07848.dsd     +++|          LDD    AB+4        CHECK THE ALTERNATE SPACING BIT
12390  M01S07849.dsd     +++|          SHN    21-6
12391  M01S07850.dsd     +++|          PJN    DSL4.1      IF SINGLE SPACING REQUESTED
12392  M01S07851.dsd     +++|          LDN    YINC/2
12393  M01S07852.dsd     +++|          RAD    T4
12394  M01S07853.dsd     +++| DSL4.1   LDD    AB+4        CHECK THE SIZE BIT
12395  M01S07854.dsd     +++|          LPN    4
12396  M01S07855.dsd     +++|          ZJN    DSL5        IF SMALL CHARACTER SIZE
12397  M01S07856.dsd     +++|          RJM    SMS         SET MEDIUM CHARACTER SIZE
12398  M01S07857.dsd     +++|          LDN    4
12399  M01S07858.dsd     +++|          STD    T3
12400  M01S07859.dsd     +++|          LDD    T4          DOUBLE THE LINE SPACING
12401  M01S07860.dsd     +++|          RAD    T4
12402  M01S07861.dsd     +++| DSL5     LDD    T4          SET SPACING FOR CODED DISPLAYS
12403  M01S07862.dsd     +++|          LMC    LCNI
12404  M01S07863.dsd     +++|          STM    DSLC
12405  M01S07864.dsd     +++|          LDM    DCTY        DETERMINE IF COORDINATE CHECKS TO BE MADE
12406  M01S07865.dsd     +++|          ZJN    DSL5.1      IF *CC545*
12407  M01S07866.dsd     +++|          LMD    AB          CHECK CODED/PROGRAM MODE
12408  M01S07867.dsd     +++|          LPN    1
12409  M01S07868.dsd     +++| DSL5.1   STD    T4
12410  M01S07869.dsd     +++|          LDM    RNWB,T4
12411  M01S07870.dsd     +++|          STM    RNWA
12412  M01S07871.dsd     +++|          LDM    CTOS        SET Y-COORDINATE
12413  M01S07872.dsd     +++|          OAN    CH+40
12414  M01S07873.dsd     +++|          STD    YC
12415  M01S07874.dsd     +++|          LDD    AB+4        CHECK FORMAT
12416  M01S07875.dsd     +++|          LPN    2
12417  M01S07876.dsd     +++|          NJN    DSL7        IF CODED FORMAT
12418  M01S07877.dsd     +++|
12419  M01S07878.dsd     +++|*         DISPLAY PROGRAM FORMAT
12420  M01S07879.dsd     +++|
12421  M01S07880.dsd     +++| DSL6     RJM    RNW         READ NEXT WORD
12422  M01S07881.dsd     +++|          ZJN    DSL8        IF END OF DATA
12423  M01S07882.dsd     +++|          LDN    5           DISPLAY WORD
12424  M01S07883.dsd     +++|          OAM    CM,CH
12425  M01S07884.dsd     +++|          UJN    DSL6        DISPLAY NEXT WORD
12426  M01S07885.dsd     +++|
12427  M01S07886.dsd     +++|*         DISPLAY CODED FORMAT.
12428  M01S07887.dsd     +++|
Line S07888 Modification History
M01 (Added by) dsd
M02 (Updated by) dsd31
Seq #  *Modification Id* Act 
----------------------------+
12429  M02S07888.dsd31   ---| DSL7     LDN    2           OUTPUT COORDINATES
Line S07889 Modification History
M01 (Added by) dsd
M02 (Updated by) dsd31
Seq #  *Modification Id* Act 
----------------------------+
12430  M02S07889.dsd31   ---|          OAM    XC,CH
Line S07890 Modification History
M01 (Added by) dsd
M02 (Updated by) dsd31
Seq #  *Modification Id* Act 
----------------------------+
12431  M02S07890.dsd31   ---|          STD    T4          CLEAR DISPLAY COUNT
Line S07891 Modification History
M01 (Added by) dsd
M02 (Updated by) dsd31
Seq #  *Modification Id* Act 
----------------------------+
12432  M02S07891.dsd31   ---|          RJM    RNW         READ NEXT WORD
Line S07892 Modification History
M01 (Added by) dsd
M02 (Updated by) dsd31
Seq #  *Modification Id* Act 
----------------------------+
12433  M02S07892.dsd31   ---| DSL8     ZJN    DSL13       IF END OF DATA
12434  M01S00006.dsd31   +++| DSL7     RJM    RNW         READ NEXT WORD
12435  M01S00007.dsd31   +++| DSL8     ZJN    DSL13       IF END OF DATA
12436  M01S00008.dsd31   +++|          LDN    2           OUTPUT COORDINATES
12437  M01S00009.dsd31   +++|          OAM    XC,CH
12438  M01S00010.dsd31   +++|          STD    T4          CLEAR DISPLAY COUNT
Line S07893 Modification History
M01 (Added by) dsd
M02 (Updated by) dsd60
Seq #  *Modification Id* Act 
----------------------------+
12439  M02S07893.dsd60   ---| DSL9     AOD    T4          COUNT WORD DISPLAYED
12440  M01S00012.dsd60   +++| DSL9     LDD    CM+4        SAVE LAST BYTE
12441  M01S00013.dsd60   +++|          STD    T1
12442  M01S00014.dsd60   +++|          AOD    T4          COUNT WORD DISPLAYED
12443  M01S07894.dsd     +++|          SBD    T3
Line S07895 Modification History
M01 (Added by) dsd
M02 (Updated by) dsd60
Seq #  *Modification Id* Act 
----------------------------+
12444  M02S07895.dsd60   ---|          PJN    DSL10       IF FULL LINE DISPLAYED
Line S07896 Modification History
M01 (Added by) dsd
M02 (Updated by) dsd60
Seq #  *Modification Id* Act 
----------------------------+
12445  M02S07896.dsd60   ---|          RJM    DWD         DISPLAY WORD
Line S07897 Modification History
M01 (Added by) dsd
M02 (Updated by) dsd60
Seq #  *Modification Id* Act 
----------------------------+
12446  M02S07897.dsd60   ---| DSL10    LDD    CM+4
12447  M01S00015.dsd60   +++|          MJN    DSL9.1      IF NOT LAST WORD
12448  M01S00016.dsd60   +++|          NJN    DSL10       IF FULL LINE DISPLAYED
12449  M01S00017.dsd60   +++|          STD    CM+2        DISPLAY CHARACTERS 61-64
12450  M01S00018.dsd60   +++|          STD    CM+3
12451  M01S00019.dsd60   +++|          STD    CM+4
12452  M01S00020.dsd60   +++| DSL9.1   RJM    DWD         DISPLAY WORD
12453  M01S00021.dsd60   +++| DSL10    LDD    T1
12454  M01S07898.dsd     +++|          ZJN    DSL11       IF END OF LINE
12455  M01S07899.dsd     +++|          RJM    RNW         READ NEXT WORD
12456  M01S07900.dsd     +++|          UJN    DSL9        LOOP TO END OF FILE
12457  M01S07901.dsd     +++|
12458  M01S07902.dsd     +++| DSL11    LCN    YINC        DECREMENT Y-COORDINATE
12459  M01S07903.dsd     +++| DSLC     EQU    *-1         (COORDINATE POSITIONS PER LINE)
12460  M01S07904.dsd     +++|          RAD    YC
12461  M01S07905.dsd     +++|          ADC    -Y545+YINC  CHECK SCREEN BOTTOM FOR BOTH CONSOLE TYPES
12462  M01S07906.dsd     +++|          PJN    DSL7        IF NOT BOTTOM OF SCREEN
12463  M01S07907.dsd     +++| DSL13    LJM    DSLX        RETURN
12464  M01S07908.dsd     +++| DSLB     SPACE  4,10
Line S07909 Modification History
M01 (Added by) dsd
M02 (Updated by) dsd103
Seq #  *Modification Id* Act 
----------------------------+
12465  M02S07909.dsd103  ---|*         *UTEM* MONITOR FUNTION BUFFER.
12466  M01S00102.dsd103  +++|*         *UTEM* MONITOR FUNCTION BUFFER.
12467  M01S07910.dsd     +++|
12468  M01S07911.dsd     +++| DSLB     VFD    1/1,5/0,6/1,6/0,6/0  VERIFY *L* DISPLAY REQUESTED
12469  M01S07912.dsd     +++|          CON    0,0,1
12470  M01S07913.dsd     +++|          VFD    1/0,5/0,6/1,6/0,6/0  CLEAR *L* DISPLAY REQUESTED
12471  M01S07914.dsd     +++|          CON    0,0,0
12472  M01S07915.dsd     +++| RNW      SPACE  4,10
12473  M01S07916.dsd     +++|**        RNW - READ NEXT WORD.
12474  M01S07917.dsd     +++|*
12475  M01S07918.dsd     +++|*         ENTRY  (T6 - T7) = ABSOLUTE ADDRESS.
12476  M01S07919.dsd     +++|*
12477  M01S07920.dsd     +++|*         EXIT   (CM - CM+4) = NEXT WORD.
12478  M01S07921.dsd     +++|*                (T6 - T7) UPDATED.
12479  M01S07922.dsd     +++|*                (A) = 0, IF END OF DATA FOUND.
12480  M01S07923.dsd     +++|*
12481  M01S07924.dsd     +++|*         USES   T0, T6, T7, CM - CM+4.
12482  M01S07925.dsd     +++|
12483  M01S07926.dsd     +++|
12484  M01S07927.dsd     +++| RNW      SUBR               ENTRY/EXIT
12485  M01S07928.dsd     +++|          LDD    T6          GET MEMORY ADDRESS
12486  M01S07929.dsd     +++|          SHN    14
12487  M01S07930.dsd     +++|          LMD    T7
12488  M01S07931.dsd     +++|          CRD    CM          READ NEXT WORD
12489  M01S07932.dsd     +++|          AOD    T7          UPDATE MEMORY ADDRESS
12490  M01S07933.dsd     +++|          SHN    -14
12491  M01S07934.dsd     +++|          RAD    T6
12492  M01S07935.dsd     +++|          LDD    CM
12493  M01S07936.dsd     +++| RNWA     UJN    RNWX        IF NOT INDEX WORD
12494  M01S07937.dsd     +++|*         ZJN    RNWX        (PROGRAM FORMAT REQUEST FOR A *CDC721*)
12495  M01S07938.dsd     +++|          LDN    CM          CHECK Y-COORDINATES
12496  M01S07939.dsd     +++|          STD    T0
12497  M01S07940.dsd     +++| RNW1     LDI    T0
12498  M01S07941.dsd     +++|          ADC    -LN51
12499  M01S07942.dsd     +++|          MJN    RNW3        IF BYTE IS NOT A Y-COORDINATE
12500  M01S07943.dsd     +++|          ADK    -LN46+LN51
12501  M01S07944.dsd     +++|          MJN    RNW2        IF Y-COORDINATE IS IN THE TRAILER AREA
12502  M01S07945.dsd     +++|          ADK    -LN05-1+LN46
12503  M01S07946.dsd     +++|          MJN    RNW3        IF Y-COORDINATE IS NOT IN THE HEADER AREA
12504  M01S07947.dsd     +++| RNW2     LDC    BL01        FORCE Y-COORDINATE TO FIRST LINE OF BODY
12505  M01S07948.dsd     +++|          STI    T0
12506  M01S07949.dsd     +++| RNW3     AOD    T0
12507  M01S07950.dsd     +++|          SBN    CM+5
12508  M01S07951.dsd     +++|          MJN    RNW1        IF MORE BYTES TO CHECK
12509  M01S07952.dsd     +++|          LDN    1           DATA FOUND
12510  M01S07953.dsd     +++|          LJM    RNWX        RETURN
12511  M01S07954.dsd     +++|
12512  M01S07955.dsd     +++|
12513  M01S07956.dsd     +++| RNWB     BSS    0
12514  M01S07957.dsd     +++|          LOC    RNWA
12515  M01S07958.dsd     +++|          UJN    RNWX        IF NOT INDEX WORD
12516  M01S07959.dsd     +++|          LOC    RNWA
12517  M01S07960.dsd     +++|          ZJN    RNWX        IF NOT INDEX WORD
12518  M01S07961.dsd     +++|          LOC    *O
12519  M01S07962.dsd     +++| SMS      SPACE  4,10
12520  M01S07963.dsd     +++|**        SMS - SET MEDIUM CHARACTER SIZE.
12521  M01S07964.dsd     +++|
12522  M01S07965.dsd     +++|
12523  M01S07966.dsd     +++| SMS      SUBR               ENTRY/EXIT
12524  M01S07967.dsd     +++|          FJM    *,CH
12525  M01S07968.dsd     +++|          DCN    CH+40
12526  M01S07969.dsd     +++|          LDD    LA          CHECK IF LEFT SCREEN
12527  M01S07970.dsd     +++|          LMC    .FLFT
12528  M01S07971.dsd     +++|          ZJN    SMS1        IF LEFT SCREEN
12529  M01S07972.dsd     +++|          LDD    HN          SELECT RIGHT SCREEN
12530  M01S07973.dsd     +++|          ERRNZ  SLMF+100-SRMF  CODE DEPENDS ON VALUE
12531  M01S07974.dsd     +++| SMS1     LMC    SLMF        SELECT MEDIUM CHARACTERS
12532  M01S07975.dsd     +++|          CFNC
12533  M01S07976.dsd     +++|          UJN    SMSX        RETURN
12534  M01S07977.dsd     +++|
12535  M01S07978.dsd     +++|          QUAL
12536  M01S07979.dsd     +++| DSLA     EQU    /DSD"M."/DSLA
12537  M01S07980.dsd     +++|          QUAL   *
12538  M01S00599.274l797 +++|          SPACE  4,10
12539  M01S00600.274l797 +++|          DSPEND
12540  M01S07981.dsd     +++|          DISPLAY  (DISPLAY M - EXTENDED MEMORY DISPLAY.),AMF
12541  M01S07982.dsd     +++|          ENTRY  DSM,DSM
12542  M01S07983.dsd     +++| DSM      SPACE  4,10
12543  M01S07984.dsd     +++|***       *M* DISPLAY.
12544  M01S07985.dsd     +++|*
12545  M01S07986.dsd     +++|*         DISPLAY EXTENDED MEMORY IN 5 GROUPS OF 4 DIGITS WITH
12546  M01S07987.dsd     +++|*         DISPLAY CODE TRANSLATION.
12547  M01S07988.dsd     +++|
12548  M01S07989.dsd     +++|
12549  M01S00057.252l678 +++| EMRA     EQU    2 - 3       EM RAE (IN WORDS)
12550  M01S00058.252l678 +++| EMFL     EQU    4 - 5       EM FIELD LENGTH (IN WORDS)
12551  M01S00059.252l678 +++|
12552  M01S07990.dsd     +++| DSM      SUBR               ENTRY/EXIT
12553  M01S07991.dsd     +++|          DISPHD ("MHDR"),/DSD/TJMM+1
12554  M01S00060.252l678 +++|          LDC    SHNI+22-3   PRESET SHIFT INSTRUCTIONS
12555  M01S00061.252l678 +++|          ADM    UESC
12556  M01S00062.252l678 +++|          STM    DSMF
12557  M01S00063.252l678 +++|          STM    DSMG
12558  M01S07992.dsd     +++|          LDC    EDBP
12559  M01S07993.dsd     +++|          CRD    SH
12560  M01S07994.dsd     +++|          LDD    SH
Line S07995 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
12561  M02S07995.252l678 ---|          SHN    14
Line S07996 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
12562  M02S07996.252l678 ---|          LMD    SH+1
12563  M01S00064.252l678 +++|          ADD    SH+1
12564  M01S07997.dsd     +++|          NJN    DSM1        IF EXTENDED MEMORY DEFINED
Line S07998 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
12565  M02S07998.252l678 ---|          DISPLA CH01,LN08,(EXTENDED MEMORY EQUIPMENT UNDEFINED.)
12566  M01S00065.252l678 +++|          DISPLA CH01,LN08,(EXTENDED MEMORY UNDEFINED.)
Line S07999 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
12567  M02S07999.252l678 ---|          UJN    DSMX        RETURN
12568  M01S00066.252l678 +++| DSM0     UJN    DSMX        RETURN
12569  M01S08000.dsd     +++|
12570  M01S08001.dsd     +++| DSM1     LDD    SF          SET SECURE FLAG (LOCAL)
12571  M01S08002.dsd     +++|          STD    T8
12572  M01S08003.dsd     +++|          LDD    LK
12573  M01S08004.dsd     +++|          SHN    -1
Line S08005 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
12574  M02S08005.252l678 ---|          ZJN    DSM1.1      IF NOT SECURE UNLOCK
12575  M01S00067.252l678 +++|          ZJN    DSM2        IF NOT SECURE UNLOCK
12576  M01S08006.dsd     +++|          LDN    0           CLEAR SECURE FLAG
12577  M01S08007.dsd     +++|          STD    T8
Line S08008 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
12578  M02S08008.252l678 ---| DSM1.1   LDC    /DSD/TJMM+1 SEARCH FOR JSN IN EJT
12579  M01S00068.252l678 +++| DSM2     LDC    /DSD/TJMM+1 SEARCH FOR JSN IN EST
12580  M01S08009.dsd     +++|          RJM    SJS
Line S08010 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
12581  M02S08010.252l678 ---|          MJN    DSMX        IF JOB NOT AT CP OR JSN UNUSED
12582  M01S00069.252l678 +++|          MJN    DSM0        IF JOB NOT AT CP OR JSN UNUSED
Line S08011 Modification History
M01 (Added by) dsd
M02 (Updated by) ns2575
Seq #  *Modification Id* Act 
----------------------------+
12583  M02S08011.ns2575  ---|          LDM    CTOS        INITIALIZE LINE NUMBER
Line S00001 Modification History
M01 (Added by) ns2575
M02 (Updated by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
12584  M02S00001.273l780 ---|          LDD    NC          SET SYSTEM CONTROL POINT FOR *FTN*
Line S00002 Modification History
M01 (Added by) ns2575
M02 (Updated by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
12585  M02S00002.273l780 ---|          STD    CN
Line S00003 Modification History
M01 (Added by) ns2575
M02 (Updated by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
12586  M02S00003.273l780 ---|          LDD    CP
Line S00004 Modification History
M01 (Added by) ns2575
M02 (Updated by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
12587  M02S00004.273l780 ---|          ZJN    DSM2.1      IF JSN NOT SPECIFIED
Line S00005 Modification History
M01 (Added by) ns2575
M02 (Updated by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
12588  M02S00005.273l780 ---|          SHN    -7          SET CONTROL POINT NUMBER FOR *FTN*
Line S00006 Modification History
M01 (Added by) ns2575
M02 (Updated by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
12589  M02S00006.273l780 ---|          STD    CN
Line S00007 Modification History
M01 (Added by) ns2575
M02 (Updated by) 273l780
Seq #  *Modification Id* Act 
----------------------------+
12590  M02S00007.273l780 ---| DSM2.1   LDM    CTOS        INITIALIZE LINE NUMBER
12591  M01S00209.273l780 +++|          LDM    CTOS        INITIALIZE LINE NUMBER
12592  M01S08012.dsd     +++|          SBN    YINC
12593  M01S08013.dsd     +++|          STD    YC
12594  M01S08014.dsd     +++|          OAN    CH+40
12595  M01S08015.dsd     +++|          LDN    2           SET (T9) FOR 2 OR 4 GROUPS OF DISPLAY DATA
12596  M01S08016.dsd     +++|          SBM    DCTY
12597  M01S08017.dsd     +++|          SHN    2
12598  M01S08018.dsd     +++|          STD    T9
12599  M01S00070.252l678 +++|
12600  M01S00071.252l678 +++|*         SET EXTENDED MEMORY EQUIPMENT.
12601  M01S00072.252l678 +++|
12602  M01S00073.252l678 +++|          LDD    CP
12603  M01S00074.252l678 +++|          NJP    DSM5        IF CP RELATIVE MEMORY DISPLAY
12604  M01S00075.252l678 +++|          LDK    MMFL        LINK DEVICE IS DEFAULT
12605  M01S00076.252l678 +++|          CRD    CM
12606  M01S00077.252l678 +++|          LDD    CM+1
12607  M01S00078.252l678 +++|          LPC    777
12608  M01S00079.252l678 +++|          NJN    DSM3        IF LINK DEVICE DEFINED
12609  M01S00080.252l678 +++|          LDK    EXML        GET EM EQUIPMENT WITH CPU ACCESS
12610  M01S00081.252l678 +++|          CRD    CM
12611  M01S00082.252l678 +++|          LDD    CM+4
12612  M01S00083.252l678 +++|          LPC    777
12613  M01S00084.252l678 +++|          ZJN    DSM4        IF NO EM EQUIPMENT DEFINED
12614  M01S00085.252l678 +++| DSM3     STD    T5
Line S00086 Modification History
M01 (Added by) 252l678
M02 (Updated by) dsd91
Seq #  *Modification Id* Act 
----------------------------+
12615  M02S00086.dsd91   ---|          SFA    EST         COMPUTE EQUIPMENT MEMORY SIZE
Line S00087 Modification History
M01 (Added by) 252l678
M02 (Updated by) dsd91
Seq #  *Modification Id* Act 
----------------------------+
12616  M02S00087.dsd91   ---|          ADK    EQDE
12617  M01S00001.dsd91   +++|          LDK    MEFL
12618  M01S00088.252l678 +++|          CRD    CM
Line S00089 Modification History
M01 (Added by) 252l678
M02 (Updated by) dsd91
Seq #  *Modification Id* Act 
----------------------------+
12619  M02S00089.dsd91   ---|          LDD    CM+4
Line S00090 Modification History
M01 (Added by) 252l678
M02 (Updated by) dsd91
Seq #  *Modification Id* Act 
----------------------------+
12620  M02S00090.dsd91   ---|          SHN    3
Line S00091 Modification History
M01 (Added by) 252l678
M02 (Updated by) dsd91
Seq #  *Modification Id* Act 
----------------------------+
12621  M02S00091.dsd91   ---|          ADK    DDLL
Line S00092 Modification History
M01 (Added by) 252l678
M02 (Updated by) dsd91
Seq #  *Modification Id* Act 
----------------------------+
12622  M02S00092.dsd91   ---|          CRD    CM
Line S08019 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
M03 (Updated by) dsd91
Seq #  *Modification Id* Act 
----------------------------+
12623  M03S08019.dsd91   ---|          LDD    CP
Line S08020 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
M03 (Updated by) dsd91
Seq #  *Modification Id* Act 
----------------------------+
12624  M03S08020.dsd91   ---|          ZJN    DSM2        IF ABSOLUTE EXTENDED MEMORY DISPLAY
Line S08021 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
M03 (Updated by) dsd91
Seq #  *Modification Id* Act 
----------------------------+
12625  M03S08021.dsd91   ---|          ADN    ECSW        READ EXTENDED MEMORY STATUS WORD
Line S00093 Modification History
M01 (Added by) 252l678
M02 (Updated by) dsd91
Seq #  *Modification Id* Act 
----------------------------+
12626  M02S00093.dsd91   ---|          LDD    CM+1        SET EM FIELD LENGTH
12627  M01S00002.dsd91   +++|          LDD    CM+2        CALCULATE SHIFT COUNT
12628  M01S00003.dsd91   +++|          SHN    -5
12629  M01S00004.dsd91   +++|          LPN    3
12630  M01S00005.dsd91   +++|          ADD    TH
12631  M01S00006.dsd91   +++|          ERRNZ  SHNI-1000
12632  M01S00007.dsd91   +++|          STM    DSMH
12633  M01S00008.dsd91   +++|          LDD    CM+3
12634  M01S00009.dsd91   +++|          SHN    0
12635  M01S00010.dsd91   +++|*         SHN    (EMBS/1000B)-1
12636  M01S00011.dsd91   +++| DSMH     EQU    *-1
12637  M01S00012.dsd91   +++|          SHN    21-2
12638  M01S00094.252l678 +++|          STM    EMFL
Line S00095 Modification History
M01 (Added by) 252l678
M02 (Updated by) dsd91
Seq #  *Modification Id* Act 
----------------------------+
12639  M02S00095.dsd91   ---|          LDD    CM+2
12640  M01S00013.dsd91   +++|          SHN    14
12641  M01S00014.dsd91   +++|          SCN    77
12642  M01S00096.252l678 +++|          STM    EMFL+1
12643  M01S00097.252l678 +++|          LDN    0
12644  M01S00098.252l678 +++|          UJN    DSM6        SET ABSOLUTE RAE
12645  M01S00099.252l678 +++|
12646  M01S00100.252l678 +++| DSM4     LDD    NC          USE SYSTEM CP RAE, FLE
12647  M01S00101.252l678 +++|          SHN    7
12648  M01S00102.252l678 +++| DSM5     ADN    ECSW        READ EXTENDED MEMORY STATUS WORD
12649  M01S08022.dsd     +++|          CRD    CM
Line S08023 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
12650  M02S08023.252l678 ---|          LDD    CM+3        SET EXTENDED MEMORY RA (RAE)
Line S08024 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
12651  M02S08024.252l678 ---|          SHN    UESF
Line S08025 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
12652  M02S08025.252l678 ---| DSM2     STD    T7
Line S08026 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
12653  M02S08026.252l678 ---|          LDN    MEFL        CHECK EXTENDED MEMORY TYPE
Line S08027 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
12654  M02S08027.252l678 ---|          CRD    CM
Line S08028 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
12655  M02S08028.252l678 ---|          LDD    CM+2
Line S08029 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
12656  M02S08029.252l678 ---|          LPN    7
Line S08030 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
12657  M02S08030.252l678 ---|          SBN    3
Line S08031 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
12658  M02S08031.252l678 ---|          ZJN    DSM3        IF LCME
Line S08032 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
12659  M02S08032.252l678 ---|          SBN    4-3
Line S08033 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
12660  M02S08033.252l678 ---|          ZJN    DSM3        IF UEM
12661  M01S00103.252l678 +++|          LDD    CM+4        SET EM FIELD LENGTH
Line S00104 Modification History
M01 (Added by) 252l678
M02 (Updated by) dsd79
Seq #  *Modification Id* Act 
----------------------------+
12662  M02S00104.dsd79   ---| DSMF     SHN    22-3
12663  M01S00001.dsd79   +++|          NJN    DSM5.1      IF USER EM PRESENT
12664  M01S00002.dsd79   +++|          DISPLA CH01,LN08,(USER EM NOT ASSIGNED.)
12665  M01S00003.dsd79   +++|          LJM    DSMX        RETURN
12666  M01S00004.dsd79   +++|
12667  M01S00005.dsd79   +++| DSM5.1   SHN    22-3
12668  M01S00105.252l678 +++|*         SHN    22-3+UESC
12669  M01S00006.dsd79   +++| DSMF     EQU    *-1
12670  M01S00106.252l678 +++|          STM    EMFL
12671  M01S00107.252l678 +++|          SHN    -6
12672  M01S00108.252l678 +++|          SCN    77
12673  M01S00109.252l678 +++|          STM    EMFL+1
12674  M01S00110.252l678 +++|          LDD    CM+2        SET EM RA (RAE) IN WORDS
12675  M01S00111.252l678 +++|          SHN    14
12676  M01S00112.252l678 +++|          LMD    CM+3
12677  M01S00113.252l678 +++| DSMG     SHN    22-3
12678  M01S00114.252l678 +++|*         SHN    22-3+UESC
12679  M01S00115.252l678 +++| DSM6     STM    EMRA
12680  M01S00116.252l678 +++|          SHN    -6
12681  M01S00117.252l678 +++|          SCN    77
12682  M01S00118.252l678 +++|          STM    EMRA+1
Line S00119 Modification History
M01 (Added by) 252l678
M02 (Updated by) dsd103
Seq #  *Modification Id* Act 
----------------------------+
12683  M02S00119.dsd103  ---|          LDM    EMFL        SET EXPANDED MODE ADDRESSING FLAG
Line S00120 Modification History
M01 (Added by) 252l678
M02 (Updated by) dsd103
Seq #  *Modification Id* Act 
----------------------------+
12684  M02S00120.dsd103  ---|          STD    T7
12685  M01S08034.dsd     +++|          LDC    EFRL        READ FLAG REGISTER
12686  M01S08035.dsd     +++|          CRD    CM
12687  M01S00121.252l678 +++|          LDD    CM+3
12688  M01S00122.252l678 +++|          SHN    21-13
12689  M01S00123.252l678 +++|          MJN    DSM7        IF NO FLAG REGISTER TO DISPLAY
12690  M01S08036.dsd     +++|          DISPLA CH01,,(FLAG REGISTER =)
12691  M01S08037.dsd     +++|          LDD    CM+3        DISPLAY FLAG REGISTER
12692  M01S08038.dsd     +++|          RJM    D2D
12693  M01S08039.dsd     +++|          LDD    CM+4
12694  M01S08040.dsd     +++|          RJM    D4D
Line S08041 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
12695  M02S08041.252l678 ---| DSM3     LDC.   DSMD        SET ADDRESS OF ERROR STATUS WORDS
12696  M01S00124.252l678 +++| DSM7     LDC.   DSMD        SET ADDRESS OF ERROR STATUS WORDS
12697  M01S08042.dsd     +++|          STD    T3
12698  M01S08043.dsd     +++|          LDN    0           PRESET INDEX INTO BUFFER
12699  M01S08044.dsd     +++|          STD    T4
12700  M01S08045.dsd     +++|          LDD    T9          PRESET LAST INDEX-INTO-BUFFER + 1
12701  M01S08046.dsd     +++|          SHN    -1
12702  M01S08047.dsd     +++|          STD    T5
12703  M01S08048.dsd     +++|          SOM    DSMC        CHECK REREAD COUNTER
Line S08049 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
12704  M02S08049.252l678 ---|          MJN    DSM4        IF TIME TO REREAD
Line S08050 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
12705  M02S08050.252l678 ---|          LJM    DSM8        CHECK AND DISPLAY
12706  M01S00125.252l678 +++|          MJN    DSM8        IF TIME TO REREAD
12707  M01S00126.252l678 +++|          LJM    DSM14       CHECK TIME AND DISPLAY
12708  M01S08051.dsd     +++|
Line S08052 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
12709  M02S08052.252l678 ---| DSM4     LDP    EMMM        SET MODE MASK
Line S08053 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
12710  M02S08053.252l678 ---|          STM    DSMF
Line S08054 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
12711  M02S08054.252l678 ---|          LDC    TDSM        ADDRESS TABLE
12712  M01S00127.252l678 +++| DSM8     LDC    TDSM        ADDRESS TABLE
Line S08055 Modification History
M01 (Added by) dsd
M02 (Updated by) dsd103
Seq #  *Modification Id* Act 
----------------------------+
12713  M02S08055.dsd103  ---|          STD    T1
12714  M01S00103.dsd103  +++|          STD    T7
12715  M01S08056.dsd     +++|          ADD    T9          SET END OF TABLE
12716  M01S08057.dsd     +++|          STD    T2
Line S08058 Modification History
M01 (Added by) dsd
M02 (Updated by) dsd103
Seq #  *Modification Id* Act 
----------------------------+
12717  M02S08058.dsd103  ---|          LDN    0
12718  M01S00104.dsd103  +++|          LDI    T7
12719  M01S00105.dsd103  +++|          SHN    -13
12720  M01S00106.dsd103  +++|          LMN    1
12721  M01S00107.dsd103  +++|          ADD    CP
12722  M01S00108.dsd103  +++|          NJN    DSM8.1      IF NOT ABSOLUTE OVERLAY WITH POSITIVE FWA
12723  M01S00109.dsd103  +++|          RJM    RES
12724  M01S00110.dsd103  +++| DSM8.1   LDN    0
12725  M01S08059.dsd     +++|          STD    AB
12726  M01S08060.dsd     +++|          STD    AB+2
12727  M01S08061.dsd     +++|          LDD    TH          SET NUMBER OF WORDS IN EACH GROUP = 10
12728  M01S08062.dsd     +++|          STD    AB+1
Line S08063 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
12729  M02S08063.252l678 ---| DSM5     LDI    T1
Line S08064 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
12730  M02S08064.252l678 ---|          LPC    0           MASK DEPENDING ON ECS/ESM MODE
Line S08065 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
12731  M02S08065.252l678 ---|*         LPC    777         (ECS MODE)
Line S08066 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
12732  M02S08066.252l678 ---|*         LPC    7777        (ESM MODE)
Line S08067 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
12733  M02S08067.252l678 ---| DSMF     EQU    *-1
Line S08068 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
12734  M02S08068.252l678 ---|          STI    T1          REPLACE IN CASE ADDRESS MASKED
Line S08069 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
12735  M02S08069.252l678 ---|          STD    AB+3
Line S00128 Modification History
M01 (Added by) 252l678
M02 (Updated by) dsd103
Seq #  *Modification Id* Act 
----------------------------+
12736  M02S00128.dsd103  ---| DSM9     LDD    T7
12737  M01S00111.dsd103  +++| DSM9     LDM    EMFL
12738  M01S00129.252l678 +++|          NJN    DSM10       IF EXPANDED MODE ADDRESSING
Line S00130 Modification History
M01 (Added by) 252l678
M02 (Updated by) dsd103
Seq #  *Modification Id* Act 
----------------------------+
12739  M02S00130.dsd103  ---|          LDI    T1
12740  M01S00112.dsd103  +++|          LDI    T7
12741  M01S00131.252l678 +++|          LPC    777
Line S00132 Modification History
M01 (Added by) 252l678
M02 (Updated by) dsd103
Seq #  *Modification Id* Act 
----------------------------+
12742  M02S00132.dsd103  ---|          STI    T1
Line S00133 Modification History
M01 (Added by) 252l678
M02 (Updated by) dsd103
Seq #  *Modification Id* Act 
----------------------------+
12743  M02S00133.dsd103  ---| DSM10    LDI    T1
12744  M01S00113.dsd103  +++|          STI    T7
12745  M01S00114.dsd103  +++| DSM10    LDI    T7
12746  M01S00134.252l678 +++|          STD    AB+3
Line S08070 Modification History
M01 (Added by) dsd
M02 (Updated by) dsd103
Seq #  *Modification Id* Act 
----------------------------+
12747  M02S08070.dsd103  ---|          AOD    T1
Line S08071 Modification History
M01 (Added by) dsd
M02 (Updated by) dsd103
Seq #  *Modification Id* Act 
----------------------------+
12748  M02S08071.dsd103  ---|          LDI    T1
12749  M01S00115.dsd103  +++|          AOD    T7
12750  M01S00116.dsd103  +++|          LDI    T7
12751  M01S08072.dsd     +++|          STD    AB+4
Line S08073 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
12752  M02S08073.252l678 ---|          LDD    T7          EXTENDED MEMORY RA (RAE)
Line S08074 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
12753  M02S08074.252l678 ---|          ZJN    DSM6        IF NOT RELATIVE TO THIS CP
Line S08075 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
12754  M02S08075.252l678 ---|          LPN    7           ADD RAE TO ADDRESS
12755  M01S00135.252l678 +++|          LDD    CP
Line S08076 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
12756  M02S08076.252l678 ---|          SHN    11
12757  M01S00136.252l678 +++|          ZJN    DSM11       IF ABSOLUTE DISPLAY
12758  M01S00137.252l678 +++|          LDM    EMRA+1      ADD RAE TO ADDRESS
12759  M01S08077.dsd     +++|          RAD    AB+4
12760  M01S08078.dsd     +++|          SHN    -14
12761  M01S00138.252l678 +++|          ADM    EMRA
12762  M01S08079.dsd     +++|          RAD    AB+3
Line S08080 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
12763  M02S08080.252l678 ---|          LDD    T7
Line S08081 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
12764  M02S08081.252l678 ---|          SHN    -3
Line S08082 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
12765  M02S08082.252l678 ---|          RAD    AB+3
Line S08083 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
12766  M02S08083.252l678 ---| DSM6     LDD    SH
12767  M01S00139.252l678 +++| DSM11    LDD    SH
12768  M01S08084.dsd     +++|          SHN    14
12769  M01S08085.dsd     +++|          LMD    SH+1
12770  M01S08086.dsd     +++|          ADD    T4
12771  M01S08087.dsd     +++|          CWD    AB          WRITE ADDRESS LIST
12772  M01S08088.dsd     +++|          AOD    T4
Line S08089 Modification History
M01 (Added by) dsd
M02 (Updated by) dsd103
Seq #  *Modification Id* Act 
----------------------------+
12773  M02S08089.dsd103  ---|          AOD    T1
12774  M01S00117.dsd103  +++|          AOD    T7
12775  M01S08090.dsd     +++|          LMD    T2
Line S08091 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
12776  M02S08091.252l678 ---|          NJN    DSM5        IF NOT END OF ADDRESS TABLE
12777  M01S00140.252l678 +++|          NJN    DSM9        IF NOT END OF ADDRESS TABLE
12778  M01S08092.dsd     +++|          LDD    SH+1        SET LIST ADDRESS IN *ECSM* REQUEST
12779  M01S08093.dsd     +++|          STD    CM+2
12780  M01S08094.dsd     +++|          LDD    T9          SET NUMBER OF ENTRIES IN LIST = 4 (OR 2)
12781  M01S08095.dsd     +++|          SHN    -1+6
12782  M01S08096.dsd     +++|          ADD    SH
12783  M01S08097.dsd     +++|          STD    CM+1
Line S08098 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
12784  M02S08098.252l678 ---|          LDD    T7
12785  M01S00141.252l678 +++|          LDD    CP
Line S08099 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
12786  M02S08099.252l678 ---|          ZJN    DSM6.1      IF ABSOLUTE EXTENDED MEMORY DISPLAY
12787  M01S00142.252l678 +++|          ZJN    DSM12       IF ABSOLUTE EXTENDED MEMORY DISPLAY
12788  M01S08100.dsd     +++|          LDN    2           INDICATE READ FROM USER EXTENDED MEMORY
Line S08101 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
12789  M02S08101.252l678 ---| DSM6.1   ADN    /CPS/PELS*10  SET *ECSM* READ LIST SUBFUNCTION
12790  M01S00143.252l678 +++| DSM12    ADN /CPS/PELS*10   SET *ECSM* READLIST SUBFUNCTION
12791  M01S08102.dsd     +++|          SHN    6
12792  M01S08103.dsd     +++|          STD    CM+3
12793  M01S08104.dsd     +++|          MONITOR  ECSM      READ EXTENDED MEMORY
12794  M01S08105.dsd     +++|          LDD    T9
12795  M01S08106.dsd     +++|          LPN    10
12796  M01S08107.dsd     +++|          STM    DSMC        RESET COUNTER = 10 (OR 0)
12797  M01S08108.dsd     +++|          LDD    T9
12798  M01S08109.dsd     +++|          SHN    -1
12799  M01S08110.dsd     +++|          SBN    1
12800  M01S08111.dsd     +++|          STM    DSMA
Line S08112 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
12801  M02S08112.252l678 ---| DSM7     SOD    T4          READ ERROR RESPONSE
12802  M01S00144.252l678 +++| DSM13    SOD    T4          READ ERROR RESPONSE
12803  M01S08113.dsd     +++|          LDD    SH
12804  M01S08114.dsd     +++|          SHN    14
12805  M01S08115.dsd     +++|          LMD    SH+1
12806  M01S08116.dsd     +++|          ADD    T4
12807  M01S08117.dsd     +++|          CRD    CM
12808  M01S08118.dsd     +++|          LDD    CM+4
12809  M01S08119.dsd     +++|          STM    0,T3
12810  M01S08120.dsd     +++| DSMA     EQU    *-1
12811  M01S08121.dsd     +++|          SOM    DSMA
Line S08122 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
12812  M02S08122.252l678 ---|          PJN    DSM7        IF NOT END OF TABLE
Line S08123 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
12813  M02S08123.252l678 ---| DSM8     LDN    0           TABLE INDEX
12814  M01S00145.252l678 +++|          PJN    DSM13       IF NOT END OF TABLE
12815  M01S00146.252l678 +++| DSM14    LDN    0           TABLE INDEX
12816  M01S08124.dsd     +++|          STD    T6
12817  M01S08125.dsd     +++|          LCN    2*YINC
12818  M01S08126.dsd     +++|          RAD    YC
Line S08127 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
12819  M02S08127.252l678 ---| DSM9     LDN    1           SET ERROR FLAG MASK
12820  M01S00147.252l678 +++| DSM15    LDN    1           SET ERROR FLAG MASK
12821  M01S08128.dsd     +++|          STD    T4
12822  M01S08129.dsd     +++|          LDI    T3          SET ERROR BITS
12823  M01S08130.dsd     +++|          STM    DSMB
12824  M01S08131.dsd     +++|          LDM    TDSM,T6     EXTENDED MEMORY ADDRESS
12825  M01S08132.dsd     +++|          STD    AB
12826  M01S08133.dsd     +++|          LDM    TDSM+1,T6
12827  M01S08134.dsd     +++|          STD    AB+1
Line S08135 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
12828  M02S08135.252l678 ---| DSM10    LCN    YINC
12829  M01S00148.252l678 +++| DSM16    LCN    YINC
12830  M01S08136.dsd     +++|          RAD    YC
12831  M01S08137.dsd     +++|          LDD    T4          CHECK FOR EXTENDED MEMORY ERROR
12832  M01S08138.dsd     +++|          LPC    1
12833  M01S08139.dsd     +++| DSMB     EQU    *-1
Line S08140 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
12834  M02S08140.252l678 ---|          ZJN    DSM11       IF NO ERROR ON THIS WORD
12835  M01S00149.252l678 +++|          ZJN    DSM17       IF NO ERROR ON THIS WORD
12836  M01S08141.dsd     +++|          CFNC   BIVF
12837  M01S08142.dsd     +++|          SHN    1-21
12838  M01S08143.dsd     +++|          LPN    2
Line S08144 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
12839  M02S08144.252l678 ---| DSM11    STD    T2          SET INTENSIFICATION COUNT
12840  M01S00150.252l678 +++| DSM17    STD    T2          SET INTENSIFICATION COUNT
12841  M01S08145.dsd     +++|          LDN    2           OUTPUT COORDINATES
12842  M01S08146.dsd     +++|          OAM    XC,CH
12843  M01S08147.dsd     +++|          LDD    AB          DISPLAY ADDRESS
12844  M01S08148.dsd     +++|          RJM    D4D
12845  M01S08149.dsd     +++|          LDD    AB+1
12846  M01S08150.dsd     +++|          RJM    D4D
12847  M01S08151.dsd     +++|          LDD    T8
Line S08152 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
12848  M02S08152.252l678 ---|          ZJN    DSM13       IF OKAY TO DISPLAY EXTENDED MEMORY
12849  M01S00151.252l678 +++|          ZJN    DSM19       IF OKAY TO DISPLAY EXTEMDED ME
12850  M01S08153.dsd     +++|          LDD    AB
Line S08154 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
12851  M02S08154.252l678 ---|          NJN    DSM12       IF ADDRESS IN SECURE AREA
12852  M01S00152.252l678 +++|          NJN    DSM18       IF ADDRESS IN SECURED AREA
12853  M01S08155.dsd     +++|          LDC    2000B
12854  M01S08156.dsd     +++|          SBD    AB+1
Line S08157 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
12855  M02S08157.252l678 ---|          PJN    DSM13       IF ADDRESS NOT IN SECURE AREA
Line S08158 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
12856  M02S08158.252l678 ---| DSM12    LDN    DSMEL
12857  M01S00153.252l678 +++|          PJN    DSM19       IF ADDRESS NOT IN SECURED AREA
Line S00154 Modification History
M01 (Added by) 252l678
M02 (Updated by) dsd103
Seq #  *Modification Id* Act 
----------------------------+
12858  M02S00154.dsd103  ---| DSM18    LDN    DSMEL
Line S08159 Modification History
M01 (Added by) dsd
M02 (Updated by) dsd103
Seq #  *Modification Id* Act 
----------------------------+
12859  M02S08159.dsd103  ---|          OAM    DSME,CH     DISPLAY SECURITY BLANKET
12860  M01S00118.dsd103  +++| DSM18    LDN    DSMJL
12861  M01S00119.dsd103  +++|          OAM    DSMJ,CH     DISPLAY SECURITY BLANKET
12862  M01S00120.dsd103  +++|          LDN    DSMEL
12863  M01S00121.dsd103  +++|          OAM    DSME,CH
Line S08160 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
12864  M02S08160.252l678 ---|          UJN    DSM14       CONTINUE
12865  M01S00155.252l678 +++|          UJN    DSM20       CONTINUE
12866  M01S08161.dsd     +++|
Line S08162 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
12867  M02S08162.252l678 ---| DSM13    LDD    SH          FETCH WORD FROM BUFFER
12868  M01S00156.252l678 +++| DSM19    LDD    SH          FETCH WORD FROM BUFFER
12869  M01S08163.dsd     +++|          SHN    14
12870  M01S08164.dsd     +++|          LMD    SH+1
12871  M01S08165.dsd     +++|          ADD    T5
12872  M01S08166.dsd     +++|          CRD    CM
12873  M01S08167.dsd     +++|          RJM    D5F         DISPLAY WORD
Line S08168 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
12874  M02S08168.252l678 ---| DSM14    SOD    T2
Line S08169 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
12875  M02S08169.252l678 ---|          MJN    DSM15       IF NO MORE INTENSIFICATION
Line S08170 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
12876  M02S08170.252l678 ---|          LJM    DSM11       INTENSIFY
Line S08171 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
12877  M02S08171.252l678 ---|
Line S08172 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
12878  M02S08172.252l678 ---| DSM15    AOD    AB+1        INCREMENT ADDRESS
12879  M01S00157.252l678 +++| DSM20    SOD    T2
12880  M01S00158.252l678 +++|          PJP    DSM17       IF MORE INTENSIFICATION NEEDED
12881  M01S00159.252l678 +++|          AOD    AB+1        INCREMENT ADDRESS
12882  M01S08173.dsd     +++|          SHN    -12D
12883  M01S08174.dsd     +++|          RAD    AB
12884  M01S08175.dsd     +++|          CFNC   EIVF
12885  M01S08176.dsd     +++|          AOD    T5
12886  M01S08177.dsd     +++|          LDD    T4          SHIFT MASK
12887  M01S08178.dsd     +++|          SHN    1
12888  M01S08179.dsd     +++|          STD    T4
12889  M01S08180.dsd     +++|          SHN    -10
Line S08181 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
12890  M02S08181.252l678 ---|          NJN    DSM16       IF END OF GROUP
Line S08182 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
12891  M02S08182.252l678 ---|          LJM    DSM10       LOOP
12892  M01S00160.252l678 +++|          NJN    DSM21       IF END OF GROUP
12893  M01S00161.252l678 +++|          LJM    DSM16       LOOP
12894  M01S08183.dsd     +++|
Line S08184 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
12895  M02S08184.252l678 ---| DSM16    LCN    YINC
12896  M01S00162.252l678 +++| DSM21    LCN    YINC
12897  M01S08185.dsd     +++|          RAD    YC
12898  M01S08186.dsd     +++|          AOD    T3          ADVANCE ERROR WORD POINTER
12899  M01S08187.dsd     +++|          LDN    2
12900  M01S08188.dsd     +++|          RAD    T6
12901  M01S08189.dsd     +++|          LMD    T9
Line S08190 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
12902  M02S08190.252l678 ---|          ZJN    DSM17       IF END OF DISPLAY
Line S08191 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
12903  M02S08191.252l678 ---|          LJM    DSM9        LOOP TO NEXT GROUP
12904  M01S00163.252l678 +++|          ZJN    DSM22       IF END OF DISPLAY
12905  M01S00164.252l678 +++|          LJM    DSM15       LOOP TO NEXT GROUP
12906  M01S08192.dsd     +++|
Line S08193 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
12907  M02S08193.252l678 ---| DSM17    LJM    DSMX        EXIT
12908  M01S00165.252l678 +++| DSM22    LJM    DSMX        EXIT
12909  M01S08194.dsd     +++|
12910  M01S08195.dsd     +++|
12911  M01S08196.dsd     +++| DSMC     CON    0
12912  M01S08197.dsd     +++| DSMD     BSS    4           ERROR INDICATION TEMPORARIES
Line S08198 Modification History
M01 (Added by) dsd
M02 (Updated by) dsd103
Seq #  *Modification Id* Act 
----------------------------+
12913  M02S08198.dsd103  ---| DSME     DATA   C$  **********  SECURED AREA  **********$
12914  M01S00122.dsd103  +++| DSME     DATA   H$  SECURED AREA$
12915  M01S00123.dsd103  +++| DSMJ     DATA   H$  **********$
12916  M01S00124.dsd103  +++| DSMJL    EQU    *-DSMJ
12917  M01S08199.dsd     +++| DSMEL    EQU    *-DSME
12918  M01S00166.252l678 +++|
12919  M01S00167.252l678 +++|*         DEFINE SYMBOLS FOR USE BY *EEC*.
12920  M01S00168.252l678 +++|
12921  M01S00169.252l678 +++|          QUAL
12922  M01S00170.252l678 +++| EMRA     EQU    /DSD"M."/EMRA
12923  M01S00171.252l678 +++| EMFL     EQU    /DSD"M."/EMFL
12924  M01S00172.252l678 +++|          QUAL   *
12925  M01S00601.274l797 +++|          SPACE  4,10
12926  M01S00602.274l797 +++|          DSPEND
12927  M01S08200.dsd     +++|          DISPLAY  (DISPLAY O - TRANSACTION STATUS TABLE.),POD
12928  M01S08201.dsd     +++|          ENTRY  DSO,D
12929  M01S08202.dsd     +++| DSO      SPACE  4,10
12930  M01S08203.dsd     +++|***       *O,TST* DISPLAY.
12931  M01S08204.dsd     +++|*
12932  M01S08205.dsd     +++|*         EXAMPLE.
12933  M01S08206.dsd     +++|*
12934  M01S08207.dsd     +++|*             1         2         3         4         5         6
12935  M01S08208.dsd     +++|*    1234567890123456789012345678901234567890123456789012345678901234
12936  M01S08209.dsd     +++|*    TERMINALS =  313.
12937  M01S08210.dsd     +++|*
12938  M01S08211.dsd     +++|*    NUMBER   NAME     DB     STATUS      USER AREA   ACN   COUNT
12939  M01S08212.dsd     +++|*     120    AAAAAAA   SS   -L--R--I---   12345670   1234   1234
12940  M01S08213.dsd     +++|
12941  M01S08214.dsd     +++|
12942  M01S08215.dsd     +++| VTST     EQU    12          ADDRESS OF TERMINAL TABLE POINTER
12943  M01S08216.dsd     +++|
12944  M01S08217.dsd     +++| DSO      SUBR               ENTRY/EXIT
12945  M01S08218.dsd     +++|          DISPHD (O,TST.  TAF TERMINALS.)
12946  M01S08219.dsd     +++|          LDM.   CMEI
12947  M01S08220.dsd     +++|          ZJN    DSO1        IF CME NOT PRESENT
12948  M01S08221.dsd     +++|          STM    DSOA        FORCE READ OF *FLSW*+1
12949  M01S08222.dsd     +++| DSO1     LDC    TRSI        FIND *TAF*
12950  M01S08223.dsd     +++|          RJM    FSS
12951  M01S08224.dsd     +++|          NJN    DSO3        IF *TAF* ACTIVE
12952  M01S08225.dsd     +++| DSO2     DISPLA CH01,LN08,(NOT ACTIVE)
12953  M01S08226.dsd     +++|          UJN    DSOX        RETURN
12954  M01S08227.dsd     +++|
12955  M01S08228.dsd     +++| DSO3     SHN    7
12956  M01S08229.dsd     +++| DSOA     ADN    FLSW
12957  M01S08230.dsd     +++|*         ADN    FLSW+1      (CME PRESENT)
12958  M01S08231.dsd     +++|          CRD    AB
12959  M01S08232.dsd     +++|          LRD    AB+1
12960  M01S08233.dsd     +++|          LDD    AB+3        READ TABLE POINTER
12961  M01S08234.dsd     +++|          SHN    6
12962  M01S08235.dsd     +++|          ADN    VTST
12963  M01S08236.dsd     +++|          CRD    T3
12964  M01S08237.dsd     +++|          LDD    T4
12965  M01S08238.dsd     +++|          ADD    T5
12966  M01S08239.dsd     +++|          ZJN    DSO2        IF *TAF* IDLE
12967  M01S08240.dsd     +++|          LDM    CTOS        INITIALIZE LINE NUMBER
12968  M01S08241.dsd     +++|          OAN    CH+40
12969  M01S08242.dsd     +++|          SBN    2*YINC
12970  M01S08243.dsd     +++|          STM    DSOC+2
12971  M01S08244.dsd     +++|          STD    YC
12972  M01S08245.dsd     +++|          DISPLA CH01,,(TERMINALS = )
12973  M01S08246.dsd     +++|          LDD    T6          FIND NUMBER OF TERMINALS
12974  M01S08247.dsd     +++|          SBD    T4
12975  M01S08248.dsd     +++|          SHN    14
12976  M01S08249.dsd     +++|          ADD    T7
12977  M01S08250.dsd     +++|          SBD    T5
12978  M01S08251.dsd     +++|          ADN    2
12979  M01S08252.dsd     +++|          SHN    -1
12980  M01S08253.dsd     +++|          SBN    1
12981  M01S08254.dsd     +++|          STD    T7          TERMINAL COUNT
12982  M01S08255.dsd     +++|          RJM    D4S         DISPLAY NUMBER OF TERMINALS
12983  M01S08256.dsd     +++|          LDN    DSOCL
12984  M01S08257.dsd     +++|          OAM    DSOC,CH
12985  M01S08258.dsd     +++|          LDD    AB+3        SAVE RA
12986  M01S08259.dsd     +++|          STD    T6
12987  M01S08260.dsd     +++|          LDM    TDSO        SET FIRST TERMINAL
12988  M01S08261.dsd     +++|          STD    T3
12989  M01S08262.dsd     +++|          SHN    1
12990  M01S08263.dsd     +++|          RAD    T5
12991  M01S08264.dsd     +++|          SHN    -14
12992  M01S08265.dsd     +++|          RAD    T4
12993  M01S08266.dsd     +++|          LCN    2*YINC      SET Y-COORDINATE
12994  M01S08267.dsd     +++|          RAD    YC
12995  M01S08268.dsd     +++|          OAN    CH+40
12996  M01S08269.dsd     +++|
12997  M01S08270.dsd     +++|*         DISPLAY TERMINAL STATUS.
12998  M01S08271.dsd     +++|
12999  M01S08272.dsd     +++| DSO4     LDD    XC          OUTPUT X-COORDINATE
13000  M01S08273.dsd     +++|          OAN    CH+40
13001  M01S08274.dsd     +++|          LDD    T4          READ TERMINAL ENTRY
13002  M01S08275.dsd     +++|          SHN    6
13003  M01S08276.dsd     +++|          ADD    T6
13004  M01S08277.dsd     +++|          SHN    6
13005  M01S08278.dsd     +++|          ADD    T5
13006  M01S08279.dsd     +++|          CRD    AB
13007  M01S08280.dsd     +++|          ADN    1
13008  M01S08281.dsd     +++|          CRD    CM
13009  M01S08282.dsd     +++|          CRD    SR
13010  M01S08283.dsd     +++|          LDD    T3          DISPLAY TERMINAL NUMBER
13011  M01S08284.dsd     +++|          RJM    D4S
13012  M01S08285.dsd     +++|          LDN    0           DISPLAY TERMINAL NAME
13013  M01S08286.dsd     +++|          STD    CM+4
13014  M01S08287.dsd     +++|          LDD    CM+3
13015  M01S08288.dsd     +++|          SCN    77
13016  M01S08289.dsd     +++|          STD    CM+3
13017  M01S08290.dsd     +++|          LDC    CH09
13018  M01S08291.dsd     +++|          OAN    CH+40
13019  M01S08292.dsd     +++|          LDN    5
13020  M01S08293.dsd     +++|          OAM    CM,CH
13021  M01S08294.dsd     +++|          LDD    AB+2        DISPLAY DATA BASE NAME
13022  M01S08295.dsd     +++|          OAN    CH+40
13023  M01S08296.dsd     +++|          LDC    CH24
13024  M01S08297.dsd     +++|          OAN    CH+40
13025  M01S08298.dsd     +++|          LDD    SR+3        FORM LOWER 5 BITS FROM WORD 2
13026  M01S08299.dsd     +++|          LPN    76
13027  M01S08300.dsd     +++|          LMN    1           SET UNUSED BIT
13028  M01S08301.dsd     +++|          STD    CN
13029  M01S08302.dsd     +++|          LDD    AB          FORM UPPER 6 BITS FROM WORD 1
13030  M01S08303.dsd     +++|          LPC    7700
13031  M01S08304.dsd     +++|          RAD    CN
13032  M01S08305.dsd     +++|          LDC.   DSOB        DISPLAY BIT STATUS
13033  M01S08306.dsd     +++|          RJM    DBS
13034  M01S08307.dsd     +++|          LDC    CH38
13035  M01S08308.dsd     +++|          OAN    CH+40
13036  M01S08309.dsd     +++|          LDD    AB+3        DISPLAY USER AREA
13037  M01S08310.dsd     +++|          RJM    D4D
13038  M01S08311.dsd     +++|          LDD    AB+4
13039  M01S08312.dsd     +++|          RJM    D4D
13040  M01S08313.dsd     +++|          LDC    CH49
13041  M01S08314.dsd     +++|          OAN    CH+40
13042  M01S08315.dsd     +++|          LDD    AB+1        DISPLAY APPLICATION CONNECTION NUMBER
13043  M01S08316.dsd     +++|          SHN    -6
13044  M01S08317.dsd     +++|          SHN    14
13045  M01S08318.dsd     +++|          ADD    AB
13046  M01S08319.dsd     +++|          SHN    6
13047  M01S08320.dsd     +++|          LPC    7777
13048  M01S08321.dsd     +++|          RJM    D4S
13049  M01S08322.dsd     +++|          LDD    SR+4        DISPLAY NUMBER OF TRANSACTIONS
13050  M01S08323.dsd     +++|          RJM    D4S
13051  M01S08324.dsd     +++|          AOD    T3          ADVANCE TERMINAL NUMBER
13052  M01S08325.dsd     +++|          SBD    T7
13053  M01S08326.dsd     +++|          ZJN    DSO4.1      IF ONE MORE TERMINAL
13054  M01S08327.dsd     +++|          PJN    DSO6        IF END OF TERMINALS
13055  M01S08328.dsd     +++| DSO4.1   LDN    2           ADVANCE ENTRY ADDRESS
13056  M01S08329.dsd     +++|          RAD    T5
13057  M01S08330.dsd     +++|          SHN    -14
13058  M01S08331.dsd     +++|          RAD    T4
13059  M01S08332.dsd     +++|          LCN    YINC
13060  M01S08333.dsd     +++|          RAD    YC          DECREMENT Y-COORDINATE
13061  M01S08334.dsd     +++|          OAN    CH+40
13062  M01S08335.dsd     +++|          SBM    CBOS
13063  M01S08336.dsd     +++|          MJN    DSO5        IF SCREEN FULL
13064  M01S08337.dsd     +++|          LJM    DSO4        LOOP FOR ANOTHER TERMINAL
13065  M01S08338.dsd     +++|
13066  M01S08339.dsd     +++| DSO5     LDN    MOREL       OUTPUT *MORE* MESSAGE
13067  M01S08340.dsd     +++|          OAM    MORE,CH
13068  M01S08341.dsd     +++|          LDD    T3          SET STARTING TERMINAL FOR NEXT PAGE
13069  M01S08342.dsd     +++| DSO6     STM    TDSO+1
13070  M01S08343.dsd     +++|          LJM    DSOX        RETURN
13071  M01S08344.dsd     +++|
13072  M01S08345.dsd     +++|
13073  M01S08346.dsd     +++| DSOB     CON    2RAL&2R--
13074  M01S08347.dsd     +++|          CON    2R-C&2R--
13075  M01S08348.dsd     +++|          CON    2RRT&2R--
13076  M01S08349.dsd     +++|          CON    2RMI&2R--
13077  M01S08350.dsd     +++|          CON    2RFP&2R--
13078  M01S08351.dsd     +++|          CON    2RD &2R--
13079  M01S08352.dsd     +++|          CON    0
13080  M01S08353.dsd     +++|
13081  M01S08354.dsd     +++| DSOC     CON    CH17,2H.
13082  M01S08355.dsd     +++|          CON    T545-2*YINC,CH01
13083  M01S08356.dsd     +++|*         CON    T721-2*YINC,CH01
13084  M01S08357.dsd     +++|          DATA   H*NUMBER*
13085  M01S08358.dsd     +++|          CON    CH10
13086  M01S08359.dsd     +++|          DATA   H*NAME*
13087  M01S08360.dsd     +++|          CON    CH19
13088  M01S08361.dsd     +++|          DATA   H*DB*
13089  M01S08362.dsd     +++|          CON    CH26
13090  M01S08363.dsd     +++|          DATA   H*STATUS*
13091  M01S08364.dsd     +++|          CON    CH38
13092  M01S08365.dsd     +++|          DATA   H*USER AREA*
13093  M01S08366.dsd     +++|          CON    CH50
13094  M01S08367.dsd     +++|          DATA   H*ACN   COUNT*
13095  M01S08368.dsd     +++| DSOCL    EQU    *-DSOC      LENGTH OF HEADING
13096  M01S08369.dsd     +++|          SPACE  4
13097  M01S08370.dsd     +++|**        COMMON DECKS.
13098  M01S08371.dsd     +++|
13099  M01S08372.dsd     +++|
13100  M01S08373.dsd     +++|*CALL     COMDDBS
13101  M01S08374.dsd     +++| POD      SPACE  4,10
13102  M01S08375.dsd     +++|**        POD - PAGE *O* DISPLAY.
13103  M01S08376.dsd     +++|*
13104  M01S08377.dsd     +++|*         ENTRY  (T2) = 0, IF PAGE FORWARD.
13105  M01S08378.dsd     +++|*                     = 1, IF PAGE BACKWARD.
13106  M01S08379.dsd     +++|
13107  M01S08380.dsd     +++|
13108  M01S08381.dsd     +++| POD      BSS    0           ENTRY
13109  M01S08382.dsd     +++|          LDD    T2
13110  M01S08383.dsd     +++|          NJN    POD1        IF *-*
13111  M01S08384.dsd     +++|          LDM    TDSO+1
13112  M01S08385.dsd     +++| POD1     STM    TDSO
13113  M01S08386.dsd     +++|          LJM.   /KEYBOARD/KBIX  RETURN
13114  M01S00603.274l797 +++|          SPACE  4,10
13115  M01S00604.274l797 +++|          DSPEND
13116  M01S08387.dsd     +++|          DISPLAY  (DISPLAY O - SUBCONTROL POINT STATUS.),POD
13117  M01S08388.dsd     +++|          ENTRY  DTS,D
13118  M01S08389.dsd     +++| DTS      SPACE  4,10
13119  M01S08390.dsd     +++|***       *O,SCP* DISPLAY.
13120  M01S08391.dsd     +++|*
13121  M01S08392.dsd     +++|*         EXAMPLE.
13122  M01S08393.dsd     +++|*
13123  M01S08394.dsd     +++|*             1         2         3         4         5         6
13124  M01S08395.dsd     +++|*    1234567890123456789012345678901234567890123456789012345678901234
13125  M01S08396.dsd     +++|*    SCP   NAME        RA      FL   NT    USER     RA+1     STATUS
13126  M01S08397.dsd     +++|*
13127  M01S08398.dsd     +++|*     1   ABCDEFG   111100  110000   0   ABCDEFG   CIOP  ------------
13128  M01S08399.dsd     +++|*     2
13129  M01S08400.dsd     +++|
13130  M01S08401.dsd     +++|
13131  M01S08402.dsd     +++| DTS      SUBR               ENTRY/EXIT
13132  M01S08403.dsd     +++|          DISPHD (O,SCP.  TAF SUBCONTROL PT.)
13133  M01S08404.dsd     +++|          LDM.   CMEI
13134  M01S08405.dsd     +++|          ZJN    DTS1        IF CME NOT PRESENT
13135  M01S08406.dsd     +++|          STM    DTSA        FORCE READ OF FLSW+1
13136  M01S08407.dsd     +++| DTS1     LDC    TRSI        FIND *TAF*
13137  M01S08408.dsd     +++|          RJM    FSS
13138  M01S08409.dsd     +++|          NJN    DTS3        IF *TAF* IS ACTIVE
13139  M01S08410.dsd     +++| DTS2     DISPLA CH01,LN08,(NOT ACTIVE)
13140  M01S08411.dsd     +++|          UJN    DTSX        RETURN
13141  M01S08412.dsd     +++|
13142  M01S08413.dsd     +++| DTS3     SHN    7
13143  M01S08414.dsd     +++| DTSA     ADN    FLSW
13144  M01S08415.dsd     +++|*         ADN    FLSW+1      (CME PRESENT)
13145  M01S08416.dsd     +++|          CRD    AB
13146  M01S08417.dsd     +++|          LRD    AB+1
13147  M01S08418.dsd     +++|          LDD    AB+3        SET RA
13148  M01S08419.dsd     +++|          STD    T7
13149  M01S08420.dsd     +++|          SHN    6
13150  M01S08421.dsd     +++|          ADN    VNSCP       NUMBER OF SUB CONTROL POINTS
13151  M01S08422.dsd     +++|          CRD    CM
13152  M01S08423.dsd     +++|          ADN    VTST-VNSCP  *TAF* IDLE FLAG
13153  M01S08424.dsd     +++|          CRD    AB
13154  M01S08425.dsd     +++|          ADN    VLSP-VTST   LAST SUB CONTROL POINT
13155  M01S08426.dsd     +++|          CRD    T2
13156  M01S08427.dsd     +++|          LDD    AB+3
13157  M01S08428.dsd     +++|          ADD    AB+4
13158  M01S08429.dsd     +++|          ZJN    DTS2        IF *TAF* IS IDLE
13159  M01S08430.dsd     +++|          LDD    CM+2
13160  M01S08431.dsd     +++|          STD    T6
13161  M01S08432.dsd     +++|          SHN    3
13162  M01S08433.dsd     +++|          STD    CM+2
13163  M01S08434.dsd     +++|          LDD    T3          COMPUTE ADDRESS OF FIRST SUBCONTROL POINT
13164  M01S08435.dsd     +++|          SHN    6
13165  M01S08436.dsd     +++|          ADD    T7
13166  M01S08437.dsd     +++|          SHN    6
13167  M01S08438.dsd     +++|          ADD    T4
13168  M01S08439.dsd     +++|          SBD    CM+2        ADDRESS OF FIRST SUBCONTROL POINT
13169  M01S08440.dsd     +++|          STM    DTSB+1
13170  M01S08441.dsd     +++|          STM    DTSC+1
13171  M01S08442.dsd     +++|          SHN    -14
13172  M01S08443.dsd     +++|          ADC    ADCI
13173  M01S08444.dsd     +++|          STM    DTSB
13174  M01S08445.dsd     +++|          STM    DTSC
13175  M01S08446.dsd     +++|          LDD    T7
13176  M01S08447.dsd     +++|          SHN    6
13177  M01S08448.dsd     +++|          ADN    VTLD        TASK LIBRARY DIRECTORY POINTER
13178  M01S08449.dsd     +++|          CRD    AB
13179  M01S08450.dsd     +++|          LDD    AB+1
13180  M01S08451.dsd     +++|          STD    T3
13181  M01S08452.dsd     +++|          LDD    AB+2
13182  M01S08453.dsd     +++|          STD    T4
13183  M01S08454.dsd     +++|          LDM    CTOS        INITIALIZE LINE NUMBER
13184  M01S08455.dsd     +++|          OAN    CH+40
13185  M01S08456.dsd     +++|          SBN    2*YINC
13186  M01S08457.dsd     +++|          STD    YC
13187  M01S08458.dsd     +++|          LDN    DTSEL       DISPLAY HEADER
13188  M01S08459.dsd     +++|          OAM    DTSE,CH
13189  M01S08460.dsd     +++|          LDM    TDTS        CURRENT INDEX
13190  M01S08461.dsd     +++|          STD    T5
13191  M01S08462.dsd     +++| DTS4     LDN    2           OUTPUT COORDINATES
13192  M01S08463.dsd     +++|          OAM    XC,CH
13193  M01S08464.dsd     +++|          LDD    T5
13194  M01S08465.dsd     +++|          SHN    3           READ FIRST WORD OF SUBCONTROL POINT TABLE
13195  M01S08466.dsd     +++| DTSB     ADC    *
13196  M01S08467.dsd     +++|          CRD    AB
13197  M01S08468.dsd     +++|          ADN    2           READ THIRD WORD OF SUBCONTROL POINT TABLE
13198  M01S08469.dsd     +++|          CRD    CM
13199  M01S08470.dsd     +++|          LDD    AB
13200  M01S08471.dsd     +++|          SHN    21-6
13201  M01S08472.dsd     +++|          PJN    DTS5        IF NOT BATCH CONCURRENT JOB
13202  M01S08473.dsd     +++|          LDD    AB+3
13203  M01S08474.dsd     +++|          LPN    77
13204  M01S08475.dsd     +++|          SHN    6
13205  M01S08476.dsd     +++|          ADD    T7
13206  M01S08477.dsd     +++|          SHN    6
13207  M01S08478.dsd     +++|          ADD    AB+4
13208  M01S08479.dsd     +++|          ADC    -NUAPL+BCTN GET BATCH CONCURRENT JOB NAME
13209  M01S08480.dsd     +++|          CRD    CM
13210  M01S08481.dsd     +++|          UJN    DTS6        DO NOT GET NAME FROM *TASKLIB* DIRECTORY
13211  M01S08482.dsd     +++|
13212  M01S08483.dsd     +++| DTS5     BSS    0
13213  M01S08484.dsd     +++|          LDD    T3
13214  M01S08485.dsd     +++|          SHN    6
13215  M01S08486.dsd     +++|          ADD    T7
13216  M01S08487.dsd     +++|          SHN    6
13217  M01S08488.dsd     +++|          ADD    T4
13218  M01S08489.dsd     +++|          ADD    CM          GET TASK NAME
13219  M01S08490.dsd     +++|          SBN    1
13220  M01S08491.dsd     +++|          CRD    CM
13221  M01S08492.dsd     +++|          LDD    CM+3
13222  M01S08493.dsd     +++|          SCN    77
13223  M01S08494.dsd     +++|          STD    CM+3
13224  M01S08495.dsd     +++| DTS6     BSS    0
13225  M01S08496.dsd     +++|          LDD    T5          DISPLAY SUBCONTROL POINT NUMBER
13226  M01S08497.dsd     +++|          RJM    D2S
13227  M01S08498.dsd     +++|          LDD    AB+3
13228  M01S08499.dsd     +++|          SCN    77
13229  M01S08500.dsd     +++|          ADD    AB+2
13230  M01S08501.dsd     +++|          NJN    DTS7        IF SUBCONTROL POINT ACTIVE
13231  M01S08502.dsd     +++|          LJM    DTS9        ADVANCE SUBCONTROL POINT
13232  M01S08503.dsd     +++|
13233  M01S08504.dsd     +++| DTS7     LDC    CH06
13234  M01S08505.dsd     +++|          OAN    CH+40
13235  M01S08506.dsd     +++|          LDN    4           DISPLAY TASK NAME
13236  M01S08507.dsd     +++|          OAM    CM,CH
13237  M01S08508.dsd     +++|*         LDN    0
13238  M01S08509.dsd     +++|          OAN    CH+40       SKIP TWO SPACES
13239  M01S08510.dsd     +++|          LDD    T5
13240  M01S08511.dsd     +++|          SHN    3
13241  M01S08512.dsd     +++|          ADN    1           READ SECOND WORD OF SUBCONTROL POINT TABLE
13242  M01S08513.dsd     +++| DTSC     ADC    *
13243  M01S08514.dsd     +++|          CRD    CM
13244  M01S08515.dsd     +++|          LDD    AB+3
13245  M01S08516.dsd     +++|          LPN    77
13246  M01S08517.dsd     +++|          SHN    14
13247  M01S08518.dsd     +++|          ADD    AB+4        DISPLAY TASK RA
13248  M01S08519.dsd     +++|          RJM    D6S
13249  M01S08520.dsd     +++|          LDD    AB+3        DISPLAY TASK FL
13250  M01S08521.dsd     +++|          SHN    -6
13251  M01S08522.dsd     +++|          STD    T0
13252  M01S08523.dsd     +++|          LDD    AB+2
13253  M01S08524.dsd     +++|          SHN    6
13254  M01S08525.dsd     +++|          ADD    T0
13255  M01S08526.dsd     +++|          RJM    D6S
13256  M01S08527.dsd     +++|          LDD    CM+1        DISPLAY NUMBER OF TASKS ACTIVE AT SUB CP
13257  M01S08528.dsd     +++|          LPN    7
13258  M01S08529.dsd     +++|          RJM    D2S
13259  M01S08530.dsd     +++|          LDC    CH37
13260  M01S08531.dsd     +++|          OAN    CH+40
13261  M01S08532.dsd     +++|          LDD    AB          SAVE STATUS BITS
13262  M01S08533.dsd     +++|          SCN    77
13263  M01S08534.dsd     +++|          STD    CN
13264  M01S08535.dsd     +++|          LDD    CM
13265  M01S08536.dsd     +++|          SHN    -5
13266  M01S08537.dsd     +++|          LPN    77
13267  M01S08538.dsd     +++|          RAD    CN
13268  M01S08539.dsd     +++|          LDN    ZERL        BLANK TERMINAL NAME
13269  M01S08540.dsd     +++|          CRD    SR
13270  M01S08541.dsd     +++|          LDD    CM+3
13271  M01S08542.dsd     +++|          LPN    77
13272  M01S08543.dsd     +++|          ADD    CM+4
13273  M01S08544.dsd     +++|          ZJN    DTS8        IF NO STATUS WORDS PRESENT
13274  M01S08545.dsd     +++|          SBD    CM+4
13275  M01S08546.dsd     +++|          SHN    6
13276  M01S08547.dsd     +++|          ADD    T7
13277  M01S08548.dsd     +++|          SHN    6
13278  M01S08549.dsd     +++|          ADD    CM+4
13279  M01S08550.dsd     +++|          CRD    CM          READ STATUS WORD
13280  M01S08551.dsd     +++|          LDD    CM+3        GET ADDRESS OF USER NAME WORD
13281  M01S08552.dsd     +++|          LPN    77
13282  M01S08553.dsd     +++|          SHN    6
13283  M01S08554.dsd     +++|          ADD    T7
13284  M01S08555.dsd     +++|          SHN    6
13285  M01S08556.dsd     +++|          ADD    CM+4
13286  M01S08557.dsd     +++|          ADN    CBWCW
13287  M01S08558.dsd     +++|          CRD    SR
13288  M01S08559.dsd     +++|          LDD    SR+3
13289  M01S08560.dsd     +++|          SCN    77
13290  M01S08561.dsd     +++|          STD    SR+3
13291  M01S08562.dsd     +++| DTS8     LDN    4           DISPLAY USER NAME
13292  M01S08563.dsd     +++|          OAM    SR,CH
13293  M01S08564.dsd     +++|*         LDN    0           SKIP TWO SPACES
13294  M01S08565.dsd     +++|          OAN    CH+40
13295  M01S08566.dsd     +++|          LDD    AB+3        GET ADDRESS OF LAST SYSTEM REQUEST CALL
13296  M01S08567.dsd     +++|          LPN    77
13297  M01S08568.dsd     +++|          SHN    6
13298  M01S08569.dsd     +++|          ADD    T7
13299  M01S08570.dsd     +++|          SHN    6
13300  M01S08571.dsd     +++|          ADD    AB+4
13301  M01S08572.dsd     +++|          ADC    LRA1-NUAPL
13302  M01S08573.dsd     +++|          CRD    CM
13303  M01S08574.dsd     +++|          LDN    2           DISPLAY LAST RA+1 CALL
13304  M01S08575.dsd     +++|          OAM    CM,CH
13305  M01S08576.dsd     +++|*         LDN    0           SKIP TWO SPACES
13306  M01S08577.dsd     +++|          OAN    CH+40
13307  M01S08578.dsd     +++|          LDC.   DTSD        DISPLAY BIT STATUS
13308  M01S08579.dsd     +++|          RJM    DBS
13309  M01S08580.dsd     +++| DTS9     AOD    T5
13310  M01S08581.dsd     +++|          SBD    T6
13311  M01S08582.dsd     +++|          ZJN    DTS9.1      IF ONE MORE SUBCONTROL POINT
13312  M01S08583.dsd     +++|          PJN    DTS11       IF AT END OF SUBCONTROL POINTS
13313  M01S08584.dsd     +++| DTS9.1   LCN    YINC
13314  M01S08585.dsd     +++|          RAD    YC          DECREMENT Y-COORDINATE
13315  M01S08586.dsd     +++|          SBM    CBOS
13316  M01S08587.dsd     +++|          MJN    DTS10       IF SCREEN FULL
13317  M01S08588.dsd     +++|          LJM    DTS4        LOOP
13318  M01S08589.dsd     +++|
13319  M01S08590.dsd     +++| DTS10    LDD    YC          DISPLAY MORE MESSAGE
13320  M01S08591.dsd     +++|          OAN    CH+40
13321  M01S08592.dsd     +++|          LDN    MOREL
13322  M01S08593.dsd     +++|          OAM    MORE,CH
13323  M01S08594.dsd     +++|          LDD    T5          SET FIRST SUBCONTROL POINT FOR NEXT PAGE
13324  M01S08595.dsd     +++| DTS11    STM    TDTS+1
13325  M01S08596.dsd     +++|          LJM    DTSX        RETURN
13326  M01S08597.dsd     +++|
13327  M01S08598.dsd     +++|
13328  M01S08599.dsd     +++|
13329  M01S08600.dsd     +++| DTSD     CON    2RSF&2R--
13330  M01S08601.dsd     +++|          CON    2RLM&2R--
13331  M01S08602.dsd     +++|          CON    2R-B&2R--
13332  M01S08603.dsd     +++|          CON    2RUC&2R--
13333  M01S08604.dsd     +++|          CON    2REA&2R--
13334  M01S08605.dsd     +++|          CON    2RTD&2R--
13335  M01S08606.dsd     +++|          CON    0
13336  M01S08607.dsd     +++|
13337  M01S08608.dsd     +++| DTSE     CON    CH01        HEADER LINE
13338  M01S08609.dsd     +++|          DATA   H*SCP   NAME*
13339  M01S08610.dsd     +++|          CON    CH19,2HRA
13340  M01S08611.dsd     +++|          CON    CH27,2HFL
13341  M01S08612.dsd     +++|          CON    CH32,2HNT
13342  M01S08613.dsd     +++|          CON    CH38
13343  M01S08614.dsd     +++|          DATA   H*USER*
13344  M01S08615.dsd     +++|          CON    CH47
13345  M01S08616.dsd     +++|          DATA   H*RA+1*
13346  M01S08617.dsd     +++|          CON    CH56
13347  M01S08618.dsd     +++|          DATA   H*STATUS*
13348  M01S08619.dsd     +++| DTSEL    EQU    *-DTSE      LENGTH OF HEADING
13349  M01S08620.dsd     +++|
13350  M01S08621.dsd     +++| BCTN     EQU    113         BATCH CONCURRENCY JOB NAME IN NEGATIVE FL
13351  M01S08622.dsd     +++| NUAPL    EQU    120         LENGTH OF NEGATIVE *FL*
13352  M01S08623.dsd     +++| VNSCP    EQU    10          NUMBER OF SUB CONTROL POINTS
13353  M01S08624.dsd     +++| VTST     EQU    12          TERMINAL STATUS TABLE
13354  M01S08625.dsd     +++| VLSP     EQU    15          LAST SUB CONTROL POINT
13355  M01S08626.dsd     +++| VTLD     EQU    22          TASK LIBRARY DIRECTORY
13356  M01S08627.dsd     +++| LRA1     EQU    32          LAST SYSTEM REQUEST CALL
13357  M01S08628.dsd     +++| CBWCW    EQU    11D         WORD COUNT OF INPUT DATA
13358  M01S08629.dsd     +++|          SPACE  4
13359  M01S08630.dsd     +++|**        COMMON DECKS.
13360  M01S08631.dsd     +++|
13361  M01S08632.dsd     +++|
13362  M01S08633.dsd     +++|*CALL     COMDDBS
13363  M01S08634.dsd     +++| POD      SPACE  4,10
13364  M01S08635.dsd     +++|**        POD - PAGE *O* DISPLAY.
13365  M01S08636.dsd     +++|*
13366  M01S08637.dsd     +++|*         ENTRY  (T2) = 0, IF PAGE FORWARD.
13367  M01S08638.dsd     +++|*                     = 1, IF PAGE BACKWARD.
13368  M01S08639.dsd     +++|
13369  M01S08640.dsd     +++|
13370  M01S08641.dsd     +++| POD      BSS    0           ENTRY
13371  M01S08642.dsd     +++|          LDD    T2
13372  M01S08643.dsd     +++|          NJN    POD1        IF *-*
13373  M01S08644.dsd     +++|          LDM    TDTS+1
13374  M01S08645.dsd     +++| POD1     STM    TDTS
13375  M01S08646.dsd     +++|          LJM.   /KEYBOARD/KBIX  RETURN
13376  M01S00605.274l797 +++|          SPACE  4,10
13377  M01S00606.274l797 +++|          DSPEND
13378  M01S08647.dsd     +++|          DISPLAY  (DISPLAY O - TASK LIBRARY DIRECTORY.),POD
13379  M01S08648.dsd     +++|          ENTRY  DTL,D
13380  M01S08649.dsd     +++| DTL      SPACE  4,10
13381  M01S08650.dsd     +++|***       *O,TLD* DISPLAY.
13382  M01S08651.dsd     +++|*
13383  M01S08652.dsd     +++|*         EXAMPLE.
13384  M01S08653.dsd     +++|*
13385  M01S08654.dsd     +++|*             1         2         3         4         5         6
13386  M01S08655.dsd     +++|*    1234567890123456789012345678901234567890123456789012345678901234
13387  M01S08656.dsd     +++|*    LIBRARY = TAFLIB
13388  M01S08657.dsd     +++|*
13389  M01S08658.dsd     +++|*    NUMBER   NAME     CALLED    LOADED     FL      EFL     STATUS
13390  M01S08659.dsd     +++|*    1234    ABCDEFG   123456    123456    2000    4000    --------
13391  M01S08660.dsd     +++|          SPACE  4,10
13392  M01S08661.dsd     +++|***       ABBREVIATIONS.
13393  M01S08662.dsd     +++|*
13394  M01S08663.dsd     +++|*         *TLD* = TASK LIBRARY DIRECTORY.
13395  M01S08664.dsd     +++|
13396  M01S08665.dsd     +++|
13397  M01S08666.dsd     +++| DTL      SUBR               ENTRY/EXIT
13398  M01S08667.dsd     +++|          DISPHD (O,TLD.  TAF TASK LIBRARY.)
13399  M01S08668.dsd     +++|          LDM.   CMEI
13400  M01S08669.dsd     +++|          ZJN    DTL1        IF CME NOT PRESENT
13401  M01S08670.dsd     +++|          STM    DTLA        FORCE READ OF *FLSW*+1
13402  M01S08671.dsd     +++| DTL1     LDC    TRSI        FIND *TAF*
13403  M01S08672.dsd     +++|          RJM    FSS
13404  M01S08673.dsd     +++|          NJN    DTL3        IF *TAF* IS ACTIVE
13405  M01S08674.dsd     +++| DTL2     DISPLA CH01,LN08,(NOT ACTIVE)
13406  M01S08675.dsd     +++|          UJN    DTLX        RETURN
13407  M01S08676.dsd     +++|
13408  M01S08677.dsd     +++| DTL3     SHN    7
13409  M01S08678.dsd     +++| DTLA     ADN    FLSW
13410  M01S08679.dsd     +++|*         ADN    FLSW+1      (CME PRESENT)
13411  M01S08680.dsd     +++|          CRD    T4          (T7) = RA
13412  M01S08681.dsd     +++|          LRD    T4+1
13413  M01S08682.dsd     +++|          LDD    T7
13414  M01S08683.dsd     +++|          SHN    6
13415  M01S08684.dsd     +++|          ADN    VTST        *TAF* IDLE FLAG
13416  M01S08685.dsd     +++|          CRD    AB
13417  M01S08686.dsd     +++|          ADN    VTLD-VTST   READ *TLD* ADDRESS
13418  M01S08687.dsd     +++|          CRD    T2
13419  M01S08688.dsd     +++|          LDD    AB+3
13420  M01S08689.dsd     +++|          SHN    6
13421  M01S08690.dsd     +++|          ADD    AB+4
13422  M01S08691.dsd     +++|          ZJN    DTL2        IF *TAF* IS IDLE
13423  M01S08692.dsd     +++|          LDD    T3          READ FIRST *TLD* HEADER
13424  M01S08693.dsd     +++|          SHN    6
13425  M01S08694.dsd     +++|          ADD    T7
13426  M01S08695.dsd     +++|          SHN    6
13427  M01S08696.dsd     +++|          ADD    T4
13428  M01S08697.dsd     +++|          SBN    TLDLH
13429  M01S08698.dsd     +++|          CRD    CM
13430  M01S08699.dsd     +++|          ADM    TDTL+2      READ CURRENT *TLD* HEADER
13431  M01S08700.dsd     +++|          CRD    SR
13432  M01S08701.dsd     +++|          ADN    TLDLH-1     READ CURRENT LIBRARY NAME
13433  M01S08702.dsd     +++|          CRD    SH
Line S08703 Modification History
M01 (Added by) dsd
M02 (Updated by) ns2437
Seq #  *Modification Id* Act 
----------------------------+
13434  M02S08703.ns2437  ---|          LDM    SH+3
13435  M01S00019.ns2437  +++|          LDD    SH+3
13436  M01S08704.dsd     +++|          SCN    77
Line S08705 Modification History
M01 (Added by) dsd
M02 (Updated by) ns2437
Seq #  *Modification Id* Act 
----------------------------+
13437  M02S08705.ns2437  ---|          STM    SH+3
13438  M01S00020.ns2437  +++|          STD    SH+3
13439  M01S08706.dsd     +++|          LDD    CM+1
13440  M01S08707.dsd     +++|          LPN    77B
13441  M01S08708.dsd     +++|          SHN    14
13442  M01S08709.dsd     +++|          LMD    CM+2        LWA OF ALL *TLD*-S
13443  M01S08710.dsd     +++|          SBD    T4
13444  M01S08711.dsd     +++|          STD    SR          TOTAL LENGTH OF ALL THE *TLD*-S
13445  M01S08712.dsd     +++|          LDM    CTOS        INITIALIZE LINE NUMBER
13446  M01S08713.dsd     +++|          OAN    CH+40
13447  M01S08714.dsd     +++|          SBN    2*YINC
13448  M01S08715.dsd     +++|          STM    DTLB
13449  M01S08716.dsd     +++|          SBN    YINC
13450  M01S08717.dsd     +++|          STD    YC
13451  M01S08718.dsd     +++|          DISPLA CH01,,(LIBRARY = )
13452  M01S08719.dsd     +++|          LDN    4
13453  M01S08720.dsd     +++|          OAM    SH,CH
13454  M01S08721.dsd     +++|          LDN    DTLBL       OUTPUT COLUMN HEADINGS
13455  M01S08722.dsd     +++|          OAM    DTLB,CH
13456  M01S08723.dsd     +++|          LDM    TDTL        CURRENT *TLD* ENTRY INDEX
13457  M01S08724.dsd     +++|          STM    TDTL+1      NEXT *TLD* ENTRY INDEX
13458  M01S08725.dsd     +++|          SHN    1
13459  M01S08726.dsd     +++|          ADM    TDTL
13460  M01S08727.dsd     +++|          ADM    TDTL+2      CURRENT *TLD* LIBRARY OFFSET
13461  M01S08728.dsd     +++|          STD    T6          CURRENT *TLD* ENTRY OFFSET
13462  M01S08729.dsd     +++| DTL5     LDD    T3          READ ENTRY
13463  M01S08730.dsd     +++|          SHN    6
13464  M01S08731.dsd     +++|          ADD    T7
13465  M01S08732.dsd     +++|          SHN    6
13466  M01S08733.dsd     +++|          ADD    T4
13467  M01S08734.dsd     +++|          ADD    T6          CURRENT OFFSET
13468  M01S08735.dsd     +++|          CRD    CM
13469  M01S08736.dsd     +++|          LDD    CM
13470  M01S08737.dsd     +++|          NJN    DTL9        IF NON-ZERO *TLD* ENTRY
13471  M01S08738.dsd     +++|          LDM    TDTL+2
13472  M01S08739.dsd     +++|          ADD    SR+4        LENGTH OF CURRENT LIBRARY DIRECTORY
13473  M01S08740.dsd     +++|          STM    TDTL+3      PAGE TO NEXT LIBRARY
13474  M01S08741.dsd     +++|          SBD    SR
13475  M01S08742.dsd     +++|          MJN    DTL7        IF NOT END OF *TLD*-S
13476  M01S08743.dsd     +++| DTL6     LDN    0
13477  M01S08744.dsd     +++|          STM    TDTL+3      RESET NEXT *TLD* LIBRARY OFFSET
13478  M01S08745.dsd     +++| DTL7     LDN    0
13479  M01S08746.dsd     +++|          STM    TDTL+1      RESET NEXT *TLD* ENTRY INDEX
13480  M01S08747.dsd     +++| DTL8     LJM    DTLX        RETURN
13481  M01S08748.dsd     +++|
13482  M01S08749.dsd     +++| DTL9     LCN    YINC        DECREMENT Y-COORDINATE
13483  M01S08750.dsd     +++|          RAD    YC
13484  M01S08751.dsd     +++|          OAN    CH+40
13485  M01S08752.dsd     +++|          SBM    CBOS
13486  M01S08753.dsd     +++|          PJN    DTL10       IF NOT THE BOTTOM OF THE SCREEN
13487  M01S08754.dsd     +++|          LDN    MOREL       OUTPUT *MORE*
13488  M01S08755.dsd     +++|          OAM    MORE,CH
13489  M01S08756.dsd     +++|          LDM    TDTL+2      PAGE TO SUBSEQUENT ENTRIES IN SAME LIBRARY
13490  M01S08757.dsd     +++|          STM    TDTL+3
13491  M01S08758.dsd     +++|          UJN    DTL8        RETURN
13492  M01S08759.dsd     +++|
13493  M01S08760.dsd     +++| DTL10    LDD    XC          OUTPUT X-COORDINATE
13494  M01S08761.dsd     +++|          OAN    CH+40
13495  M01S08762.dsd     +++|          AOM    TDTL+1      DISPLAY TASK NUMBER
13496  M01S08763.dsd     +++|          RJM    D4S
13497  M01S08764.dsd     +++|          LDN    0           SKIP TWO SPACES
13498  M01S08765.dsd     +++|          OAN    CH+40
13499  M01S08766.dsd     +++|          LDD    CM+3
13500  M01S08767.dsd     +++|          SCN    77          CLEAR LAST TASK CHARACTER
13501  M01S08768.dsd     +++|          STD    CM+3
13502  M01S08769.dsd     +++|          LDN    4           DISPLAY NAME
13503  M01S08770.dsd     +++|          OAM    CM,CH
13504  M01S08771.dsd     +++|*         LDN    0           SKIP TWO SPACES
13505  M01S08772.dsd     +++|          OAN    CH+40
13506  M01S08773.dsd     +++|          LDD    T3
13507  M01S08774.dsd     +++|          SHN    6
13508  M01S08775.dsd     +++|          ADD    T7          READ SECOND WORD OF *TLD* ENTRY
13509  M01S08776.dsd     +++|          SHN    6
13510  M01S08777.dsd     +++|          ADD    T4
13511  M01S08778.dsd     +++|          ADD    T6
13512  M01S08779.dsd     +++|          ADN    1
13513  M01S08780.dsd     +++|          CRD    CM
13514  M01S08781.dsd     +++|          ADN    1           READ THIRD WORD OF *TLD* ENTRY
13515  M01S08782.dsd     +++|          CRD    AB
13516  M01S08783.dsd     +++|          LDD    AB+3        DISPLAY TIMES TASK HAS BEEN CALLED
13517  M01S08784.dsd     +++|          SHN    -6
13518  M01S08785.dsd     +++|          STD    T0
13519  M01S08786.dsd     +++|          LDD    AB+2
13520  M01S08787.dsd     +++|          SHN    6
13521  M01S08788.dsd     +++|          ADD    T0
13522  M01S08789.dsd     +++|          RJM    D6S
13523  M01S08790.dsd     +++|          LDN    0           SKIP TWO SPACES
13524  M01S08791.dsd     +++|          OAN    CH+40
13525  M01S08792.dsd     +++|          LDD    AB          DISPLAY TIMES TASK HAS BEEN LOADED
13526  M01S08793.dsd     +++|          LPN    77
13527  M01S08794.dsd     +++|          SHN    14
13528  M01S08795.dsd     +++|          ADD    AB+1
13529  M01S08796.dsd     +++|          RJM    D6S
13530  M01S08797.dsd     +++|          LDD    CM+2        DISPLAY TASK FIELD LENGTH
13531  M01S08798.dsd     +++|          LPN    77
13532  M01S08799.dsd     +++|          SHN    14
13533  M01S08800.dsd     +++|          ADD    CM+3
13534  M01S08801.dsd     +++|          SCN    77
13535  M01S08802.dsd     +++|          RJM    D6S
13536  M01S08803.dsd     +++|          LDD    CM+3        DISPLAY EXPANDABLE FIELD LENGTH
13537  M01S08804.dsd     +++|          LPN    77
13538  M01S08805.dsd     +++|          SHN    14
13539  M01S08806.dsd     +++|          ADD    CM+4
13540  M01S08807.dsd     +++|          SCN    77
13541  M01S08808.dsd     +++|          RJM    D6S
13542  M01S08809.dsd     +++|          LDN    0           SKIP TWO SPACES
13543  M01S08810.dsd     +++|          OAN    CH+40
13544  M01S08811.dsd     +++|          LDD    AB          FORM STATUS BITS
13545  M01S08812.dsd     +++|          LPC    3700        FORM UPPER 5 BITS
13546  M01S08813.dsd     +++|          SHN    1
13547  M01S08814.dsd     +++|          STD    CN
13548  M01S08815.dsd     +++|          LDD    AB+3        FORM LOWER 3 BITS
13549  M01S08816.dsd     +++|          LPN    70
13550  M01S08817.dsd     +++|          SHN    6-5
13551  M01S08818.dsd     +++|          RAD    CN
13552  M01S08819.dsd     +++|          LDC.   DTLC        GET ADDRESS OF LETTER TABLE
13553  M01S08820.dsd     +++|          RJM    DBS         DISPLAY BIT STATUS
13554  M01S08821.dsd     +++|          LDN    TLDLE       ADVANCE OFFSET TO NEXT ENTRY
13555  M01S08822.dsd     +++|          RAD    T6
13556  M01S08823.dsd     +++|          SBD    SR
13557  M01S08824.dsd     +++|          MJP    DTL5        IF NOT END OF *TLD*-S
Proceed to Part 12
cdc/nos2.source/opl.opl871/deck/dsd.011.txt ยท Last modified: by 127.0.0.1