User Tools

Site Tools


cdc:nos2.source:opl.opl871:deck:cease

Deck CEASE

4 Modifications

Source

Seq #  *Modification Id* Act 
----------------------------+
00001  M01S00001.cease   +++|          IDENT  CEASE
00002  M01S00002.cease   +++|
00003  M01S00003.cease   +++|          ENTRY  CEASE
Line S00004 Modification History
M01 (Added by) cease
M02 (Updated by) ns2440
Seq #  *Modification Id* Act 
----------------------------+
00004  M02S00004.ns2440  ---|  COMMENT 72/07/09.           TERMINATE TASK EXECUTION.
00005  M01S00001.ns2440  +++|          TITLE  CEASE - TERMINATE TASK EXECUTION.
00006  M01S00002.ns2440  +++|*COMMENT  CEASE - TERMINATE TASK EXECUTION.
Line S00005 Modification History
M01 (Added by) cease
M02 (Updated by) 281l803
Seq #  *Modification Id* Act 
----------------------------+
00007  M02S00005.281l803 ---|          COMMENT COPYRIGHT CONTROL DATA CORP.1972.
00008  M01S00001.281l803 +++|          COMMENT  COPYRIGHT CONTROL DATA SYSTEMS INC.  1992.
Line S00006 Modification History
M01 (Added by) cease
M02 (Updated by) ns2440
Seq #  *Modification Id* Act 
----------------------------+
00009  M02S00006.ns2440  ---|          TITLE  CEASE - TERMINATE TASK EXECUTION.
00010  M01S00007.cease   +++|          SPACE  4
00011  M01S00008.cease   +++|***       CEASE - TERMINATE TASK EXECUTION.
00012  M01S00009.cease   +++|*         J.C. BOHNHOFF. 72/07/09.
00013  M01S00001.ns2122a +++|*CALL     COMKMAC
00014  M01S00010.cease   +++|          SPACE  4
00015  M01S00011.cease   +++|***       CALL FORMAT -
00016  M01S00012.cease   +++|*
00017  M01S00013.cease   +++|*         FORTRAN EXTENDED
00018  M01S00014.cease   +++|*                CALL CEASE(A)
00019  M01S00015.cease   +++|*         COBOL
00020  M01S00016.cease   +++|*                ENTER CEASE USING A
00021  M01S00017.cease   +++|*
Line S00018 Modification History
M01 (Added by) cease
M02 (Updated by) ns2122
Seq #  *Modification Id* Act 
----------------------------+
00022  M02S00018.ns2122  ---|*         WHERE - A" 0 IF ABNORMAL CEASE. APPROPRIATE CORE DUMPS WILL
Line S00019 Modification History
M01 (Added by) cease
M02 (Updated by) ns2122
Seq #  *Modification Id* Act 
----------------------------+
00023  M02S00019.ns2122  ---|*                 BE PROVIDED. (OPTIONAL ARGUMENT)
Line S00020 Modification History
M01 (Added by) cease
M02 (Updated by) ns2122
Seq #  *Modification Id* Act 
----------------------------+
00024  M02S00020.ns2122  ---|*                IF ABNORMAL CEASE, NO RECORDS REPLACED ON DISK AND NO
Line S00021 Modification History
M01 (Added by) cease
M02 (Updated by) ns2122
Seq #  *Modification Id* Act 
----------------------------+
00025  M02S00021.ns2122  ---|*                SUBSEQUENT TASKS SCHEDULED.  IF NORMAL CEASE, AND NO
Line S00022 Modification History
M01 (Added by) cease
M02 (Updated by) ns2122
Seq #  *Modification Id* Act 
----------------------------+
00026  M02S00022.ns2122  ---|*                MORE TASKS TO SCHEDULE, ALL UPDATED RECORDS WRITTEN
Line S00023 Modification History
M01 (Added by) cease
M02 (Updated by) ns2122
Seq #  *Modification Id* Act 
----------------------------+
00027  M02S00023.ns2122  ---|*                TO DISK.
00028  M01S00001.ns2122  +++|*         WHERE
00029  M01S00002.ns2122  +++|*         (A) .LT. - 1 RESERVED FOR CDC.
00030  M01S00003.ns2122  +++|*             = -1 IF NORMAL CEASE AND TERMINAL IS NOT TO
00031  M01S00004.ns2122  +++|*                  BE UNLOCKED.
00032  M01S00005.ns2122  +++|*             = 0 IF NORMAL CEASE.
00033  M01S00006.ns2122  +++|*             = 1 IF ABNORMAL CEASE WITHOUT DUMP.
00034  M01S00007.ns2122  +++|*             .GT. 1 IF ABNORMAL CEASE WITH DUMP.
00035  M01S00008.ns2122  +++|*
00036  M01S00009.ns2122  +++|*
00037  M01S00010.ns2122  +++|*         MACROS SYSTEM.
00038  M01S00024.cease   +++|
00039  M01S00025.cease   +++|
00040  M01S00026.cease   +++| CEASE    PS                 ENTRY
Line S00027 Modification History
M01 (Added by) cease
M02 (Updated by) ns2122
Seq #  *Modification Id* Act 
----------------------------+
00041  M02S00027.ns2122  ---|          ZR     X1,CEA1     IF NO ARGUMENT
Line S00028 Modification History
M01 (Added by) cease
M02 (Updated by) ns2122
Seq #  *Modification Id* Act 
----------------------------+
00042  M02S00028.ns2122  ---|          SA2    X1          READ CEASE FLAG
Line S00029 Modification History
M01 (Added by) cease
M02 (Updated by) ns2122
Seq #  *Modification Id* Act 
----------------------------+
00043  M02S00029.ns2122  ---|          SX1    B0
Line S00030 Modification History
M01 (Added by) cease
M02 (Updated by) ns2122
Seq #  *Modification Id* Act 
----------------------------+
00044  M02S00030.ns2122  ---|          ZR     X2,CEA1     IF NORMAL CEASE
Line S00031 Modification History
M01 (Added by) cease
M02 (Updated by) ns2122
Seq #  *Modification Id* Act 
----------------------------+
00045  M02S00031.ns2122  ---|          SX1    B1          SAVE CEASE FLAG WITH NO DUMP
Line S00032 Modification History
M01 (Added by) cease
M02 (Updated by) ns2122
Seq #  *Modification Id* Act 
----------------------------+
00046  M02S00032.ns2122  ---|          IX2    X2-X1       CHECK CEASE FLAG
Line S00033 Modification History
M01 (Added by) cease
M02 (Updated by) ns2122
Seq #  *Modification Id* Act 
----------------------------+
00047  M02S00033.ns2122  ---|          ZR     X2,CEA1     IF ABNORMAL CEASE WITH NO DUMP
Line S00034 Modification History
M01 (Added by) cease
M02 (Updated by) ns2122
Seq #  *Modification Id* Act 
----------------------------+
00048  M02S00034.ns2122  ---|          SX1    77B         SET DUMP FLAG
Line S00035 Modification History
M01 (Added by) cease
M02 (Updated by) ns2122a
Seq #  *Modification Id* Act 
----------------------------+
00049  M02S00035.ns2122a ---| CEA1     SYSTEM SCT,R,X1    REQUEST CEASE
00050  M01S00002.ns2122a +++|          ZR     X1,CEA1     IF NO PARAMETER
00051  M01S00003.ns2122a +++|          SA1    X1
00052  M01S00004.ns2122a +++| CEA1     CEASE  X1
00053  M01S00036.cease   +++|          JP     CEASE       RETURN
00054  M01S00037.cease   +++|
00055  M01S00038.cease   +++|          END
cdc/nos2.source/opl.opl871/deck/cease.txt ยท Last modified: by 127.0.0.1