> -----Original Message-----
> From: The IBM z/VM Operating System
> [mailto:[email protected]] On Behalf Of Frank M. Ramaekers
> Sent: Wednesday, July 29, 2009 2:47 PM
> To: [email protected]
> Subject: REXX DATE - Julian and Centry
>
> I don't understand why there is the following restriction on
> the Date()
> function:
>
> NOTE:
>
> (1) If the Century or Julian format is specified, then no
> other options
>
> are permitted. These two formats are provided for compatibility
> with
> programs written for releases prior to VM/ESA(R) version
> 2 release
>
> 1.1. It is recommended that they not be used for new programs.
>
>
> There are still some programs/systems that use Julian. For instance,
> EREP requires DATE input in Julian.
>
> Having said that, how can I compute a day 90 days in the
> past, specified
> in Julian (in REXX)?
>
> Frank M. Ramaekers Jr.
/* REXX */
TODAY1 = DATE('B')
MINUS90 = TODAY1 - 90
DDD = DATE('D',MINUS90,'B') /* DAY IN YEAR */
YY=LEFT(DATE('O',MINUS90,'B'),2)
YYDDD=YY||DDD
--
John McKown
Systems Engineer IV
IT
Administrative Services Group
HealthMarkets(r)
9151 Boulevard 26 * N. Richland Hills * TX 76010
(817) 255-3225 phone * (817)-961-6183 cell
[email protected] * www.HealthMarkets.com
Confidentiality Notice: This e-mail message may contain confidential or
proprietary information. If you are not the intended recipient, please contact
the sender by reply e-mail and destroy all copies of the original message.
HealthMarkets(r) is the brand name for products underwritten and issued by the
insurance subsidiaries of HealthMarkets, Inc. -The Chesapeake Life Insurance
Company(r), Mid-West National Life Insurance Company of TennesseeSM and The
MEGA Life and Health Insurance Company.SM
