RE: Date question

When I first read "Lillian date" I thought it was either a joke or a typo.
But I ran a search on it and came up with the following definition:

Lillian date.  The Lillian date is the number of days since 14 October 1582
[being the beginning of the Gregorian Calendar], and the valid range of the
Lillian dates is 1 to 3,074,324. [ 15 October 1582 to 31 December 9999 ].
Named for Aloysius Lilius who was an advisor to Pope Gregory XIII & who
together with his brother constructed the Gregorian Calendar.  

I don't see any practical use for it and I have never seen it as a choice
for date format.  I think he's looking for Julian date. (Not Lillian's
husband! :)  The julian format is supported using the *JUL or *LONGJUL
depending on whether you want a 2 or a 4 digit year.


Rick Weber | TЯU International 


-----Original Message-----
From: Booth Martin [mailto:booth@xxxxxxxxxxxx] 
Sent: Tuesday, October 11, 2005 11:24 AM
To: RPG programming on the AS400 / iSeries
Subject: Re: Date question


Isn't the date you are creating what is called Lillian date?  Does the
iSeries handle Lillian dates? 

 

---------------------------------

Booth Martin

http://www.martinvt.com

---------------------------------

-------Original Message-------

 

From: RPG programming on the AS400 / iSeries

Date: 10/11/05 10:20:17

To: RPG programming on the AS400 / iSeries

Subject: Re: Date question

 

You know, I must admit, I tried a variation on what you suggested, and this

is a bit simpler, when you use %Int and %Char (%Int doesn't accept a date as

a parm directly). I changed the test pgm to the following, and it works --

four-digit year and all:

 

D DateA S D Inz(d'2005-01-01')

D DateB S D Inz

D NumDays S 10U 0 Inz

 

/Free

*InLR=*On;

 

NumDays=%Int(%Char(DateA:*ISO0));

DateB=%Date(NumDays:*ISO);

 

Return;

/End-Free

 

Thanks for the tip!

 

On 10/10/05, Jon Paris <Jon.Paris@xxxxxxxxxxxxxx> wrote:

>

> >> Wacky? maybe, but saving 6 bytes per element can help sometimes.

>

> I don't disagree - but why bother with the date math stuff? Why not 
> simply

> use %Int to convert the date to its numeric equivalent and store that? 
> It

> has to use less resource and has the advantage that in debug the data 
> will

> still make sense.

>

> Jon Paris

> Partner400

>

> www.Partner400.com <http://www.Partner400.com>

> www.RPGWorld.com <http://www.RPGWorld.com>

>

> --

> This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing 
> list

> To post a message email: RPG400-L@xxxxxxxxxxxx

> To subscribe, unsubscribe, or change list options,

> visit: http://lists.midrange.com/mailman/listinfo/rpg400-l

> or email: RPG400-L-request@xxxxxxxxxxxx

> Before posting, please take a moment to review the archives

> at http://archive.midrange.com/rpg400-l.

>

>

 

 

--

"Enter any 11-digit prime number to continue..."

"In Hebrew SQL, how do you use right() and left()?..." - Random Thought

"If all you have is a hammer, all your problems begin to look like nails"

--

This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list

To post a message email: RPG400-L@xxxxxxxxxxxx

To subscribe, unsubscribe, or change list options,

visit: http://lists.midrange.com/mailman/listinfo/rpg400-l

or email: RPG400-L-request@xxxxxxxxxxxx

Before posting, please take a moment to review the archives

at http://archive.midrange.com/rpg400-l.

 

.