home *** CD-ROM | disk | FTP | other *** search
- Newsgroups: comp.os.vms
- Path: sparky!uunet!zaphod.mps.ohio-state.edu!magnus.acs.ohio-state.edu!pat
- From: pat@magnus.acs.ohio-state.edu (Patrick E Plaisted)
- Subject: Implimenting "TOMORROW +1: 0:0" from an .EXE
- Message-ID: <1993Jan11.153438.28624@magnus.acs.ohio-state.edu>
- Sender: news@magnus.acs.ohio-state.edu
- Nntp-Posting-Host: bottom.magnus.acs.ohio-state.edu
- Organization: The Ohio State University
- Date: Mon, 11 Jan 1993 15:34:38 GMT
- Lines: 26
-
- I have the need to set an AST timer queue entry to fire at, in DCL
- syntax, "TOMORROW +1:0:0". I've looked through all the LIB$ routines,
- as well as $bintim and $asctim. Is there a simple way to get a
- quadword time value set to this so I can stick it into $setimr?
- My only thoughts on how to do this are:
-
- 1. calculate the number of hours to midnight.
- 2. calculate the number of minutes to midnight.
- 3. calculate the number of seconds to midnight.
- 4. use lib$cvt_to_internal_time to convert these values to
- delta time quadwords.
- 5. use lib$add_times to add these values to a quadword containing the
- current time.
- 6. again using lib$add_times, add 1 hour to this value.
- 7. finally, call $setimr with the quadword.
-
- I think this approach should work, but am I missing something really
- obvious? Is there an easier way to do this?
-
- Thanks for all your help,
-
- Pat
-
- pat@magnus.acs.ohio-state.edu
-
-
-