HP3000-L Archives

May 2003, 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:
From:
Donna Garverick <[log in to unmask]>
Reply To:
Donna Garverick <[log in to unmask]>
Date:
Wed, 21 May 2003 10:14:40 -0700
Content-Type:
text/plain
Parts/Attachments:
text/plain (51 lines)
Roy Brown wrote:

> Just for (pure mpe) grins, and all in eecummingscase for those with no shift
> key on their keyboards :-) :

who could that be? :-)

> parm dg

love the prefix :-)

> I guess we really need JULIAN and CALDATE as MPE functions, don't we?

'twould be lovely....

> then I progressed to getting dgyear in one go, which needs the ![<exp>]
> syntax, AFAICS...

i believe so (but jeff might have a different opinion....)

>     setvar dgyeard, 365250*(!hpyyyy - ![str('![finfo('!dg',-8)]',1,4)])
>
> but this doesn't work, so I did dgdaysold as above. Which is fine as far as
> it goes.
>
> But AAMOI, does anyone know the line that would get dgyeard from hpyyyy and
> dg, as I envisaged above?
>
> I can't find a way except by using nested !{<exp>], and nested !{<exp>]
> doesn't seem to work like I think it should :-(
>
> Is it me, or it is MPE at fault?   (    :-)     )

i think the problem is hpyyyy is an integer and what will be eventually returned
from the 'str' thing is a string....and you can't do math that way.          - d

--
Donna Garverick     Sr. System Programmer
925-210-6631        [log in to unmask]

Come, my friends, 'Tis not too late to seek a newer world.
Tho' much is taken, much abides; and tho'
We are not now that strength which in old days
Moved earth and heaven, that which we are, we are.
"Ulysses", A. Tennyson

>>>MY opinions, not Longs Drug Stores'<<<

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

ATOM RSS1 RSS2