Date   : Tue, 04 Aug 2009 07:04:36 -0500
From   : mfirth@... (Michael Firth)
Subject: Level 4 FS Y2K query

On Tue, 4 Aug 2009 13:04:58 +0200 (BST), Johan Heuseveldt
<johan@...> wrote:
> Hi,
> 
> On Mon 03 Aug, Michael Firth wrote:
> 
> [snip]
> 
>> However, when I create files (in particular using CopyFiles) the date is

>> shown as 01.01.1981, and (today) the *DATE command returned "99th August

>> 1989".
> 
> I did have a look at '*Date'.
> Printing out was fixed to '198'. Then the calculated digit was added.
> 
> I'll upload soon
> 
>   <http://www.waarland.demon.nl/Econet/DATE/>
> 
> ('2Disassembled' not fully updated, so a few 'odd' remarks still present)
> 
> Later I would like to add the proper calculation (Julian?) from Jonathan.
> (after asking him, of course, for permission)
> 
The code for that version of Date shows it doesn't stand much chance of
working right.

As you say, the year is fixed to 198x, which means it would already have
stopped working
in 1990 (from the look of the code displaying that as '198:').

It also doesn't have any provision for the new date format - see:

http://www.heyrick.co.uk/econet/intro/y2k.html

This would need to be added in to get dates after 1996 to work right.

I think you mean BCD rather than Julian for the calculation - the date is
already split into its
component parts, so you don't need to worry about date formatting (which is
where Gregorian / Julian etc
comes in)

Regards

Michael