RE: Date question

The gist of this conversation...DATFMT is assumed *ISO unless the DATFMT
is changed on the H spec or on the D spec.  I believe IIRC the date is
actually stored as 4 byte binary... 


Thanks,
Tommy Holden


-----Original Message-----
From: rpg400-l-bounces+tommy.holden=hcahealthcare.com@xxxxxxxxxxxx
[mailto:rpg400-l-bounces+tommy.holden=hcahealthcare.com@xxxxxxxxxxxx] On
Behalf Of Booth Martin
Sent: Monday, October 10, 2005 12:06 PM
To: RPG programming on the AS400 / iSeries
Subject: Re: Date question

Scott explains this better than I do, but what cleared a lot of
confusion for me was when someone explained to me that a date field has
no native format that concerns us.  It is stored in the data base in
some mysterious and unknown fashion.  One person told me it is in fact a
4-character field
that contains the date.   



In any event, once I realized that the date field knows what it is, then
I realized all I needed to worry about is what I want to see in my
program.

 

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

Booth Martin

http://www.martinvt.com

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

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

 

From: RPG programming on the AS400 / iSeries

Date: 10/10/05 11:49:21

To: RPG programming on the AS400 / iSeries

Subject: Re: Date question

 

Thanks Booth, that is even better, I am still a bit unclear when you say

that a date field has no format, isn't a standard date in *ISP format?
Maybe

I am not grasping what you are saying, but then again it would not be
the

first time I was slow on the uptake :)

 

 

On Mon, 10 Oct 2005 11:39:08 -0500 (Central Standard Time), Booth Martin

wrote

> One needs to understand that a date field, in and of itself, has no

> format. When you read the date you have to define the format you

> want.   There are several ways to define the retrieved values from a

> date field.

>

> In the case you ask for, the easiest is probably:

>

> MYDATE         S           L         DATFMT(*USA) INZ (*SYS)

>

> And then the valus is set; no need for the eval statement.

>

> ---------------------------------

> Booth Martin

> http://www.martinvt.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.