Re: Use of Timestamp data field How? Is IBM Y2k Compliant 1940 Onwards?

At 07:45 PM 1/15/99 +1100, Kris Vaidyanathan wrote:
>Hi
>       Thought I'd be Y2k Compliant and created timestamp field in data file.
>Since I added the field and did a CHGPF based on source did not loose any
>data. However the field was initialized to 0001-01-01-000 etc.
>
>       I want to display this filed on the screen and wrote a little program.
>
>       First problem, could not figure out how to define the stamp to be
>displayed.
>
>       So defined a date type field and Time type filed.
>
>Did a MOVE of Timestamp to date type field.
>
>       Program fell over.... Date has to be within 1940 to 2039 range. Error
>message was pretty explicit about this..
>
>       What goes... Yes timestamp will when program is live be in the correct
>range, but it does raise questions about the Move operation?
>
>krisV
> the current view of Kris Vaidyanathan
===================================================================
Kris   etal
There are some release  dependencies  if  you do thing  in  certian ways.
[V4R2 has  some improvements - but not everyone  is there. Maybe a price of
CISC? Who  knws  - we  have to deal with it]

 There is  that  gap  in 19xx  between 1900 and 1939; anything  pre 1940;
that is  blanked out to some  windowing techniques.  

Think  you  will have to add  some logic  or  other  standard  date routine
to  help  with all incidence  below the  standard system pivot date.  In
your  case LT 40 [ shipped  default]

Because we are human[ not  dumb but  full of  pride]  and  tend to  make [
a small  percentage] errors as  we correct this  stuff - I prefer to use
commerically available proven  date routines.  THere are  some  other
alternatives  in this limited time we  have  left.
Regards,

Glenn
___________________________________________________
Glenn Ericson,          Phoenix Consulting      LLC             
P O Box 701164   East Elmhurst NY 11370-3164 USA                            
Phone 718 898 9805       Fax 718 446 1150
AS/400 & Year 2000- - Solutions Specialists
 ©  copyright 1998, 1999  all rights reserved
____________________________________________________


 
+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---