Yes, thank you! That should work!
I knew that there would probably have to be some subtraction, in order to
get back into the realm of known solutions, but what I don't understand is
why the COBOL programmers decided to use 1800 instead of the normally
accepted 1970... OH! Shoot, I forgot... COBOL's probably been around longer
than 1970!
The punch line is that my customer is still buying new systems to perpetuate
this!!! Your GA state tax dollars at work! ;-)
Thanks again, I'll give that a spin in just a bit here~!
--Jon
> -----Original Message-----
> From: Rodney Wines [mailto:[EMAIL PROTECTED]]
> Sent: Thursday, August 16, 2001 11:18 AM
> To: Jon S. Jaques; [EMAIL PROTECTED]
> Subject: Re: Speaking of dates, how about converting a COBOL date?...
>
>
> > I have a date field that I need to convert; It comes through as
> the number
> > of days since 1/1/1800...
>
> How many days are there between 1/1/1800 and 1/1/1970? Work that
> out once and
> use it as a constant. Then, subtract that number from your COBOL
> date, and
> multiply the result by 60*60*24, and you'll have a time that Perl can use.
> After that, you've reduced the problem to a previously understood one.
>
> Rodney
>
_______________________________________________
ActivePerl mailing list
[EMAIL PROTECTED]
http://listserv.ActiveState.com/mailman/listinfo/activeperl
