Deck ELM

5 Modifications

Source

Seq #  *Modification Id* Act 
----------------------------+
00001  M01S00001.elm     +++|          IDENT  ELM,ELM
00002  M01S00002.elm     +++|          PERIPH
00003  M01S00003.elm     +++|          BASE   MIXED
00004  M01S00004.elm     +++|          SST
00005  M01S00005.elm     +++|*COMMENT  ELM - ERROR LOG MESSAGE PROCESSOR.

Line S00006 Modification History
`M01` (Added by)	`elm`
`M02` (Updated by)	`281l803`

Seq #  *Modification Id* Act 
----------------------------+
00006  M02S00006.281l803 ---|          COMMENT COPYRIGHT CONTROL DATA CORP. 1977.
00007  M01S00001.281l803 +++|          COMMENT  COPYRIGHT CONTROL DATA SYSTEMS INC.  1992.
00008  M01S00007.elm     +++|          TITLE  ELM - ERROR LOG MESSAGE PROCESSOR.
00009  M01S00008.elm     +++|          SPACE  4
00010  M01S00009.elm     +++|***       ELM - ERROR LOG MESSAGE PROCESSOR.
00011  M01S00010.elm     +++|*         S. L. BETH.        77/03/24.
00012  M01S00011.elm     +++|          SPACE  4
00013  M01S00012.elm     +++|***       ELM IS CALLED BY USER PROGRAMS TO LOG MESSAGES
00014  M01S00013.elm     +++|*         IN THE BINARY MAINTENANCE LOG.
00015  M01S00014.elm     +++|          SPACE  4
00016  M01S00015.elm     +++|***       CALL.
00017  M01S00016.elm     +++|*
00018  M01S00017.elm     +++|*
00019  M01S00018.elm     +++|*T RA+1   18/  *ELM*,6/  R,18/  0,18/  ADDR

Figure RA+1

00020  M01S00019.elm     +++|*
00021  M01S00020.elm     +++|*         ECS ERROR INFORMATION HAS THE FOLLOWING FORMAT.
00022  M01S00021.elm     +++|*
00023  M01S00022.elm     +++|*T ADDR   VFD    24/  0,12/  L, 12/  DC,11/  STATUS,1/  C

Figure ADDR

Bitfield Rendering Failure
======== ========= =======
The field description 
[
{ "name": "  C", "bits": 1, "type": 5 },
{ "name": "  STATUS", "bits": 11, "type": 4 },
{ "name": "  DC", "bits":  12, "type": 3 },
{ "name": "  L", "bits": 12, "type": 2 },
{ "name": "  0", "bits": VFD    24, "type": 1 }
]


 is invalid.

Please check your syntax and try again.

00024  M01S00023.elm     +++|*T        VFD    36/ 0,6/ RW,6/ 0,12/ WC

Figure

Bitfield Rendering Failure
======== ========= =======
The field description 
[
{ "name": " WC", "bits": 12, "type": 4 },
{ "name": " 0", "bits": 6, "type": 3 },
{ "name": " RW", "bits": 6, "type": 2 },
{ "name": " 0", "bits": VFD    36, "type": 1 }
]


 is invalid.

Please check your syntax and try again.

Line S00024 Modification History
`M01` (Added by)	`elm`
`M02` (Updated by)	`252l678`

Seq #  *Modification Id* Act 
----------------------------+
00025  M02S00024.252l678 ---|*T        VFD    6/,6/  CD,6/  RT,18/  CMA,3/,21/  ECA

Figure

Bitfield Rendering Failure
======== ========= =======
The field description 
[
{ "name": "  ECA", "bits": 21, "type": 6 },
{ "name": "", "bits": 3, "type": 5 },
{ "name": "  CMA", "bits": 18, "type": 4 },
{ "name": "  RT", "bits": 6, "type": 3 },
{ "name": "  CD", "bits": 6, "type": 2 },
{ "name": "", "bits": VFD    6, "type": 1 }
]


 is invalid.

Please check your syntax and try again.

00026  M01S00001.252l678 +++|*T        VFD    6/, 6/ CD, 6/ RT, 18/ CMA, 24/ EMA

Figure

Bitfield Rendering Failure
======== ========= =======
The field description 
[
{ "name": " EMA", "bits":  24, "type": 5 },
{ "name": " CMA", "bits":  18, "type": 4 },
{ "name": " RT", "bits":  6, "type": 3 },
{ "name": " CD", "bits":  6, "type": 2 },
{ "name": "", "bits": VFD    6, "type": 1 }
]


 is invalid.

Please check your syntax and try again.

00027  M01S00025.elm     +++|*T        VFD    60/  BAD DATA

Figure

Bitfield Rendering Failure
======== ========= =======
The field description 
[
{ "name": "  BAD DATA", "bits": VFD    60, "type": 1 }
]


 is invalid.

Please check your syntax and try again.

00028  M01S00026.elm     +++|*T        VFD    60/  GOOD DATA

Figure

Bitfield Rendering Failure
======== ========= =======
The field description 
[
{ "name": "  GOOD DATA", "bits": VFD    60, "type": 1 }
]


 is invalid.

Please check your syntax and try again.

00029  M01S00027.elm     +++|*
00030  M01S00028.elm     +++|*         L      LENGTH OF ERROR BLOCK.
00031  M01S00029.elm     +++|*
00032  M01S00030.elm     +++|*         DC     DEVICE CODE *EC* = ECS.
00033  M01S00031.elm     +++|*
00034  M01S00032.elm     +++|*         STATUS
00035  M01S00033.elm     +++|*                1 = DAYFILE MESSAGE LIMIT.
00036  M01S00034.elm     +++|*
00037  M01S00035.elm     +++|*         C      COMPLETION BIT.
00038  M01S00036.elm     +++|*
00039  M01S00037.elm     +++|*         RW     READ / WRITE FLAG.
00040  M01S00038.elm     +++|*                1 = READ.
00041  M01S00039.elm     +++|*                2 = WRITE.
00042  M01S00040.elm     +++|*
00043  M01S00041.elm     +++|*         WC     WORD COUNT OF BLOCK TRANSFER.
00044  M01S00042.elm     +++|*
00045  M01S00043.elm     +++|*         CD     RECOVERY CONDITIONS.
00046  M01S00044.elm     +++|*                0 = BLOCK REREAD RECOVERED.
00047  M01S00045.elm     +++|*                1 = DATA NOT RECOVERED.
00048  M01S00046.elm     +++|*
00049  M01S00047.elm     +++|*         RT     RETRY COUNT.
00050  M01S00048.elm     +++|*
00051  M01S00049.elm     +++|*         CMA    CM ADDRESS OF TRANSFER.
00052  M01S00050.elm     +++|*

Line S00051 Modification History
`M01` (Added by)	`elm`
`M02` (Updated by)	`252l678`

Seq #  *Modification Id* Act 
----------------------------+
00053  M02S00051.252l678 ---|*         ECA    ECS ADDRESS OF TRANSFER.
00054  M01S00002.252l678 +++|*         EMA    EXTENDED MEMORY ADDRESS OF TRANSFER.
00055  M01S00052.elm     +++|          SPACE  4
00056  M01S00053.elm     +++|***       OPERATOR MESSAGES.
00057  M01S00054.elm     +++|*
00058  M01S00055.elm     +++|*
00059  M01S00056.elm     +++|*         * ELM - ARGUMENT ERROR.* PROCESSOR WAS CALLED WITH AN
00060  M01S00057.elm     +++|*                ILLEGAL DEVICE CODE OR ERROR BLOCK ADDRESS.
00061  M01S00058.elm     +++|*

Line S00059 Modification History
`M01` (Added by)	`elm`
`M02` (Updated by)	`elm1`

Seq #  *Modification Id* Act 
----------------------------+
00062  M02S00059.elm1    ---|*         * ELM - USER ECS NOT ASSIGNED.* A CALL WAS MADE TO

Line S00060 Modification History
`M01` (Added by)	`elm`
`M02` (Updated by)	`elm1`

Seq #  *Modification Id* Act 
----------------------------+
00063  M02S00060.elm1    ---|*                REPORT AN ECS ERROR AND THE CONTROL POINT DID

Line S00061 Modification History
`M01` (Added by)	`elm`
`M02` (Updated by)	`elm1`

Seq #  *Modification Id* Act 
----------------------------+
00064  M02S00061.elm1    ---|*                NOT HAVE USER ECS ASSIGNED.
00065  M01S00001.elm1    +++|*         * ELM - EXTENDED MEMORY NOT ASSIGNED.* A CALL WAS MADE TO
00066  M01S00002.elm1    +++|*                REPORT AN EXTENDED MEMORY ERROR AND THE CONTROL POINT
00067  M01S00003.elm1    +++|*                DID NOT HAVE EXTENDED MEMORY ASSIGNED.
00068  M01S00062.elm     +++|*
00069  M01S00063.elm     +++|*         * ELM - DAYFILE MESSAGE LIMIT.* A CALL WAS MADE TO REPORT
00070  M01S00064.elm     +++|*                AN ERROR AND THE USERS DAYFILE MESSAGE LIMIT HAD BEEN
00071  M01S00065.elm     +++|*                REACHED.
00072  M01S00066.elm     +++|          SPACE  4
00073  M01S00067.elm     +++|*CALL     COMPMAC
00074  M01S00068.elm     +++|*CALL     COMSCPS
00075  M01S00069.elm     +++|*CALL     COMSDFS
00076  M01S00003.252l678 +++|*CALL     COMSMSP
00077  M01S00004.252l678 +++|*CALL     COMSPIM
00078  M01S00070.elm     +++|          SPACE  4,10
00079  M01S00071.elm     +++|**        EQUATES FOR ERROR BUFFER.
00080  M01S00072.elm     +++|
00081  M01S00073.elm     +++|
00082  M01S00074.elm     +++| BLKL     EQU    2           BLOCK LENGTH
00083  M01S00075.elm     +++| DVCD     EQU    3           DEVICE CODE
00084  M01S00076.elm     +++| COMP     EQU    4           COMPLETION BIT
00085  M01S00077.elm     +++| RWFG     EQU    1*5+3       READ/WRITE FLAG
00086  M01S00078.elm     +++| WDCT     EQU    1*5+3       WORD COUNT
00087  M01S00079.elm     +++| COND     EQU    2*5         RECOVERY CONDITIONS
00088  M01S00080.elm     +++| RTCT     EQU    2*5+1       RETRY COUNT
00089  M01S00081.elm     +++| CMAD     EQU    2*5+1       RELATIVE CM ADDRESS

Line S00082 Modification History
`M01` (Added by)	`elm`
`M02` (Updated by)	`252l678`

Seq #  *Modification Id* Act 
----------------------------+
00090  M02S00082.252l678 ---| ECAD     EQU    2*5+3       RELATIVE ECS ADDRESS
00091  M01S00005.252l678 +++| EMAD     EQU    2*5+3       RELATIVE EM ADDRESS
00092  M01S00083.elm     +++| BDDA     EQU    3*5         BAD DATA
00093  M01S00084.elm     +++| GDDA     EQU    4*5         GOOD DATA
00094  M01S00085.elm     +++| BUFL     EQU    5*5         BUFFER LENGTH
00095  M01S00086.elm     +++|          SPACE  4
00096  M01S00087.elm     +++|*         EQUATES FOR STATUS REPLIES.
00097  M01S00088.elm     +++|
00098  M01S00089.elm     +++|
00099  M01S00090.elm     +++| LDFM     EQU    1           DAYFILE LIMIT REACHED
00100  M01S00091.elm     +++|          SPACE  4
00101  M01S00092.elm     +++|**        DIRECT LOCATION ASSIGNMENTS.
00102  M01S00093.elm     +++|
00103  M01S00094.elm     +++|
00104  M01S00095.elm     +++| CN       EQU    27          RECOVERED/UNRECOVERED FLAG
00105  M01S00096.elm     +++| CW       EQU    30 - 34     CONTROL WORDS
00106  M01S00097.elm     +++| ST       EQU    36          STATUS TO RETURN
00107  M01S00098.elm     +++| ELM      TITLE  MAIN PROGRAM.
00108  M01S00099.elm     +++|**        ELM - MAIN PROGRAM.
00109  M01S00100.elm     +++|
00110  M01S00101.elm     +++|
00111  M01S00102.elm     +++|          ORG    PPFW
00112  M01S00103.elm     +++|
00113  M01S00104.elm     +++| ELM      RJM    PRS         GET ERROR PROCESSOR ADDRESS
00114  M01S00105.elm     +++|          ZJN    ELM1        IF DAYFILE MESSAGE LIMIT
00115  M01S00106.elm     +++|          STM    ELMA
00116  M01S00107.elm     +++|          RJM    *           CALL ERROR PROCESSOR
00117  M01S00108.elm     +++| ELMA     EQU    *-1
00118  M01S00109.elm     +++|          LDN    1           DECREMENT DAYFILE MESSAGE LIMIT
00119  M01S00110.elm     +++|          STD    CM+1
00120  M01S00111.elm     +++|          STD    CM+2
00121  M01S00112.elm     +++|          LDD    MA
00122  M01S00113.elm     +++|          CWM    ELMB,ON
00123  M01S00114.elm     +++|          MONITOR UADM       UPDATE DAYFILE LIMIT
00124  M01S00115.elm     +++| ELM1     LDD    ST          SET STATUS AND COMPLETION BIT
00125  M01S00116.elm     +++|          SHN    1
00126  M01S00117.elm     +++|          ADN    1
00127  M01S00118.elm     +++|          RAM    BUF+COMP
00128  M01S00119.elm     +++|          LDD    IR+3
00129  M01S00120.elm     +++|          LPN    77
00130  M01S00121.elm     +++|          SHN    6
00131  M01S00122.elm     +++|          ADD    RA
00132  M01S00123.elm     +++|          SHN    6
00133  M01S00124.elm     +++|          ADD    IR+4
00134  M01S00125.elm     +++|          CWM    BUF,ON
00135  M01S00126.elm     +++|          MONITOR DPPM       DROP PPU
00136  M01S00127.elm     +++|          LJM    PPR         RETURN TO PP RESIDENT
00137  M01S00128.elm     +++|
00138  M01S00129.elm     +++|
00139  M01S00130.elm     +++|*         BUFFER FOR *UADM* FUNCTION.
00140  M01S00131.elm     +++|
00141  M01S00132.elm     +++|
00142  M01S00133.elm     +++| ELMB     CON    CDCS        DECREMENT FIELD
00143  M01S00134.elm     +++|          CON    ACLW
00144  M01S00135.elm     +++|          CON    36D*100+12D
00145  M01S00136.elm     +++|          CON    0
00146  M01S00137.elm     +++|          CON    0
00147  M01S00138.elm     +++| ABT      SPACE  4,10
00148  M01S00139.elm     +++|**        ABT - ABORT PROGRAM.
00149  M01S00140.elm     +++|*
00150  M01S00141.elm     +++|*         ENTRY  (A) = ERROR MESSAGE ADDRESS.
00151  M01S00142.elm     +++|
00152  M01S00143.elm     +++|
00153  M01S00144.elm     +++| ABT      RJM    DFM
00154  M01S00145.elm     +++|          MONITOR ABTM
00155  M01S00146.elm     +++|          LJM    PPR         RETURN TO PP RESIDENT
00156  M01S00147.elm     +++|          TITLE  ECS - ERROR PROCESSOR.
00157  M01S00148.elm     +++|**        ECS - PROCESS ECS ERROR MESSAGES.
00158  M01S00149.elm     +++|*
00159  M01S00150.elm     +++|*         ENTRY  (BUF) = ECS ERROR BUFFER.
00160  M01S00151.elm     +++|*
00161  M01S00152.elm     +++|*         EXIT   TO *ABT* IF ECS NOT ASSIGNED.
00162  M01S00153.elm     +++|
00163  M01S00154.elm     +++|
00164  M01S00155.elm     +++| ECS      SUBR               ENTRY/EXIT
00165  M01S00156.elm     +++|          LDD    CP          READ ECS CONTROL WORD
00166  M01S00157.elm     +++|          ADN    ECSW
00167  M01S00158.elm     +++|          CRD    CW
00168  M01S00159.elm     +++|          LDD    CW+4        CHECK FOR ECS ASSIGNED
00169  M01S00160.elm     +++|          NJN    ECS1        IF USER ECS ASSIGNED

Line S00161 Modification History
`M01` (Added by)	`elm`
`M02` (Updated by)	`elm1`

Seq #  *Modification Id* Act 
----------------------------+
00170  M02S00161.elm1    ---|          LDC    =C* ELM - USER ECS NOT ASSIGNED.*
00171  M01S00004.elm1    +++|          LDC    =C* ELM - EXTENDED MEMORY NOT ASSIGNED.*
00172  M01S00162.elm     +++|          LJM    ABT         ABORT JOB
00173  M01S00163.elm     +++|
00174  M01S00164.elm     +++| ECS1     LDM    BUF+RWFG    SET READ/WRITE FLAG IN MESSAGE
00175  M01S00165.elm     +++|          SHN    -6
00176  M01S00166.elm     +++|          LPN    2
00177  M01S00167.elm     +++|          STM    MSGA+6

Line S00168 Modification History
`M01` (Added by)	`elm`
`M02` (Updated by)	`252l678`

Seq #  *Modification Id* Act 
----------------------------+
00178  M02S00168.252l678 ---|          SHN    -1          ADD SYMPTOM CODE TO MESSAGE

Line S00169 Modification History
`M01` (Added by)	`elm`
`M02` (Updated by)	`252l678`

Seq #  *Modification Id* Act 
----------------------------+
00179  M02S00169.252l678 ---|          ADC    /COMSDFS/HS0040+/COMSDFS/DELM*400
00180  M01S00006.252l678 +++|          LDN    PARE        SET ERROR CODE
00181  M01S00007.252l678 +++|          STM    MSGA+12
00182  M01S00008.252l678 +++|          LDC    /COMSDFS/HS0040+/COMSDFS/DELM*400
00183  M01S00170.elm     +++|          STM    MSGA+1
00184  M01S00171.elm     +++|          LDM    BUF+RTCT    ADD RETRY COUNT TO MESSAGE
00185  M01S00172.elm     +++|          SCN    77
00186  M01S00173.elm     +++|          RAM    MSGA+6
00187  M01S00174.elm     +++|          LDM    BUF+COND    SET RECOVERED/UNRECOVERED STATUS
00188  M01S00175.elm     +++|          LPN    1
00189  M01S00176.elm     +++|          RAM    MSGA+6
00190  M01S00177.elm     +++|          LDK    MMFL        ADD MACHINE ID TO MESSAGE
00191  M01S00178.elm     +++|          CRD    CM
00192  M01S00179.elm     +++|          LDD    CM
00193  M01S00180.elm     +++|          STM    MSGA+10
00194  M01S00181.elm     +++|
00195  M01S00182.elm     +++|*         THE WORD COUNT SUPPLIED IN THE PARAMETER BLOCK IS THE WORD
00196  M01S00183.elm     +++|*         COUNT OF THE ENTIRE BLOCK SPECIFIED BY THE USER.  THE
00197  M01S00184.elm     +++|*         EXTENDED MEMORY ADDRESS, HOWEVER, APPLIES TO A PARTICULAR
00198  M01S00185.elm     +++|*         ADDRESS IN ERROR.  THE WORD COUNT REPORTED IN THE BML
00199  M01S00186.elm     +++|*         MESSAGE IS THEREFORE ALWAYS ONE, TO INDICATE THE EXTENDED
00200  M01S00187.elm     +++|*         MEMORY ADDRESS IS AN ACTUAL ERROR ADDRESS INSTEAD OF THE
00201  M01S00188.elm     +++|*         ADDRESS OF A BLOCK CONTAINING AN ERROR.
00202  M01S00189.elm     +++|
00203  M01S00190.elm     +++|          LDN    1           ADD WORD COUNT TO MESSAGE

Line S00191 Modification History
`M01` (Added by)	`elm`
`M02` (Updated by)	`252l678`

Seq #  *Modification Id* Act 
----------------------------+
00204  M02S00191.252l678 ---|          STM    MSGA+14
00205  M01S00009.252l678 +++|          STM    MSGA+21
00206  M01S00192.elm     +++|
00207  M01S00193.elm     +++|*         DETERMINE THE MESSAGE ID WHICH CORRESPONDS TO THIS DEVICE
00208  M01S00194.elm     +++|*         AND ADD IT TO THE BML MESSAGE HEADER.
00209  M01S00195.elm     +++|

Line S00196 Modification History
`M01` (Added by)	`elm`
`M02` (Updated by)	`252l678`

Seq #  *Modification Id* Act 
----------------------------+
00210  M02S00196.252l678 ---|          LDK    EMEQ        ADD EST ORDINAL TO MESSAGE
00211  M01S00010.252l678 +++|          LDK    UEML        ADD EST ORDINAL TO MESSAGE
00212  M01S00011.252l678 +++|          CRD    CM
00213  M01S00012.252l678 +++|          LDD    CM+2
00214  M01S00013.252l678 +++|          LPC    777
00215  M01S00014.252l678 +++|          STD    T5
00216  M01S00197.elm     +++|          STM    MSGA+5
00217  M01S00015.252l678 +++|          ZJN    ECS3        IF NO EQUIPMENT
00218  M01S00198.elm     +++|          SFA    EST         GET EST ENTRY FOR DEVICE
00219  M01S00199.elm     +++|          ADK    EQDE
00220  M01S00200.elm     +++|          CRD    CM
00221  M01S00201.elm     +++|          LDD    CM+4        GET WORD *DILL* FROM THE MST
00222  M01S00202.elm     +++|          SHN    3
00223  M01S00203.elm     +++|          ADK    DILL
00224  M01S00204.elm     +++|          CRD    CM

Line S00205 Modification History
`M01` (Added by)	`elm`
`M02` (Updated by)	`ns2525`

Seq #  *Modification Id* Act 
----------------------------+
00225  M02S00205.ns2525  ---|          LDD    CM+3        GET EXTENDED MEMORY TYPE BITS

Line S00206 Modification History
`M01` (Added by)	`elm`
`M02` (Updated by)	`ns2525`

Seq #  *Modification Id* Act 
----------------------------+
00226  M02S00206.ns2525  ---|          LPC    777

Line S00207 Modification History
`M01` (Added by)	`elm`
`M02` (Updated by)	`ns2525`

Seq #  *Modification Id* Act 
----------------------------+
00227  M02S00207.ns2525  ---|          STD    T3

Line S00208 Modification History
`M01` (Added by)	`elm`
`M02` (Updated by)	`ns2525`

Seq #  *Modification Id* Act 
----------------------------+
00228  M02S00208.ns2525  ---|          LDK    ECSBL
00229  M01S00001.ns2525  +++|          LDN    ECSBL
00230  M01S00209.elm     +++|          STD    T1
00231  M01S00210.elm     +++| ECS2     LCN    2           SCAN TABLE FOR A MATCH
00232  M01S00211.elm     +++|          RAD    T1
00233  M01S00212.elm     +++|          ZJN    ECS3        IF DEVICE NOT FOUND IN TABLE
00234  M01S00213.elm     +++|          LDM    ECSB-2,T1

Line S00214 Modification History
`M01` (Added by)	`elm`
`M02` (Updated by)	`ns2525`

Seq #  *Modification Id* Act 
----------------------------+
00235  M02S00214.ns2525  ---|          LMD    T3
00236  M01S00002.ns2525  +++|          LMD    CM+3
00237  M01S00003.ns2525  +++|          LPC    707
00238  M01S00215.elm     +++|          NJN    ECS2        IF A MATCH HAS NOT YET BEEN FOUND
00239  M01S00216.elm     +++|          LDM    ECSB-1,T1
00240  M01S00217.elm     +++| ECS3     STM    MSGA+0      ADD MESSAGE ID TO MESSAGE
00241  M01S00218.elm     +++|

Line S00219 Modification History
`M01` (Added by)	`elm`
`M02` (Updated by)	`252l678`

Seq #  *Modification Id* Act 
----------------------------+
00242  M02S00219.252l678 ---|*         CONVERT ECS ADDRESS AND ADD IT TO THE BML MESSAGE.
00243  M01S00016.252l678 +++|*         CONVERT EM ADDRESS AND ADD IT TO THE BML MESSAGE.
00244  M01S00220.elm     +++|

Line S00221 Modification History
`M01` (Added by)	`elm`
`M02` (Updated by)	`252l678`

Seq #  *Modification Id* Act 
----------------------------+
00245  M02S00221.252l678 ---|          LDD    CW+3        ADJUST FOR RAE

Line S00222 Modification History
`M01` (Added by)	`elm`
`M02` (Updated by)	`252l678`

Seq #  *Modification Id* Act 
----------------------------+
00246  M02S00222.252l678 ---|          LPN    7

Line S00223 Modification History
`M01` (Added by)	`elm`
`M02` (Updated by)	`252l678`

Seq #  *Modification Id* Act 
----------------------------+
00247  M02S00223.252l678 ---|          SHN    11

Line S00224 Modification History
`M01` (Added by)	`elm`
`M02` (Updated by)	`252l678`

Seq #  *Modification Id* Act 
----------------------------+
00248  M02S00224.252l678 ---|          RAM    BUF+ECAD+1

Line S00225 Modification History
`M01` (Added by)	`elm`
`M02` (Updated by)	`252l678`

Seq #  *Modification Id* Act 
----------------------------+
00249  M02S00225.252l678 ---|          STM    MSGA+16

Line S00226 Modification History
`M01` (Added by)	`elm`
`M02` (Updated by)	`252l678`

Seq #  *Modification Id* Act 
----------------------------+
00250  M02S00226.252l678 ---|          SHN    -14

Line S00227 Modification History
`M01` (Added by)	`elm`
`M02` (Updated by)	`252l678`

Seq #  *Modification Id* Act 
----------------------------+
00251  M02S00227.252l678 ---|          RAM    BUF+ECAD

Line S00228 Modification History
`M01` (Added by)	`elm`
`M02` (Updated by)	`252l678`

Seq #  *Modification Id* Act 
----------------------------+
00252  M02S00228.252l678 ---|          LDD    CW+3

Line S00229 Modification History
`M01` (Added by)	`elm`
`M02` (Updated by)	`252l678`

Seq #  *Modification Id* Act 
----------------------------+
00253  M02S00229.252l678 ---|          SHN    -3

Line S00230 Modification History
`M01` (Added by)	`elm`
`M02` (Updated by)	`252l678`

Seq #  *Modification Id* Act 
----------------------------+
00254  M02S00230.252l678 ---|          RAM    BUF+ECAD

Line S00231 Modification History
`M01` (Added by)	`elm`
`M02` (Updated by)	`252l678`

Seq #  *Modification Id* Act 
----------------------------+
00255  M02S00231.252l678 ---|          LPC    777
00256  M01S00017.252l678 +++|          LDD    CW+2        ADJUST FOR RAE
00257  M01S00018.252l678 +++|          SHN    14
00258  M01S00019.252l678 +++|          ADD    CW+3
00259  M01S00020.252l678 +++| ECSA     SHN    0
00260  M01S00021.252l678 +++|*         SHN    17+UESC
00261  M01S00022.252l678 +++|          STD    T0
00262  M01S00023.252l678 +++|          SHN    -6
00263  M01S00024.252l678 +++|          SCN    77
00264  M01S00025.252l678 +++|          RAM    BUF+EMAD+1
00265  M01S00026.252l678 +++|          STM    MSGA+23
00266  M01S00027.252l678 +++|          SHN    -14
00267  M01S00028.252l678 +++|          ADD    T0
00268  M01S00029.252l678 +++|          RAM    BUF+EMAD

Line S00232 Modification History
`M01` (Added by)	`elm`
`M02` (Updated by)	`252l678`

Seq #  *Modification Id* Act 
----------------------------+
00269  M02S00232.252l678 ---|          STM    MSGA+15
00270  M01S00030.252l678 +++|          STM    MSGA+22
00271  M01S00233.elm     +++|
00272  M01S00234.elm     +++|*         CONVERT CM ADDRESS AND ADD IT TO THE BML MESSAGE.
00273  M01S00235.elm     +++|
00274  M01S00236.elm     +++|          LDD    RA
00275  M01S00237.elm     +++|          SHN    6
00276  M01S00238.elm     +++|          RAM    BUF+CMAD+1

Line S00239 Modification History
`M01` (Added by)	`elm`
`M02` (Updated by)	`252l678`

Seq #  *Modification Id* Act 
----------------------------+
00277  M02S00239.252l678 ---|          STM    MSGA+35
00278  M01S00031.252l678 +++|          STM    MSGA+16
00279  M01S00240.elm     +++|          SHN    -14
00280  M01S00241.elm     +++|          RAM    BUF+CMAD
00281  M01S00242.elm     +++|          LPN    77

Line S00243 Modification History
`M01` (Added by)	`elm`
`M02` (Updated by)	`252l678`

Seq #  *Modification Id* Act 
----------------------------+
00282  M02S00243.252l678 ---|          STM    MSGA+34
00283  M01S00032.252l678 +++|          STM    MSGA+15
00284  M01S00244.elm     +++|
00285  M01S00245.elm     +++|*         ADD BAD DATA AND GOOD DATA TO MESSAGE.  BAD DATA, (DATA
00286  M01S00246.elm     +++|*         RECEIVED OR SENT ON THE FIRST TRY) IS ALWAYS PROVIDED IN THE
00287  M01S00247.elm     +++|*         PARAMETER BLOCK.  GOOD DATA (DATA RECEIVED ON THE SECOND
00288  M01S00248.elm     +++|*         ATTEMPT) IS ONLY PROVIDED IN THE CASE OF A RECOVERED READ
00289  M01S00249.elm     +++|*         EXTENDED MEMORY ERROR IN WHICH THE DATA FROM THE SECOND
00290  M01S00250.elm     +++|*         READ ATTEMPT IS DIFFERENT FROM THE DATA RECEIVED THE FIRST
00291  M01S00251.elm     +++|*         TIME.
00292  M01S00252.elm     +++|
00293  M01S00253.elm     +++|          LDN    2
00294  M01S00254.elm     +++|          STD    T1
00295  M01S00255.elm     +++|          LDD    MA
00296  M01S00256.elm     +++|          CWM    BUF+BDDA,ON
00297  M01S00257.elm     +++|          CWM    BUF+GDDA,ON
00298  M01S00258.elm     +++|          SBN    2

Line S00259 Modification History
`M01` (Added by)	`elm`
`M02` (Updated by)	`252l678`

Seq #  *Modification Id* Act 
----------------------------+
00299  M02S00259.252l678 ---|          CRM    MSGA+17,T1
00300  M01S00033.252l678 +++|          CRM    MSGA+24,T1
00301  M01S00260.elm     +++|          LDM    BUF+COND    CHECK FOR GOOD DATA
00302  M01S00261.elm     +++|          LPN    1
00303  M01S00262.elm     +++|          NJN    ECS4        IF NO GOOD DATA
00304  M01S00263.elm     +++|          LDM    BUF+RWFG
00305  M01S00264.elm     +++|          SHN   -7
00306  M01S00265.elm     +++|          LPN    1
00307  M01S00266.elm     +++|          NJN    ECS4        IF A WRITE PARITY ERROR
00308  M01S00267.elm     +++|          LDN    3

Line S00268 Modification History
`M01` (Added by)	`elm`
`M02` (Updated by)	`252l678`

Seq #  *Modification Id* Act 
----------------------------+
00309  M02S00268.252l678 ---| ECS4     STM    MSGA+12
00310  M01S00034.252l678 +++| ECS4     STM    MSGA+17
00311  M01S00269.elm     +++|          LDN    6*5         SET BML MESSAGE LENGTH
00312  M01S00270.elm     +++|          STD    CM+1
00313  M01S00271.elm     +++|          LDC    MSGA+BMLN   ISSUE BML MESSAGE
00314  M01S00272.elm     +++|          RJM    DFM
00315  M01S00273.elm     +++|          AOM    ELMB+4      BUMP MESSAGE INCREMENT
00316  M01S00274.elm     +++|
00317  M01S00275.elm     +++|*         IF THE ERROR WAS UNRECOVERED, ISSUE AN ERROR MESSAGE TO THE
00318  M01S00276.elm     +++|*         ERRLOG AND TO THE SYSTEM AND JOB DAYFILES INDICATING THE TYPE
00319  M01S00277.elm     +++|*         OF ERROR AND THE DEVICE ON WHICH THE ERROR OCCURRED.
00320  M01S00278.elm     +++|
00321  M01S00279.elm     +++|          LDM    BUF+COND
00322  M01S00280.elm     +++|          LPN    1
00323  M01S00281.elm     +++|          STD    CN
00324  M01S00282.elm     +++|          ZJN    ECS5        IF THE ERROR WAS RECOVERED

Line S00283 Modification History
`M01` (Added by)	`elm`
`M02` (Updated by)	`252l678`

Seq #  *Modification Id* Act 
----------------------------+
00325  M02S00283.252l678 ---|          LDC    EMEQ*100+2R0  PUT EST ORDINAL INTO DAYFILE MESSAGE

Line S00284 Modification History
`M01` (Added by)	`elm`
`M02` (Updated by)	`252l678`

Seq #  *Modification Id* Act 
----------------------------+
00326  M02S00284.252l678 ---|          STM    ECSG+2
00327  M01S00035.252l678 +++|          LDD    T5          SET EQUIPMENT ORDINAL IN MESSAGE
00328  M01S00036.252l678 +++|          LPN    7
00329  M01S00037.252l678 +++|          SHN    6
00330  M01S00038.252l678 +++|          RAM    ECSG+2
00331  M01S00039.252l678 +++|          LDD    T5
00332  M01S00040.252l678 +++|          SHN    -3
00333  M01S00041.252l678 +++|          RJM    C2D
00334  M01S00042.252l678 +++|          STM    ECSG+1
00335  M01S00285.elm     +++|          LDC    ECSG        ISSUE SYSTEM AND DAYFILE MESSAGES
00336  M01S00286.elm     +++|          RJM    DFM
00337  M01S00287.elm     +++|          LDC    ECSG+ERLN   ISSUE ERRLOG MESSAGE
00338  M01S00288.elm     +++|          RJM    DFM
00339  M01S00289.elm     +++|
00340  M01S00290.elm     +++|*         INCREMENT THE RECOVERED OR UNRECOVERED ERROR COUNTER IN THE
00341  M01S00291.elm     +++|*         MST FOR THE CURRENT DEVICE.
00342  M01S00292.elm     +++|

Line S00293 Modification History
`M01` (Added by)	`elm`
`M02` (Updated by)	`252l678`

Seq #  *Modification Id* Act 
----------------------------+
00343  M02S00293.252l678 ---| ECS5     LDK    EMEQ        SET EST ORDINAL
00344  M01S00043.252l678 +++| ECS5     LDD    T5          SET EST ORDINAL
00345  M01S00044.252l678 +++|          ZJN    ECS6        IF NO EQUIPMENT DEFINED
00346  M01S00294.elm     +++|          STD    CM+1
00347  M01S00295.elm     +++|          LDD    CN          SET BYTE NUMBER
00348  M01S00296.elm     +++|          ADN    3
00349  M01S00297.elm     +++|          STD    CM+2
00350  M01S00298.elm     +++|          LDK    ICTS        SET SUBFUNCTION
00351  M01S00299.elm     +++|          STD    CM+3

Line S00300 Modification History
`M01` (Added by)	`elm`
`M02` (Updated by)	`253l688`

Seq #  *Modification Id* Act 
----------------------------+
00352  M02S00300.253l688 ---|          MONITOR  STBM      INCREMENT COUNTER
00353  M01S00001.253l688 +++|          MONITOR  SMDM      INCREMENT COUNTER

Line S00301 Modification History
`M01` (Added by)	`elm`
`M02` (Updated by)	`252l678`

Seq #  *Modification Id* Act 
----------------------------+
00354  M02S00301.252l678 ---|          LJM    ECSX        RETURN
00355  M01S00045.252l678 +++| ECS6     LJM    ECSX        RETURN
00356  M01S00302.elm     +++|
00357  M01S00303.elm     +++|
00358  M01S00304.elm     +++|
00359  M01S00305.elm     +++| ECSB     BSS    0           TABLE OF MESSAGE IDENTIFERS
00360  M01S00306.elm     +++|
00361  M01S00307.elm     +++|          CON    112,/COMSDFS/RM0070    (DP)  ECS I  - DC135 DDP
00362  M01S00308.elm     +++|          CON    110,/COMSDFS/RM0071    (DE)  ECS I  - COUPLER
00363  M01S00309.elm     +++|          CON    212,/COMSDFS/RM0072    (DP)  ECS II - DC135 DDP
00364  M01S00310.elm     +++|          CON    210,/COMSDFS/RM0073    (DE)  ECS II - COUPLER
00365  M01S00311.elm     +++|          CON    111,/COMSDFS/RM0074    (DP)  ECS I  - DC145 DDP
00366  M01S00312.elm     +++|          CON    211,/COMSDFS/RM0075    (DP)  ECS II - DC145 DDP

Line S00313 Modification History
`M01` (Added by)	`elm`
`M02` (Updated by)	`252l678`

Seq #  *Modification Id* Act 
----------------------------+
00367  M02S00313.252l678 ---|          CON    320,/COMSDFS/RM0076    (DP)  LCME   - COUPLER
00368  M01S00046.252l678 +++|          CON    320,/COMSDFS/RM0076    (DE)  LCME   - COUPLER
00369  M01S00314.elm     +++|          CON    510,/COMSDFS/RM0207    (DE)  ESM    - COUPLER
00370  M01S00315.elm     +++|          CON    511,/COMSDFS/RM0210    (DP)  ESM    - LOW SPEED PORT
00371  M01S00316.elm     +++|
00372  M01S00317.elm     +++| ECSBL    EQU    *-ECSB+2    MESSAGE ID TABLE LENGTH
00373  M01S00318.elm     +++|
00374  M01S00319.elm     +++| ECSG     DATA   C*EQ000 PE MASS STORAGE ERROR.*
00375  M01S00047.252l678 +++|          SPACE  4,10
00376  M01S00048.252l678 +++|*         COMMON DECKS.
00377  M01S00049.252l678 +++|
00378  M01S00050.252l678 +++|*CALL     COMPC2D
00379  M01S00320.elm     +++|
00380  M01S00321.elm     +++|          USE    LITERALS
00381  M01S00322.elm     +++|
00382  M01S00323.elm     +++|
00383  M01S00324.elm     +++|*         MESSAGE SKELETONS.
00384  M01S00325.elm     +++|
00385  M01S00326.elm     +++|
00386  M01S00327.elm     +++| MSGA     BSSZ   6*5         BML MESSAGE BUFFER
00387  M01S00328.elm     +++| PRS      SPACE  4,10
00388  M01S00329.elm     +++|**        PRS - PRESET PROGRAM.
00389  M01S00330.elm     +++|*
00390  M01S00331.elm     +++|*         EXIT   (BUF) = ERROR DATA BUFFER.
00391  M01S00332.elm     +++|*                (A) = MESSAGE PROCESSOR ADDRESS.
00392  M01S00333.elm     +++|*                (A) = 0 IF DAYFILE LIMIT REACHED.
00393  M01S00334.elm     +++|*                TO *ABT* IF ARGUMENT ERROR DETECTED.
00394  M01S00335.elm     +++|*
00395  M01S00336.elm     +++|*         USES   T1, CM - CM+4, ST.
00396  M01S00337.elm     +++|
00397  M01S00338.elm     +++|
00398  M01S00339.elm     +++| PRS      SUBR               ENTRY/EXIT
00399  M01S00051.252l678 +++|          LDK    MEFL
00400  M01S00052.252l678 +++|          CRD    CM
00401  M01S00053.252l678 +++|          LDD    CM+2
00402  M01S00054.252l678 +++|          SHN    -11
00403  M01S00055.252l678 +++|          ADC    SHNI+17
00404  M01S00056.252l678 +++|          STM    ECSA
00405  M01S00340.elm     +++|          LDN    0           CLEAR STATUS REPLY
00406  M01S00341.elm     +++|          STD    ST
00407  M01S00342.elm     +++|          LDD    IR+3        CHECK CALL PARAMETERS
00408  M01S00343.elm     +++|          LPN    77
00409  M01S00344.elm     +++|          SHN    14
00410  M01S00345.elm     +++|          ADD    IR+4
00411  M01S00346.elm     +++|          ADN    BUFL/5
00412  M01S00347.elm     +++|          SHN    -6
00413  M01S00348.elm     +++|          SBD    FL
00414  M01S00349.elm     +++|          MJN    PRS2        IF BUFFER NOT BEYOND FL
00415  M01S00350.elm     +++| PRS1     LDC    =C* ELM - ARGUMENT ERROR.*
00416  M01S00351.elm     +++|          LJM    ABT         ABORT JOB
00417  M01S00352.elm     +++|
00418  M01S00353.elm     +++| PRS2     LDN    BUFL/5      READ ERROR BUFFER
00419  M01S00354.elm     +++|          STD    T1
00420  M01S00355.elm     +++|          LDD    IR+3
00421  M01S00356.elm     +++|          LPN    77
00422  M01S00357.elm     +++|          SHN    6
00423  M01S00358.elm     +++|          ADD    RA
00424  M01S00359.elm     +++|          SHN    6
00425  M01S00360.elm     +++|          ADD    IR+4
00426  M01S00361.elm     +++|          CRM    BUF,T1
00427  M01S00362.elm     +++|          LDD    CP          CHECK FOR DAYFILE LIMIT
00428  M01S00363.elm     +++|          ADK    ACLW
00429  M01S00364.elm     +++|          CRD    CM
00430  M01S00365.elm     +++|          LDD    CM+1
00431  M01S00366.elm     +++|          NJN    PRS3        IF DAYFILE LIMIT NOT REACHED
00432  M01S00367.elm     +++|          LDN    LDFM        SET DAYFILE LIMIT STATUS
00433  M01S00368.elm     +++|          STD    ST
00434  M01S00369.elm     +++|          LDN    0
00435  M01S00370.elm     +++|          LJM    PRSX        RETURN
00436  M01S00371.elm     +++|
00437  M01S00372.elm     +++| PRS3     LCN    1           FIND ERROR PROCESSOR
00438  M01S00373.elm     +++|          STD    T1
00439  M01S00374.elm     +++| PRS4     LDN    2
00440  M01S00375.elm     +++|          RAD    T1
00441  M01S00376.elm     +++|          LDM    PRSA,T1
00442  M01S00377.elm     +++|          ZJN    PRS5        IF END OF TABLE
00443  M01S00378.elm     +++|          LMM    BUF+DVCD
00444  M01S00379.elm     +++|          NJN    PRS4        IF NO MATCH
00445  M01S00380.elm     +++|          LDM    PRSA+1,T1   SET PROCESSOR ADDRESS
00446  M01S00381.elm     +++|          LJM    PRSX        RETURN
00447  M01S00382.elm     +++|
00448  M01S00383.elm     +++| PRS5     LJM    PRS1        ABORT
00449  M01S00384.elm     +++|
00450  M01S00385.elm     +++|**        LIST OF ERROR PROCESSORS.
00451  M01S00386.elm     +++|*
00452  M01S00387.elm     +++|*         ENTRY = 2 WORDS.
00453  M01S00388.elm     +++|*T,       12/  DEVICE CODE,12/  PROCESSOR

Figure

00454  M01S00389.elm     +++|
00455  M01S00390.elm     +++|
00456  M01S00391.elm     +++| PRSA     VFD    12/2REC,12/ECS
00457  M01S00392.elm     +++|          CON    0
00458  M01S00393.elm     +++|
00459  M01S00394.elm     +++|
00460  M01S00395.elm     +++| BUF      EQU    *           ERROR DATA BUFFER
00461  M01S00396.elm     +++|          END