Someone had submitted the following command file some time ago that I saved,
with a small mod in can be made to 'set' a variable with the information you
need in the proper format.

Regards
Paul H. Christidis

PARM p1="!hpmonth" p2="!hpdate" p3="!hpyear"
echo !hpfile, !hpdatef
SETVAR month    ![UPS("!p1")]
SETVAR day      ![UPS("!p2")]
SETVAR year     ![LFT(RHT("!hpdatef",4),4-LEN("!p3"))+"!p3"]
SETVAR doy_days ((month-1)*304/10)+((month+2)/10)+(((12-month)/10)*month)
SETVAR doy_ly   (1/(1+(year MOD 4)))-(1/(1+(year MOD 100)))
SETVAR doy_ly   (doy_ly+(1/(1+(year MOD 400))))*((7+month)/10)
SETVAR doy_days doy_days+doy_ly+(day-1)
ECHO Day of year for !month/!day/!year is !doy_days
if not bound(traceon) then
   DELETEVAR doy_@
else
   showvar doy_@
endif

EXAMPLE

<SYS>:doy 12 22 2005
DOY.SUPUTIL.SYS, TUE, SEP 22, 1998
Day of year for 12/22/2005 is 356


______________________________ Reply Separator
_________________________________
Subject: Re: Date Intrinsics
Author:  [log in to unmask] at mime
Date:    09/22/98 09:24


There are some things that you can do within MPEX.  I'm not sure about
regular MPE.

Later

> -----Original Message-----
> From: Eric Gustafson [SMTP:[log in to unmask]] > Sent: Tuesday,
September 22, 1998 11:06 AM
> To:   [log in to unmask]
> Subject:      Date Intrinsics
>
>
> I need a system variable or intrinsic that will return a julian date >
after
> I give it a year and a day?