home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1993 #3 / NN_1993_3.iso / spool / comp / os / vms / 22015 < prev    next >
Encoding:
Internet Message Format  |  1993-01-27  |  2.7 KB
  1. Path: sparky!uunet!ukma!gatech!darwin.sura.net!sgiblab!troi!steve
  2. From: steve@dbaccess.com (Steve Suttles)
  3. Newsgroups: comp.os.vms
  4. Subject: Re: command procedure calling
  5. Message-ID: <160@mccoy.dbaccess.com>
  6. Date: 27 Jan 93 21:41:42 GMT
  7. References: <1k4p20INNjbq@gap.caltech.edu>
  8. Organization: Cross Access Corp., Santa Clara, CA
  9. Lines: 58
  10. X-Newsreader: Tin 1.1 PL4
  11.  
  12. carl@SOL1.GPS.CALTECH.EDU (Carl J Lydick) writes:
  13. : In article <ERMIMWEI.20@er.ele.tue.nl?>, ERMIMWEI@er.ele.tue.nl (Wim Beckers) writes:
  14. : >When a command procedure is called by another command procedure  their is 
  15. : >always a return to the calling command procedure.
  16. : >Is there a possibility to NOT return to the calling procedure?
  17. : 
  18. : Well, you *COULD* execute the command:
  19. :     $ MCR DCL
  20. : (don't do this;  it deletes your process, but it does *NOT* return to the
  21. : calling procedure :-).
  22.  
  23. Eh?
  24.  
  25. : 
  26. : There's no documented way to exit from the entire stack of DCL procedures in a
  27. : single command.  The best way to deal with this is, after every invocation of a
  28. : command procedure, have conditional code in the calling procedure.  For
  29. : example:
  30. :     $!    LEVEL1.COM
  31. :     $     @LEVEL2
  32. :     $    IF ($STATUS .AND. 7) .NE. 1 THEN-
  33. :             EXIT 'F$INTEGER(%X10000000 .OR. $STATUS)'
  34. :     $     {additional commands}
  35. : and have the called procedure return a meaningful status when it exits.
  36.  
  37. You could also $EXIT %X10000004 (a fatal status but don't print it)
  38. and unless the calling procedure did a SET NOON, he'll quit too.
  39.  
  40. You could delete the calling command procedure's file (I've never done
  41. this intentionally, but I can tell you from experience, that command
  42. file will not continue to execute).
  43.  
  44. You could log out.
  45.  
  46. You could execute the STOP command (quits all command procedures.  The
  47. job too, if you're in batch...but then, that makes sense).
  48.  
  49. You could have the procedures "talk" to each other, with logicals or
  50. symbols or exit status values or the existence of a file or...
  51.  
  52. You could reboot...this is usually a good way to stop a command file
  53. from executing...
  54.  
  55. You could pull the plug.  Tell them you need access to the
  56. documentation.  Cite identical failures at campuses nationwide.  Tell
  57. them it's not quite a virus...it's sorta like leprosy.  The library
  58. needs first aid!
  59.  
  60. Admittedly, some of these solutions are extreme.  But then again, some
  61. problems are extreme.  You didn't exactly say why you wanted to stop
  62. everything... (implied smile for Stan's sake)
  63.  
  64. sas
  65. -- 
  66. Steve Suttles                Internet:  steve@dbaccess.com      Dr. DCL is IN!
  67. CROSS ACCESS Corporation     UUCP: {uunet,sgiblab}!troi!steve  Yo speako TECO!
  68. 2900 Gordon Ave, Suite 100   fax: (408) 735-0328              Talk data to me!
  69. Santa Clara, CA 95051-0718   vox: (408) 735-7545   HA! It's under 4 lines NOW!
  70.