home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1992 #31 / NN_1992_31.iso / spool / comp / os / vms / 19698 < prev    next >
Encoding:
Internet Message Format  |  1992-12-22  |  2.3 KB
  1. Path: sparky!uunet!spool.mu.edu!darwin.sura.net!gatech!swrinde!elroy.jpl.nasa.gov!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: Apending a file at the end of mail.
  5. Date: 22 Dec 1992 05:45:02 GMT
  6. Organization: HST Wide Field/Planetary Camera
  7. Lines: 42
  8. Distribution: world
  9. Message-ID: <1h6a0uINN9ks@gap.caltech.edu>
  10. References: <01GSK4HGLSY800036I@MSUS1.MSUS.EDU>,<21DEC199210505504@spades.aces.com>
  11. Reply-To: carl@SOL1.GPS.CALTECH.EDU
  12. NNTP-Posting-Host: sol1.gps.caltech.edu
  13.  
  14. In article <21DEC199210505504@spades.aces.com>, gavron@spades.aces.com (Ehud Gavron 602-570-2000 x. 2546) writes:
  15. >In article <01GSK4HGLSY800036I@MSUS1.MSUS.EDU>, TS117%BSU.DECNET@MSUS1.BITNET (TANDI SUNARTO) writes...
  16. >#Ehud,
  17. ># 
  18. >#Since I am a new user on VAX system, could you please elaborate your
  19. >#explanation on how to append a file at the end of mail, for example :
  20. >#tell me how to create an initiliazation file, and other stuff.
  21. >
  22. >This is in the FAQ list, so you might want to pick that up for more
  23.  
  24. [rather clumsy {since it needs a subprocess} answer deleted]
  25.  
  26. If you don't tend to edit files called MAIL$xxxxxxxx_EDIT.TMP except when
  27. you're sending MAIL, then, if you've got your editor set to TPU, put the
  28. following into a file pointed to by the logical name TPU$COMMAND:
  29. PROCEDURE SIGNATURE
  30.     LOCAL OUTFILE, OLDPOS;
  31.     ON_ERROR
  32.         POSITION(OLDPOS);
  33.     ENDON_ERROR;
  34.  
  35.     OUTFILE := GET_INFO(COMMAND_LINE, "OUTPUT_FILE");
  36.     OLDPOS := MARK(NONE);
  37.     IF (SUBSTR(OUTFILE, 1, 17) = "SYS$SCRATCH:MAIL_") AND
  38.         (SUBSTR(OUTFILE, 26, 9) = "_SEND.TMP") AND
  39.         (LENGTH(OUTFILE) = 34) THEN
  40.         POSITION(BUFFER_END);
  41.         READ_FILE("SYS$LOGIN:SIGNATURE.");
  42.         POSITION(OLDPOS);
  43.     ENDIF;
  44.     POSITION(OLDPOS);
  45. ENDPROCEDURE
  46.  
  47. SIGNATURE;
  48. --------------------------------------------------------------------------------
  49. Carl J Lydick | INTERnet: CARL@SOL1.GPS.CALTECH.EDU | NSI/HEPnet: SOL1::CARL
  50.  
  51. Disclaimer:  Hey, I understand VAXen and VMS.  That's what I get paid for.  My
  52. understanding of astronomy is purely at the amateur level (or below).  So
  53. unless what I'm saying is directly related to VAX/VMS, don't hold me or my
  54. organization responsible for it.  If it IS related to VAX/VMS, you can try to
  55. hold me responsible for it, but my organization had nothing to do with it.
  56.