home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1992 #31 / NN_1992_31.iso / spool / comp / os / vms / 19871 < prev    next >
Encoding:
Internet Message Format  |  1992-12-25  |  1.9 KB
  1. Path: sparky!uunet!news.claremont.edu!nntp-server.caltech.edu!SOL1.GPS.CALTECH.EDU!CARL
  2. From: carl@SOL1.GPS.CALTECH.EDU (Carl J Lydick)
  3. Newsgroups: comp.os.vms
  4. Subject: Re: Detecting directory of invoked .com
  5. Date: 25 Dec 1992 06:21:10 GMT
  6. Organization: HST Wide Field/Planetary Camera
  7. Lines: 27
  8. Distribution: world
  9. Message-ID: <1he98mINN1o3@gap.caltech.edu>
  10. References: <1992Dec23.160636.27010@tigger.jvnc.net>
  11. Reply-To: carl@SOL1.GPS.CALTECH.EDU
  12. NNTP-Posting-Host: sol1.gps.caltech.edu
  13.  
  14. In article <1992Dec23.160636.27010@tigger.jvnc.net>, fogelinc@nmr1.Cyanamid.COM (Carl Fogelin) writes:
  15. >At the risk of being flamed by the "active" participants of this Sig, I have
  16. >a problem which I hope has a reasonable answer.
  17. >
  18. >In a DCL program, I would like to be able to determine what directory the
  19. >invoked .com file is located in.  I seem to remember a similar thread about
  20. >6 - 8 months ago, so I hope someone remembers the solution.
  21.  
  22. First:  You've got no reason to worry about being flamed.  You've clearly
  23. stated what you want to know, and you're NOT repeating a question that's
  24. already been answered for you in the last week or so.  If I understand your
  25. question correctly (i.e., you want the device, too) then what you want is given
  26. by the expression:
  27.     $ F$ELEMENT(0,"]", F$ENVIRONMENT("PROCEDURE")) + "]"
  28. See the results of
  29.     $ HELP LEX F$ENVIRONMENT
  30. and
  31.     $ HELP LEX F$ELEMENT
  32. for details.
  33. --------------------------------------------------------------------------------
  34. Carl J Lydick | INTERnet: CARL@SOL1.GPS.CALTECH.EDU | NSI/HEPnet: SOL1::CARL
  35.  
  36. Disclaimer:  Hey, I understand VAXen and VMS.  That's what I get paid for.  My
  37. understanding of astronomy is purely at the amateur level (or below).  So
  38. unless what I'm saying is directly related to VAX/VMS, don't hold me or my
  39. organization responsible for it.  If it IS related to VAX/VMS, you can try to
  40. hold me responsible for it, but my organization had nothing to do with it.
  41.