home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1993 #3 / NN_1993_3.iso / spool / comp / os / vms / 21947 < prev    next >
Encoding:
Internet Message Format  |  1993-01-25  |  1.3 KB
  1. Path: sparky!uunet!paladin.american.edu!howland.reston.ans.net!spool.mu.edu!uwm.edu!linac!att!cbnewsm!cbnewsl!att-out!oucsboss!oucsace!afeldman
  2. From: afeldman@oucsace.cs.ohiou.edu (Alan E. Feldman)
  3. Newsgroups: comp.os.vms
  4. Subject: Re: Setting Host via .com procedure
  5. Message-ID: <1993Jan25.231444.2740@oucsace.cs.ohiou.edu>
  6. Date: 25 Jan 93 23:14:44 GMT
  7. Distribution: usa
  8. Organization: Ohio University CS Dept,. Athens
  9. Lines: 25
  10.  
  11.  
  12. The original poster (mehta@bms.com) wanted a command file that:
  13.  
  14. >    1    get my USERNAME using f$getjpi
  15. >    2    issue "SET HOST" to the node whose name I pass into the com file
  16. >    3    Accept my username as input at the username prompt on the machine to
  17. >        which I am setting host to
  18.  
  19. Try this: (Yes, I tested it, we are on VMS 5.4.)
  20.  
  21. $   OPEN/WRITE SPOOK ZIP.COM
  22. $   WRITE SPOOK "$ SET HOST ''P1'"
  23. $   USERNAME = F$EDIT(F$GETJPI("","USERNAME"),"COLLAPSE")
  24. $   WRITE SPOOK USERNAME
  25. $   CLOSE SPOOK
  26. $   @ZIP
  27.  
  28. My apologies if someone else already posted this, but I'm pretty sure
  29. that they didn't. Also, you can add $ EXIT at the end if you desire. 
  30.  
  31. Alan E. Feldman  &-)  Dept. of Physics, Ohio U., Athens, OH 45701
  32. Preferred addresses:  FELDMAN@OUALV1.PHY.OHIOU.EDU, 
  33.                       FELDMAN@OUALVX.PHY.OHIOU.EDU
  34. If you prefer Bitnet: FELDMAN@UMDENP
  35. If all else fails:    FELDMAN@OUVAXA.UCLS.OHIOU.EDU
  36.