User Tools

Site Tools


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

Deck SET Part 011

79 Modifications

Listing Sections

Source

Seq #  *Modification Id* Act 
----------------------------+
13475  M01S09349.set     +++|          STI    ES
13476  M01S09350.set     +++| RST4     LDI    ES          RESET *ON* STATUS
13477  M01S09351.set     +++|          SCN    3
13478  M01S09352.set     +++|          STI    ES
13479  M01S09353.set     +++|          LDM    EBUT+10     CLEAR ACCESS LEVELS
13480  M01S09354.set     +++|          SCN    77
13481  M01S09355.set     +++|          STM    EBUT+10
13482  M01S09356.set     +++|          RJM    EEB         UPDATE EQUIPMENT ENTRY
13483  M01S09357.set     +++|          LDI    KA
13484  M01S09358.set     +++|          LMN    1R.
13485  M01S09359.set     +++|          ZJN    RST5        IF END OF LIST
13486  M01S09360.set     +++|          LJM    RST1        PROCESS NEXT ENTRY
13487  M01S09361.set     +++|
13488  M01S09362.set     +++| RST5     JMP    KBR         RETURN
13489  M01S09363.set     +++| CCN      SPACE  4,10
13490  M01S09364.set     +++|**        CCN - CHECK CHANNEL NUMBERS.
13491  M01S09365.set     +++|*
13492  M01S09366.set     +++|*                (EBUT - EBUT+4) = FIRST UNIT EST ENTRY.
13493  M01S09367.set     +++|*                (CN+1 - CN+2) = CONTROL MODULE CHANNEL(S).
13494  M01S09368.set     +++|*
13495  M01S09369.set     +++|*         ERROR  TO *DCM*.
13496  M01S09370.set     +++|*
13497  M01S09371.set     +++|*         USES   T7, CN+1.
13498  M01S09372.set     +++|
13499  M01S09373.set     +++|
13500  M01S09374.set     +++| CCN2     LMD    CN+1        REVERSE CHANNELS
13501  M01S09375.set     +++|          LMD    CN+2
13502  M01S09376.set     +++|          NJN    CCN1        IF NO CHANNEL MATCH
13503  M01S09377.set     +++|          LDD    CN+1
13504  M01S09378.set     +++|          LMM    EBUT+2
13505  M01S09379.set     +++|          NJN    CCN1        IF NO CHANNEL MATCH
13506  M01S09380.set     +++|
13507  M01S09381.set     +++| CCN      SUBR               ENTRY/EXIT
13508  M01S09382.set     +++|          LDM    EBUT+1
13509  M01S09383.set     +++|          LMD    CN+1
13510  M01S09384.set     +++|          NJN    CCN2        IF NO CHANNEL MATCH
13511  M01S09385.set     +++|          LDM    EBUT+2
13512  M01S09386.set     +++|          LMD    CN+2
13513  M01S09387.set     +++|          ZJN    CCNX        IF THE CHANNELS MATCH
13514  M01S09388.set     +++| CCN1     LDC    CCNA
13515  M01S09389.set     +++|          JMP    DCM         DISPLAY CONVERTED MESSAGE
13516  M01S09390.set     +++|
13517  M01S09391.set     +++|
13518  M01S09392.set     +++| CCNA     DATA   C*EQXXX UNITS SPAN DIFFERENT CHANNELS*
13519  M01S09393.set     +++| DDV      SPACE  4,10
13520  M01S09394.set     +++|**        DDV - DOWN ISMD DEVICE.
13521  M01S09395.set     +++|*
13522  M01S09396.set     +++|*         ENTRY  (EBUT) = EBUF EQUIPMENT ENTRY.
13523  M01S09397.set     +++|*
13524  M01S09398.set     +++|*         EXIT   DEVICE DOWN AND OFF IF VALID FOR THIS DEVICE.
13525  M01S09399.set     +++|*
13526  M01S09400.set     +++|*         ERROR  TO *DCM*.
13527  M01S09401.set     +++|*
13528  M01S09402.set     +++|*         CALLS  CDD, EEB.
13529  M01S09403.set     +++|
13530  M01S09404.set     +++|
13531  M01S09405.set     +++| DDV2     SHN    11-10
13532  M01S09406.set     +++|          PJN    DDV1        IF NOT REMOVABLE
13533  M01S09407.set     +++|          LDM    EBUT+4
13534  M01S09408.set     +++|          SCN    17
13535  M01S09409.set     +++|          NJN    DDV1        IF INITIALIZATION REQUESTED
13536  M01S09410.set     +++|          RJM    CDD
13537  M01S09411.set     +++|          ZJN    DDV1        IF DEADSTART DEVICE
13538  M01S09412.set     +++|          LDI    ES
13539  M01S09413.set     +++|          SCN    3
13540  M01S09414.set     +++|          LMN    3           SET DEVICE *OFF* AND *DOWN*
13541  M01S09415.set     +++|          STI    ES
13542  M01S09416.set     +++|          RJM    EEB         ENTER EQUIPMENT ENTRY
13543  M01S09417.set     +++|
13544  M01S09418.set     +++| DDV      SUBR               ENTRY/EXIT
13545  M01S09419.set     +++|          LDI    ES
13546  M01S09420.set     +++|          SHN    21-11
13547  M01S09421.set     +++|          PJN    DDV2        IF NOT SHARED
13548  M01S09422.set     +++| DDV1     LDC    DDVA
13549  M01S09423.set     +++|          JMP    DCM         DISPLAY CONVERTED MESSAGE
13550  M01S09424.set     +++|
13551  M01S09425.set     +++|
13552  M01S09426.set     +++| DDVA     DATA   C*EQXXX CAN NOT BE DOWNED*
Line S09427 Modification History
M01 (Added by) set
M02 (Updated by) ns2795
Seq #  *Modification Id* Act 
----------------------------+
13553  M02S09427.ns2795  ---| FNL      SPACE  4,10
Line S09428 Modification History
M01 (Added by) set
M02 (Updated by) ns2795
Seq #  *Modification Id* Act 
----------------------------+
13554  M02S09428.ns2795  ---|**        FNL - FORCE CMTS CONTROLWARE NO LOAD.
Line S09429 Modification History
M01 (Added by) set
M02 (Updated by) ns2795
Seq #  *Modification Id* Act 
----------------------------+
13555  M02S09429.ns2795  ---|*
Line S09430 Modification History
M01 (Added by) set
M02 (Updated by) ns2795
Seq #  *Modification Id* Act 
----------------------------+
13556  M02S09430.ns2795  ---|*         EXIT   CHANNEL CONTROLWARE TABLE UPDATED.
Line S09431 Modification History
M01 (Added by) set
M02 (Updated by) ns2795
Seq #  *Modification Id* Act 
----------------------------+
13557  M02S09431.ns2795  ---|*
Line S09432 Modification History
M01 (Added by) set
M02 (Updated by) ns2795
Seq #  *Modification Id* Act 
----------------------------+
13558  M02S09432.ns2795  ---|*         USES   T0, T4.
Line S09433 Modification History
M01 (Added by) set
M02 (Updated by) ns2795
Seq #  *Modification Id* Act 
----------------------------+
13559  M02S09433.ns2795  ---|*
Line S09434 Modification History
M01 (Added by) set
M02 (Updated by) ns2795
Seq #  *Modification Id* Act 
----------------------------+
13560  M02S09434.ns2795  ---|*         CALLS  SFE.
Line S09435 Modification History
M01 (Added by) set
M02 (Updated by) ns2795
Seq #  *Modification Id* Act 
----------------------------+
13561  M02S09435.ns2795  ---|
Line S09436 Modification History
M01 (Added by) set
M02 (Updated by) ns2795
Seq #  *Modification Id* Act 
----------------------------+
13562  M02S09436.ns2795  ---|
Line S09437 Modification History
M01 (Added by) set
M02 (Updated by) ns2795
Seq #  *Modification Id* Act 
----------------------------+
13563  M02S09437.ns2795  ---| FNL      SUBR               ENTRY/EXIT
Line S09438 Modification History
M01 (Added by) set
M02 (Updated by) ns2795
Seq #  *Modification Id* Act 
----------------------------+
13564  M02S09438.ns2795  ---|          LCN    0
Line S09439 Modification History
M01 (Added by) set
M02 (Updated by) ns2795
Seq #  *Modification Id* Act 
----------------------------+
13565  M02S09439.ns2795  ---|          STD    T4
Line S09440 Modification History
M01 (Added by) set
M02 (Updated by) ns2795
Seq #  *Modification Id* Act 
----------------------------+
13566  M02S09440.ns2795  ---| FNL1     AOD    T4
Line S09441 Modification History
M01 (Added by) set
M02 (Updated by) ns2795
Seq #  *Modification Id* Act 
----------------------------+
13567  M02S09441.ns2795  ---|          LDM    TCMD,T4
Line S09442 Modification History
M01 (Added by) set
M02 (Updated by) ns2795
Seq #  *Modification Id* Act 
----------------------------+
13568  M02S09442.ns2795  ---|          ZJN    FNLX        IF END OF TABLE
Line S09443 Modification History
M01 (Added by) set
M02 (Updated by) ns2795
Seq #  *Modification Id* Act 
----------------------------+
13569  M02S09443.ns2795  ---|          LMC    1S17        SET INITIAL CALL
Line S09444 Modification History
M01 (Added by) set
M02 (Updated by) ns2795
Seq #  *Modification Id* Act 
----------------------------+
13570  M02S09444.ns2795  ---| FNL2     RJM    SFE         SEARCH FOR EQUIPMENT
Line S09445 Modification History
M01 (Added by) set
M02 (Updated by) ns2795
Seq #  *Modification Id* Act 
----------------------------+
13571  M02S09445.ns2795  ---|          MJN    FNL1        IF DEVICE NOT FOUND
Line S09446 Modification History
M01 (Added by) set
M02 (Updated by) ns2795
Seq #  *Modification Id* Act 
----------------------------+
13572  M02S09446.ns2795  ---|          LDI    ES          CHECK FOR CMTS EQUIPMENT
Line S09447 Modification History
M01 (Added by) set
M02 (Updated by) ns2795
Seq #  *Modification Id* Act 
----------------------------+
13573  M02S09447.ns2795  ---|          LPN    4
Line S09448 Modification History
M01 (Added by) set
M02 (Updated by) ns2795
Seq #  *Modification Id* Act 
----------------------------+
13574  M02S09448.ns2795  ---|          ZJN    FNL2        IF NOT CMTS EQUIPMENT
Line S09449 Modification History
M01 (Added by) set
M02 (Updated by) ns2795
Seq #  *Modification Id* Act 
----------------------------+
13575  M02S09449.ns2795  ---|          LDM    EBUT+1
Line S09450 Modification History
M01 (Added by) set
M02 (Updated by) ns2795
Seq #  *Modification Id* Act 
----------------------------+
13576  M02S09450.ns2795  ---| FNL3     SHN    14
Line S09451 Modification History
M01 (Added by) set
M02 (Updated by) ns2795
Seq #  *Modification Id* Act 
----------------------------+
13577  M02S09451.ns2795  ---|          STD    T0
Line S09452 Modification History
M01 (Added by) set
M02 (Updated by) ns2795
Seq #  *Modification Id* Act 
----------------------------+
13578  M02S09452.ns2795  ---|          SHN    -14
Line S09453 Modification History
M01 (Added by) set
M02 (Updated by) ns2795
Seq #  *Modification Id* Act 
----------------------------+
13579  M02S09453.ns2795  ---|          STD    T1
Line S09454 Modification History
M01 (Added by) set
M02 (Updated by) ns2795
Seq #  *Modification Id* Act 
----------------------------+
13580  M02S09454.ns2795  ---|          LDN    CNCT        SET NO LOAD OF CCC/698 CONTROLWARE
Line S09455 Modification History
M01 (Added by) set
M02 (Updated by) ns2795
Seq #  *Modification Id* Act 
----------------------------+
13581  M02S09455.ns2795  ---|          STM    TCHS,T1
Line S09456 Modification History
M01 (Added by) set
M02 (Updated by) ns2795
Seq #  *Modification Id* Act 
----------------------------+
13582  M02S09456.ns2795  ---|          LDD    T0
Line S09457 Modification History
M01 (Added by) set
M02 (Updated by) ns2795
Seq #  *Modification Id* Act 
----------------------------+
13583  M02S09457.ns2795  ---|          NJN    FNL3        IF SECOND CHANNEL
Line S09458 Modification History
M01 (Added by) set
M02 (Updated by) ns2795
Seq #  *Modification Id* Act 
----------------------------+
13584  M02S09458.ns2795  ---|          UJN    FNL2        SEARCH FOR NEXT DEVICE
Line S09459 Modification History
M01 (Added by) set
M02 (Updated by) ns2795
Seq #  *Modification Id* Act 
----------------------------+
13585  M02S09459.ns2795  ---|
Line S09460 Modification History
M01 (Added by) set
M02 (Updated by) ns2795
Seq #  *Modification Id* Act 
----------------------------+
13586  M02S09460.ns2795  ---|
Line S09461 Modification History
M01 (Added by) set
M02 (Updated by) ns2795
Seq #  *Modification Id* Act 
----------------------------+
13587  M02S09461.ns2795  ---|**        TCMD - TABLE OF CMTS DEVICE TYPES.
Line S09462 Modification History
M01 (Added by) set
M02 (Updated by) ns2795
Seq #  *Modification Id* Act 
----------------------------+
13588  M02S09462.ns2795  ---|*
Line S09463 Modification History
M01 (Added by) set
M02 (Updated by) ns2795
Seq #  *Modification Id* Act 
----------------------------+
13589  M02S09463.ns2795  ---|*T        12/ DEVICE MNEMONIC
Figure

011 DEVICE MNEMONIC


Line S09464 Modification History
M01 (Added by) set
M02 (Updated by) ns2795
Seq #  *Modification Id* Act 
----------------------------+
13590  M02S09464.ns2795  ---|
Line S09465 Modification History
M01 (Added by) set
M02 (Updated by) ns2795
Seq #  *Modification Id* Act 
----------------------------+
13591  M02S09465.ns2795  ---|
Line S09466 Modification History
M01 (Added by) set
M02 (Updated by) ns2795
Seq #  *Modification Id* Act 
----------------------------+
13592  M02S09466.ns2795  ---| TCMD     CON    2RMT
Line S09467 Modification History
M01 (Added by) set
M02 (Updated by) ns2795
Seq #  *Modification Id* Act 
----------------------------+
13593  M02S09467.ns2795  ---|          CON    2RNT
Line S09468 Modification History
M01 (Added by) set
M02 (Updated by) ns2795
Seq #  *Modification Id* Act 
----------------------------+
13594  M02S09468.ns2795  ---|          CON    0
13595  M01S09469.set     +++| VCD      SPACE  4,30
13596  M01S09470.set     +++|**        VCD - VALIDATE *CM* AND ISMD ENTRIES.
13597  M01S09471.set     +++|*
13598  M01S09472.set     +++|*         ENTRY  (ISPF) .LT. 0, IF NOT CYBER 810/815/825/830.
13599  M01S09473.set     +++|*
13600  M01S09474.set     +++|*         EXIT   (ISPF) = COUNT OF CONTROL MODULES DEFINED.
13601  M01S09475.set     +++|*                *CM* AND ISMD TYPE ENTRIES VALIDATED.
13602  M01S09476.set     +++|*                IF A *CM* DEVICE IS DEFINED AS DOWN, ALL CORRESPONDING
13603  M01S09477.set     +++|*                     ISMD DEVICES ARE ALSO DOWNED.
13604  M01S09478.set     +++|*
13605  M01S09479.set     +++|*         ERROR  TO *DCM* IF ANY OF THE FOLLOWING IS TRUE.
13606  M01S09480.set     +++|*
13607  M01S09481.set     +++|*                     1) NO *CM* ENTRY EXISTS FOR AN ISMD DEVICE.
13608  M01S09482.set     +++|*                     2) NO ISMD ENTRY EXISTS FOR A *CM* DEVICE.
13609  M01S09483.set     +++|*                     3) A MULTI-UNIT ISMD DEVICE SPANS *CM* DEVICES ON
13610  M01S09484.set     +++|*                             DIFFERENT CHANNEL(S).
13611  M01S09485.set     +++|*                     4) UNIT NUMBERS FOR A GIVEN *CM* ARE NOT UNIQUE.
13612  M01S09486.set     +++|*                     5) A *CM* DEVICE IS DEFINED AS DOWN BUT A
13613  M01S09487.set     +++|*                             CORRESPONDING ISMD DEVICE CAN NOT BE
13614  M01S09488.set     +++|*                             DOWNED.
13615  M01S09489.set     +++|*                     6) AN ISMD DEVICE IS DEFINED WITH AN INCOMPATIBLE
13616  M01S09490.set     +++|*                             CONTROL MODULE.
13617  M01S09491.set     +++|*
13618  M01S09492.set     +++|*         USES   T2, T5.
13619  M01S09493.set     +++|*
13620  M01S09494.set     +++|*         CALLS  SID, VUN.
13621  M01S09495.set     +++|
13622  M01S09496.set     +++|
13623  M01S09497.set     +++| VCD      SUBR               ENTRY/EXIT
13624  M01S09498.set     +++|          LDM    ISPF
13625  M01S09499.set     +++|          SHN    0-13
13626  M01S09500.set     +++|          NJN    VCDX        IF NOT CYBER 810/815/825/830
13627  M01S09501.set     +++|          STM    ISPF        CLEAR ISMD PRESENT FLAG
13628  M01S09502.set     +++|          CRM    TUNB,ON     CLEAR TABLE OF UNIT NUMBERS
13629  M01S09503.set     +++|          CRM    TUNB+3,ON
13630  M01S09504.set     +++|          LDC    ATD3        PRESET ERROR RETURN ADDRESS
13631  M01S09505.set     +++|          STM    AKL
13632  M01S09506.set     +++|          LCN    0           SEARCH FOR ISMD DEVICE
13633  M01S09507.set     +++| VCD1     RJM    SID
13634  M01S09508.set     +++|          MJN    VCD3        IF NO MORE FOUND
13635  M01S09509.set     +++|          LPN    7           SAVE NUMBER OF UNITS IN THIS DEVICE
13636  M01S09510.set     +++|          ADN    1
13637  M01S09511.set     +++|          STD    T5
13638  M01S09512.set     +++|          LDC    TDDB+DVUN+3 INITIALIZE UNIT LIST OFFSET
13639  M01S09513.set     +++|          STD    T2
13640  M01S09514.set     +++| VCD2     LDI    T2          VALIDATE LOWER UNIT NUMBER
13641  M01S09515.set     +++|          LPN    77
13642  M01S09516.set     +++|          RJM    VUN
13643  M01S09517.set     +++|          ZJN    VCD1        IF END OF UNIT LIST FOR THIS DEVICE
13644  M01S09518.set     +++|          LDI    T2          VALIDATE UPPER UNIT NUMBER
13645  M01S09519.set     +++|          SHN    -6
13646  M01S09520.set     +++|          RJM    VUN
13647  M01S09521.set     +++|          ZJN    VCD1        IF END OF UNIT LIST FOR THIS DEVICE
13648  M01S09522.set     +++|          SOD    T2
13649  M01S09523.set     +++|          UJN    VCD2        PROCESS NEXT UNIT
13650  M01S09524.set     +++|
13651  M01S09525.set     +++| VCD3     LDN    8D          CHECK *CM* ENTRIES
13652  M01S09526.set     +++|          STD    T2
13653  M01S09527.set     +++| VCD4     SOD    T2
13654  M01S09528.set     +++|          MJP    VCDX        IF ALL *CM* ENTRIES CHECKED
13655  M01S09529.set     +++|          LDM    TENB,T2
13656  M01S09530.set     +++|          ZJN    VCD4        IF THIS *CM* NOT DEFINED
13657  M01S09531.set     +++|          STD    EQ
13658  M01S09532.set     +++|          AOM    ISPF
13659  M01S09533.set     +++|          LDM    TUNB,T2
13660  M01S09534.set     +++|          NJN    VCD4        IF AT LEAST ONE DRIVE DEFINED ON THIS *CM*
13661  M01S09535.set     +++|          LDC    VCDA
13662  M01S09536.set     +++|          JMP    DCM         DISPLAY CONVERTED MESSAGE
13663  M01S09537.set     +++|
13664  M01S09538.set     +++| VCDA     DATA   C*EQXXX HAS NO DRIVE DEFINED*
13665  M01S09539.set     +++| VUN      SPACE  4,20
13666  M01S09540.set     +++|**        VUN - VALIDATE UNIT NUMBER.
13667  M01S09541.set     +++|*
13668  M01S09542.set     +++|*         ENTRY  (A) = UNIT NUMBER.
13669  M01S09543.set     +++|*                (T4) = *TFSD* INDEX SET BY *SID*.
13670  M01S09544.set     +++|*                (T5) = NUMBER OF UNITS LEFT TO PROCESS.
13671  M01S09545.set     +++|*
13672  M01S09546.set     +++|*         EXIT   (T5) DECREMENTED.
13673  M01S09547.set     +++|*                (A) = (T5).
13674  M01S09548.set     +++|*                CORRESPONDING *TUNB* ENTRY UPDATED.
13675  M01S09549.set     +++|*                ISMD DEVICE DOWNED IF *CM* IS DOWN.
13676  M01S09550.set     +++|*
13677  M01S09551.set     +++|*         ERROR  TO *DCM*.
13678  M01S09552.set     +++|*
13679  M01S09553.set     +++|*         USES   T1, T6, CM - CM+4, CN - CN+4.
13680  M01S09554.set     +++|*
13681  M01S09555.set     +++|*         CALLS  CCN, DDV.
13682  M01S09556.set     +++|
13683  M01S09557.set     +++|
13684  M01S09558.set     +++| VUN3     RAM    TUNB,T6
13685  M01S09559.set     +++|          RJM    CCN         ENSURE CHANNELS OF ALL UNITS MATCH
13686  M01S09560.set     +++|          LDD    CN
13687  M01S09561.set     +++|          LPN    3
13688  M01S09562.set     +++|          LMN    3
13689  M01S09563.set     +++|          NJN    VUN4        IF NOT *DOWN*
13690  M01S09564.set     +++|          RJM    DDV
13691  M01S09565.set     +++| VUN4     SOD    T5          DECREMENT UNIT COUNT
13692  M01S09566.set     +++|
13693  M01S09567.set     +++| VUN      SUBR               ENTRY/EXIT
13694  M01S09568.set     +++|          SHN    21-2        SAVE *CM* NUMBER
13695  M01S09569.set     +++|          STD    T6
13696  M01S09570.set     +++|          SHN    2-21        SAVE DRIVE NUMBER
13697  M01S09571.set     +++|          STD    T1
13698  M01S09572.set     +++|          LDM    TENB,T6
13699  M01S09573.set     +++|          ZJN    VUN1        IF NO *CM* FOR THIS UNIT EXISTS
13700  M01S09574.set     +++|          SHN    22-5
13701  M01S09575.set     +++|          ADD    EB
13702  M01S09576.set     +++|          SHN    6
13703  M01S09577.set     +++|          CRD    CN          FETCH EST ENTRY FOR CONTROL MODULE
13704  M01S09578.set     +++|          ADN    EQAE
13705  M01S09579.set     +++|          CRD    CM
13706  M01S09580.set     +++|          LDD    CM+2
13707  M01S09581.set     +++|          LPN    37
13708  M01S09582.set     +++|          LMM    VUNB,T4
13709  M01S09583.set     +++|          ZJN    VUN2        IF *CM* TYPE CORRECT FOR THIS UNIT
13710  M01S09584.set     +++| VUN1     LDC    VUNC
13711  M01S09585.set     +++|          JMP    DCM         DISPLAY CONVERTED MESSAGE
13712  M01S09586.set     +++|
13713  M01S09587.set     +++| VUN2     LDM    TUNB,T6     VERIFY THAT UNIT NUMBER IS UNIQUE
13714  M01S09588.set     +++|          LMM    VUNA,T1
13715  M01S09589.set     +++|          SBM    TUNB,T6
13716  M01S09590.set     +++|          PJP    VUN3        IF UNIQUE UNIT NUMBER FOR THIS *CM*
13717  M01S09591.set     +++|          LDM    TENB,T6     GET *CM* EST ORDINAL FOR MESSAGE
13718  M01S09592.set     +++|          STD    EQ
13719  M01S09593.set     +++|          LDC    VUND
13720  M01S09594.set     +++|          JMP    DCM         DISPLAY CONVERTED MESSAGE
13721  M01S09595.set     +++|
13722  M01S09596.set     +++| VUNA     BSS    0           TABLE OF DRIVE NUMBER MASKS
13723  M01S09597.set     +++|          CON    1
13724  M01S09598.set     +++|          CON    2
13725  M01S09599.set     +++|          CON    4
13726  M01S09600.set     +++|          CON    10
13727  M01S09601.set     +++|
13728  M01S09602.set     +++| VUNB     BSS    0
13729  M01S09603.set     +++|          CON    CMCW
13730  M01S09604.set     +++|          CON    C2CW
13731  M01S09605.set     +++|
13732  M01S09606.set     +++| VUNC     DATA   C/EQXXX UNIT DEFINED ON WRONG *CM*/
13733  M01S09607.set     +++| VUND     DATA   C/EQXXX HAS DUPLICATE UNIT NUMBER/
13734  M01S09608.set     +++|
13735  M01S09609.set     +++|
13736  M01S09610.set     +++|          QUAL
13737  M01S09611.set     +++| VAL$     EQU    1
13738  M01S09612.set     +++| SCH$     EQU    1
13739  M01S09613.set     +++|          QUAL   *
13740  M01S09614.set     +++|*CALL     COMSMLS
13741  M01S09615.set     +++|*CALL     COMPVLC
Line S09616 Modification History
M01 (Added by) set
M02 (Updated by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
13742  M02S09616.274l797 ---|
Line S09617 Modification History
M01 (Added by) set
M02 (Updated by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
13743  M02S09617.274l797 ---| EQ2S     EQU    *+4-EQXO    *EQ2* SIZE
Line S09618 Modification History
M01 (Added by) set
M02 (Updated by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
13744  M02S09618.274l797 ---| EQ2L     EQU    EQ2S/5+77   *EQ2* OVERLAY LENGTH
Line S09619 Modification History
M01 (Added by) set
M02 (Updated by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
13745  M02S09619.274l797 ---|.EQXL     MAX    EQ1L/100,EQ2L/100  MAXIMUM OVERLAY LENGTH
Line S09620 Modification History
M01 (Added by) set
M02 (Updated by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
13746  M02S09620.274l797 ---| EQXL     EQU    .EQXL
Line S09621 Modification History
M01 (Added by) set
M02 (Updated by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
13747  M02S09621.274l797 ---| .EQML    MAX    EQ1L-77,EQ2L-77  MAXIMUM OVERLAY ACTUAL LENGTH
Line S09622 Modification History
M01 (Added by) set
M02 (Updated by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
13748  M02S09622.274l797 ---| EQML     EQU    .EQML
13749  M01S09623.set     +++| TUNB     SPACE  4,10
13750  M01S09624.set     +++|**        TUNB - TABLE OF UNIQUE ISMD UNIT NUMBERS.
13751  M01S09625.set     +++|*
13752  M01S09626.set     +++|*         ENTRY = 1 WORD.
13753  M01S09627.set     +++|
13754  M01S09628.set     +++|
13755  M01S09629.set     +++| TUNB     BSS    0
13756  M01S09630.set     +++|
13757  M01S09631.set     +++|          ERRPL  TUNB+10-10001  TABLE WRAPS PP MEMORY
13758  M01S02191.274l797 +++|          SPACE  4,10
13759  M01S02192.274l797 +++|          QUAL   *
13760  M01S02193.274l797 +++|
13761  M01S02194.274l797 +++| EQ3S     EQU    *+4-EQXO    *EQ3* SIZE
13762  M01S02195.274l797 +++| EQ3L     EQU    EQ3S/5+77   *EQ3* OVERLAY LENGTH
13763  M01S02196.274l797 +++|
13764  M01S02197.274l797 +++|          ERRNG  7777-*-4    OVERFLOW WHEN LOADING *EQ3*
13765  M01S02198.274l797 +++|
13766  M01S02199.274l797 +++|.EQXL     MAX    EQ1L/100,EQ2L/100,EQ3L/100  MAXIMUM OVERLAY LENGTH
13767  M01S02200.274l797 +++| EQXL     EQU    .EQXL
13768  M01S02201.274l797 +++|.EQML     MAX    EQ1L-77,EQ2L-77,EQ3L-77  MAXIMUM OVERLAY ACTUAL LENGTH
13769  M01S02202.274l797 +++| EQML     EQU    .EQML
13770  M01S09632.set     +++|          TTL    SET/ICM - INITIALIZE CENTRAL MEMORY.
13771  M01S09633.set     +++|          TITLE
Line S09634 Modification History
M01 (Added by) set
M02 (Updated by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
13772  M02S09634.274l797 ---|          IDENT  ICM,ICMX
Line S09635 Modification History
M01 (Added by) set
M02 (Updated by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
13773  M02S09635.274l797 ---|          ORG    TSYN
13774  M01S02203.274l797 +++|          IDENT  ICM,/ICM/ICMX
13775  M01S02204.274l797 +++|          QUAL   ICM
13776  M01S02205.274l797 +++|          ORG    APRL
13777  M01S09636.set     +++|*COMMENT  SET - INITIALIZE CENTRAL MEMORY.
Line S09637 Modification History
M01 (Added by) set
M02 (Updated by) 281l803
Seq #  *Modification Id* Act 
----------------------------+
13778  M02S09637.281l803 ---|          COMMENT COPYRIGHT CONTROL DATA CORP. 1970.
13779  M01S00007.281l803 +++|          COMMENT  COPYRIGHT CONTROL DATA SYSTEMS INC.  1992.
13780  M01S09638.set     +++|          SPACE  4,10
Line S09639 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
13781  M02S09639.271l716 ---|**        COMMON - COMMON CODE FOR *ICM* AND *RCM*.
Line S09640 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
13782  M02S09640.271l716 ---|*
Line S09641 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
13783  M02S09641.271l716 ---|*         THIS MACRO PROVIDES IDENTICAL CODE FOR *ICM* AND *RCM*.
Line S00054 Modification History
M01 (Added by) 271l716
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
13784  M02S00054.283l840 ---|**        COMMON - COMMON ROUTINES FOR *ICM* AND *RCT*.
13785  M01S00134.283l840 +++|**        COMMON ROUTINES FOR *ICM* AND *RCM*.
13786  M01S00055.271l716 +++|*
Line S00056 Modification History
M01 (Added by) 271l716
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
13787  M02S00056.283l840 ---|*         THIS MACRO PROVIDES COMMON CODE FOR *ICM* AND *RCT*.
13788  M01S00135.283l840 +++|*         THESE MACROS PROVIDE COMMON CODE FOR *ICM* AND *RCM*.
13789  M01S00136.283l840 +++|          SPACE  4,10
13790  M01S00137.283l840 +++|**        IPPSUB - SUBROUTINES COMMON TO PP INITIALIZATION.
13791  M01S00138.283l840 +++|
13792  M01S00139.283l840 +++|
13793  M01S00140.283l840 +++| IPPSUB   MACRO
13794  M01S00141.283l840 +++|          LIST   G
13795  M01S00142.283l840 +++| APP      SPACE  4,10
13796  M01S00143.283l840 +++|**        APP - ASSIGN PP-S.
13797  M01S00144.283l840 +++|*
13798  M01S00145.283l840 +++|*         ENTRY  (NC) = SYSTEM CP NUMBER.
13799  M01S00146.283l840 +++|*                (CN+4) = FWA OF PP COMMUNICATIONS AREA.
13800  M01S00147.283l840 +++|*
13801  M01S00148.283l840 +++|*         USES   T5, AB - AB+4, CM - CM+4.
13802  M01S00149.283l840 +++|
13803  M01S00150.283l840 +++|
13804  M01S00151.283l840 +++| APP1     LDM    APPA,AB+2   SET PP PACKAGE NAME
13805  M01S00152.283l840 +++|          STD    AB
13806  M01S00153.283l840 +++|          LDM    APPA+1,AB+2
13807  M01S00154.283l840 +++|          LMD    NC          ASSIGN TO SYSTEM CP
13808  M01S00155.283l840 +++|          STD    AB+1
13809  M01S00156.283l840 +++|          LDM    APPA+2,AB+2 EXTRACT STATUS WORD
13810  M01S00157.283l840 +++|          STD    T0
13811  M01S00158.283l840 +++|          LDI    T0
13812  M01S00159.283l840 +++|          ZJN    APP3        IF PROGRAM NOT ACTIVE
13813  M01S00160.283l840 +++|          SBN    12
13814  M01S00161.283l840 +++|          MJN    APP2        IF PP IN LOWER BANK
13815  M01S00162.283l840 +++|          SBN    20-12
13816  M01S00163.283l840 +++| APP2     ADN    12          ASSIGN *CTI* INITIATED PP
13817  M01S00164.283l840 +++|          STI    T5
13818  M01S00165.283l840 +++|          SHN    3
13819  M01S00166.283l840 +++|          ADD    CN+4
13820  M01S00167.283l840 +++|          CWD    AB
13821  M01S00168.283l840 +++|          AOM    SPPC        ADJUST PP-S ASSIGNED TO SYSTEM CP
13822  M01S00169.283l840 +++| APP3     AOD    T5
13823  M01S00170.283l840 +++|          LDN    3           ADVANCE INDEX
13824  M01S00171.283l840 +++|          RAD    AB+2
13825  M01S00172.283l840 +++|          LMN    APPAL
13826  M01S00173.283l840 +++| APP4     NJN    APP1        IF NOT END OF LIST
13827  M01S00174.283l840 +++|          LDM    .CEL
13828  M01S00175.283l840 +++|          STD    CM+3        SET CRITICAL ERROR LOG STATUS
13829  M01S00176.283l840 +++|          LDM    .DSD
13830  M01S00177.283l840 +++|          STD    CM+4        SET DEADSTART CHANNEL
13831  M01S00178.283l840 +++|          LDK    DSAL
13832  M01S00179.283l840 +++|          CWD    CM          STORE POINTER WORD
13833  M01S00180.283l840 +++|
13834  M01S00181.283l840 +++| APP      SUBR               ENTRY/EXIT
13835  M01S00182.283l840 +++|          LDN    ZERL
13836  M01S00183.283l840 +++|          CRD    AB
13837  M01S00184.283l840 +++|          CRD    CM
13838  M01S00185.283l840 +++|          LDC    2RDS        SET DEADSTART INDICATOR
13839  M01S00186.283l840 +++|          STD    AB+4
13840  M01S00187.283l840 +++|          LDN    CM
13841  M01S00188.283l840 +++|          STD    T5
13842  M01S00189.283l840 +++|          UJN    APP4        ENTER LOOP
13843  M01S00190.283l840 +++|
13844  M01S00191.283l840 +++|
13845  M01S00192.283l840 +++| APPA     VFD    24/3LAPP,12/.APP
13846  M01S00193.283l840 +++|          VFD    24/3LSCI,12/.DCS
13847  M01S00194.283l840 +++|          VFD    24/3LMDD,12/.MDD
13848  M01S00195.283l840 +++| APPAL    EQU    *-APPA      LENGTH OF LIST
13849  M01S00196.283l840 +++| HPP      SPACE  4,10
13850  M01S00197.283l840 +++|**        HPP - HANG PP.
13851  M01S00198.283l840 +++|*
13852  M01S00199.283l840 +++|*         ENTRY  (A) = CHANNEL NUMBER.
13853  M01S00200.283l840 +++|*                (DH) = DEADSTART CHANNEL.
13854  M01S00201.283l840 +++|
13855  M01S00202.283l840 +++|
13856  M01S00203.283l840 +++| HPP      SUBR               ENTRY/EXIT
13857  M01S00204.283l840 +++|          LMD    DH
13858  M01S00205.283l840 +++|          NJN    HPP1        IF NOT DEADSTART CHANNEL
13859  M01S00206.283l840 +++|          LDD    DH
13860  M01S00207.283l840 +++|          LMN    12          DEADSTART CHANNEL PP ON CHANNEL 12
13861  M01S00208.283l840 +++| HPP1     LMD    DH
13862  M01S00209.283l840 +++|          LMC    OAMI        SET CHANNEL INSTRUCTIONS
13863  M01S00210.283l840 +++|          STM    HPPA
13864  M01S00211.283l840 +++|          LMC    DCNI&OAMI
13865  M01S00212.283l840 +++|          STM    HPPB
13866  M01S00213.283l840 +++|          LDN    2           HANG PP
13867  M01S00214.283l840 +++| HPPA     OAM    HPPC,0
13868  M01S00215.283l840 +++| HPPB     DCN    0
13869  M01S00216.283l840 +++|          UJN    HPPX        RETURN
13870  M01S00217.283l840 +++|
13871  M01S00218.283l840 +++| HPPC     CON    0
13872  M01S00219.283l840 +++|          UJN    *           HANG PP
13873  M01S00220.283l840 +++|
13874  M01S00221.283l840 +++|          LIST   *
13875  M01S00222.283l840 +++| IPPSUB   ENDM
13876  M01S00223.283l840 +++|          SPACE  4,10
13877  M01S00224.283l840 +++|**        SCSSUB - SUBROUTINE FOR SETTING CPU STATUS WORD.
13878  M01S00225.283l840 +++|
13879  M01S00226.283l840 +++|
13880  M01S00227.283l840 +++| SCSSUB   MACRO
13881  M01S00228.283l840 +++|          LIST   G
13882  M01S00229.283l840 +++| SCS      SPACE  4,10
13883  M01S00230.283l840 +++|**        SCS - SET CPU STATUS.
13884  M01S00231.283l840 +++|*
13885  M01S00232.283l840 +++|*         USES   T1.
13886  M01S00233.283l840 +++|
13887  M01S00234.283l840 +++|
13888  M01S00235.283l840 +++| SCS      SUBR               ENTRY/EXIT
13889  M01S00236.283l840 +++|          LDN    ACPL-1
13890  M01S00237.283l840 +++|          STD    T0
13891  M01S00238.283l840 +++|          LDD    HO          EXTRACT CPU STATUS
13892  M01S00239.283l840 +++|          LPN    3
13893  M01S00240.283l840 +++| SCS1     SHN    21-0        EXTRACT CPU FLAG
13894  M01S00241.283l840 +++|          STD    T1
13895  M01S00242.283l840 +++|          SHN    13-21       POSITION ON/OFF BIT
13896  M01S00243.283l840 +++|          STD    ZR
13897  M01S00244.283l840 +++|          AOD    T0          STORE CPU STATUS WORD
13898  M01S00245.283l840 +++|          CWD    ZR
13899  M01S00246.283l840 +++|          LDD    T1
13900  M01S00247.283l840 +++|          NJN    SCS1        IF CPU 1 UNAVAILABLE
13901  M01S00248.283l840 +++|          STD    ZR
13902  M01S00249.283l840 +++|          UJN    SCSX        RETURN
13903  M01S00250.283l840 +++|
13904  M01S00251.283l840 +++|          LIST   *
13905  M01S00252.283l840 +++| SCSSUB   ENDM
13906  M01S00253.283l840 +++|          SPACE  4,10
13907  M01S00254.283l840 +++|**        COMMON ROUTINES FOR *ICM* AND *ICT*.
13908  M01S00255.283l840 +++|*
13909  M01S00256.283l840 +++|*         THESE MACROS PROVIDE COMMON CODE FOR *ICM* AND *ICT*.
13910  M01S00257.283l840 +++|          SPACE  4,10
13911  M01S00258.283l840 +++|**        SPWSUB - SUBROUTINE FOR SETTING UP POINTER WORDS.
13912  M01S00259.283l840 +++|
13913  M01S00260.283l840 +++|
13914  M01S00261.283l840 +++| SPWSUB   MACRO
13915  M01S00262.283l840 +++|          LIST   G
13916  M01S00263.283l840 +++| SPW      SPACE  4,10
13917  M01S00264.283l840 +++|**        SPW - SET UP POINTER WORD.
13918  M01S00265.283l840 +++|*
13919  M01S00266.283l840 +++|*         ENTRY  (A) BITS  0 - 11 = POINTER WORD ADDRESS.
13920  M01S00267.283l840 +++|*                    BITS 12 - 14 = BYTE INDEX.
13921  M01S00268.283l840 +++|*                (CA - CA+1) = CURRENT CM ADDRESS.
13922  M01S00269.283l840 +++|*
13923  M01S00270.283l840 +++|*         EXIT   (T5) = POINTER WORD ADDRESS.
13924  M01S00271.283l840 +++|*                (CM - CM+4) = POINTER WORD.
13925  M01S00272.283l840 +++|*
13926  M01S00273.283l840 +++|*         USES   T4.
13927  M01S00274.283l840 +++|
13928  M01S00275.283l840 +++|
13929  M01S00276.283l840 +++| SPW      SUBR               ENTRY/EXIT
13930  M01S00277.283l840 +++|          STD    T5          SAVE POINTER WORD ADDRESS
13931  M01S00278.283l840 +++|          SHN    -14
13932  M01S00279.283l840 +++|          ADN    CM          SET BYTE ADDRESS WITHIN POINTER WORD
13933  M01S00280.283l840 +++|          STD    T4
13934  M01S00281.283l840 +++|          LDD    T5          FETCH POINTER WORD
13935  M01S00282.283l840 +++|          CRD    CM
13936  M01S00283.283l840 +++|          LDD    CA          INSERT TABLE ADDRESS
13937  M01S00284.283l840 +++|          STI    T4
13938  M01S00285.283l840 +++|          LDD    CA+1
13939  M01S00286.283l840 +++|          STM    1,T4
13940  M01S00287.283l840 +++|          LDD    T5          STORE POINTER WORD
13941  M01S00288.283l840 +++|          CWD    CM
13942  M01S00289.283l840 +++|          UJN    SPWX        RETURN
13943  M01S00290.283l840 +++|
13944  M01S00291.283l840 +++|          LIST   *
13945  M01S00292.283l840 +++| SPWSUB   ENDM
13946  M01S00293.283l840 +++|          TITLE  MAIN ROUTINE.
13947  M01S00294.283l840 +++| ICM      SPACE  4,10
13948  M01S00295.283l840 +++|**        ICM - INITIALIZE CENTRAL MEMORY.
13949  M01S00296.283l840 +++|
13950  M01S00297.283l840 +++|
13951  M01S00298.283l840 +++| ICM      SUBR               ENTRY/EXIT
13952  M01S00299.283l840 +++|          RJM    PTR         PROCESS POINTERS
13953  M01S00300.283l840 +++|          RJM    IPS         INITIALIZE PPU STATUS
13954  M01S00301.283l840 +++|          LDN    50          ALLOCATE PP BREAKPOINT DISPLAY BUFFER
13955  M01S00302.283l840 +++|          RJM    CLS
13956  M01S00303.283l840 +++|
13957  M01S00304.283l840 +++|*         DEFINE DAYFILE POINTER AREA.
13958  M01S00305.283l840 +++|
13959  M01S00306.283l840 +++|          LDN    DFPP        STORE POINTER WORD
13960  M01S00307.283l840 +++|          RJM    SPW
13961  M01S00308.283l840 +++|          LDN    EXDF*3
13962  M01S00309.283l840 +++|          RAD    CA+1
13963  M01S00310.283l840 +++|          SHN    -14
13964  M01S00311.283l840 +++|          RAD    CA
13965  M01S00312.283l840 +++|          RJM    PMS         PROCESS MS CHANNELS AND SYSTEM
13966  M01S00313.283l840 +++|          UJP    ICMX        RETURN
13967  M01S00314.283l840 +++|          TITLE  SUBROUTINES.
13968  M01S00315.283l840 +++| IPS      SPACE  4,10
13969  M01S00316.283l840 +++|**        IPS - INITIALIZE PPU STATUS.
13970  M01S00317.283l840 +++|*
13971  M01S00318.283l840 +++|*         ENTRY  (NC) = SYSTEM CONTROL POINT NUMBER.
13972  M01S00319.283l840 +++|*
13973  M01S00320.283l840 +++|*         EXIT   (CA - CA+1) = NEXT CM ADDRESS.
13974  M01S00321.283l840 +++|*
13975  M01S00322.283l840 +++|*         USES   CA, CA+1, T1, T2, T3, T6, T7, CM - CM+4, CN - CN+4.
13976  M01S00323.283l840 +++|*
13977  M01S00324.283l840 +++|*         CALLS  APP, CLS, HPP.
13978  M01S00325.283l840 +++|
13979  M01S00326.283l840 +++|
13980  M01S00327.283l840 +++| IPS      SUBR               ENTRY/EXIT
13981  M01S00328.283l840 +++|
13982  M01S00329.283l840 +++|*         ALLOCATE PP COMMUNICATION AREAS.
13983  M01S00330.283l840 +++|
13984  M01S00331.283l840 +++|          LDN    PPCP        READ PPU COMMUNICATION AREA POINTER
13985  M01S00332.283l840 +++|          CRD    CN
13986  M01S00333.283l840 +++|          LDD    NC          SET FWA = SYSTEM CP AREA END
13987  M01S00334.283l840 +++|          ADN    1
13988  M01S00335.283l840 +++|          SHN    7
13989  M01S00336.283l840 +++|          STD    CN+4
13990  M01S00337.283l840 +++|          STD    CA+1
13991  M01S00338.283l840 +++|          STD    T7
13992  M01S00339.283l840 +++|          SHN    -14
13993  M01S00340.283l840 +++|          STD    CA
13994  M01S00341.283l840 +++|          LDM    .PPU        CLEAR PP COMMUNICATIONS AREA
13995  M01S00342.283l840 +++|          STD    T6
13996  M01S00343.283l840 +++|          ADM    .CCHN
13997  M01S00344.283l840 +++|          STD    T3
13998  M01S00345.283l840 +++|          ADN    1           ALLOW FOR PSEUDO PP
13999  M01S00346.283l840 +++|          SHN    3
14000  M01S00347.283l840 +++|          RJM    CLS         CLEAR PP COMMUNICATION AREA
14001  M01S00348.283l840 +++|          LDD    CA          SET EXTENDED PP COMMUNICATION AREA FWA
14002  M01S00349.283l840 +++|          STD    CN
14003  M01S00350.283l840 +++|          SHN    14
14004  M01S00351.283l840 +++|          ADD    CA+1
14005  M01S00352.283l840 +++|          STD    CN+1
14006  M01S00353.283l840 +++|          SBD    CN+4
14007  M01S00354.283l840 +++|          SHN    PPXES-PPCES LENGTH OF EXTENDED PP COMMUNICATION AREA
14008  M01S00355.283l840 +++|          RJM    CLS         CLEAR EXTENDED PP COMMUNICATION AREA
14009  M01S00356.283l840 +++|          LDN    PPCP        STORE PPU COMMUNICATION AREA POINTER
14010  M01S00357.283l840 +++|          CWD    CN
14011  M01S00358.283l840 +++|
14012  M01S00359.283l840 +++|*         CHECK FOR DISABLED PP-S.
14013  M01S00360.283l840 +++|
14014  M01S00361.283l840 +++|          LDD    NC          INSERT SYSTEM CP INTO DISABLED PP IR
14015  M01S00362.283l840 +++|          RAM    IPSA+1
14016  M01S00363.283l840 +++|          LDD    T3          STORE PSEUDO PP INDICATOR
14017  M01S00364.283l840 +++|          SHN    3
14018  M01S00365.283l840 +++|          ADD    CN+4
14019  M01S00366.283l840 +++|          CWM    IPSA+2,ON
14020  M01S00367.283l840 +++|          LDN    0           CLEAR CHANNEL COUNT
14021  M01S00368.283l840 +++|          STD    T1
14022  M01S00369.283l840 +++|          STD    T2          CLEAR CHANNEL STATUS INDEX
14023  M01S00370.283l840 +++| IPS1     LDM    .PPS,T2     CHECK PP N ON/OFF STATUS
14024  M01S00371.283l840 +++|          LPC    1           (MASK FOR PP N)
14025  M01S00372.283l840 +++| IPSB     EQU    *-1
14026  M01S00373.283l840 +++|          STD    T3
14027  M01S00374.283l840 +++|          LDM    .PPL,T2     CHECK PP STATUS RETURNED BY *CTI*
14028  M01S00375.283l840 +++|          LPC    1           (MASK FOR PP N)
14029  M01S00376.283l840 +++| IPSC     EQU    *-1
14030  M01S00377.283l840 +++|          NJN    IPS3        IF PP DISABLED BY CTI
14031  M01S00378.283l840 +++|          LDD    T3
14032  M01S00379.283l840 +++|          ZJN    IPS4        IF PP NOT OFF VIA CMRDECK ENTRY
14033  M01S00380.283l840 +++|          RAM    .PPL,T2     UPDATE PP OFF DATA
14034  M01S00381.283l840 +++|          LDD    T2          CALCULATE CHANNEL NUMBER
14035  M01S00382.283l840 +++|          SHN    4
14036  M01S00383.283l840 +++|          LMD    T1
14037  M01S00384.283l840 +++|          RJM    HPP         HANG PP
14038  M01S00385.283l840 +++| IPS3     LDD    T7          STORE INPUT REGISTER
14039  M01S00386.283l840 +++|          CWM    IPSA,ON
14040  M01S00387.283l840 +++| IPS4     LDN    10          ADVANCE INPUT REGISTER ADDRESS
14041  M01S00388.283l840 +++|          RAD    T7
14042  M01S00389.283l840 +++|          LDM    IPSB        ADVANCE PP MASK
14043  M01S00390.283l840 +++|          RAM    IPSB
14044  M01S00391.283l840 +++|          STM    IPSC
14045  M01S00392.283l840 +++|          AOD    T1          COUNT CHANNEL
14046  M01S00393.283l840 +++|          LMN    10D
14047  M01S00394.283l840 +++|          NJN    IPS5        IF PPS BANK NOT PROCESSED
14048  M01S00395.283l840 +++|          STD    T1
14049  M01S00396.283l840 +++|          AOD    T2          ADVANCE STATUS INDEX
14050  M01S00397.283l840 +++|*         LDN    1           REINITIALIZE MASK
14051  M01S00398.283l840 +++|          STM    IPSB
14052  M01S00399.283l840 +++|          STM    IPSC
14053  M01S00400.283l840 +++|          LCN    10D         DECREMENT PPU COUNT
14054  M01S00401.283l840 +++|          RAD    T6
14055  M01S00402.283l840 +++|          ZJN    IPS6        IF ALL PP-S CHECKED
14056  M01S00403.283l840 +++| IPS5     LJM    IPS1        PROCESS NEXT PP
14057  M01S00404.283l840 +++|
14058  M01S00405.283l840 +++| IPS6     LDM    .CCHN       CHECK FOR CPP-S
14059  M01S00406.283l840 +++|          ZJN    IPS9        IF NO CPP-S
14060  M01S00407.283l840 +++|          STD    T3
14061  M01S00408.283l840 +++| IPS7     LDM    .CPPL
14062  M01S00409.283l840 +++|          SHN    21-0        REMOVE CPP STATUS
14063  M01S00410.283l840 +++|          STM    .CPPL
14064  M01S00411.283l840 +++|          PJN    IPS8        IF CPP ON
14065  M01S00412.283l840 +++|          LDD    T7
14066  M01S00413.283l840 +++|          CWM    IPSA,ON     STORE INPUT REGISTER
14067  M01S00414.283l840 +++| IPS8     LDN    10          ADVANCE INPUT REGISTER ADDRESS
14068  M01S00415.283l840 +++|          RAD    T7
14069  M01S00416.283l840 +++|          SOD    T3
14070  M01S00417.283l840 +++|          NJN    IPS7        IF MORE CPP-S OFF
14071  M01S00418.283l840 +++|
14072  M01S00419.283l840 +++|*         ASSIGN *CTI* PP-S AND STORE PP CONFIGURATION.
14073  M01S00420.283l840 +++|
14074  M01S00421.283l840 +++| IPS9     RJM    APP         ASSIGN PP-S
14075  M01S00422.283l840 +++|          LDN    PPUL
14076  M01S00423.283l840 +++|          CRD    CM
14077  M01S00424.283l840 +++|          LDM    .PPN        SET PP COUNT
14078  M01S00425.283l840 +++|          STD    CM+2
14079  M01S00426.283l840 +++|          LDN    PPUL        STORE PPU CONFIGURATION
14080  M01S00427.283l840 +++|          CWD    CM
14081  M01S00428.283l840 +++|          LJM    IPSX        RETURN
14082  M01S00429.283l840 +++|
14083  M01S00430.283l840 +++| IPSA     VFD    18/3R***,6/**,36/
14084  M01S00431.283l840 +++|          VFD    24/3RCIO
14085  M01S00432.283l840 +++| PMS      SPACE  4,10
14086  M01S00433.283l840 +++|**        PMS - PROCESS MASS STORAGE CHANNELS TO LOAD CONTROLWARE
14087  M01S00434.283l840 +++|*         AND VALIDATE SYSTEM DEVICES.
14088  M01S00435.283l840 +++|*         PMS WILL ALSO ENSURE THAT AT LEAST ONE CHECKPOINT DEVICE
14089  M01S00436.283l840 +++|*         HAS BEEN DEFINED.  IF ONE HAS NOT *PMS* WILL ASSIGN THE
14090  M01S00437.283l840 +++|*         FIRST VALID AVAILABLE DEVICE AS A CHECKPOINT DEVICE.
14091  M01S00438.283l840 +++|*
14092  M01S00439.283l840 +++|*         EXIT   (TCHS) = DEFAULT FIRMWARE RECORD TYPES.
14093  M01S00440.283l840 +++|*
14094  M01S00441.283l840 +++|*         USES   T0 - T4, EQ, CM - CM+4.
14095  M01S00442.283l840 +++|*
14096  M01S00443.283l840 +++|*         CALLS  EEB, SMT, STA.
14097  M01S00444.283l840 +++|
14098  M01S00445.283l840 +++|
14099  M01S00446.283l840 +++| PMS5     LDD    T1
14100  M01S00447.283l840 +++|          NJN    PMS6        IF SYSTEM DEVICE DEFINED
14101  M01S00448.283l840 +++|          LDM    DFMS
14102  M01S00449.283l840 +++|          RJM    STA
14103  M01S00450.283l840 +++|          LDC    2000        SET SYSTEM DEVICE FLAG
14104  M01S00451.283l840 +++|          RAI    ES
14105  M01S00452.283l840 +++|          LDM    EBUT+4      CLEAR ALTERNATE SYSTEM STATUS
14106  M01S00453.283l840 +++|          SCN    10
14107  M01S00454.283l840 +++|          STM    EBUT+4
14108  M01S00455.283l840 +++|          RJM    EEB         RETURN EQUIPMENT ENTRIES
14109  M01S00456.283l840 +++| PMS6     LDD    T3
14110  M01S00457.283l840 +++|          NJN    PMSX        IF CHECKPOINT DEVICE DEFINED
14111  M01S00458.283l840 +++|          LDM    DFMS
14112  M01S00459.283l840 +++|          RJM    STA
14113  M01S00460.283l840 +++|          LDN    2           SET DEFAULT RMS AS CHECKPOINT DEVICE
14114  M01S00461.283l840 +++|          RAM    TDDB+DVPR
14115  M01S00462.283l840 +++|          RJM    EEB         UPDATE EQUIPMENT STATUS
14116  M01S00463.283l840 +++|
14117  M01S00464.283l840 +++| PMS      SUBR               ENTRY/EXIT
14118  M01S00465.283l840 +++|          LDN    0
14119  M01S00466.283l840 +++|          CRD    T0
14120  M01S00467.283l840 +++|          LDN    NOPE-1      INITIALIZE EST SCAN
14121  M01S00468.283l840 +++|          STD    EQ
14122  M01S00469.283l840 +++| PMS1     AOD    EQ
14123  M01S00470.283l840 +++|          LMD    LE
14124  M01S00471.283l840 +++|          ZJP    PMS5        IF ALL EQUIPMENTS PROCESSED
14125  M01S00472.283l840 +++|          LDD    EQ
14126  M01S00473.283l840 +++|          RJM    STA         SET TABLE ADDRESSES
Line S00474 Modification History
M01 (Added by) 283l840
M02 (Updated by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
14127  M02S00474.284l847 ---|          LDM    EBUT+3
Line S00475 Modification History
M01 (Added by) 283l840
M02 (Updated by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
14128  M02S00475.284l847 ---|          RJM    SMT         SET *TMSD* ADDRESS
Line S00476 Modification History
M01 (Added by) 283l840
M02 (Updated by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
14129  M02S00476.284l847 ---|          ZJN    PMS1        IF NOT FOUND
14130  M01S00622.284l847 +++|          LDI    ES
14131  M01S00623.284l847 +++|          SHN    21-13
14132  M01S00624.284l847 +++|          PJN    PMS1        IF NOT MASS STORAGE
14133  M01S00477.283l840 +++|          LDN    2
14134  M01S00478.283l840 +++|          STD    T4          INITIALIZE CHANNEL INDEX
14135  M01S00479.283l840 +++| PMS2     LDM    EBUT,T4
14136  M01S00480.283l840 +++|          ZJN    PMS3        IF NULL CHANNEL
14137  M01S00481.283l840 +++|          LPN    77
14138  M01S00482.283l840 +++|          STD    T2
Line S00483 Modification History
M01 (Added by) 283l840
M02 (Updated by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
14139  M02S00483.284l847 ---|          LDM    MSAI,MS     DEFAULT CONTROLWARE FOR LOAD
14140  M01S00625.284l847 +++|          LDM    TDDB+DVAI   DEFAULT CONTROLWARE FOR LOAD
14141  M01S00484.283l840 +++|          SHN    -6
14142  M01S00485.283l840 +++|          SBM    TCHS,T2
14143  M01S00486.283l840 +++|          MJN    PMS3        IF OTHER DEFAULT HAS PRIORITY
14144  M01S00487.283l840 +++|          RAM    TCHS,T2
14145  M01S00488.283l840 +++| PMS3     SOD    T4
14146  M01S00489.283l840 +++|          NJN    PMS2        IF NOT END OF CHANNELS
14147  M01S00490.283l840 +++|          LDI    ES
14148  M01S00491.283l840 +++|          SHN    -12
14149  M01S00492.283l840 +++|          LPN    1
14150  M01S00493.283l840 +++|          RAD    T1
14151  M01S00494.283l840 +++|          LDM    TDDB+DVPR
14152  M01S00495.283l840 +++|          LPN    2
14153  M01S00496.283l840 +++|          RAD    T3          UPDATE CHECKPOINT DEVICE FOUND FLAG
14154  M01S00497.283l840 +++|          LJM    PMS1        PROCESS NEXT EQUIPMENT
14155  M01S00498.283l840 +++| PTR      SPACE  4,10
14156  M01S00499.283l840 +++|**        PTR - PROCESS POINTER AREA.
14157  M01S00500.283l840 +++|*
14158  M01S00501.283l840 +++|*         EXIT   (NC) = SYSTEM CONTROL POINT NUMBER.
14159  M01S00502.283l840 +++|*
14160  M01S00503.283l840 +++|*         USES   LD, NC, T1, AB - AB+4, CM - CM+4, CN - CN+4.
14161  M01S00504.283l840 +++|*
14162  M01S00505.283l840 +++|*         CALLS  SEC, SCS, STA.
14163  M01S00506.283l840 +++|
14164  M01S00507.283l840 +++|
14165  M01S00508.283l840 +++| PTR      SUBR               ENTRY/EXIT
14166  M01S00509.283l840 +++|          LDC    SHNI+73
14167  M01S00510.283l840 +++|          ADM    EMSC        ADJUST SHIFT
14168  M01S00511.283l840 +++|          STM    PTRA
14169  M01S00512.283l840 +++|          LDC    SHNI+77
14170  M01S00513.283l840 +++|          SBM    EMSC        ADJUST SHIFT
14171  M01S00514.283l840 +++|          STM    PTRC
14172  M01S00515.283l840 +++|          LDN    17
14173  M01S00516.283l840 +++| PTRA     SHN    -4
14174  M01S00517.283l840 +++|*         SHN    -4+EMSC
14175  M01S00518.283l840 +++|          RAM    PTRB
14176  M01S00519.283l840 +++|          RJM    SEC         INITIALIZE *ECRL*
14177  M01S00520.283l840 +++|          LDN    DSSL
14178  M01S00521.283l840 +++|          CRD    CM
14179  M01S00522.283l840 +++|          LDM    TTXC+LIBD   SET LIBDECK NUMBER
14180  M01S00523.283l840 +++|          SHN    6
14181  M01S00524.283l840 +++|          LMD    RM          APPEND RECOVERY MODE
14182  M01S00525.283l840 +++|          LMN    4
14183  M01S00526.283l840 +++|          STD    CM+4
14184  M01S00527.283l840 +++|          LDN    DSSL        STORE DEADSTART STATUS
14185  M01S00528.283l840 +++|          CWD    CM
14186  M01S00529.283l840 +++|          LDN    DSCL        SET MMF *PRESET* COUNTS
14187  M01S00530.283l840 +++|          CRD    CM
14188  M01S00531.283l840 +++|          LDN    0
14189  M01S00532.283l840 +++|          STD    CM+3
14190  M01S00533.283l840 +++|          STD    CM+4
14191  M01S00534.283l840 +++|          LDM    PRSF
14192  M01S00535.283l840 +++|          ZJN    PTR0        IF *PRESET* NOT ENTERED
14193  M01S00536.283l840 +++|          LDD    NS          NUMBER OF SHARED DEVICES
14194  M01S00537.283l840 +++|          STD    CM+3
14195  M01S00538.283l840 +++|          LDM    NSBD        NUMBER OF SHARED BUFFERED DEVICES
14196  M01S00539.283l840 +++|          STD    CM+4
14197  M01S00540.283l840 +++|          LDM    MSDC
14198  M01S00541.283l840 +++|          ZJN    PTR0        IF *MAXSHARE* NOT ENTERED
14199  M01S00542.283l840 +++|          STD    CM+3        NUMBER OF SHARED DEVICES
14200  M01S00543.283l840 +++|          LDM    MSBD
14201  M01S00544.283l840 +++|          ZJN    PTR0        IF NO SECOND PARAMETER ON *MAXSHARE*
14202  M01S00545.283l840 +++|          STD    CM+4        NUMBER OF SHARED BUFFERED DEVICES
14203  M01S00546.283l840 +++| PTR0     LDN    DSCL        STORE MMF *PRESET* COUNTS
14204  M01S00547.283l840 +++|          CWD    CM
14205  M01S00548.283l840 +++|          LDN    ZERL
14206  M01S00549.283l840 +++|          CRD    CM
14207  M01S00550.283l840 +++|          CRD    AB
14208  M01S00551.283l840 +++|          LDC    4000        SET INTERLOCK
14209  M01S00552.283l840 +++|          STD    CM
14210  M01S00553.283l840 +++|          LDN    2
14211  M01S00554.283l840 +++|          STD    T2
14212  M01S00555.283l840 +++|          LDN    JSNL        STORE INITIAL SEQUENCE NUMBER
14213  M01S00556.283l840 +++|          CWM    .JSN,ON
14214  M01S00557.283l840 +++|          LDM    C8XX        CHECK MAINFRAME TYPE
14215  M01S00558.283l840 +++|          ZJN    PTR1        IF CYBER 180
14216  M01S00559.283l840 +++|          LDN    TIML        STORE TIME/DATE
14217  M01S00560.283l840 +++|          CWM    .TIM,T2
14218  M01S00561.283l840 +++|          ERRNZ  TIML+1-DTEL CODE DEPENDS ON VALUE
14219  M01S00562.283l840 +++| PTR1     AOD    CM+4        SET MAINTENANCE LOG MESSAGE LINK
14220  M01S00563.283l840 +++|          LDN    BMLL        STORE MAINTENANCE LOG CONTROL WORD
14221  M01S00564.283l840 +++|          CWD    CM
14222  M01S00565.283l840 +++|          ADN    RTCL-BMLL   STORE REAL TIME CLOCK
14223  M01S00566.283l840 +++|          CWM    .RTC,ON
14224  M01S00567.283l840 +++|          SOD    CM+4
14225  M01S00568.283l840 +++|          LDN    TAXML/5
14226  M01S00569.283l840 +++|          STD    T1
14227  M01S00570.283l840 +++|          LDC    SCRL        SET *1MB* (ERROR LOGGING)
14228  M01S00571.283l840 +++|          CWD    CM
14229  M01S00572.283l840 +++|          ADN    DSDL-SCRL   STORE *DSD* BUFFER INTERLOCK
14230  M01S00573.283l840 +++|          CWD    CM
14231  M01S00574.283l840 +++|          ADN    1           STORE *TAXM* IN DSD/1DS BUFFER
14232  M01S00575.283l840 +++|          CWM    TAXM,T1
14233  M01S00576.283l840 +++|          LCN    0           INITIALIZE FLAG REGISTER STATUS
14234  M01S00577.283l840 +++|          STD    AB+3
14235  M01S00578.283l840 +++|          LDD    LD
14236  M01S00579.283l840 +++|          LPC    777
14237  M01S00580.283l840 +++|          ZJN    PTR2        IF NO LINK EQUIPMENT
14238  M01S00581.283l840 +++|          RJM    STA
14239  M01S00582.283l840 +++|          LDM    TDDB+DVED
14240  M01S00583.283l840 +++|          LPN    30
14241  M01S00584.283l840 +++|          NJN    PTR2        IF CPU PATH PRESENT (NOT UEM)
14242  M01S00585.283l840 +++|          LDC    2000        SET LSP MMF FLAG
14243  M01S00586.283l840 +++|          RAD    LD
14244  M01S00587.283l840 +++|          LDM    NSBD
14245  M01S00588.283l840 +++|          ZJN    PTR2        IF NO SHARED BUFFERED DEVICES
14246  M01S00589.283l840 +++|          LDD    TH          SET SHARED BUFFERED DEVICES FLAG
14247  M01S00590.283l840 +++|          RAD    LD
14248  M01S00591.283l840 +++| PTR2     LDN    ZERL
14249  M01S00592.283l840 +++|          CRD    CN
14250  M01S00593.283l840 +++|          ADN    MMFL-ZERL   STORE MMF STATUS
14251  M01S00594.283l840 +++|          CWD    ID
14252  M01S00595.283l840 +++|          ADN    EFRL-MMFL
14253  M01S00596.283l840 +++|          CWD    AB
14254  M01S00597.283l840 +++|
14255  M01S00598.283l840 +++|*         ENTER CONFIGURATION.
14256  M01S00599.283l840 +++|
14257  M01S00600.283l840 +++|          LDN    NCPL        SET NUMBER OF CONTROL POINTS
14258  M01S00601.283l840 +++|          CRD    CM
14259  M01S00602.283l840 +++|          LDM    .NCP
14260  M01S00603.283l840 +++|          STD    NC
14261  M01S00604.283l840 +++|          SBN    1
14262  M01S00605.283l840 +++|          STD    CM+1
14263  M01S00606.283l840 +++|          LDM    .CHN        SET CHANNEL COUNT
14264  M01S00607.283l840 +++|          STD    CM
14265  M01S00608.283l840 +++|          ERRNZ  NCPL-NCHL   CODE DEPENDS ON VALUE
14266  M01S00609.283l840 +++|          ERRNZ  NCPL-CPPL
14267  M01S00610.283l840 +++|          LDM    .CCHN       SET NUMBER OF PHYSICALLY PRESENT CPP-S
14268  M01S00611.283l840 +++|          RAD    CM+3
14269  M01S00612.283l840 +++|          LDN    NCPL
14270  M01S00613.283l840 +++|          CWD    CM
14271  M01S00614.283l840 +++|          ADN    MABL-NCPL
14272  M01S00615.283l840 +++|          CRD    CM
14273  M01S00616.283l840 +++|          LDM    UESC        SET USER XM SHIFT COUNT
14274  M01S00617.283l840 +++|          SHN    2
14275  M01S00618.283l840 +++|          LMM    EMAF        SET EXPANDED ADDRESSING FLAG
14276  M01S00619.283l840 +++|          SHN    2
14277  M01S00620.283l840 +++|          LMM    EMSC        SET XM SHIFT COUNT
14278  M01S00621.283l840 +++|          SHN    5
14279  M01S00622.283l840 +++|          STD    CN+2
14280  M01S00623.283l840 +++|          LDM    EMFL        SET XM FIELD LENGTH/*EMBS*
14281  M01S00624.283l840 +++|          STD    CN+3
14282  M01S00625.283l840 +++|          LDK    MEFL
14283  M01S00626.283l840 +++|          CWD    CN
14284  M01S00627.283l840 +++|          LDN    ZERL
14285  M01S00628.283l840 +++|          CRD    AB
14286  M01S00629.283l840 +++|          LDD    HO          SET HARDWARE OPTIONS
14287  M01S00630.283l840 +++|          STD    CM+1
14288  M01S00631.283l840 +++|          LDM    UEMZ
14289  M01S00632.283l840 +++|          SHN    14
14290  M01S00633.283l840 +++|          ADM    UEMZ+1
14291  M01S00634.283l840 +++|          ZJN    PTR3        IF UEM NOT PRESENT
14292  M01S00635.283l840 +++|          SHN    -3          UEM FL / 1000B
14293  M01S00636.283l840 +++| PTRB     ADN    0
14294  M01S00637.283l840 +++|*         ADN    (EMBS - 1000B) / 1000B
14295  M01S00638.283l840 +++| PTRC     SHN    0
14296  M01S00639.283l840 +++|*         SHN    -EMSC
14297  M01S00640.283l840 +++|          STD    AB+1
14298  M01S00641.283l840 +++|          LDD    FL
14299  M01S00642.283l840 +++|          SHN    14
14300  M01S00643.283l840 +++|          LMD    FL+1
14301  M01S00644.283l840 +++|          SHN    -3          SET UEM BASE ADDRESS/1000B
14302  M01S00645.283l840 +++|          STD    AB
14303  M01S00646.283l840 +++|          SHN    3           ADJUST EXECUTION MEMORY SIZE
14304  M01S00647.283l840 +++|          STD    FL+1
14305  M01S00648.283l840 +++|          SHN    -14
14306  M01S00649.283l840 +++|          STD    FL
14307  M01S00650.283l840 +++|          LDN    2
14308  M01S00651.283l840 +++|          STD    AB+4        SET UEM PRESENT FLAG
14309  M01S00652.283l840 +++|          LDM    EMTY
14310  M01S00653.283l840 +++|          LMN    4
14311  M01S00654.283l840 +++|          NJN    PTR3        IF NO UEM EQUIPMENT
14312  M01S00655.283l840 +++|          LDD    EN          SET USER EM EQUIPMENT
14313  M01S00656.283l840 +++|          STD    AB+2
14314  M01S00657.283l840 +++| PTR3     LDD    FL          SET EXECUTION MEMORY SIZE
14315  M01S00658.283l840 +++|          STD    CM+2
14316  M01S00659.283l840 +++|          LDD    FL+1
14317  M01S00660.283l840 +++|          STD    CM+3
14318  M01S00661.283l840 +++|          LDC    MABL
14319  M01S00662.283l840 +++|          CWD    CM
14320  M01S00663.283l840 +++|          LDN    EXML
14321  M01S00664.283l840 +++|          CRD    CM
14322  M01S00665.283l840 +++|          LDD    EN
14323  M01S00666.283l840 +++|          STD    CM+4
14324  M01S00667.283l840 +++|          LDN    EXML        STORE EXTENDED MEMORY CONFIGURATION
14325  M01S00668.283l840 +++|          CWD    CM
14326  M01S00669.283l840 +++|          LDM    TAXM+2
14327  M01S00670.283l840 +++|          ZJN    PTR4        IF NO USER EXTENDED MEMORY
14328  M01S00671.283l840 +++|          LDM    TAXM+1
14329  M01S00672.283l840 +++|          NJN    PTR4        IF USER EM IN UEM
14330  M01S00673.283l840 +++|          LDD    EN          SET USER EM EQUIPMENT
14331  M01S00674.283l840 +++|          STD    AB+2
14332  M01S00675.283l840 +++| PTR4     LDK    UEML        STORE MAINFRAME ATTRIBUTES
14333  M01S00676.283l840 +++|          CWD    AB
14334  M01S00677.283l840 +++|          RJM    SCS         SET CPU STATUS
14335  M01S00678.283l840 +++|          LJM    PTRX        RETURN
14336  M01S00679.283l840 +++|
14337  M01S00680.283l840 +++|
14338  M01S00681.283l840 +++| .JSN     VFD    12/0,12/0,12/PQFT,24/0LAAAA
14339  M01S00682.283l840 +++| .TIM     VFD    60/10H 00.00.00.
14340  M01S00683.283l840 +++|          VFD    60/10H"DATE"
14341  M01S00684.283l840 +++| .RTC     VFD    12/0037,12/7777,36/0
14342  M01S00685.283l840 +++| SEC      SPACE  4,10
14343  M01S00686.283l840 +++|**        SEC - SETUP POINTER WORD *ECRL*.
14344  M01S00687.283l840 +++|*
14345  M01S00688.283l840 +++|*         USES   AB - AB+4.
14346  M01S00689.283l840 +++|
14347  M01S00690.283l840 +++|
14348  M01S00691.283l840 +++| SEC      SUBR               ENTRY/EXIT
14349  M01S00692.283l840 +++|          LDM    EMSC        PRESET SHIFT INSTRUCTIONS
14350  M01S00693.283l840 +++|          SBM    UESC
14351  M01S00694.283l840 +++|          LPN    77
14352  M01S00695.283l840 +++|          RAM    SECA
14353  M01S00696.283l840 +++|          LDN    ZERL        INITIALIZE *ECRL*
14354  M01S00697.283l840 +++|          CRD    AB
14355  M01S00698.283l840 +++|          LDN    0
14356  M01S00699.283l840 +++|          STD    T1
14357  M01S00700.283l840 +++|          LDM    TAXM+2
14358  M01S00701.283l840 +++|          ZJN    SEC1        IF NO USER XM FOR THIS MACHINE
14359  M01S00702.283l840 +++| SECA     SHN    0
14360  M01S00703.283l840 +++|*         SHN    EMSC-UESC
14361  M01S00704.283l840 +++|          STD    AB+1
14362  M01S00705.283l840 +++|          LDN    ECSY
14363  M01S00706.283l840 +++|          ADM    C9LM        APPEND LARGE MEMORY OPTION
14364  M01S00707.283l840 +++|          STD    AB+4
14365  M01S00708.283l840 +++|          LDM    TAXM+1
14366  M01S00709.283l840 +++|          ZJN    SEC2        IF NO USER EXTENDED MEMORY
14367  M01S00710.283l840 +++|          LDM    EMTY
14368  M01S00711.283l840 +++|          LMN    4
14369  M01S00712.283l840 +++|          ZJN    SEC2        IF UEM EQUIPMENT - HAVE *REC* ALLOCATE
14370  M01S00713.283l840 +++|          LDN    0
14371  M01S00714.283l840 +++|          STM    TAXM+2      CLEAR USER EM IN UEM FOR *REC*
14372  M01S00715.283l840 +++| SEC1     LDN    5
14373  M01S00716.283l840 +++|          RAD    T1
14374  M01S00717.283l840 +++|          SBN    TAXML
14375  M01S00718.283l840 +++|          PJN    SEC3        IF END OF TABLE
14376  M01S00719.283l840 +++|          LDM    TAXM+2,T1   CHECK FOR USER EXTENDED MEMORY
14377  M01S00720.283l840 +++|          ZJN    SEC1        IF NO USER EXTENDED MEMORY
14378  M01S00721.283l840 +++| SEC2     LDD    EN          SET EXTENDED MEMORY EQUIPMENT FOR *REC*
14379  M01S00722.283l840 +++|          STD    AB
14380  M01S00723.283l840 +++| SEC3     LDN    ECRL        STORE *ECRL*
14381  M01S00724.283l840 +++|          CWD    AB
14382  M01S00725.283l840 +++|          LJM    SECX        RETURN
14383  M01S00726.283l840 +++|          TITLE  COMMON SUBROUTINES.
14384  M01S00727.283l840 +++|          SPACE  4,10
14385  M01S00728.283l840 +++|**        COMMON SUBROUTINES.
14386  M01S00729.283l840 +++|
14387  M01S00730.283l840 +++|
14388  M01S00731.283l840 +++|          IPPSUB
14389  M01S00732.283l840 +++|          SCSSUB
14390  M01S00733.283l840 +++|          SPWSUB
14391  M01S00734.283l840 +++|          SPACE  4,10
14392  M01S00735.283l840 +++|          QUAL   *
14393  M01S00736.283l840 +++|          SPACE  4,10
14394  M01S00737.283l840 +++|          ERRNG  7777-*-4    IF OVERFLOW
14395  M01S00738.283l840 +++|          TTL    SET/ICT - INITIALIZE CENTRAL MEMORY TABLES.
14396  M01S00739.283l840 +++|          TITLE
14397  M01S00740.283l840 +++|          IDENT  ICT,/ICT/ICTX
14398  M01S00741.283l840 +++|          QUAL   ICT
14399  M01S00742.283l840 +++|          ORG    APRL
14400  M01S00743.283l840 +++|*COMMENT  SET - INITIALIZE CENTRAL MEMORY.
14401  M01S00744.283l840 +++|          COMMENT  COPYRIGHT CONTROL DATA SYSTEMS INC.  1992.
14402  M01S00745.283l840 +++|          SPACE  4,10
14403  M01S00746.283l840 +++|**        COMMON - COMMON ROUTINES FOR *ICT* AND *RCT*.
14404  M01S00747.283l840 +++|*
14405  M01S00748.283l840 +++|*         THIS MACRO PROVIDES COMMON CODE FOR *ICT* AND *RCT*.
14406  M01S09642.set     +++|
14407  M01S09643.set     +++|
14408  M01S09644.set     +++|          QUAL
14409  M01S09645.set     +++| COMMON   MACRO
14410  M01S02206.274l797 +++|          LIST   G
14411  M01S09646.set     +++| TCTP     SPACE  4,10
14412  M01S09647.set     +++|**        TCTP - TABLE OF CMR TABLE PROCESSORS.
14413  M01S09648.set     +++|
14414  M01S09649.set     +++|
14415  M01S09650.set     +++| TCTP     BSS    0
14416  M01S09651.set     +++|          DUP    TSGTE,1
14417  M01S09652.set     +++|          CON    SIE
14418  M01S09653.set     +++|          ORG    TCTP
14419  M01S09654.set     +++| TCTP     INDEX
14420  M01S09655.set     +++|          INDEX  ESTO,EST    EQUIPMENT STATUS TABLE
14421  M01S09656.set     +++|          INDEX  EXPO,EXP    C176 (AND 819) EXCHANGE PACKAGES
14422  M01S00057.271l716 +++|          INDEX  MCTO,MCT    MEMORY CONTROL TABLE
14423  M01S09657.set     +++|          INDEX  SCDO,SCD    *SCD* PARAMETER TABLE
14424  M01S09658.set     +++|          INDEX  RPTO,RPT    RING PORT TABLE
14425  M01S09659.set     +++|          INDEX  CHTO,CHT    CHANNEL TABLES
14426  M01S09660.set     +++|          INDEX  ECBO,ECB    *EICB* TABLES
14427  M01S09661.set     +++|          INDEX  EMBO,EMB    ERROR MESSAGE BUFFER
14428  M01S09662.set     +++|          INDEX  EVTO,EVT    EVENT TABLE
14429  M01S09663.set     +++|          INDEX  SCTO,SCT    SUBSYSTEM CONTROL TABLES
14430  M01S09664.set     +++|          INDEX  SITO,SIT    *SECDED* ID TABLE
14431  M01S09665.set     +++|          INDEX  SABO,SAB    SYSTEM ATTRIBUTE BLOCK
Line S09666 Modification History
M01 (Added by) set
M02 (Updated by) 271l750
Seq #  *Modification Id* Act 
----------------------------+
14432  M02S09666.271l750 ---|          INDEX  JCAO,JCA    JOB CONTROL AREA
14433  M01S00098.271l750 +++|          INDEX  JCAO,JCA    JOB CONTROL BLOCK TABLE
14434  M01S09667.set     +++|          INDEX  MSAO,MSA    MASS STORAGE ALLOCATION AREA
14435  M01S09668.set     +++|          INDEX  ODBO,ODB    OPERATOR DISPLAY BUFFER
14436  M01S09669.set     +++|          INDEX  LDBO,LDB    *L* DISPLAY BUFFER
14437  M01S00002.282l826 +++|          INDEX  PDBO,PDB    PREVIEW DISPLAY BUFFER
14438  M01S09670.set     +++|          INDEX  DFBO,DFB    DAYFILE BUFFERS
14439  M01S00002.253l688 +++|          INDEX  PSVO,PSV    PP SAVE AREAS
14440  M01S09671.set     +++|          INDEX  MSTO,MST    MASS STORAGE TABLES
14441  M01S09672.set     +++|          INDEX  TRTO,TRT    TRACK RESERVATION TABLES
14442  M01S09673.set     +++|          INDEX  EXMO,EXM    EXTENDED MEMORY BUFFERS
14443  M01S09674.set     +++|          INDEX  INBO,INB    INSTALLATION BLOCK
14444  M01S09675.set     +++|          INDEX  SDAO,SDA    STATISTICAL DATA AREA
14445  M01S09676.set     +++|          INDEX  FOTO,FOT    FAMILY ORDINAL TABLE
14446  M01S09677.set     +++|          INDEX  FNTO,FNT    FILE NAME TABLE
14447  M01S09678.set     +++|          INDEX  EJTO,EJT    EXECUTING JOB TABLE
14448  M01S09679.set     +++|          INDEX  QFTO,QFT    QUEUE FILE TABLE
14449  M01S09680.set     +++|          INDEX  CLTO,CLT    COMMON LIBRARIES TABLE
14450  M01S09681.set     +++|          INDEX  LIDO,LID    LOGICAL ID TABLE
14451  M01S00749.283l840 +++|          INDEX  OSTO,OST    OPTICAL DISK STATUS TABLES
14452  M01S00750.283l840 +++|          INDEX  ORTO,ORT    OPTICAL DISK REQUEST TABLE
14453  M01S00751.283l840 +++|          INDEX  BSTO,BST    BUFFER STATUS TABLES
14454  M01S09682.set     +++|          INDEX  BDTO,BDT    BUFFERED DEVICE CONTROL TABLES
Line S02207 Modification History
M01 (Added by) 274l797
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
14455  M02S02207.283l840 ---|          INDEX  OSTO,OST    OPTICAL DISK STATUS TABLES
Line S02208 Modification History
M01 (Added by) 274l797
M02 (Updated by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
14456  M02S02208.283l840 ---|          INDEX  ORTO,ORT    OPTICAL DISK REQUEST TABLE
14457  M01S09683.set     +++|          INDEX  TSGTE
Line S09684 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14458  M02S09684.271l716 ---| APP      SPACE  4,10
Line S09685 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14459  M02S09685.271l716 ---|**        APP - ASSIGN PP-S.
Line S09686 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14460  M02S09686.271l716 ---|*
Line S09687 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14461  M02S09687.271l716 ---|*         ENTRY  (NC) = SYSTEM CP NUMBER.
Line S09688 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14462  M02S09688.271l716 ---|*                (CN+4) = FWA OF PP COMMUNICATIONS AREA.
Line S09689 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14463  M02S09689.271l716 ---|*
Line S09690 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14464  M02S09690.271l716 ---|*         USES   T5, AB - AB+4, CM - CM+4.
Line S09691 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14465  M02S09691.271l716 ---|
Line S09692 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14466  M02S09692.271l716 ---|
Line S09693 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14467  M02S09693.271l716 ---| APP1     LDM    APPA,AB+2   SET PP PACKAGE NAME
Line S09694 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14468  M02S09694.271l716 ---|          STD    AB
Line S09695 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14469  M02S09695.271l716 ---|          LDM    APPA+1,AB+2
Line S09696 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14470  M02S09696.271l716 ---|          LMD    NC          ASSIGN TO SYSTEM CP
Line S09697 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14471  M02S09697.271l716 ---|          STD    AB+1
Line S09698 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14472  M02S09698.271l716 ---|          LDM    APPA+2,AB+2 EXTRACT STATUS WORD
Line S09699 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14473  M02S09699.271l716 ---|          STD    T0
Line S09700 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14474  M02S09700.271l716 ---|          LDI    T0
Line S09701 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14475  M02S09701.271l716 ---|          ZJN    APP3        IF PROGRAM NOT ACTIVE
Line S09702 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14476  M02S09702.271l716 ---|          SBN    12
Line S09703 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14477  M02S09703.271l716 ---|          MJN    APP2        IF PP IN LOWER BANK
Line S09704 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14478  M02S09704.271l716 ---|          SBN    20-12
Line S09705 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14479  M02S09705.271l716 ---| APP2     ADN    12          ASSIGN *CTI* INITIATED PP
Line S09706 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14480  M02S09706.271l716 ---|          STI    T5
Line S09707 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14481  M02S09707.271l716 ---|          SHN    3
Line S09708 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14482  M02S09708.271l716 ---|          ADD    CN+4
Line S09709 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14483  M02S09709.271l716 ---|          CWD    AB
Line S09710 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14484  M02S09710.271l716 ---|          AOM    SPPC        ADJUST PP-S ASSIGNED TO SYSTEM CP
Line S09711 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14485  M02S09711.271l716 ---| APP3     AOD    T5
Line S09712 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14486  M02S09712.271l716 ---|          LDN    3           ADVANCE INDEX
Line S09713 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14487  M02S09713.271l716 ---|          RAD    AB+2
Line S09714 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14488  M02S09714.271l716 ---|          LMN    APPAL
Line S09715 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14489  M02S09715.271l716 ---| APP4     NJN    APP1        IF NOT END OF LIST
Line S09716 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14490  M02S09716.271l716 ---|          LDM    .CEL
Line S09717 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14491  M02S09717.271l716 ---|          STD    CM+3        SET CRITICAL ERROR LOG STATUS
Line S09718 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14492  M02S09718.271l716 ---|          LDM    .DSD
Line S09719 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14493  M02S09719.271l716 ---|          STD    CM+4        SET DEADSTART CHANNEL
Line S09720 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14494  M02S09720.271l716 ---|          LDK    DSAL
Line S09721 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14495  M02S09721.271l716 ---|          CWD    CM          STORE POINTER WORD
Line S09722 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14496  M02S09722.271l716 ---|
Line S09723 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14497  M02S09723.271l716 ---| APP      SUBR               ENTRY/EXIT
Line S09724 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14498  M02S09724.271l716 ---|          LDN    ZERL
Line S09725 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14499  M02S09725.271l716 ---|          CRD    AB
Line S09726 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14500  M02S09726.271l716 ---|          CRD    CM
Line S09727 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14501  M02S09727.271l716 ---|          LDC    2RDS        SET DEADSTART INDICATOR
Line S09728 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14502  M02S09728.271l716 ---|          STD    AB+4
Line S09729 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14503  M02S09729.271l716 ---|          LDN    CM
Line S09730 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14504  M02S09730.271l716 ---|          STD    T5
Line S09731 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14505  M02S09731.271l716 ---|          UJN    APP4        ENTER LOOP
Line S09732 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14506  M02S09732.271l716 ---|
Line S09733 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14507  M02S09733.271l716 ---|
Line S09734 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14508  M02S09734.271l716 ---| APPA     VFD    24/3LAPP,12/.APP
Line S09735 Modification History
M01 (Added by) set
M02 (Updated by) ns2557
M03 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14509  M03S09735.271l716 ---|          VFD    24/3LSCD,12/.DCS
Line S00037 Modification History
M01 (Added by) ns2557
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14510  M02S00037.271l716 ---|          VFD    24/3LSCI,12/.DCS
Line S09736 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14511  M02S09736.271l716 ---|          VFD    24/3LMDD,12/.MDD
Line S09737 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14512  M02S09737.271l716 ---| APPAL    EQU    *-APPA      LENGTH OF LIST
14513  M01S09738.set     +++| CDL      SPACE  4,10
14514  M01S09739.set     +++|**        CDL - COMPUTE DEVICE LENGTH.
14515  M01S09740.set     +++|*
14516  M01S09741.set     +++|*         ENTRY  (AB) = BYTE 0 OF EST ENTRY.
14517  M01S09742.set     +++|*                (CM+2) = TRT LENGTH.
14518  M01S09743.set     +++|*
14519  M01S09744.set     +++|*         EXIT   (A) = TOTAL LENGTH OF DEVICE TABLES (TRT+MRT+DIT).
14520  M01S09745.set     +++|
14521  M01S09746.set     +++|
14522  M01S09747.set     +++| CDL      SUBR               ENTRY/EXIT
14523  M01S09748.set     +++|          LDD    AB
14524  M01S09749.set     +++|          LPC    1020
14525  M01S09750.set     +++|          ZJN    CDL2        IF STAND ALONE DEVICE
14526  M01S09751.set     +++|          LPN    20
14527  M01S09752.set     +++|          ZJN    CDL1        IF NOT INDEPENDENT SHARED DEVICE
14528  M01S09753.set     +++|*         LDN    DITL        ADD LENGTH OF DIT
14529  M01S09754.set     +++|          ERRNZ  MMPF-20
14530  M01S09755.set     +++| CDL1     STD    T0
14531  M01S09756.set     +++|          LDD    CM+2        COMPUTE LENGTH OF MRT
14532  M01S09757.set     +++|          ADN    7
14533  M01S09758.set     +++|          SHN    -3
14534  M01S09759.set     +++|          ADD    T0
14535  M01S09760.set     +++| CDL2     ADD    CM+2        ADD LENGTH OF TRT
14536  M01S09761.set     +++|          UJN    CDLX        RETURN
Line S09762 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14537  M02S09762.271l716 ---| HPP      SPACE  4,10
Line S09763 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14538  M02S09763.271l716 ---|**        HPP - HANG PP.
Line S09764 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14539  M02S09764.271l716 ---|*
Line S09765 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14540  M02S09765.271l716 ---|*         ENTRY  (A) = CHANNEL NUMBER.
Line S09766 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14541  M02S09766.271l716 ---|*                (DH) = DEADSTART CHANNEL.
Line S09767 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14542  M02S09767.271l716 ---|
Line S09768 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14543  M02S09768.271l716 ---|
Line S09769 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14544  M02S09769.271l716 ---| HPP      SUBR               ENTRY/EXIT
Line S09770 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14545  M02S09770.271l716 ---|          LMD    DH
Line S09771 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14546  M02S09771.271l716 ---|          NJN    HPP1        IF NOT DEADSTART CHANNEL
Line S09772 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14547  M02S09772.271l716 ---|          LDD    DH
Line S09773 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14548  M02S09773.271l716 ---|          LMN    12          DEADSTART CHANNEL PP ON CHANNEL 12
Line S09774 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14549  M02S09774.271l716 ---| HPP1     LMD    DH
Line S09775 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14550  M02S09775.271l716 ---|          LMC    OAMI        SET CHANNEL INSTRUCTIONS
Line S09776 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14551  M02S09776.271l716 ---|          STM    HPPA
Line S09777 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14552  M02S09777.271l716 ---|          LMC    DCNI&OAMI
Line S09778 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14553  M02S09778.271l716 ---|          STM    HPPB
Line S09779 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14554  M02S09779.271l716 ---|          LDN    2           HANG PP
Line S09780 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14555  M02S09780.271l716 ---| HPPA     OAM    HPPC,0
Line S09781 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14556  M02S09781.271l716 ---| HPPB     DCN    0
Line S09782 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14557  M02S09782.271l716 ---|          UJN    HPPX        RETURN
Line S09783 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14558  M02S09783.271l716 ---|
Line S09784 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14559  M02S09784.271l716 ---| HPPC     CON    0
Line S09785 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14560  M02S09785.271l716 ---|          UJN    *           HANG PP
14561  M01S09786.set     +++| PBD      SPACE  4,10
14562  M01S09787.set     +++|**        PBD - PROCESS BUFFERED DEVICE CHANNELS.
14563  M01S09788.set     +++|*
14564  M01S09789.set     +++|*         ENTRY  (AB+1 - AB+2) = CHANNEL BYTES FROM EST ENTRY.
14565  M01S09790.set     +++|*
Line S09791 Modification History
M01 (Added by) set
M02 (Updated by) ns2768
Seq #  *Modification Id* Act 
----------------------------+
14566  M02S09791.ns2768  ---|*         EXIT   (KI) = CUMMULATIVE 819 COUNT.
14567  M01S00009.ns2768  +++|*         EXIT   (KI) = CUMULATIVE 819 COUNT.
14568  M01S09792.set     +++|*
14569  M01S09793.set     +++|*         USES   T1, T4.
14570  M01S09794.set     +++|
14571  M01S09795.set     +++|
14572  M01S09796.set     +++| PBD2     LDI    T1          SET 819 CHANNEL IN TABLE
14573  M01S09797.set     +++|          LPN    37
14574  M01S09798.set     +++|          SHN    -1
14575  M01S09799.set     +++|          STD    T4
14576  M01S09800.set     +++|          RAM    TFMC,T4
14577  M01S09801.set     +++|          AOD    T1
14578  M01S09802.set     +++|          LMN    AB+3
14579  M01S09803.set     +++|          NJN    PBD2        IF ANOTHER CHANNEL
14580  M01S09804.set     +++|          AOD    KI
14581  M01S09805.set     +++|
14582  M01S09806.set     +++| PBD      SUBR
14583  M01S09807.set     +++|          LDN    AB+1
14584  M01S09808.set     +++|          STD    T1
14585  M01S09809.set     +++|          LDD    HO
14586  M01S09810.set     +++|          SHN    -11
14587  M01S09811.set     +++|          LMN    7
14588  M01S09812.set     +++|          ZJN    PBD2        IF C176 SYSTEM
14589  M01S09813.set     +++| PBD1     LDI    T1
14590  M01S09814.set     +++|          ZJN    PBDX        IF CHANNEL NOT DEFINED
14591  M01S09815.set     +++|          LPN    77
14592  M01S09816.set     +++|          STD    T4
14593  M01S09817.set     +++|          AOM    KBUF,T4     COUNT CHANNEL USAGE
14594  M01S09818.set     +++|          AOD    T1
14595  M01S09819.set     +++|          LMN    AB+3
14596  M01S09820.set     +++|          NJN    PBD1        IF POSSIBLE SECOND CHANNEL
14597  M01S09821.set     +++|          UJN    PBDX        RETURN
14598  M01S09822.set     +++| RCA      SPACE  4,10
14599  M01S09823.set     +++|**        RCA - ROUND CM ADDRESS TO NEXT MULTIPLE OF 10B.
14600  M01S09824.set     +++|*
14601  M01S09825.set     +++|*         ENTRY  (CA - CA+1) = CURRENT CM ADDRESS.
14602  M01S09826.set     +++|*
14603  M01S09827.set     +++|*         EXIT   (A) = ROUNDED CM ADDRESS / 10B.
14604  M01S09828.set     +++|*                (CA - CA+1) = ROUNDED CM ADDRESS.
14605  M01S09829.set     +++|
14606  M01S09830.set     +++|
14607  M01S09831.set     +++| RCA      SUBR               ENTRY/EXIT
14608  M01S09832.set     +++|          LDD    CA+1
14609  M01S09833.set     +++|          ADN    7
14610  M01S09834.set     +++|          SCN    7
14611  M01S09835.set     +++|          STD    CA+1
14612  M01S09836.set     +++|          SHN    -14
14613  M01S09837.set     +++|          RAD    CA
14614  M01S09838.set     +++|          SHN    14
14615  M01S09839.set     +++|          LMD    CA+1
14616  M01S09840.set     +++|          SHN    -3
14617  M01S09841.set     +++|          UJN    RCAX        RETURN
14618  M01S09842.set     +++| SBB      SPACE  4,10
14619  M01S09843.set     +++|**        SBB - SET BUFFER BIAS.
14620  M01S09844.set     +++|*
14621  M01S09845.set     +++|*         ENTRY  (A) = STARTING BIT VALUE + FUNCTION CODE.
14622  M01S09846.set     +++|*                (T1) = VALUE TO SET.
14623  M01S09847.set     +++|*
14624  M01S09848.set     +++|*         USES   T1.
14625  M01S09849.set     +++|
14626  M01S09850.set     +++|
14627  M01S09851.set     +++| SBB      SUBR               ENTRY/EXIT
14628  M01S09852.set     +++|          STD    T0          SAVE STARTING VALUE
14629  M01S09853.set     +++| SBB1     LDD    T1
14630  M01S09854.set     +++|          ZJN    SBBX        IF NO BITS TO SET
14631  M01S09855.set     +++|          SHN    21
14632  M01S09856.set     +++|          STD    T1
14633  M01S09857.set     +++|          PJN    SBB2        IF BIAS BIT NOT TO BE SET
14634  M01S09858.set     +++|          LDD    T0
14635  M01S09859.set     +++|          OAN    SC+40
14636  M01S09860.set     +++|          IAN    SC+40
14637  M01S09861.set     +++| SBB2     AOD    T0          ADVANCE BIT NUMBER
14638  M01S09862.set     +++|          UJN    SBB1        LOOP
Line S09863 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14639  M02S09863.271l716 ---| SCS      SPACE  4,10
Line S09864 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14640  M02S09864.271l716 ---|**        SCS - SET CPU STATUS.
Line S09865 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14641  M02S09865.271l716 ---|*
Line S09866 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14642  M02S09866.271l716 ---|*         USES   T1.
Line S09867 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14643  M02S09867.271l716 ---|
Line S09868 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14644  M02S09868.271l716 ---|
Line S09869 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14645  M02S09869.271l716 ---| SCS      SUBR               ENTRY/EXIT
Line S09870 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14646  M02S09870.271l716 ---|          LDN    ACPL-1
Line S09871 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14647  M02S09871.271l716 ---|          STD    T0
Line S09872 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14648  M02S09872.271l716 ---|          LDD    HO          EXTRACT CPU STATUS
Line S09873 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14649  M02S09873.271l716 ---|          LPN    3
Line S09874 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14650  M02S09874.271l716 ---| SCS1     SHN    21-0        EXTRACT CPU FLAG
Line S09875 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14651  M02S09875.271l716 ---|          STD    T1
Line S09876 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14652  M02S09876.271l716 ---|          SHN    13-21       POSITION ON/OFF BIT
Line S09877 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14653  M02S09877.271l716 ---|          STD    ZR
Line S09878 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14654  M02S09878.271l716 ---|          AOD    T0          STORE CPU STATUS WORD
Line S09879 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14655  M02S09879.271l716 ---|          CWD    ZR
Line S09880 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14656  M02S09880.271l716 ---|          LDD    T1
Line S09881 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14657  M02S09881.271l716 ---|          NJN    SCS1        IF CPU 1 UNAVAILABLE
Line S09882 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14658  M02S09882.271l716 ---|          STD    ZR
Line S09883 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14659  M02S09883.271l716 ---|          UJN    SCSX        RETURN
14660  M01S09884.set     +++| SPT      SPACE  4,10
14661  M01S09885.set     +++|**        SPT - SETUP *SCD* PARAMETER TABLE.
14662  M01S09886.set     +++|*
14663  M01S09887.set     +++|*         ENTRY  (CM+2 - CM+3) = FWA OF *SCD* PARAMETER TABLE.
14664  M01S09888.set     +++|*
14665  M01S09889.set     +++|*         USES   CM - CM+4.
14666  M01S09890.set     +++|*
14667  M01S09891.set     +++|*         CALLS  CLS.
14668  M01S09892.set     +++|
14669  M01S09893.set     +++|
Line S09894 Modification History
M01 (Added by) set
M02 (Updated by) ns2557
Seq #  *Modification Id* Act 
----------------------------+
14670  M02S09894.ns2557  ---| SPT      SUBR               ENTRY/EXIT
14671  M01S00038.ns2557  +++| SPT1     STM    SPTA+3      CLEAR *SCD* DATA
14672  M01S00039.ns2557  +++|          LDN    3           SET PARAMETER TABLE LENGTH
14673  M01S00040.ns2557  +++|          SHN    10
14674  M01S00041.ns2557  +++|          STM    SPTA+2
14675  M01S00042.ns2557  +++|          LDN    3           CLEAR TABLE
14676  M01S00043.ns2557  +++|          RJM    CLS
14677  M01S00044.ns2557  +++|          LDM    .MDD        SET POSSIBLE *MDD* PP NUMBER
14678  M01S00045.ns2557  +++|          RAM    SPTA+1
14679  M01S00046.ns2557  +++|
14680  M01S00047.ns2557  +++|*         SET *MDD* INFORMATION.
14681  M01S00048.ns2557  +++|
14682  M01S00049.ns2557  +++| SPT2     LDM    MDDP
14683  M01S00050.ns2557  +++|          SHN    21-3
14684  M01S00051.ns2557  +++|          PJN    SPT3        IF *MDD* NOT LOADED
14685  M01S00052.ns2557  +++|          SHN    -16
14686  M01S00053.ns2557  +++|          LPN    7           SET *MDD* PORT NUMBER
14687  M01S00054.ns2557  +++|          LMN    40          SET *MDD* ACTIVE BIT
14688  M01S00055.ns2557  +++|          SHN    6
14689  M01S00056.ns2557  +++|          STM    SPTA+4
14690  M01S00057.ns2557  +++| SPT3     LDD    CM+2        STORE PARAMETER TABLE FIRST WORD
14691  M01S00058.ns2557  +++|          SHN    14
14692  M01S00059.ns2557  +++|          LMD    CM+3
14693  M01S00060.ns2557  +++|          CWM    SPTA,ON
14694  M01S00061.ns2557  +++|
14695  M01S00062.ns2557  +++| SPT      SUBR               ENTRY/EXIT
14696  M01S00063.ns2557  +++|          LDM    .DCS
14697  M01S00064.ns2557  +++|          ZJP    SPT1        IF NOT 721 CONSOLE
14698  M01S00065.ns2557  +++|
14699  M01S00066.ns2557  +++|*         SET *SCD* INFORMATION.
14700  M01S00067.ns2557  +++|
14701  M01S00068.ns2557  +++|          RAM    SPTA+1      SET *SCD* PP NUMBER
14702  M01S00069.ns2557  +++|          LDM    SCIP
14703  M01S00070.ns2557  +++|          RAM    SPTA+3      SET *SCD* PORT NUMBER
14704  M01S09895.set     +++|          LDD    CM+3
14705  M01S09896.set     +++|          ADN    4
14706  M01S09897.set     +++|          STM    SPTB+4      SET FWA OF DISPLAY BUFFER
14707  M01S09898.set     +++|          SHN    -14
14708  M01S09899.set     +++|          ADD    CM+2
14709  M01S09900.set     +++|          STM    SPTB+3
14710  M01S09901.set     +++|          LDC    SCDCL+4     CLEAR TABLE AND BUFFER
14711  M01S09902.set     +++|          RJM    CLS
Line S09903 Modification History
M01 (Added by) set
M02 (Updated by) ns2557
Seq #  *Modification Id* Act 
----------------------------+
14712  M02S09903.ns2557  ---|          LDD    CM+2        STORE PARAMETER TABLE
14713  M01S00071.ns2557  +++|          LDD    CM+2        STORE DISPLAY BUFFER POINTER
14714  M01S09904.set     +++|          SHN    14
14715  M01S09905.set     +++|          LMD    CM+3
Line S09906 Modification History
M01 (Added by) set
M02 (Updated by) ns2557
Seq #  *Modification Id* Act 
----------------------------+
14716  M02S09906.ns2557  ---|          CWM    SPTA,ON
Line S09907 Modification History
M01 (Added by) set
M02 (Updated by) ns2557
Seq #  *Modification Id* Act 
----------------------------+
14717  M02S09907.ns2557  ---|          ADN    3-1
Line S09908 Modification History
M01 (Added by) set
M02 (Updated by) ns2557
Seq #  *Modification Id* Act 
----------------------------+
14718  M02S09908.ns2557  ---|          CWM    SPTB,ON
Line S09909 Modification History
M01 (Added by) set
M02 (Updated by) ns2557
Seq #  *Modification Id* Act 
----------------------------+
14719  M02S09909.ns2557  ---|          UJP    SPTX        RETURN
14720  M01S00072.ns2557  +++|          ADN    3
14721  M01S00073.ns2557  +++|          CWM    SPTB,ON
14722  M01S00074.ns2557  +++|          UJP    SPT2        SET AND STORE FIRST WORD
14723  M01S09910.set     +++|
14724  M01S09911.set     +++|
Line S09912 Modification History
M01 (Added by) set
M02 (Updated by) ns2557
Seq #  *Modification Id* Act 
----------------------------+
14725  M02S09912.ns2557  ---| SPTA     VFD    12/0,16/4,4/0,1/1,2/1,3/1,3/1,3/0,16/0
14726  M01S00075.ns2557  +++| SPTA     VFD    12/0,16/140004,4/0,1/1,2/1,3/1,3/1,3/0,16/0
14727  M01S09913.set     +++| SPTB     VFD    3/2,9/0,16/SCDCL,32/0
Line S09914 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14728  M02S09914.271l716 ---| SSE      SPACE  4,10
Line S09915 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14729  M02S09915.271l716 ---|**        SSE - SEARCH FOR SELECTED EQUIPMENT TYPE.
Line S09916 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14730  M02S09916.271l716 ---|*
Line S09917 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14731  M02S09917.271l716 ---|*         ENTRY  (A) = 1/1,17/MNEMONIC IF INITIAL ENTRY.
Line S09918 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14732  M02S09918.271l716 ---|*                    = POSITIVE IF SUBSEQUENT ENTRY.
Line S09919 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14733  M02S09919.271l716 ---|*
Line S09920 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14734  M02S09920.271l716 ---|*         EXIT   (A) = 0 IF EQUIPMENT TYPE FOUND.
Line S09921 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14735  M02S09921.271l716 ---|*                (EQ) = EST ORDINAL.
Line S09922 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14736  M02S09922.271l716 ---|*                (AB - AB+4) = WORD *EQDE* OF EST ENTRY.
Line S09923 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14737  M02S09923.271l716 ---|*
Line S09924 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14738  M02S09924.271l716 ---|*         MACROS SFA.
Line S09925 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14739  M02S09925.271l716 ---|
Line S09926 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14740  M02S09926.271l716 ---|
Line S09927 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14741  M02S09927.271l716 ---| SSE1     SOD    EQ
Line S09928 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14742  M02S09928.271l716 ---|          MJN    SSEX        IF END OF EST
Line S09929 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14743  M02S09929.271l716 ---|          SFA    EST
Line S09930 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14744  M02S09930.271l716 ---|          ADK    EQDE
Line S09931 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14745  M02S09931.271l716 ---|          CRD    AB
Line S09932 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14746  M02S09932.271l716 ---|          LDD    AB+3        CHECK MNEMONIC
Line S09933 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14747  M02S09933.271l716 ---|          LMC    0
Line S09934 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14748  M02S09934.271l716 ---| SSEA     EQU    *-1
Line S09935 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14749  M02S09935.271l716 ---|          NJN    SSE1        IF NOT FOUND
Line S09936 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14750  M02S09936.271l716 ---|
Line S09937 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14751  M02S09937.271l716 ---| SSE      SUBR               ENTRY/EXIT
Line S09938 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14752  M02S09938.271l716 ---|          PJN    SSE1        IF NOT INITIAL ENTRY
Line S09939 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14753  M02S09939.271l716 ---|          STM    SSEA
Line S09940 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14754  M02S09940.271l716 ---|          LDN    ESTP
Line S09941 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14755  M02S09941.271l716 ---|          CRD    AB
Line S09942 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14756  M02S09942.271l716 ---|          LDD    AB+2        INITIALIZE EST ORDINAL
Line S09943 Modification History
M01 (Added by) set
M02 (Updated by) 271l716
Seq #  *Modification Id* Act 
----------------------------+
14757  M02S09943.271l716 ---|          STD    EQ
Proceed to Part 12
cdc/nos2.source/opl.opl871/deck/set.011.txt · Last modified: by 127.0.0.1