Deck CEASE

Library Member Format: MODIFY

Source

Seq #  *Modification Id* Act 
----------------------------+
00001  M00S00001.cease   ---|          IDENT  CEASE
00002  M00S00002.cease   ---|
00003  M00S00003.cease   ---|          ENTRY  CEASE

Line S00004 Modification History
`M01` (Removed by)	`ns2440`

Seq #  *Modification Id* Act 
----------------------------+
00004  M01S00004.ns2440  ---|  COMMENT 72/07/09.           TERMINATE TASK EXECUTION.

Line S00001 Modification History
`M01` (Added by)	`ns2440`

Seq #  *Modification Id* Act 
----------------------------+
00005  M01S00001.ns2440  +++|          TITLE  CEASE - TERMINATE TASK EXECUTION.
00006  M01S00002.ns2440  +++|*COMMENT  CEASE - TERMINATE TASK EXECUTION.

Line S00005 Modification History
`M01` (Removed by)	`281l803`

Seq #  *Modification Id* Act 
----------------------------+
00007  M01S00005.281l803 ---|          COMMENT COPYRIGHT CONTROL DATA CORP.1972.

Line S00001 Modification History
`M01` (Added by)	`281l803`

Seq #  *Modification Id* Act 
----------------------------+
00008  M01S00001.281l803 +++|          COMMENT  COPYRIGHT CONTROL DATA SYSTEMS INC.  1992.

Line S00006 Modification History
`M01` (Removed by)	`ns2440`

Seq #  *Modification Id* Act 
----------------------------+
00009  M01S00006.ns2440  ---|          TITLE  CEASE - TERMINATE TASK EXECUTION.
00010  M00S00007.cease   ---|          SPACE  4
00011  M00S00008.cease   ---|***       CEASE - TERMINATE TASK EXECUTION.
00012  M00S00009.cease   ---|*         J.C. BOHNHOFF. 72/07/09.

Line S00001 Modification History
`M01` (Added by)	`ns2122a`

Seq #  *Modification Id* Act 
----------------------------+
00013  M01S00001.ns2122a +++|*CALL     COMKMAC
00014  M00S00010.cease   +++|          SPACE  4
00015  M00S00011.cease   +++|***       CALL FORMAT -
00016  M00S00012.cease   +++|*
00017  M00S00013.cease   +++|*         FORTRAN EXTENDED
00018  M00S00014.cease   +++|*                CALL CEASE(A)
00019  M00S00015.cease   +++|*         COBOL
00020  M00S00016.cease   +++|*                ENTER CEASE USING A
00021  M00S00017.cease   +++|*

Line S00018 Modification History
`M01` (Removed by)	`ns2122`

Seq #  *Modification Id* Act 
----------------------------+
00022  M01S00018.ns2122  ---|*         WHERE - A" 0 IF ABNORMAL CEASE. APPROPRIATE CORE DUMPS WILL
00023  M01S00019.ns2122  ---|*                 BE PROVIDED. (OPTIONAL ARGUMENT)
00024  M01S00020.ns2122  ---|*                IF ABNORMAL CEASE, NO RECORDS REPLACED ON DISK AND NO
00025  M01S00021.ns2122  ---|*                SUBSEQUENT TASKS SCHEDULED.  IF NORMAL CEASE, AND NO
00026  M01S00022.ns2122  ---|*                MORE TASKS TO SCHEDULE, ALL UPDATED RECORDS WRITTEN
00027  M01S00023.ns2122  ---|*                TO DISK.

Line S00001 Modification History
`M01` (Added by)	`ns2122`

Seq #  *Modification Id* Act 
----------------------------+
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  M00S00024.cease   +++|
00039  M00S00025.cease   +++|
00040  M00S00026.cease   +++| CEASE    PS                 ENTRY

Line S00027 Modification History
`M01` (Removed by)	`ns2122`

Seq #  *Modification Id* Act 
----------------------------+
00041  M01S00027.ns2122  ---|          ZR     X1,CEA1     IF NO ARGUMENT
00042  M01S00028.ns2122  ---|          SA2    X1          READ CEASE FLAG
00043  M01S00029.ns2122  ---|          SX1    B0
00044  M01S00030.ns2122  ---|          ZR     X2,CEA1     IF NORMAL CEASE
00045  M01S00031.ns2122  ---|          SX1    B1          SAVE CEASE FLAG WITH NO DUMP
00046  M01S00032.ns2122  ---|          IX2    X2-X1       CHECK CEASE FLAG
00047  M01S00033.ns2122  ---|          ZR     X2,CEA1     IF ABNORMAL CEASE WITH NO DUMP
00048  M01S00034.ns2122  ---|          SX1    77B         SET DUMP FLAG

Line S00035 Modification History
`M01` (Removed by)	`ns2122a`

Seq #  *Modification Id* Act 
----------------------------+
00049  M01S00035.ns2122a ---| CEA1     SYSTEM SCT,R,X1    REQUEST CEASE

Line S00002 Modification History
`M01` (Added by)	`ns2122a`

Seq #  *Modification Id* Act 
----------------------------+
00050  M01S00002.ns2122a +++|          ZR     X1,CEA1     IF NO PARAMETER
00051  M01S00003.ns2122a +++|          SA1    X1
00052  M01S00004.ns2122a +++| CEA1     CEASE  X1
00053  M00S00036.cease   +++|          JP     CEASE       RETURN
00054  M00S00037.cease   +++|
00055  M00S00038.cease   +++|          END