home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1992 #31 / NN_1992_31.iso / spool / comp / os / vms / 19789 < prev    next >
Encoding:
Text File  |  1992-12-23  |  1.7 KB  |  41 lines
  1. Newsgroups: comp.os.vms
  2. Path: sparky!uunet!zaphod.mps.ohio-state.edu!darwin.sura.net!jvnc.net!nmr1!fogelinc
  3. From: fogelinc@nmr1.Cyanamid.COM (Carl Fogelin)
  4. Subject: Detecting directory of invoked .com 
  5. Message-ID: <1992Dec23.160636.27010@tigger.jvnc.net>
  6. Sender: news@tigger.jvnc.net (Zee News Genie)
  7. Nntp-Posting-Host: nmr1.pt.cyanamid.com
  8. Reply-To: fogelinc@Cyanamid.COM
  9. Organization: American Cyanamid Company
  10. Date: Wed, 23 Dec 1992 16:06:36 GMT
  11. Lines: 28
  12.  
  13. At the risk of being flamed by the "active" participants of this Sig, I have
  14. a problem which I hope has a reasonable answer.
  15.  
  16. In a DCL program, I would like to be able to determine what directory the
  17. invoked .com file is located in.  I seem to remember a similar thread about
  18. 6 - 8 months ago, so I hope someone remembers the solution.
  19.  
  20. Reason:  I have a production command procedure that every once in awhile
  21. must be moved to a test area for modification.  Currently, when I copy the
  22. com file to the test area, I comment out the assigns associated with the
  23. production version and uncomment the assigns associated with the test
  24. version.  Unfortunately, sometimes when this command procedure is moved
  25. back into production, the assigns are NOT switched back.
  26.  
  27. What I would like is to some code to this command procedure which would:
  28.  
  29.      if command file in production area then
  30.         assign production logicals
  31.      else
  32.         assign test logicals
  33.      endif
  34.  
  35. Does anyone know a method for doing this?
  36.  
  37. - Carl
  38. ---------------------------------------------------------------------------
  39.  Carl Fogelin (fogelincc@cyanamid.com)     "All opinions are strictly mine" 
  40.    "Sushi!   That's what my ex-wife called me.  Cold fish." -- Blade Runner
  41.