User Tools

Site Tools


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

Deck DSD Part 018

169 Modifications

Listing Sections

Source

Seq #  *Modification Id* Act 
----------------------------+
20118  M01S00817.253l688 +++|          ADK    SHNI+77-3-CM
20119  M01S00818.253l688 +++|          STM    ENMA
20120  M01S00819.253l688 +++|          ADK    SHNI+11-SHNI-77+3
20121  M01S00820.253l688 +++|          STM    ENMC
20122  M01S11911.dsd     +++|          AOD    CA          ASSEMBLE ENTRY
20123  M01S11912.dsd     +++|          RJM    ASD
Line S11913 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20124  M02S11913.253l688 ---|          LDD    AB+4        SAVE ENTRY
Line S11914 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20125  M02S11914.253l688 ---|          STD    T1
20126  M01S11915.dsd     +++|          LDD    T6          READ WORD
20127  M01S11916.dsd     +++|          SHN    14
20128  M01S11917.dsd     +++|          LMD    T7
Line S11918 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20129  M02S11918.253l688 ---|          CRD    AB
Line S11919 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20130  M02S11919.253l688 ---|          LDD    T1          STORE BYTE
Line S11920 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20131  M02S11920.253l688 ---|          STM    AB,T5
Line S11921 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20132  M02S11921.253l688 ---| ENM5     LDD    T6          STORE WORD
20133  M01S00821.253l688 +++|          CRD    CM
20134  M01S00822.253l688 +++|          LDD    AB+3        CHANGE BYTE
20135  M01S00823.253l688 +++|          LPN    7
20136  M01S00824.253l688 +++|          LMD    T4
20137  M01S11922.dsd     +++|          SHN    14
Line S11923 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20138  M02S11923.253l688 ---|          LMD    T7
Line S11924 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20139  M02S11924.253l688 ---|          CWD    AB
Line S11925 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20140  M02S11925.253l688 ---|          JMP    KBR         RETURN
20141  M01S00825.253l688 +++|          LMD    AB+4
20142  M01S00826.253l688 +++|          MJN    ENM8        IF BYTE CHANGE
20143  M01S00827.253l688 +++| ENMA     SHN    -3-3* PARCEL
20144  M01S00828.253l688 +++|          STD    AB+3
20145  M01S00829.253l688 +++|          LDI    T5
20146  M01S00830.253l688 +++|          LPC    770000
20147  M01S00831.253l688 +++| ENMB     EQU    *-1
20148  M01S00832.253l688 +++|          LMD    AB+3
20149  M01S00833.253l688 +++|          STI    T5
20150  M01S00834.253l688 +++|          AOD    T5
20151  M01S00835.253l688 +++|          LDD    AB+4
20152  M01S00836.253l688 +++| ENMC     SHN    11-3* PARCEL
20153  M01S00837.253l688 +++|          LMI    T5
20154  M01S00838.253l688 +++|          LPC    777000
20155  M01S00839.253l688 +++| ENMD     EQU    *-1
20156  M01S00840.253l688 +++|          LMI    T5
20157  M01S00841.253l688 +++| ENM8     STI    T5          SET BYTE
20158  M01S00842.253l688 +++|          LDD    T6
20159  M01S00843.253l688 +++|          SHN    14
20160  M01S00844.253l688 +++|          LMD    T7          STORE WORD
20161  M01S00845.253l688 +++|          CWD    CM
20162  M01S00846.253l688 +++|          JMP    KBR         RETURN
20163  M01S00847.253l688 +++|
20164  M01S00848.253l688 +++|
20165  M01S00849.253l688 +++| ENMF     CON    7777,777,77,7
20166  M01S11926.dsd     +++| GCA      SPACE  4,10
20167  M01S11927.dsd     +++|**        GCA - GET CM DISPLAY ADDRESS.
20168  M01S11928.dsd     +++|*
20169  M01S11929.dsd     +++|*         ENTRY  (LS) = LEFT DISPLAY INDEX.
20170  M01S11930.dsd     +++|*
20171  M01S11931.dsd     +++|*         EXIT   (CP) = CP AREA ADDRESS.
20172  M01S11932.dsd     +++|*                     = 0, IF SYSTEM.
20173  M01S11933.dsd     +++|*                (CM - CM+1) = 9/ , 15/ RA/100B.
20174  M01S11934.dsd     +++|*                (CM+2 - CM+3) = 9/ , 15/ FL/100B.
20175  M01S11935.dsd     +++|*                (CM+4) = NFL/100B, IF DISPLAY ASSIGNED TO JSN.
20176  M01S11936.dsd     +++|*
Line S11937 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20177  M02S11937.253l688 ---|*         USES   CP, T3, T6, T7, CM - CM+4.
Line S11938 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20178  M02S11938.253l688 ---|*
Line S11939 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20179  M02S11939.253l688 ---|*         CALLS  GCP.
20180  M01S00850.253l688 +++|*         USES   CP, T2, T6, T7, CM - CM+4.
20181  M01S00851.253l688 +++|*
20182  M01S00852.253l688 +++|*         CALLS  GCP, SJT.
20183  M01S11940.dsd     +++|
20184  M01S11941.dsd     +++|
Line S11942 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20185  M02S11942.253l688 ---| GCA2     AOD    T3          SET FWA OF JSN
Line S11943 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20186  M02S11943.253l688 ---|          RJM    GCP         GET CPA ADDRESS
20187  M01S00853.253l688 +++| GCA2     AOD    T2          GET CPA ADDRESS
20188  M01S00854.253l688 +++|          RJM    GCP
20189  M01S11944.dsd     +++|          ZJN    GCA3        IF NO JSN
20190  M01S11945.dsd     +++|          ADN    FLSW
20191  M01S11946.dsd     +++|          CRD    T6
20192  M01S11947.dsd     +++|          LDD    CM+2        MOVE FL/100B
20193  M01S11948.dsd     +++|          STD    CM+3
20194  M01S11949.dsd     +++|          LDN    0
20195  M01S11950.dsd     +++|          STD    CM+2
20196  M01S11951.dsd     +++|          LDD    T6          MOVE NFL/100B
20197  M01S11952.dsd     +++|          STD    CM+4
20198  M01S11953.dsd     +++|          UJN    GCAX        RETURN
20199  M01S11954.dsd     +++|
20200  M01S11955.dsd     +++| GCA3     STD    CP          SET SYSTEM CP
20201  M01S11956.dsd     +++|          LDC    MABL        GET CM/100B
20202  M01S11957.dsd     +++|          CRD    CM
20203  M01S11958.dsd     +++|          LDN    0           SET SYSTEM RA
20204  M01S11959.dsd     +++|          STD    CM
20205  M01S11960.dsd     +++|          STD    CM+1
20206  M01S11961.dsd     +++|
20207  M01S11962.dsd     +++| GCA      SUBR               ENTRY/EXIT
Line S11963 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20208  M02S11963.253l688 ---|          LDC    /DSD/TJAZ
Line S11964 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20209  M02S11964.253l688 ---|          STD    T3
Line S11965 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20210  M02S11965.253l688 ---| GCA1     LDI    T3          CHECK DISPLAY NAME
Line S11966 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20211  M02S11966.253l688 ---|          LMD    LS
Line S11967 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20212  M02S11967.253l688 ---|          ZJN    GCA2        IF DISPLAY NAME FOUND
Line S11968 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20213  M02S11968.253l688 ---|          LDN    /DSD/TJAZE  GET NEXT TABLE ENTRY
Line S11969 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20214  M02S11969.253l688 ---|          RAD    T3
Line S11970 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20215  M02S11970.253l688 ---|          LMC    /DSD/TJAZL
Line S11971 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20216  M02S11971.253l688 ---|          NJN    GCA1        IF NOT END OF TABLE
Line S11972 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20217  M02S11972.253l688 ---|          JMP    KIE         *INCORRECT ENTRY*
20218  M01S00855.253l688 +++|          LDD    LS          SEARCH JSN TABLE
20219  M01S00856.253l688 +++|          RJM    SJT
20220  M01S00857.253l688 +++|          NJN    GCA2        IF DISPLAY FOUND
20221  M01S00858.253l688 +++| GCA1     JMP    KIE         PROCESS INCORRECT ENTRY
20222  M01S11973.dsd     +++| GCP      SPACE  4,10
20223  M01S11974.dsd     +++|**        GCP - GET CPA ADDRESS.
20224  M01S11975.dsd     +++|*
20225  M01S11976.dsd     +++|*         ENTRY  (A) = JSN ADDRESS IN *TJAZ* TABLE.
20226  M01S11977.dsd     +++|*
20227  M01S11978.dsd     +++|*         EXIT   (A) = CPA ADDRESS OF JOB WITH DISPLAY-S JSN.
20228  M01S11979.dsd     +++|*                    = 0, IF NO JSN ASSOCIATED WITH DISPLAY.
20229  M01S11980.dsd     +++|*                (CN) = CP NUMBER.
20230  M01S11981.dsd     +++|*                (CP) = CPA ADDRESS, IF JSN DISPLAY.
20231  M01S11982.dsd     +++|*
20232  M01S11983.dsd     +++|*         USES   CN, CP, T3, AB - AB+4, CM - CM+4.
20233  M01S11984.dsd     +++|*
20234  M01S11985.dsd     +++|*         CALLS  GEE, IEE.
20235  M01S11986.dsd     +++|*
20236  M01S11987.dsd     +++|*         MACROS SFA.
20237  M01S11988.dsd     +++|
20238  M01S11989.dsd     +++|
20239  M01S11990.dsd     +++| GCP      SUBR               ENTRY/EXIT
20240  M01S11991.dsd     +++|          STD    T3
20241  M01S11992.dsd     +++|          LDI    T3
20242  M01S11993.dsd     +++|          ZJN    GCPX        IF JSN NOT PRESENT
20243  M01S11994.dsd     +++|          LDD    T3          SET FWA OF JSN TO FIND
20244  M01S11995.dsd     +++|          RJM    GEE         SEARCH EJT
20245  M01S00001.dsd83   +++|          ZJN    GCPX        IF JSN = *SYS*
Line S11996 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20246  M02S11996.253l688 ---|          ZJN    GCP2        IF EJT ENTRY FOUND
20247  M01S00859.253l688 +++|          PJN    GCP2        IF EJT ENTRY FOUND
20248  M01S11997.dsd     +++| GCP1     JMP    KIE         *INCORRECT ENTRY*
20249  M01S11998.dsd     +++|
Line S11999 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20250  M02S11999.253l688 ---| GCP2     LDD    T3          INTERLOCK EJT ENTRY
Line S12000 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20251  M02S12000.253l688 ---|          RJM    IEE
Line S12001 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20252  M02S12001.253l688 ---|          MJN    GCP1        IF NOT INTERLOCKED
Line S12002 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20253  M02S12002.253l688 ---|          SFA    EJT,EI      CALCULATE EJT ENTRY ADDRESS
Line S12003 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20254  M02S12003.253l688 ---|          ERRNZ  JSNE        NOT FIRST WORD OF EJT ENTRY
Line S12004 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20255  M02S12004.253l688 ---|          CRD    CM          GET JOB STATUS
20256  M01S00860.253l688 +++| GCP2     RJM    IEE         INTERLOCK EJT ENTRY
20257  M01S00861.253l688 +++|          MJN    GCP1        IF INTERLOCK UNAVAILABLE
20258  M01S00862.253l688 +++|          SFA    EJT
20259  M01S00863.253l688 +++|          ADK    JSNE        GET JOB STATUS
20260  M01S00864.253l688 +++|          CRD    CM
20261  M01S12005.dsd     +++|          ADN    SCHE        GET CP NUMBER
20262  M01S12006.dsd     +++|          CRD    AB
20263  M01S12007.dsd     +++|          LDD    CM+4
20264  M01S12008.dsd     +++|          LPN    76
20265  M01S12009.dsd     +++|          LMN    EXJS*2
20266  M01S12010.dsd     +++|          NJN    GCP1        IF JOB NOT AT CP
20267  M01S12011.dsd     +++|          LDD    AB+3        SET CPA ADDRESS
20268  M01S12012.dsd     +++|          LPN    37
20269  M01S12013.dsd     +++|          STD    CN
20270  M01S12014.dsd     +++|          SHN    7
20271  M01S12015.dsd     +++|          STD    CP
20272  M01S12016.dsd     +++|          UJN    GCPX        RETURN
20273  M01S00701.274l797 +++|          SPACE  4,10
20274  M01S00702.274l797 +++|          CMDEND
Line S12017 Modification History
M01 (Added by) dsd
M02 (Updated by) 251l664
Seq #  *Modification Id* Act 
----------------------------+
20275  M02S12017.251l664 ---|          COMMAND (CENTRAL MEMORY CHANGES.)
20276  M01S00953.251l664 +++|          COMMAND  (CENTRAL MEMORY CHANGES - MULTIPLE.)
20277  M01S12018.dsd     +++| EMR      SPACE  4,10
20278  M01S12019.dsd     +++|***       XXXXXXX+YYY.
20279  M01S12020.dsd     +++|*         XXXXXXX-YYY - YYY.
20280  M01S12021.dsd     +++|*         XXXXXXX+Y,ZZZZ.
20281  M01S12022.dsd     +++|*         XXXXXXX-Y,ZZZZ.
20282  M01S12023.dsd     +++|*
20283  M01S12024.dsd     +++|*         ENTER YYY - YYY IN MEMORY LOCATION XXXXXXX.
20284  M01S12025.dsd     +++|*         ENTER ZZZZ IN BYTE Y OF MEMORY LOCATION XXXXXXX.
20285  M01S12026.dsd     +++|*
20286  M01S12027.dsd     +++|*         0 .LE. XXXXXXX .LE. 7,777,777B.
20287  M01S12028.dsd     +++|*         0 .LE. Y .LE. 4.
20288  M01S12029.dsd     +++|
20289  M01S12030.dsd     +++|
20290  M01S12031.dsd     +++|          ENTRY  EMR
20291  M01S12032.dsd     +++|          RJM    ASA         ASSEMBLE ADDRESS
20292  M01S12033.dsd     +++|          RJM    ASD         ASSEMBLE ENTRY
20293  M01S12034.dsd     +++|          SBN    1R.
20294  M01S12035.dsd     +++|          ZJN    EMR1        IF *.*
20295  M01S12036.dsd     +++|          LDD    AB+4        SAVE BYTE NUMBER
20296  M01S12037.dsd     +++|          STD    T4
20297  M01S12038.dsd     +++|          AOD    CA          ASSEMBLE ENTRY
20298  M01S12039.dsd     +++|          RJM    ASD
20299  M01S12040.dsd     +++|          LDD    AB+4        SAVE ENTRY
20300  M01S12041.dsd     +++|          STD    T1
20301  M01S12042.dsd     +++|          LDD    T6          READ WORD
20302  M01S12043.dsd     +++|          SHN    14
20303  M01S12044.dsd     +++|          LMD    T7
20304  M01S12045.dsd     +++|          CRD    AB
20305  M01S12046.dsd     +++|          LDD    T1          STORE BYTE
20306  M01S12047.dsd     +++|          STM    AB,T4
20307  M01S12048.dsd     +++| EMR1     LDD    T6          STORE WORD
20308  M01S12049.dsd     +++|          SHN    14
20309  M01S12050.dsd     +++|          LMD    T7
20310  M01S12051.dsd     +++|          CWD    AB
20311  M01S12052.dsd     +++|*         UJN    ADV         ADVANCE ADDRESS
20312  M01S12053.dsd     +++| ADV      SPACE  4,10
20313  M01S12054.dsd     +++|**        ADV - ADVANCE/DECREMENT ADDRESS.
20314  M01S12055.dsd     +++|*
20315  M01S12056.dsd     +++|*         ENTRY  (T5) = SEPARATOR CHARACTER ADDRESS.
20316  M01S12057.dsd     +++|*
20317  M01S12058.dsd     +++|*         USES   KI, T1, T2, T5.
20318  M01S12059.dsd     +++|*
20319  M01S12060.dsd     +++|*         CALLS  C1D.
20320  M01S12061.dsd     +++|
20321  M01S12062.dsd     +++|
20322  M01S12063.dsd     +++| ADV      LDD    T5          SET SEPARATOR CHARACTER ADDRESS
20323  M01S12064.dsd     +++|          STM    ADVA
20324  M01S12065.dsd     +++|          LDN    0           CHECK COMMAND LOGGING
20325  M01S12066.dsd     +++|          RJM    C1D
20326  M01S12067.dsd     +++|          LDC    *
20327  M01S12068.dsd     +++| ADVA     EQU    *-1         (SEPARATOR CHARACTER ADDRESS)
20328  M01S12069.dsd     +++|          STD    T5
20329  M01S12070.dsd     +++|          STD    T1
20330  M01S12071.dsd     +++|          LDI    T5          CHECK SEPARATOR
20331  M01S12072.dsd     +++|          SBN    1R+
20332  M01S12073.dsd     +++|          ZJN    ADV3        IF *+*
20333  M01S12074.dsd     +++|          SBN    1R--1R+
20334  M01S12075.dsd     +++|          NJN    ADV1        IF NOT *-*
20335  M01S12076.dsd     +++|          LJM    ADV8        PROCESS *-*
20336  M01S12077.dsd     +++|
20337  M01S12078.dsd     +++| ADV1     JMP    KBR         RETURN
20338  M01S12079.dsd     +++|
20339  M01S12080.dsd     +++| ADV2     AOI    T5          ADVANCE ENTRY
20340  M01S12081.dsd     +++|          SBN    1R8
20341  M01S12082.dsd     +++|          MJN    ADV6        IF NO OVERFLOW
20342  M01S12083.dsd     +++|          SOI    T5
20343  M01S12084.dsd     +++|          LMN    1R.
20344  M01S12085.dsd     +++|          ZJN    ADV4        IF *.*
20345  M01S12086.dsd     +++|          LDN    1R0         RESET DIGIT
20346  M01S12087.dsd     +++|          STI    T5
20347  M01S12088.dsd     +++| ADV3     SOD    T5
20348  M01S12089.dsd     +++|          ADC    -KBUF
20349  M01S12090.dsd     +++|          PJN    ADV2        IF NOT PAST START OF BUFFER
20350  M01S12091.dsd     +++| ADV4     LDC    KBUF+KBUFL-1
20351  M01S12092.dsd     +++|          STD    T2
20352  M01S12093.dsd     +++| ADV5     LDI    T2          MOVE CONTENTS OF BUFFER
20353  M01S12094.dsd     +++|          STM    1,T2
20354  M01S12095.dsd     +++|          SOD    T2
20355  M01S12096.dsd     +++|          SBD    T5
20356  M01S12097.dsd     +++|          NJN    ADV5        IF BUFFER NOT MOVED
20357  M01S12098.dsd     +++|          LDN    1R1         SET FIRST CHARACTER OF BUFFER
20358  M01S12099.dsd     +++|          STM    1,T2
20359  M01S12100.dsd     +++|          AOD    KI          INCREMENT KEYBOARD INDEX
20360  M01S12101.dsd     +++|          AOD    T1          SKIP PREVIOUS CHARACTER
20361  M01S12102.dsd     +++| ADV6     UJN    ADV9        SET CHARACTER INDEX
20362  M01S12103.dsd     +++|
20363  M01S12104.dsd     +++| ADV7     SOI    T5          DECREMENT ENTRY
20364  M01S12105.dsd     +++|          SBN    1R0
20365  M01S12106.dsd     +++|          PJN    ADV9        IF NO UNDERFLOW
20366  M01S12107.dsd     +++|          LDN    1R7         RESET DIGIT
20367  M01S12108.dsd     +++|          STI    T5
20368  M01S12109.dsd     +++| ADV8     SOD    T5
20369  M01S12110.dsd     +++|          ADC    -KBUF
20370  M01S12111.dsd     +++|          PJN    ADV7        IF NOT PAST START OF BUFFER
20371  M01S12112.dsd     +++| ADV9     AOD    T1          SKIP SEPARATOR
20372  M01S12113.dsd     +++|          LDI    T1          CHECK NEXT CHARACTER
20373  M01S12114.dsd     +++|          SBN    1RD
20374  M01S12115.dsd     +++|          NJN    ADV10       IF NOT *D*
20375  M01S12116.dsd     +++|          AOD    T1          SKIP *D*
20376  M01S12117.dsd     +++| ADV10    LDD    T1          RETURN TO PARTIAL CLEAR
20377  M01S12118.dsd     +++|          ADC    -KBUF
20378  M01S12119.dsd     +++|          LJM    KPC         RETURN TO PARTIAL CLEAR
20379  M01S12120.dsd     +++| ASA      SPACE  4,10
20380  M01S12121.dsd     +++|**        ASA - ASSEMBLE ADDRESS.
20381  M01S12122.dsd     +++|*
20382  M01S12123.dsd     +++|*         ENTRY  (CA) = CHARACTER ADDRESS.
20383  M01S12124.dsd     +++|*
20384  M01S12125.dsd     +++|*         EXIT   (T5) = SEPARATOR CHARACTER INDEX.
20385  M01S12126.dsd     +++|*                (T6 - T7) = ADDRESS.
20386  M01S12127.dsd     +++|*
20387  M01S12128.dsd     +++|*         USES   CA, CM, CM+1, CM+2, CM+3, T5, T6, T7.
20388  M01S12129.dsd     +++|*
20389  M01S12130.dsd     +++|*         CALLS  ASD, GCA.
20390  M01S12131.dsd     +++|
20391  M01S12132.dsd     +++|
20392  M01S12133.dsd     +++| ASA      SUBR               ENTRY/EXIT
20393  M01S12134.dsd     +++|          RJM    GCA         GET CM ADDRESS
20394  M01S12135.dsd     +++|          LDD    CM          CONVERT RA/100B TO RA
20395  M01S12136.dsd     +++|          SHN    6
20396  M01S12137.dsd     +++|          STD    CM
20397  M01S12138.dsd     +++|          LDD    CM+1
20398  M01S12139.dsd     +++|          SHN    6
20399  M01S12140.dsd     +++|          STD    CM+1
20400  M01S12141.dsd     +++|          SHN    -14
20401  M01S12142.dsd     +++|          RAD    CM
20402  M01S12143.dsd     +++|          RJM    ASD         ASSEMBLE ADDRESS
20403  M01S12144.dsd     +++|          LDD    AB+3
20404  M01S12145.dsd     +++|          LPC    7000
20405  M01S12146.dsd     +++|          ADD    AB+2
20406  M01S12147.dsd     +++|          ADD    AB+1
20407  M01S12148.dsd     +++|          ADD    AB
20408  M01S12149.dsd     +++|          NJN    ASA1        IF .GT. 21 BITS
20409  M01S12150.dsd     +++|          LDD    AB+3        COMPARE ENTERED CM LOCATION WITH FL
20410  M01S12151.dsd     +++|          STD    T6
20411  M01S12152.dsd     +++|          LDD    AB+4
20412  M01S12153.dsd     +++|          STD    T7
20413  M01S12154.dsd     +++|          SHN    -6
20414  M01S12155.dsd     +++|          SHN    14
20415  M01S12156.dsd     +++|          LMD    T6
20416  M01S12157.dsd     +++|          SHN    6
20417  M01S12158.dsd     +++|          SBD    CM+3
20418  M01S12159.dsd     +++|          SHN    6
20419  M01S12160.dsd     +++|          SBD    CM+2
20420  M01S12161.dsd     +++|          SHN    14
20421  M01S12162.dsd     +++|          MJN    ASA2        IF ADDRESS .LE. FL
20422  M01S12163.dsd     +++| ASA1     JMP    KIE         *INCORRECT ENTRY*
20423  M01S12164.dsd     +++|
20424  M01S12165.dsd     +++| ASA2     LDD    CM+1
20425  M01S12166.dsd     +++|          RAD    T7
20426  M01S12167.dsd     +++|          SHN    -14
20427  M01S12168.dsd     +++|          ADD    CM
20428  M01S12169.dsd     +++|          ADD    T6
20429  M01S12170.dsd     +++|          STD    T6
20430  M01S12171.dsd     +++|          LDM.   CMEI
20431  M01S12172.dsd     +++|          ZJN    ASA3        IF NOT CME
20432  M01S12173.dsd     +++|          LDD    T6          SET (R) = UPPER 9 ADDRESS BITS
20433  M01S12174.dsd     +++|          SHN    6
20434  M01S12175.dsd     +++|          STD    CM+3
20435  M01S12176.dsd     +++|          SHN    6
20436  M01S12177.dsd     +++|          STD    CM+2
20437  M01S12178.dsd     +++|          LRD    CM+2
20438  M01S12179.dsd     +++|
20439  M01S12180.dsd     +++|*         SET (T6 - T7) = LOWER 12 ADDRESS BITS + 400,000B.
20440  M01S12181.dsd     +++|
20441  M01S12182.dsd     +++|          LDN    40
20442  M01S12183.dsd     +++|          STD    T6
20443  M01S12184.dsd     +++| ASA3     LDD    CA          SET SEPARATOR ADDRESS
20444  M01S12185.dsd     +++|          STD    T5
20445  M01S12186.dsd     +++|          AOD    CA          SKIP SEPARATOR
20446  M01S12187.dsd     +++|          LJM    ASAX        EXIT
20447  M01S12188.dsd     +++| GCA      SPACE  4,10
20448  M01S12189.dsd     +++|**        GCA - GET CM DISPLAY ADDRESS.
20449  M01S12190.dsd     +++|*
20450  M01S12191.dsd     +++|*         ENTRY  (LS) = LEFT DISPLAY INDEX.
20451  M01S12192.dsd     +++|*
20452  M01S12193.dsd     +++|*         EXIT   (CP) = CP AREA ADDRESS.
20453  M01S12194.dsd     +++|*                     = 0, IF SYSTEM.
20454  M01S12195.dsd     +++|*                (CM - CM+1) = 9/ , 15/ RA/100B.
20455  M01S12196.dsd     +++|*                (CM+2 - CM+3) = 9/ , 15/ FL/100B.
20456  M01S12197.dsd     +++|*
Line S12198 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20457  M02S12198.253l688 ---|*         USES   CP, T3, T6, T7, CM - CM+4.
20458  M01S00865.253l688 +++|*         USES   CP, T2, T6, T7, CM - CM+4.
20459  M01S00866.253l688 +++|*
20460  M01S00867.253l688 +++|*         CALLS  SJT.
20461  M01S12199.dsd     +++|
20462  M01S12200.dsd     +++|
Line S12201 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20463  M02S12201.253l688 ---| GCA      SUBR               ENTRY/EXIT
Line S12202 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20464  M02S12202.253l688 ---|          LDC    /DSD/TJAZ
Line S12203 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20465  M02S12203.253l688 ---|          STD    T3
Line S12204 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20466  M02S12204.253l688 ---| GCA1     LDI    T3          CHECK DISPLAY NAME
Line S12205 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20467  M02S12205.253l688 ---|          LMD    LS
Line S12206 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20468  M02S12206.253l688 ---|          ZJN    GCA3        IF DISPLAY NAME FOUND
Line S12207 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20469  M02S12207.253l688 ---|          LDN    /DSD/TJAZE  GET NEXT TABLE ENTRY
Line S12208 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20470  M02S12208.253l688 ---|          RAD    T3
Line S12209 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20471  M02S12209.253l688 ---|          LMC    /DSD/TJAZL
Line S12210 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20472  M02S12210.253l688 ---|          NJN    GCA1        IF NOT END OF TABLE
Line S12211 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20473  M02S12211.253l688 ---| GCA2     JMP    KIE         *INCORRECT ENTRY*
Line S12212 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20474  M02S12212.253l688 ---|
Line S12213 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20475  M02S12213.253l688 ---| GCA3     AOD    T3          SET FWA OF JSN
Line S12214 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20476  M02S12214.253l688 ---|          LDI    T3
Line S12215 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20477  M02S12215.253l688 ---|          NJN    GCA4        IF JSN PRESENT
20478  M01S00868.253l688 +++| GCA3     AOD    T2          SET FWA OF JSN
20479  M01S00869.253l688 +++|          LDI    T2
20480  M01S00870.253l688 +++|          NJN    GCA2        IF JSN PRESENT
Line S12216 Modification History
M01 (Added by) dsd
M02 (Updated by) dsd83
Seq #  *Modification Id* Act 
----------------------------+
20481  M02S12216.dsd83   ---|          STD    CP          SET SYSTEM CP
20482  M01S00002.dsd83   +++| GCA3.1   STD    CP          SET SYSTEM CP
20483  M01S12217.dsd     +++|          LDC    MABL        GET CM/100B
20484  M01S12218.dsd     +++|          CRD    CM
20485  M01S12219.dsd     +++|          LDN    0           SET SYSTEM RA
20486  M01S12220.dsd     +++|          STD    CM
20487  M01S12221.dsd     +++|          STD    CM+1
Line S12222 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20488  M02S12222.253l688 ---|          UJN    GCAX        RETURN
Line S12223 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20489  M02S12223.253l688 ---|
Line S12224 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20490  M02S12224.253l688 ---| GCA4     LDD    T3          SET FWA OF JSN TO FIND
Line S12225 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20491  M02S12225.253l688 ---|          RJM    GEE         SEARCH EJT
Line S12226 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20492  M02S12226.253l688 ---|          NJN    GCA2        IF EJT ENTRY NOT FOUND
Line S12227 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20493  M02S12227.253l688 ---|          LDD    T3          INTERLOCK EJT ENTRY
Line S12228 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20494  M02S12228.253l688 ---|          RJM    IEE
Line S12229 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20495  M02S12229.253l688 ---|          MJN    GCA2        IF NOT INTERLOCKED
Line S12230 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20496  M02S12230.253l688 ---|          SFA    EJT,EI      CALCULATE EJT ENTRY ADDRESS
Line S12231 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20497  M02S12231.253l688 ---|          ERRNZ  JSNE        NOT FIRST WORD OF EJT ENTRY
Line S12232 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20498  M02S12232.253l688 ---|          CRD    CM          GET JOB STATUS
20499  M01S00871.253l688 +++|
20500  M01S00872.253l688 +++| GCA      SUBR               ENTRY/EXIT
20501  M01S00873.253l688 +++|          LDD    LS          SEARCH JSN TABLE
20502  M01S00874.253l688 +++|          RJM    SJT
20503  M01S00875.253l688 +++|          NJN    GCA3        IF DISPLAY FOUND
20504  M01S00876.253l688 +++| GCA1     JMP    KIE         PROCESS INCORRECT ENTRY
20505  M01S00877.253l688 +++|
20506  M01S00878.253l688 +++| GCA2     LDD    T2          SEARCH EJT
20507  M01S00879.253l688 +++|          RJM    GEE
20508  M01S00003.dsd83   +++|          ZJN    GCA3.1      IF JSN = *SYS*
20509  M01S00880.253l688 +++|          MJN    GCA1        IF EJT ENTRY NOT FOUND
20510  M01S00881.253l688 +++|          RJM    IEE         INTERLOCK EJT ENTRY
20511  M01S00882.253l688 +++|          MJN    GCA1        IF INTERLOCK UNAVAILABLE
20512  M01S00883.253l688 +++|          SFA    EJT
20513  M01S00884.253l688 +++|          ADK    JSNE        GET JOB STATUS
20514  M01S00885.253l688 +++|          CRD    CM
20515  M01S12233.dsd     +++|          ADN    SCHE        GET CP NUMBER
20516  M01S12234.dsd     +++|          CRD    AB
20517  M01S12235.dsd     +++|          LDD    CM+4
20518  M01S12236.dsd     +++|          LPN    76
20519  M01S12237.dsd     +++|          LMN    EXJS*2
Line S12238 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20520  M02S12238.253l688 ---|          NJN    GCA2        IF JOB NOT AT CP
20521  M01S00886.253l688 +++|          NJN    GCA1        IF JOB NOT AT CP
20522  M01S12239.dsd     +++|          LDD    AB+3        SET CPA ADDRESS
20523  M01S12240.dsd     +++|          LPN    37
20524  M01S12241.dsd     +++|          STD    CN
20525  M01S12242.dsd     +++|          SHN    7
20526  M01S12243.dsd     +++|          STD    CP
20527  M01S12244.dsd     +++|          ADN    FLSW
20528  M01S12245.dsd     +++|          CRD    T6
20529  M01S12246.dsd     +++|          LDD    CM+2        MOVE FL/100B
20530  M01S12247.dsd     +++|          STD    CM+3
20531  M01S12248.dsd     +++|          LDN    0
20532  M01S12249.dsd     +++|          STD    CM+2
20533  M01S12250.dsd     +++|          LJM    GCAX        RETURN
20534  M01S00703.274l797 +++|          SPACE  4,10
20535  M01S00704.274l797 +++|          CMDEND
Line S12251 Modification History
M01 (Added by) dsd
M02 (Updated by) 251l664
Seq #  *Modification Id* Act 
----------------------------+
20536  M02S12251.251l664 ---|          COMMAND  (CENTRAL MEMORY CHANGES.)
20537  M01S00954.251l664 +++|          COMMAND  (CENTRAL MEMORY CHANGES - DISPLAY CODE.)
20538  M01S12252.dsd     +++| EMD      SPACE  4,10
20539  M01S12253.dsd     +++|***       XXXXXXX+DCCC - CCC.
20540  M01S12254.dsd     +++|*         XXXXXX-DCCC - CCC.
20541  M01S12255.dsd     +++|*
20542  M01S12256.dsd     +++|*         0 .LE. XXXXXXX .LE. 7,777,777B.
20543  M01S12257.dsd     +++|*
20544  M01S12258.dsd     +++|***       XXXXXXX,DCCC - CCC
20545  M01S12259.dsd     +++|*
20546  M01S12260.dsd     +++|*         ENTER MEMORY LOCATION XXXXXXX WITH DISPLAY CODE CHARACTERS
20547  M01S12261.dsd     +++|*         CCC - CCC.  ENTRY WILL BE LEFT-JUSTIFIED.
20548  M01S12262.dsd     +++|
20549  M01S12263.dsd     +++|
20550  M01S12264.dsd     +++|          ENTRY  EMD
20551  M01S12265.dsd     +++|          RJM    ASA         ASSEMBLE ADDRESS
20552  M01S12266.dsd     +++|          AOD    CA          SKIP *D*
20553  M01S12267.dsd     +++|          LDN    ZERL        CLEAR ASSEMBLY
20554  M01S12268.dsd     +++|          CRD    AB
20555  M01S12269.dsd     +++|          LDN    AB          SET BYTE ADDRESS
20556  M01S12270.dsd     +++|          STD    T1
20557  M01S12271.dsd     +++| EMD1     LDI    CA          STORE UPPER
20558  M01S12272.dsd     +++|          ZJN    EMD2        IF END OF BUFFER
20559  M01S12273.dsd     +++|          SHN    6
20560  M01S12274.dsd     +++|          STI    T1
20561  M01S12275.dsd     +++|          AOD    CA          ADVANCE CHARACTER
20562  M01S12276.dsd     +++|          LDI    CA          STORE LOWER
20563  M01S12277.dsd     +++|          ZJN    EMD2        IF END OF BUFFER
20564  M01S12278.dsd     +++|          RAI    T1
20565  M01S12279.dsd     +++|          AOD    CA          ADVANCE CHARACTER
20566  M01S12280.dsd     +++|          AOD    T1          ADVANCE BYTE
20567  M01S12281.dsd     +++|          LMN    AB+5
20568  M01S12282.dsd     +++|          NJN    EMD1        IF NOT END OF WORD
20569  M01S12283.dsd     +++| EMD2     LDD    T6          STORE WORD
20570  M01S12284.dsd     +++|          SHN    14
20571  M01S12285.dsd     +++|          ADD    T7
20572  M01S12286.dsd     +++|          CWD    AB
20573  M01S12287.dsd     +++|*         UJN    ADV         ADVANCE ADDRESS
20574  M01S12288.dsd     +++| ADV      SPACE  4,10
20575  M01S12289.dsd     +++|**        ADV - ADVANCE/DECREMENT ADDRESS.
20576  M01S12290.dsd     +++|*
20577  M01S12291.dsd     +++|*         ENTRY  (T5) = SEPARATOR CHARACTER ADDRESS.
20578  M01S12292.dsd     +++|*
20579  M01S12293.dsd     +++|*         USES   KI, T1, T2, T5.
20580  M01S12294.dsd     +++|*
20581  M01S12295.dsd     +++|*         CALLS  C1D.
20582  M01S12296.dsd     +++|
20583  M01S12297.dsd     +++|
20584  M01S12298.dsd     +++| ADV      LDD    T5          SET SEPARATOR CHARACTER ADDRESS
20585  M01S12299.dsd     +++|          STM    ADVA
20586  M01S12300.dsd     +++|          LDN    0           CHECK COMMAND LOGGING
20587  M01S12301.dsd     +++|          RJM    C1D
20588  M01S12302.dsd     +++|          LDC    *
20589  M01S12303.dsd     +++| ADVA     EQU    *-1         (SEPARATOR CHARACTER ADDRESS)
20590  M01S12304.dsd     +++|          STD    T5
20591  M01S12305.dsd     +++|          STD    T1
20592  M01S12306.dsd     +++|          LDI    T5          CHECK SEPARATOR
20593  M01S12307.dsd     +++|          SBN    1R+
20594  M01S12308.dsd     +++|          ZJN    ADV3        IF *+*
20595  M01S12309.dsd     +++|          SBN    1R--1R+
20596  M01S12310.dsd     +++|          NJN    ADV1        IF NOT *-*
20597  M01S12311.dsd     +++|          LJM    ADV8        PROCESS *-*
20598  M01S12312.dsd     +++|
20599  M01S12313.dsd     +++| ADV1     JMP    KBR         RETURN
20600  M01S12314.dsd     +++|
20601  M01S12315.dsd     +++| ADV2     AOI    T5          ADVANCE ENTRY
20602  M01S12316.dsd     +++|          SBN    1R8
20603  M01S12317.dsd     +++|          MJN    ADV6        IF NO OVERFLOW
20604  M01S12318.dsd     +++|          SOI    T5
20605  M01S12319.dsd     +++|          LMN    1R.
20606  M01S12320.dsd     +++|          ZJN    ADV4        IF *.*
20607  M01S12321.dsd     +++|          LDN    1R0         RESET DIGIT
20608  M01S12322.dsd     +++|          STI    T5
20609  M01S12323.dsd     +++| ADV3     SOD    T5
20610  M01S12324.dsd     +++|          ADC    -KBUF
20611  M01S12325.dsd     +++|          PJN    ADV2        IF NOT PAST START OF BUFFER
20612  M01S12326.dsd     +++| ADV4     LDC    KBUF+KBUFL-1
20613  M01S12327.dsd     +++|          STD    T2
20614  M01S12328.dsd     +++| ADV5     LDI    T2          MOVE CONTENTS OF BUFFER
20615  M01S12329.dsd     +++|          STM    1,T2
20616  M01S12330.dsd     +++|          SOD    T2
20617  M01S12331.dsd     +++|          SBD    T5
20618  M01S12332.dsd     +++|          NJN    ADV5        IF BUFFER NOT MOVED
20619  M01S12333.dsd     +++|          LDN    1R1         SET FIRST CHARACTER OF BUFFER
20620  M01S12334.dsd     +++|          STM    1,T2
20621  M01S12335.dsd     +++|          AOD    KI          INCREMENT KEYBOARD INDEX
20622  M01S12336.dsd     +++|          AOD    T1          SKIP PREVIOUS CHARACTER
20623  M01S12337.dsd     +++| ADV6     UJN    ADV9        SET CHARACTER INDEX
20624  M01S12338.dsd     +++|
20625  M01S12339.dsd     +++| ADV7     SOI    T5          DECREMENT ENTRY
20626  M01S12340.dsd     +++|          SBN    1R0
20627  M01S12341.dsd     +++|          PJN    ADV9        IF NO UNDERFLOW
20628  M01S12342.dsd     +++|          LDN    1R7         RESET DIGIT
20629  M01S12343.dsd     +++|          STI    T5
20630  M01S12344.dsd     +++| ADV8     SOD    T5
20631  M01S12345.dsd     +++|          ADC    -KBUF
20632  M01S12346.dsd     +++|          PJN    ADV7        IF NOT PAST START OF BUFFER
20633  M01S12347.dsd     +++| ADV9     AOD    T1          SKIP SEPARATOR
20634  M01S12348.dsd     +++|          LDI    T1          CHECK NEXT CHARACTER
20635  M01S12349.dsd     +++|          SBN    1RD
20636  M01S12350.dsd     +++|          NJN    ADV10       IF NOT *D*
20637  M01S12351.dsd     +++|          AOD    T1          SKIP *D*
20638  M01S12352.dsd     +++| ADV10    LDD    T1          RETURN TO PARTIAL CLEAR
20639  M01S12353.dsd     +++|          ADC    -KBUF
20640  M01S12354.dsd     +++|          LJM    KPC         RETURN TO PARTIAL CLEAR
20641  M01S12355.dsd     +++| ASA      SPACE  4,10
20642  M01S12356.dsd     +++|**        ASA - ASSEMBLE ADDRESS.
20643  M01S12357.dsd     +++|*
20644  M01S12358.dsd     +++|*         ENTRY  (CA) = CHARACTER ADDRESS.
20645  M01S12359.dsd     +++|*
20646  M01S12360.dsd     +++|*         EXIT   (T5) = SEPARATOR CHARACTER INDEX.
20647  M01S12361.dsd     +++|*                (T6 - T7) = ADDRESS.
20648  M01S12362.dsd     +++|*
20649  M01S12363.dsd     +++|*         USES   CA, CM, CM+1, CM+2, CM+3, T5, T6, T7.
20650  M01S12364.dsd     +++|*
20651  M01S12365.dsd     +++|*         CALLS  ASD, GCA.
20652  M01S12366.dsd     +++|
20653  M01S12367.dsd     +++|
20654  M01S12368.dsd     +++| ASA      SUBR               ENTRY/EXIT
20655  M01S12369.dsd     +++|          RJM    GCA         GET CM ADDRESS
20656  M01S12370.dsd     +++|          LDD    CM          CONVERT RA/100B TO RA
20657  M01S12371.dsd     +++|          SHN    6
20658  M01S12372.dsd     +++|          STD    CM
20659  M01S12373.dsd     +++|          LDD    CM+1
20660  M01S12374.dsd     +++|          SHN    6
20661  M01S12375.dsd     +++|          STD    CM+1
20662  M01S12376.dsd     +++|          SHN    -14
20663  M01S12377.dsd     +++|          RAD    CM
20664  M01S12378.dsd     +++|          RJM    ASD         ASSEMBLE ADDRESS
20665  M01S12379.dsd     +++|          LDD    AB+3
20666  M01S12380.dsd     +++|          LPC    7000
20667  M01S12381.dsd     +++|          ADD    AB+2
20668  M01S12382.dsd     +++|          ADD    AB+1
20669  M01S12383.dsd     +++|          ADD    AB
20670  M01S12384.dsd     +++|          NJN    ASA1        IF .GT. 21 BITS
20671  M01S12385.dsd     +++|          LDD    AB+3        COMPARE ENTERED CM LOCATION WITH FL
20672  M01S12386.dsd     +++|          STD    T6
20673  M01S12387.dsd     +++|          LDD    AB+4
20674  M01S12388.dsd     +++|          STD    T7
20675  M01S12389.dsd     +++|          SHN    -6
20676  M01S12390.dsd     +++|          SHN    14
20677  M01S12391.dsd     +++|          LMD    T6
20678  M01S12392.dsd     +++|          SHN    6
20679  M01S12393.dsd     +++|          SBD    CM+3
20680  M01S12394.dsd     +++|          SHN    6
20681  M01S12395.dsd     +++|          SBD    CM+2
20682  M01S12396.dsd     +++|          SHN    14
20683  M01S12397.dsd     +++|          MJN    ASA2        IF ADDRESS .LE. FL
20684  M01S12398.dsd     +++| ASA1     JMP    KIE         *INCORRECT ENTRY*
20685  M01S12399.dsd     +++|
20686  M01S12400.dsd     +++| ASA2     LDD    CM+1
20687  M01S12401.dsd     +++|          RAD    T7
20688  M01S12402.dsd     +++|          SHN    -14
20689  M01S12403.dsd     +++|          ADD    CM
20690  M01S12404.dsd     +++|          ADD    T6
20691  M01S12405.dsd     +++|          STD    T6
20692  M01S12406.dsd     +++|          LDM.   CMEI
20693  M01S12407.dsd     +++|          ZJN    ASA3        IF NOT CME
20694  M01S12408.dsd     +++|          LDD    T6          SET (R) = UPPER 9 ADDRESS BITS
20695  M01S12409.dsd     +++|          SHN    6
20696  M01S12410.dsd     +++|          STD    CM+3
20697  M01S12411.dsd     +++|          SHN    6
20698  M01S12412.dsd     +++|          STD    CM+2
20699  M01S12413.dsd     +++|          LRD    CM+2
20700  M01S12414.dsd     +++|
20701  M01S12415.dsd     +++|*         SET (T6 - T7) = LOWER 12 ADDRESS BITS + 400,000B.
20702  M01S12416.dsd     +++|
20703  M01S12417.dsd     +++|          LDN    40
20704  M01S12418.dsd     +++|          STD    T6
20705  M01S12419.dsd     +++| ASA3     LDD    CA          SET SEPARATOR ADDRESS
20706  M01S12420.dsd     +++|          STD    T5
20707  M01S12421.dsd     +++|          AOD    CA          SKIP SEPARATOR
20708  M01S12422.dsd     +++|          LJM    ASAX        EXIT
20709  M01S12423.dsd     +++| GCA      SPACE  4,10
20710  M01S12424.dsd     +++|**        GCA - GET CM DISPLAY ADDRESS.
20711  M01S12425.dsd     +++|*
20712  M01S12426.dsd     +++|*         ENTRY  (LS) = LEFT DISPLAY INDEX.
20713  M01S12427.dsd     +++|*
20714  M01S12428.dsd     +++|*         EXIT   (CP) = CP AREA ADDRESS.
20715  M01S12429.dsd     +++|*                     = 0, IF SYSTEM.
20716  M01S12430.dsd     +++|*                (CM - CM+1) = 9/ , 15/ RA/100B.
20717  M01S12431.dsd     +++|*                (CM+2 - CM+3) = 9/ , 15/ FL/100B.
20718  M01S12432.dsd     +++|*
Line S12433 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20719  M02S12433.253l688 ---|*         USES   CP, T3, T6, T7, CM - CM+4.
20720  M01S00887.253l688 +++|*         USES   CP, T2, T6, T7, CM - CM+4.
20721  M01S00888.253l688 +++|*
20722  M01S00889.253l688 +++|*         CALLS  SJT.
20723  M01S12434.dsd     +++|
20724  M01S12435.dsd     +++|
Line S12436 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20725  M02S12436.253l688 ---| GCA      SUBR               ENTRY/EXIT
Line S12437 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20726  M02S12437.253l688 ---|          LDC    /DSD/TJAZ
Line S12438 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20727  M02S12438.253l688 ---|          STD    T3
Line S12439 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20728  M02S12439.253l688 ---| GCA1     LDI    T3          CHECK DISPLAY NAME
Line S12440 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20729  M02S12440.253l688 ---|          LMD    LS
Line S12441 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20730  M02S12441.253l688 ---|          ZJN    GCA3        IF DISPLAY NAME FOUND
Line S12442 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20731  M02S12442.253l688 ---|          LDN    /DSD/TJAZE  GET NEXT TABLE ENTRY
Line S12443 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20732  M02S12443.253l688 ---|          RAD    T3
Line S12444 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20733  M02S12444.253l688 ---|          LMC    /DSD/TJAZL
Line S12445 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20734  M02S12445.253l688 ---|          NJN    GCA1        IF NOT END OF TABLE
Line S12446 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20735  M02S12446.253l688 ---| GCA2     JMP    KIE         *INCORRECT ENTRY*
Line S12447 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20736  M02S12447.253l688 ---|
Line S12448 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20737  M02S12448.253l688 ---| GCA3     AOD    T3          SET FWA OF JSN
Line S12449 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20738  M02S12449.253l688 ---|          LDI    T3
Line S12450 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20739  M02S12450.253l688 ---|          NJN    GCA4        IF JSN PRESENT
20740  M01S00890.253l688 +++| GCA3     AOD    T2          SET FWA OF JSN
20741  M01S00891.253l688 +++|          LDI    T2
20742  M01S00892.253l688 +++|          NJN    GCA2        IF JSN PRESENT
Line S12451 Modification History
M01 (Added by) dsd
M02 (Updated by) dsd83
Seq #  *Modification Id* Act 
----------------------------+
20743  M02S12451.dsd83   ---|          STD    CP          SET SYSTEM CP
20744  M01S00004.dsd83   +++| GCA3.1   STD    CP          SET SYSTEM CP
20745  M01S12452.dsd     +++|          LDC    MABL        GET CM/100B
20746  M01S12453.dsd     +++|          CRD    CM
20747  M01S12454.dsd     +++|          LDN    0           SET SYSTEM RA
20748  M01S12455.dsd     +++|          STD    CM
20749  M01S12456.dsd     +++|          STD    CM+1
Line S12457 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20750  M02S12457.253l688 ---|          UJN    GCAX        RETURN
Line S12458 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20751  M02S12458.253l688 ---|
Line S12459 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20752  M02S12459.253l688 ---| GCA4     LDD    T3          SET FWA OF JSN TO FIND
Line S12460 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20753  M02S12460.253l688 ---|          RJM    GEE         SEARCH EJT
Line S12461 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20754  M02S12461.253l688 ---|          NJN    GCA2        IF EJT ENTRY NOT FOUND
Line S12462 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20755  M02S12462.253l688 ---|          LDD    T3          INTERLOCK EJT ENTRY
Line S12463 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20756  M02S12463.253l688 ---|          RJM    IEE
Line S12464 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20757  M02S12464.253l688 ---|          MJN    GCA2        IF NOT INTERLOCKED
Line S12465 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20758  M02S12465.253l688 ---|          SFA    EJT,EI      CALCULATE EJT ENTRY ADDRESS
Line S12466 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20759  M02S12466.253l688 ---|          ERRNZ  JSNE        NOT FIRST WORD OF EJT ENTRY
Line S12467 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20760  M02S12467.253l688 ---|          CRD    CM          GET JOB STATUS
20761  M01S00893.253l688 +++|
20762  M01S00894.253l688 +++| GCA      SUBR               ENTRY/EXIT
20763  M01S00895.253l688 +++|          LDD    LS          SEARCH JSN TABLE
20764  M01S00896.253l688 +++|          RJM    SJT
20765  M01S00897.253l688 +++|          NJN    GCA3        IF DISPLAY FOUND
20766  M01S00898.253l688 +++| GCA1     JMP    KIE         PROCESS INCORRECT ENTRY
20767  M01S00899.253l688 +++|
20768  M01S00900.253l688 +++| GCA2     LDD    T2          SEARCH EJT
20769  M01S00901.253l688 +++|          RJM    GEE
20770  M01S00005.dsd83   +++|          ZJN    GCA3.1      IF JSN = *SYS*
20771  M01S00902.253l688 +++|          MJN    GCA1        IF EJT ENTRY NOT FOUND
20772  M01S00903.253l688 +++|          RJM    IEE         INTERLOCK EJT ENTRY
20773  M01S00904.253l688 +++|          MJN    GCA1        IF INTERLOCK UNAVAILABLE
20774  M01S00905.253l688 +++|          SFA    EJT
20775  M01S00906.253l688 +++|          ADK    JSNE        GET JOB STATUS
20776  M01S00907.253l688 +++|          CRD    CM
20777  M01S12468.dsd     +++|          ADN    SCHE        GET CP NUMBER
20778  M01S12469.dsd     +++|          CRD    AB
20779  M01S12470.dsd     +++|          LDD    CM+4
20780  M01S12471.dsd     +++|          LPN    76
20781  M01S12472.dsd     +++|          LMN    EXJS*2
Line S12473 Modification History
M01 (Added by) dsd
M02 (Updated by) 253l688
Seq #  *Modification Id* Act 
----------------------------+
20782  M02S12473.253l688 ---|          NJN    GCA2        IF JOB NOT AT CP
20783  M01S00908.253l688 +++|          NJN    GCA1        IF JOB NOT AT CP
20784  M01S12474.dsd     +++|          LDD    AB+3        SET CPA ADDRESS
20785  M01S12475.dsd     +++|          LPN    37
20786  M01S12476.dsd     +++|          STD    CN
20787  M01S12477.dsd     +++|          SHN    7
20788  M01S12478.dsd     +++|          STD    CP
20789  M01S12479.dsd     +++|          ADN    FLSW
20790  M01S12480.dsd     +++|          CRD    T6
20791  M01S12481.dsd     +++|          LDD    CM+2        MOVE FL/100B
20792  M01S12482.dsd     +++|          STD    CM+3
20793  M01S12483.dsd     +++|          LDN    0
20794  M01S12484.dsd     +++|          STD    CM+2
20795  M01S12485.dsd     +++|          LJM    GCAX        RETURN
20796  M01S00705.274l797 +++|          SPACE  4,10
20797  M01S00706.274l797 +++|          CMDEND
Line S12486 Modification History
M01 (Added by) dsd
M02 (Updated by) 251l664
Seq #  *Modification Id* Act 
----------------------------+
20798  M02S12486.251l664 ---|          COMMAND (ECS MEMORY CHANGES.)
20799  M01S00955.251l664 +++|          COMMAND  (EXTENDED MEMORY CHANGES.)
Line S12487 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
20800  M02S12487.252l678 ---| EEC      SPACE  4,10
Line S12488 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
20801  M02S12488.252l678 ---|***              ALL ECS MEMORY COMMANDS MAY HAVE *+* OR *-* IN PLACE
Line S12489 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
20802  M02S12489.252l678 ---|*         OF THE *,*.  THESE FORMS WILL ADVANCE/DECREMENT THE ECS
Line S12490 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
20803  M02S12490.252l678 ---|*         MEMORY ADDRESS.
20804  M01S12491.dsd     +++| EEC      SPACE  4,10
20805  M01S12492.dsd     +++|***       EXXXXXXX,YYY - YYY.
20806  M01S12493.dsd     +++|*         EXXXXXXX,Y,ZZZZ.
20807  M01S12494.dsd     +++|*
20808  M01S12495.dsd     +++|*         ENTER YYY - YYY INTO EXTENDED MEMORY LOCATION XXXXXXX.
20809  M01S12496.dsd     +++|*         ENTER ZZZZ INTO BYTE Y OF EXTENDED MEMORY LOCATION XXXXXXX.
20810  M01S12497.dsd     +++|*         0 .LE. Y .LE. 4.
20811  M01S00205.252l678 +++|
20812  M01S00206.252l678 +++|
20813  M01S00207.252l678 +++|***       EXXXXXXX,DCCC-CCC
20814  M01S00208.252l678 +++|*
20815  M01S00209.252l678 +++|*         ENTER DISPLAY CODE CHARACTERS CCC-CCC IN EXTENDED MEMORY
20816  M01S00210.252l678 +++|*         LOCATION XXXXXXX.  ENTRY WILL BE LEFT JUSTIFIED.
20817  M01S00211.252l678 +++|
20818  M01S00212.252l678 +++|
20819  M01S00213.252l678 +++|***       ALL EXTENDED MEMORY COMMANDS MAY HAVE *+* OR *-* IN PLACE OF
20820  M01S00214.252l678 +++|*         THE *,*.  THIS FORM WILL ADVANCE/DECREMENT THE EM ADDRESS.
20821  M01S00215.252l678 +++|*
20822  M01S00216.252l678 +++|*         PROGRAMMING NOTE - THIS OVERLAY MAKES DIRECT REFERENCES TO
20823  M01S00217.252l678 +++|*           *EMRA* AND *EMFL* IN THE *M* DISPLAY LEFT-SCREEN BUFFER.
20824  M01S00218.252l678 +++|*           THEREFORE, THE CHECK FOR THE *M*-DISPLAY ON THE LEFT
20825  M01S00219.252l678 +++|*           SCREEN MUST NOT BE REMOVED.
20826  M01S12498.dsd     +++|
20827  M01S12499.dsd     +++|
20828  M01S12500.dsd     +++|          ENTRY  EEC
Line S12501 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
20829  M02S12501.252l678 ---|          RJM    ASR         ASSEMBLE ADDRESS AND READ ECS
Line S12502 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
20830  M02S12502.252l678 ---|          RJM    ASD         ASSEMBLE DIGITS
20831  M01S00220.252l678 +++|          RJM    ASR         ASSEMBLE ADDRESS AND READ EXTENDED MEMORY
20832  M01S00221.252l678 +++|          LDI    CA
20833  M01S00222.252l678 +++|          LMN    1RD
20834  M01S00223.252l678 +++|          NJN    EEC2        IF NOT DISPLAY CODE
20835  M01S00224.252l678 +++|          AOD    CA          SKIP *D*
20836  M01S00225.252l678 +++|          LDN    AB          SET BYTE ADDRESS
20837  M01S00226.252l678 +++|          STD    T1
20838  M01S00227.252l678 +++| EEC1     LDI    CA
20839  M01S00228.252l678 +++|          SHN    6
20840  M01S00229.252l678 +++|          STI    T1
20841  M01S00230.252l678 +++|          AOD    CA          ADVANCE CHARACTER
20842  M01S00231.252l678 +++|          LDI    CA
20843  M01S00232.252l678 +++|          RAI    T1
20844  M01S00233.252l678 +++|          AOD    CA          ADVANCE CHARACTER
20845  M01S00234.252l678 +++|          AOD    T1          ADVANCE BYTE
20846  M01S00235.252l678 +++|          LMN    AB+5
20847  M01S00236.252l678 +++|          ZJN    EEC3        IF 10 CHARACTERS PROCESSED
20848  M01S00237.252l678 +++|          UJN    EEC1        PROCESS NEXT CHARACTER
20849  M01S00238.252l678 +++|
20850  M01S00239.252l678 +++| EEC2     RJM    ASD         ASSEMBLE DIGITS
20851  M01S12503.dsd     +++|          SBN    1R.
Line S12504 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
20852  M02S12504.252l678 ---|          ZJN    EEC1        IF NOT BYTE COMMAND
20853  M01S00240.252l678 +++|          ZJN    EEC3        IF NOT BYTE COMMAND
20854  M01S12505.dsd     +++|          LDD    AB+4
20855  M01S12506.dsd     +++|          STD    T4          SAVE BYTE NUMBER
20856  M01S12507.dsd     +++|          AOD    CA
20857  M01S12508.dsd     +++|          RJM    ASD         ASSEMBLE ENTRY
20858  M01S12509.dsd     +++|          LDD    AB+4
20859  M01S12510.dsd     +++|          STD    T3          SAVE ENTRY
20860  M01S12511.dsd     +++|          LDD    MA          FETCH EXTENDED MEMORY WORD
20861  M01S12512.dsd     +++|          ADN    1
20862  M01S12513.dsd     +++|          CRD    AB
20863  M01S12514.dsd     +++|          LDD    T3
20864  M01S12515.dsd     +++|          STM    AB,T4       STORE BYTE
Line S12516 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
20865  M02S12516.252l678 ---| EEC1     LDD    MA          SET LIST ADDRESS
20866  M01S00241.252l678 +++| EEC3     LDD    MA          SET LIST ADDRESS
20867  M01S12517.dsd     +++|          STD    CM+2
20868  M01S12518.dsd     +++|          ADN    1           STORE WORD FOR EXTENDED MEMORY TRANSFER
20869  M01S12519.dsd     +++|          CWD    AB
20870  M01S12520.dsd     +++|          LDD    HN          SET NUMBER OF LIST ENTRIES = 1
20871  M01S12521.dsd     +++|          STD    CM+1
20872  M01S12522.dsd     +++|          LDD    T6
20873  M01S12523.dsd     +++|          STD    CM+3
20874  M01S12524.dsd     +++|          MONITOR ECSM       WRITE EXTENDED MEMORY WORD
20875  M01S12525.dsd     +++|*         UJN    ADV         ADVANCE ADDRESS
20876  M01S12526.dsd     +++| ADV      SPACE  4,10
20877  M01S12527.dsd     +++|**        ADV - ADVANCE/DECREMENT ADDRESS.
20878  M01S12528.dsd     +++|*
20879  M01S12529.dsd     +++|*         ENTRY  (SH) = CHARACTER POSITION OF ADDRESS.
20880  M01S12530.dsd     +++|*                (SH+1) = SEPARATOR ADDRESS.
20881  M01S12531.dsd     +++|*
20882  M01S12532.dsd     +++|*         USES   T1, T5.
20883  M01S12533.dsd     +++|*
20884  M01S12534.dsd     +++|*         CALLS C1D.
20885  M01S12535.dsd     +++|
20886  M01S12536.dsd     +++|
20887  M01S12537.dsd     +++| ADV      LDN    0           CHECK COMMAND LOGGING
20888  M01S12538.dsd     +++|          RJM    C1D
20889  M01S12539.dsd     +++|          LDD    SH+1
20890  M01S12540.dsd     +++|          STD    T5
20891  M01S12541.dsd     +++|          STD    T1
20892  M01S12542.dsd     +++|          LDI    T5          CHECK SEPARATOR
20893  M01S12543.dsd     +++|          SBN    1R+
20894  M01S12544.dsd     +++|          ZJN    ADV2        IF *+*
20895  M01S12545.dsd     +++|          SBN    1R--1R+
20896  M01S12546.dsd     +++|          ZJN    ADV6        IF *-*
20897  M01S12547.dsd     +++|          JMP    KBR         RETURN
20898  M01S12548.dsd     +++|
20899  M01S12549.dsd     +++| ADV1     AOI    T5          ADVANCE ENTRY
20900  M01S12550.dsd     +++|          SBN    1R8
20901  M01S12551.dsd     +++|          MJN    ADV4        IF NO OVERFLOW
20902  M01S12552.dsd     +++|          LDN    1R0         RESET DIGIT
20903  M01S12553.dsd     +++|          STI    T5
20904  M01S12554.dsd     +++| ADV2     SOD    T5
20905  M01S12555.dsd     +++|          ADC    -KBUF-1
20906  M01S12556.dsd     +++|          PJN    ADV1        IF NOT PAST START OF BUFFER
20907  M01S12557.dsd     +++|          LDN    KBUFL-2
20908  M01S12558.dsd     +++|          STD    T5
20909  M01S12559.dsd     +++| ADV3     LDM    KBUF+1,T5   MOVE CONTENTS OF BUFFER
20910  M01S12560.dsd     +++|          STM    KBUF+2,T5
20911  M01S12561.dsd     +++|          SOD    T5
20912  M01S12562.dsd     +++|          PJN    ADV3        IF BUFFER NOT MOVED
20913  M01S12563.dsd     +++|          LDN    1R1         SET FIRST CHARACTER OF ADDRESS
20914  M01S12564.dsd     +++|          STM    KBUF+1
20915  M01S12565.dsd     +++|          AOD    KI          INCREMENT KEYBOARD INDEX
20916  M01S12566.dsd     +++|          AOD    T1          SKIP PREVIOUS CHARACTER
20917  M01S12567.dsd     +++| ADV4     UJN    ADV7        CHECK NEXT CHARACTER
20918  M01S12568.dsd     +++|
20919  M01S12569.dsd     +++| ADV5     SOI    T5          DECREMENT ENTRY
20920  M01S12570.dsd     +++|          SBN    1R0
20921  M01S12571.dsd     +++|          PJN    ADV7        IF NO UNDERFLOW
20922  M01S12572.dsd     +++|          LDN    1R7         RESET DIGIT
20923  M01S12573.dsd     +++|          STI    T5
20924  M01S12574.dsd     +++| ADV6     SOD    T5
20925  M01S12575.dsd     +++|          ADC    -KBUF-1
20926  M01S12576.dsd     +++|          PJN    ADV5        IF NOT PAST START OF BUFFER
20927  M01S12577.dsd     +++| ADV7     AOD    T1          SKIP SEPARATOR
20928  M01S12578.dsd     +++|          LDI    T1          CHECK NEXT CHARACTER
20929  M01S12579.dsd     +++|          SBN    1RD
20930  M01S12580.dsd     +++|          NJN    ADV8        IF NOT *D*
20931  M01S12581.dsd     +++|          AOD    T1          SKIP *D*
20932  M01S12582.dsd     +++| ADV8     LDD    T1
20933  M01S12583.dsd     +++|          ADC    -KBUF
20934  M01S12584.dsd     +++|          LJM    KPC         RETURN TO PARTIAL CLEAR
20935  M01S12585.dsd     +++| ASR      SPACE  4,10
Line S12586 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
20936  M02S12586.252l678 ---|**        ASR - ASSEMBLE ADDRESS AND READ ECS.
20937  M01S00242.252l678 +++|**        ASR - ASSEMBLE ADDRESS AND READ EXTENDED MEMORY.
20938  M01S12587.dsd     +++|*
20939  M01S12588.dsd     +++|*         ENTRY  (CA) = CHARACTER ADDRESS.
20940  M01S12589.dsd     +++|*
20941  M01S12590.dsd     +++|*         EXIT   (CA) = ADVANCED CHARACTER ADDRESS.
20942  M01S12591.dsd     +++|*                (SH+1) = SEPARATOR ADDRESS
20943  M01S12592.dsd     +++|*                (T6) = *ECSM* WRITE LIST SUBFUNCTION CODE.
20944  M01S12593.dsd     +++|*                (MB) = LIST ENTRY FOR EXTENDED MEMORY TRANSFER.
20945  M01S12594.dsd     +++|*
20946  M01S12595.dsd     +++|*         USES   CA, SH+1, T6, AB - AB+4, CM - CM+4, SR - SR+4.
20947  M01S12596.dsd     +++|*
Line S12597 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
20948  M02S12597.252l678 ---|*         CALLS  ASD, GCP.
20949  M01S00243.252l678 +++|*         CALLS  ASD.
20950  M01S12598.dsd     +++|*
20951  M01S12599.dsd     +++|*         MACROS MONITOR.
20952  M01S12600.dsd     +++|
20953  M01S12601.dsd     +++|
20954  M01S12602.dsd     +++| ASR      SUBR
20955  M01S12603.dsd     +++|          LDD    LS          CHECK LEFT SCREEN DISPLAY
20956  M01S12604.dsd     +++|          LMN    1RM
Line S12605 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
20957  M02S12605.252l678 ---|          ZJN    ASR1        IF *M*
Line S12606 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
20958  M02S12606.252l678 ---|          JMP    KIE         *INCORRECT ENTRY*
20959  M01S00244.252l678 +++|          ZJN    ASR2        IF *M*
20960  M01S00245.252l678 +++| ASR1     JMP    KIE         *INCORRECT ENTRY*
20961  M01S12607.dsd     +++|
Line S12608 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
20962  M02S12608.252l678 ---| ASR1     LDC    /DSD/TJMM+1
Line S12609 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
20963  M02S12609.252l678 ---|          RJM    GCP         GET CPA ADDRESS
Line S12610 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
20964  M02S12610.252l678 ---|          ZJN    ASR2        IF NO JSN
Line S12611 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
20965  M02S12611.252l678 ---|          ADN    ECSW
Line S12612 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
20966  M02S12612.252l678 ---|          CRD    CM
Line S12613 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
20967  M02S12613.252l678 ---|          UJN    ASR3        CONTINUE
Line S12614 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
20968  M02S12614.252l678 ---|
Line S12615 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
20969  M02S12615.252l678 ---| ASR2     STD    CM+3        SET SYSTEM CP RA
Line S12616 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
20970  M02S12616.252l678 ---| ASR3     RJM    ASD         ASSEMBLE ADDRESS
Line S12617 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
20971  M02S12617.252l678 ---|          LDD    CM+3        ADD RAE TO EXTENDED MEMORY ADDRESS
Line S12618 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
20972  M02S12618.252l678 ---|          LPN    7
Line S12619 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
20973  M02S12619.252l678 ---|          SHN    11
Line S12620 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
20974  M02S12620.252l678 ---|          RAD    AB+4
Line S12621 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
20975  M02S12621.252l678 ---|          SHN    -14
Line S12622 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
20976  M02S12622.252l678 ---|          RAD    AB+3
Line S12623 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
20977  M02S12623.252l678 ---|          LDD    CM+3
Line S12624 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
20978  M02S12624.252l678 ---|          SHN    -3
Line S12625 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
20979  M02S12625.252l678 ---|          RAD    AB+3
Line S12626 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
20980  M02S12626.252l678 ---|          LDC    EDBP
20981  M01S00246.252l678 +++| ASR2     RJM    ASD         ASSEMBLE ADDRESS
20982  M01S00247.252l678 +++|          LDM    .FLFT+EMFL
20983  M01S00248.252l678 +++|          SBD    AB+3
20984  M01S00249.252l678 +++|          MJN    ASR1        IF ADDRESS .GT. FLE
20985  M01S00250.252l678 +++|          NJN    ASR3        IF LEGAL ADDRESS
20986  M01S00251.252l678 +++|          LDD    AB+4
20987  M01S00252.252l678 +++|          SBM    .FLFT+EMFL+1
20988  M01S00253.252l678 +++|          PJN    ASR1        IF ADDRESS .GE. FLE
20989  M01S00254.252l678 +++| ASR3     LDK    EDBP
20990  M01S12627.dsd     +++|          CRD    SR
20991  M01S12628.dsd     +++|          LDD    SR
Line S12629 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
20992  M02S12629.252l678 ---|          SHN    14
Line S12630 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
20993  M02S12630.252l678 ---|          LMD    SR+1
Line S12631 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
20994  M02S12631.252l678 ---|          ZJN    ASR4        IF EXTENDED MEMORY UNDEFINED
Line S12632 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
20995  M02S12632.252l678 ---|          LDN    MEFL        READ MACHINE EXTENDED MEMORY SIZE/1000
Line S12633 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
20996  M02S12633.252l678 ---|          CRD    SR
Line S12634 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
20997  M02S12634.252l678 ---|          LDD    CM+3
Line S12635 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
20998  M02S12635.252l678 ---|          ZJN    ASR3.1      IF ABSOLUTE EXTENDED MEMORY ADDRESS
Line S12636 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
20999  M02S12636.252l678 ---|          LDD    NC          VALIDATE USER EXTENDED MEMORY ADDRESS
Line S12637 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21000  M02S12637.252l678 ---|          SHN    7
Line S12638 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21001  M02S12638.252l678 ---|          ADN    ECSW
Line S12639 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21002  M02S12639.252l678 ---|          CRD    SR
Line S12640 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21003  M02S12640.252l678 ---|          LDD    SR+4
Line S12641 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21004  M02S12641.252l678 ---|          RAD    SR+3        LWA+1 OF USER EXTENDED MEMORY / 1000B
Line S12642 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21005  M02S12642.252l678 ---|          LDN    2           INDICATE READ FROM USER ECS
Line S12643 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21006  M02S12643.252l678 ---| ASR3.1   ADN    /CPS/PELS*10  SET *ECSM* READ LIST SUBFUNCTION
21007  M01S00255.252l678 +++|          ADD    SR+1
21008  M01S00256.252l678 +++|          ZJN    ASR1        IF EXTENDED MEMORY UNDEFINED
21009  M01S00257.252l678 +++|          LDM    .FLFT+EMRA
21010  M01S00258.252l678 +++|          ADM    .FLFT+EMRA+1
21011  M01S00259.252l678 +++|          ZJN    ASR4        IF ABSOLUTE EXTENDED MEMORY ADDRESS
21012  M01S00260.252l678 +++|          LDM    .FLFT+EMRA+1  ADD RAE TO EXTENDED MEMORY ADDRESS
21013  M01S00261.252l678 +++|          RAD    AB+4
21014  M01S00262.252l678 +++|          SHN    -14
21015  M01S00263.252l678 +++|          ADM    .FLFT+EMRA
21016  M01S00264.252l678 +++|          RAD    AB+3
21017  M01S00265.252l678 +++|          LDN    2           INDICATE READ FROM USER EM
21018  M01S00266.252l678 +++| ASR4     ADN    /CPS/PELS*10  SET *ECSM* READ LIST SUBFUNCTION
21019  M01S12644.dsd     +++|          SHN    6
21020  M01S12645.dsd     +++|          STD    CM+3
21021  M01S12646.dsd     +++|          ADC    400         SAVE *ECSM* WRITE LIST SUBFUNCTION
21022  M01S12647.dsd     +++|          STD    T6
Line S00956 Modification History
M01 (Added by) 251l664
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21023  M02S00956.252l678 ---|          LDD    SR+3
Line S00957 Modification History
M01 (Added by) 251l664
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21024  M02S00957.252l678 ---|          ZJN    ASR5        IF NO CPU COUPLER FOR EXTENDED MEMORY
Line S12648 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21025  M02S12648.252l678 ---|          LDM    EMMM
Line S12649 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21026  M02S12649.252l678 ---|          SHN    21-13
Line S12650 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21027  M02S12650.252l678 ---|          MJN    ASR5        IF IN ESM MODE
Line S12651 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21028  M02S12651.252l678 ---|          LDD    SR+3
Line S12652 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21029  M02S12652.252l678 ---|          SHN    -3          GET UPPER 12 BITS
Line S12653 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21030  M02S12653.252l678 ---|          SBD    AB+3
Line S12654 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21031  M02S12654.252l678 ---|          ZJN    ASR4.1      IF FURTHER TEST NEEDED
Line S12655 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21032  M02S12655.252l678 ---|          PJN    ASR5        IF LEGAL ADDRESS
Line S12656 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21033  M02S12656.252l678 ---| ASR4     JMP    KIE         *INCORRECT ENTRY*
Line S12657 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21034  M02S12657.252l678 ---|
Line S12658 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21035  M02S12658.252l678 ---| ASR4.1   LDD    SR+3
Line S12659 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21036  M02S12659.252l678 ---|          LPN    7
Line S12660 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21037  M02S12660.252l678 ---|          SHN    11          GET LOWER 12 BITS
Line S12661 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21038  M02S12661.252l678 ---|          SBD    AB+4
Line S12662 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21039  M02S12662.252l678 ---|          MJN    ASR4        IF INCORRECT ADDRESS
Line S12663 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21040  M02S12663.252l678 ---|          ZJN    ASR4        IF INCORRECT ADDRESS
Line S12664 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21041  M02S12664.252l678 ---| ASR5     LDD    HN          SET NUMBER OF WORDS TO READ = 1
21042  M01S00267.252l678 +++|          LDD    HN          SET NUMBER OF WORDS TO READ = 1
21043  M01S12665.dsd     +++|          STD    AB+1
21044  M01S12666.dsd     +++|          STD    CM+1        SET NUMBER OF LIST ENTRIES = 1
21045  M01S12667.dsd     +++|          LDD    MA          WRITE LIST ENTRY
21046  M01S12668.dsd     +++|          CWD    AB
21047  M01S12669.dsd     +++|          STD    CM+2        SET LIST ADDRESS
21048  M01S12670.dsd     +++|          MONITOR ECSM       READ EXTENDED MEMORY WORD
21049  M01S12671.dsd     +++|          LDD    MA          RESET LIST ENTRY FOR WRITE
21050  M01S12672.dsd     +++|          CWD    AB
21051  M01S12673.dsd     +++|          LDD    CA          SET SEPARATOR ADDRESS
21052  M01S12674.dsd     +++|          STD    SH+1
21053  M01S12675.dsd     +++|          AOD    CA          SKIP SEPERATOR
21054  M01S12676.dsd     +++|          LJM    ASRX        RETURN
Line S12677 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21055  M02S12677.252l678 ---| GCP      SPACE  4,10
Line S12678 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21056  M02S12678.252l678 ---|**        GCP - GET CPA ADDRESS.
Line S12679 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21057  M02S12679.252l678 ---|*
Line S12680 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21058  M02S12680.252l678 ---|*         ENTRY  (A) = JSN ADDRESS IN *TJAZ* TABLE.
Line S12681 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21059  M02S12681.252l678 ---|*
Line S12682 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21060  M02S12682.252l678 ---|*         EXIT   (A) = CPA ADDRESS OF JOB WITH DISPLAY-S JSN.
Line S12683 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21061  M02S12683.252l678 ---|*                    = 0, IF NO JSN ASSOCIATED WITH DISPLAY.
Line S12684 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21062  M02S12684.252l678 ---|*                (CN) = CP NUMBER.
Line S12685 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21063  M02S12685.252l678 ---|*                (CP) = CPA ADDRESS, IF JSN DISPLAY.
Line S12686 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21064  M02S12686.252l678 ---|*
Line S12687 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21065  M02S12687.252l678 ---|*         USES   CN, CP, T3, AB - AB+4, CM - CM+4.
Line S12688 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21066  M02S12688.252l678 ---|*
Line S12689 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21067  M02S12689.252l678 ---|*         CALLS  GEE, IEE.
Line S12690 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21068  M02S12690.252l678 ---|*
Line S12691 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21069  M02S12691.252l678 ---|*         MACROS SFA.
Line S12692 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21070  M02S12692.252l678 ---|
Line S12693 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21071  M02S12693.252l678 ---|
Line S12694 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21072  M02S12694.252l678 ---| GCP      SUBR               ENTRY/EXIT
Line S12695 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21073  M02S12695.252l678 ---|          STD    T3
Line S12696 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21074  M02S12696.252l678 ---|          LDI    T3
Line S12697 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21075  M02S12697.252l678 ---|          ZJN    GCPX        IF JSN NOT PRESENT
Line S12698 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21076  M02S12698.252l678 ---|          LDD    T3          SET FWA OF JSN TO FIND
Line S12699 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21077  M02S12699.252l678 ---|          RJM    GEE         SEARCH EJT
Line S12700 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21078  M02S12700.252l678 ---|          ZJN    GCP2        IF EJT ENTRY FOUND
Line S12701 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21079  M02S12701.252l678 ---| GCP1     JMP    KIE         *INCORRECT ENTRY*
Line S12702 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21080  M02S12702.252l678 ---|
Line S12703 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21081  M02S12703.252l678 ---| GCP2     LDD    T3          INTERLOCK EJT ENTRY
Line S12704 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21082  M02S12704.252l678 ---|          RJM    IEE
Line S12705 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21083  M02S12705.252l678 ---|          MJN    GCP1        IF NOT INTERLOCKED
Line S12706 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21084  M02S12706.252l678 ---|          SFA    EJT,EI      CALCULATE EJT ENTRY ADDRESS
Line S12707 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21085  M02S12707.252l678 ---|          ERRNZ  JSNE        NOT FIRST WORD OF EJT ENTRY
Line S12708 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21086  M02S12708.252l678 ---|          CRD    CM          GET JOB STATUS
Line S12709 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21087  M02S12709.252l678 ---|          ADN    SCHE        GET CP NUMBER
Line S12710 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21088  M02S12710.252l678 ---|          CRD    AB
Line S12711 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21089  M02S12711.252l678 ---|          LDD    CM+4
Line S12712 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21090  M02S12712.252l678 ---|          LPN    76
Line S12713 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21091  M02S12713.252l678 ---|          LMN    EXJS*2
Line S12714 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21092  M02S12714.252l678 ---|          NJN    GCP1        IF JOB NOT AT CP
Line S12715 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21093  M02S12715.252l678 ---|          LDD    AB+3        SET CPA ADDRESS
Line S12716 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21094  M02S12716.252l678 ---|          LPN    37
Line S12717 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21095  M02S12717.252l678 ---|          STD    CN
Line S12718 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21096  M02S12718.252l678 ---|          SHN    7
Line S12719 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21097  M02S12719.252l678 ---|          STD    CP
Line S12720 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21098  M02S12720.252l678 ---|          UJN    GCPX        RETURN
Line S12721 Modification History
M01 (Added by) dsd
M02 (Updated by) 251l664
M03 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21099  M03S12721.252l678 ---|          COMMAND  (ECS MEMORY CHANGES.)
Line S00958 Modification History
M01 (Added by) 251l664
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21100  M02S00958.252l678 ---|          COMMAND  (EXTENDED MEMORY CHANGES - DISPLAY CODE.)
Line S12722 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21101  M02S12722.252l678 ---| EED      SPACE  4,10
Line S12723 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21102  M02S12723.252l678 ---|***       EXXXXXXX,DCCC-CCC
Line S12724 Modification History
M01 (Added by) dsd
M02 (Updated by) 242l642
M03 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21103  M03S12724.252l678 ---|
Line S00671 Modification History
M01 (Added by) 242l642
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21104  M02S00671.252l678 ---|*
Line S12725 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21105  M02S12725.252l678 ---|*         ENTER DISPLAY CODE CHARACTERS CCC-CCC IN ECS MEMORY LOCATION
Line S12726 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21106  M02S12726.252l678 ---|*         XXXXXXX.  ENTRY WILL BE LEFT JUSTIFIED.
Line S12727 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21107  M02S12727.252l678 ---|
Line S12728 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21108  M02S12728.252l678 ---|
Line S12729 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21109  M02S12729.252l678 ---|          ENTRY  EED
Line S12730 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21110  M02S12730.252l678 ---|          RJM    ASR         ASSEMBLE ADDRESS
Line S12731 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21111  M02S12731.252l678 ---|          AOD    CA          SKIP *D*
Line S12732 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21112  M02S12732.252l678 ---|          LDN    AB          SET BYTE ADDRESS
Line S12733 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21113  M02S12733.252l678 ---|          STD    T1
Line S12734 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21114  M02S12734.252l678 ---| EED1     LDI    CA
Line S12735 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21115  M02S12735.252l678 ---|          SHN    6
Line S12736 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21116  M02S12736.252l678 ---|          STI    T1
Line S12737 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21117  M02S12737.252l678 ---|          AOD    CA          ADVANCE CHARACTER
Line S12738 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21118  M02S12738.252l678 ---|          LDI    CA
Line S12739 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21119  M02S12739.252l678 ---|          RAI    T1
Line S12740 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21120  M02S12740.252l678 ---|          AOD    CA          ADVANCE CHARACTER
Line S12741 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21121  M02S12741.252l678 ---|          AOD    T1          ADVANCE BYTE
Line S12742 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21122  M02S12742.252l678 ---|          LMN    AB+5
Line S12743 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21123  M02S12743.252l678 ---|          NJN    EED1        IF NOT 10 CHARACTERS
Line S12744 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21124  M02S12744.252l678 ---|          LDD    MA          SET LIST ADDRESS
Line S12745 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21125  M02S12745.252l678 ---|          STD    CM+2
Line S12746 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21126  M02S12746.252l678 ---|          ADN    1           STORE WORD FOR EXTENDED MEMORY TRANSFER
Line S12747 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21127  M02S12747.252l678 ---|          CWD    AB
Line S12748 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21128  M02S12748.252l678 ---|          LDD    HN          SET NUMBER OF LIST ENTRIES = 1
Line S12749 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21129  M02S12749.252l678 ---|          STD    CM+1
Line S12750 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21130  M02S12750.252l678 ---|          LDD    T6
Line S12751 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21131  M02S12751.252l678 ---|          STD    CM+3
Line S12752 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21132  M02S12752.252l678 ---|          MONITOR ECSM       WRITE EXTENDED MEMORY WORD
Line S12753 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21133  M02S12753.252l678 ---|*         UJN    ADV         ADVANCE ADDRESS
Line S12754 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21134  M02S12754.252l678 ---| ADV      SPACE  4,10
Line S12755 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21135  M02S12755.252l678 ---|**        ADV - ADVANCE/DECREMENT ADDRESS.
Line S12756 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21136  M02S12756.252l678 ---|*
Line S12757 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21137  M02S12757.252l678 ---|*         ENTRY  (SH) = CHARACTER POSITION OF ADDRESS.
Line S12758 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21138  M02S12758.252l678 ---|*                (SH+1) = SEPARATOR ADDRESS.
Line S12759 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21139  M02S12759.252l678 ---|*
Line S12760 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21140  M02S12760.252l678 ---|*         USES   T1, T5.
Line S12761 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21141  M02S12761.252l678 ---|*
Line S12762 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21142  M02S12762.252l678 ---|*         CALLS C1D.
Line S12763 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21143  M02S12763.252l678 ---|
Line S12764 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21144  M02S12764.252l678 ---|
Line S12765 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21145  M02S12765.252l678 ---| ADV      LDN    0           CHECK COMMAND LOGGING
Line S12766 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21146  M02S12766.252l678 ---|          RJM    C1D
Line S12767 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21147  M02S12767.252l678 ---|          LDD    SH+1
Line S12768 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21148  M02S12768.252l678 ---|          STD    T5
Line S12769 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21149  M02S12769.252l678 ---|          STD    T1
Line S12770 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21150  M02S12770.252l678 ---|          LDI    T5          CHECK SEPARATOR
Line S12771 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21151  M02S12771.252l678 ---|          SBN    1R+
Line S12772 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21152  M02S12772.252l678 ---|          ZJN    ADV2        IF *+*
Line S12773 Modification History
M01 (Added by) dsd
M02 (Updated by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
21153  M02S12773.252l678 ---|          SBN    1R--1R+
Proceed to Part 19
cdc/nos2.source/opl.opl871/deck/dsd.018.txt ยท Last modified: by 127.0.0.1