home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1993 #1 / NN_1993_1.iso / spool / comp / os / vms / 20810 < prev    next >
Encoding:
Text File  |  1993-01-12  |  1.9 KB  |  49 lines

  1. Newsgroups: comp.os.vms
  2. Path: sparky!uunet!mcsun!sun4nl!estwmz.wm.estec.esa.nl!estwm0.wm.estec.esa.nl!hevans
  3. From: hevans@estwm0.wm.estec.esa.nl (Hugh D.R. Evans (ESA/ESTEC/WMA Netherlands))
  4. Subject: Re: Implimenting "TOMORROW +1: 0:0" from an .EXE
  5. Message-ID: <C0qx8B.EL0@wm.estec.esa.nl>
  6. Sender: news@wm.estec.esa.nl
  7. Reply-To: hevans@estcs1.dnet.estec.esa.nl
  8. Organization: European Space Research and Technology Centre
  9. References: <1993Jan11.153438.28624@magnus.acs.ohio-state.edu> <11JAN199319201213@spades.aces.com>
  10. Date: Tue, 12 Jan 1993 14:50:35 GMT
  11. Lines: 36
  12.  
  13. In article <11JAN199319201213@spades.aces.com>, gavron@spades.aces.com
  14. (Ehud Gavron 602-570-2000 x. 2546) writes:
  15. |>
  16. |>    1. Call SYS$GETTIM to get current time in ticks (10ns units)
  17. |>    2. Add 144,000,000 to this number 
  18. |>       24 hrs x 60 min  x 60 sec  x 100000 ns    144,000,000 ns/day
  19. |>                 -----     -----         ---- =
  20. |>               hr        min          sec
  21. |>    3. Use SYS$ASCTIM to get this in ascii format in the form
  22. |>       DD-MMM-YYYY HH:MM:SS.hh
  23. |>
  24. |>    4. Insert in the 13th position of the string "01:00:00.00"
  25. |>    5. Call SYS$BINTIM
  26. |>
  27. |>    (I may be off on the number in #2 but it looks right.  I'm
  28. |>     sure someone will rush to correct me if it isn't.)
  29. |>
  30.  
  31. To start with, VAX times are kept in 100 nanosecond units ,
  32. cf System Service Reference Manual, $GETTIM description.
  33.  
  34. And you left off a factor of 60, so (if I am right, and as you said
  35.  
  36. someone will correct me if I am not :-) ) the number should be: 
  37.  
  38. 24 x 60 x 60 x 10 000 000 = 8.64e+11 VAX time units per day
  39.  
  40.  
  41. --
  42. Hugh Evans    -    hevans@estwm8.dnet.estec.esa.nl
  43.  
  44.  "Alcohol is very important for young people because it provides a sort of 
  45.   'liquid adulthood.'  If you are young and you drink a great deal it will 
  46.   spoil your health, slow your mind, make you fat - in other words, turn you 
  47.   into an adult."
  48.     P.J. O'Rourke - Modern Manners, Etiquette for Rude People
  49.