Table of Contents

CEASE

Table Of Contents

  • [00004] CEASE - TERMINATE TASK EXECUTION.
  • [00008] TERMINATE TASK EXECUTION.

Source Code

CEASE.txt
  1. IDENT CEASE
  2.  
  3. ENTRY CEASE
  4. TITLE CEASE - TERMINATE TASK EXECUTION.
  5. *COMMENT CEASE - TERMINATE TASK EXECUTION.
  6. COMMENT COPYRIGHT CONTROL DATA SYSTEMS INC. 1992.
  7. SPACE 4
  8. *** CEASE - TERMINATE TASK EXECUTION.
  9. * J.C. BOHNHOFF. 72/07/09.
  10. *CALL COMKMAC
  11. SPACE 4
  12. *** CALL FORMAT -
  13. *
  14. * FORTRAN EXTENDED
  15. * CALL CEASE(A)
  16. * COBOL
  17. * ENTER CEASE USING A
  18. *
  19. * WHERE
  20. * (A) .LT. - 1 RESERVED FOR CDC.
  21. * = -1 IF NORMAL CEASE AND TERMINAL IS NOT TO
  22. * BE UNLOCKED.
  23. * = 0 IF NORMAL CEASE.
  24. * = 1 IF ABNORMAL CEASE WITHOUT DUMP.
  25. * .GT. 1 IF ABNORMAL CEASE WITH DUMP.
  26. *
  27. *
  28. * MACROS SYSTEM.
  29.  
  30.  
  31. CEASE PS ENTRY
  32. ZR X1,CEA1 IF NO PARAMETER
  33. SA1 X1
  34. CEA1 CEASE X1
  35. JP CEASE RETURN
  36.  
  37. END