Trailing-Edge
-
PDP-10 Archives
-
decuslib20-04
-
decus/20-0113/cerror.bas
There are 2 other files named cerror.bas in the archive. Click here to see a list.
00020REM**************************************************************
00030REM CERROR CERROR CERROR CERROR CERROR
00040REM**************************************************************
00050REM ROUTINE FOR HANDLING UNEXPECTED ERRORS
00060REM**************************************************************
00070PRINT L$
00080PRINT "AN UNEXPECTED ERROR HAS OCCURRED."
00090PRINT
00120PRINT "PLEASE MAKE NOTE OF WHAT YOU WERE DOING, SAVE ANY OUTPUT"
00130PRINT "AND NOTIFY THE PERSON RESPONSIBLE FOR MAINTAINING THE CADA"
00140PRINT "SYSTEM."
00150PRINT
00160PRINT "WHEN YOU ARE READY TO CONTINUE TYPE '1'.";
00170INPUT X
00180CHAIN "CADA"
00190PRINT "A FREQUENT CAUSE OF THIS ERROR IS THE ATTEMPT TO"
00200PRINT "RESTART EXECUTION OF A MODULE AFTER EXECUTION WAS"
00210PRINT "INTERRUPTED BY THE 'PANIC BUTTON'. WHEN EXECUTION"
00220PRINT "IS INTERRUPTED IN THIS WAY THE CADA SYSTEM MUST"
00230PRINT "BE ACCESSED VIA THE 'CADA' MODULE."
00240PRINT
00250PRINT "IF THIS IS NOT THE CAUSE OF THE ERROR THIS TIME THEN"
00260PRINT "PLEASE MAKE NOTE OF WHAT YOU WERE DOING, SAVE ANY OUTPUT"
00270PRINT "AND NOTIFY THE PERSON RESPONSIBLE FOR MAINTAINING THE"
00280PRINT "THE CADA SYSTEM."
00290PRINT
00300PRINT "YOU WILL NOW BE RETURNED TO THE 'CADA' MODULE."
00310PRINT
00320CHAIN "CADA"
09999 END