HP3000-L Archives

August 2005, Week 3

HP3000-L@RAVEN.UTC.EDU
Options: Use Monospaced Font
Show Text Part by Default
Show All Mail Headers

Message: [<< First] [< Prev] [Next >] [Last >>]
Topic: [<< First] [< Prev] [Next >] [Last >>]
Author: [<< First] [< Prev] [Next >] [Last >>]

Print Reply
Subject:
Re: Numeric to a string in MPE/ix?
From:
"Miller, Keven" <[log in to unmask]>
Reply To:
Miller, Keven
Date:
Tue, 16 Aug 2005 12:29:51 -0600
Content-Type:
text/plain
Parts/Attachments:
text/plain (27 lines) 
Vance, Jeff H (Cupertino) wrote:
> If you need to use hphour + hpminute then you still should (IMO) deal
> with rolled over minutes. E.g.:
>   setvar hh hphour
>   setvar mm hpminute
>   if hh <> hphour then
>      setvar hh hphour
>   endif
>   setvar newtime rht('0!hh',2)+":"+rht('0!mm',2)

It seems to me that you also need to get the minutes again.
First time you get 08, 59,  then compare to 09, then set
to 09 --  need to get minute of 00 now.

setvar hh hphour
setvar mm hpminute
if hh <> hphour then
    setvar hh hphour
    setvar mm hpminute
endif
setvar newtime rht('0!hh',2)+":"+rht('0!mm',2)

Keven (learning from sources of HPMM - MCHRONOS)

* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *

ATOM RSS1 RSS2