|
PureBytes Links
Trading Reference Links
|
<x-flowed>
Hi
I can't recall the details now but I had to replace my exported dates in
print to file statements with the following function - ELDateToString -
which gives the correct date.
For example :
if date = lastcalcdate then begin
Fileappend( string4,
ELDateToString(Date) + " , " +
etc etc
If anyone needs this function here is the text version :
{***********************************************************************
Description : This Function returns an eigth character date string
(MM/DD/YYYY)
Provided By : Omega Research, Inc. (c) Copyright 1999
************************************************************************}
Inputs: DateSlct(Numeric);
Variables: YearPortion(""), StringMonth(""), StringDay("");
YearPortion = NumToStr(1900 + IntPortion(DateSlct * .0001), 0);
If DateSlct >= 1000000 Then
StringMonth = MidStr(NumToStr(DateSlct, 0), 4, 2)
else
StringMonth = MidStr(NumToStr(DateSlct, 0), 3, 2);
StringDay = RightStr(NumToStr(DateSlct, 0), 2);
ELDateToString = StringMonth + "/" + StringDay + "/" + YearPortion;
Regards Stuart
>From: Bob Fulks <bfulks@xxxxxxxxxxxx>
>To: "VK" <vk@xxxxxxxxxxxxxxx>
>CC: <omega-list@xxxxxxxxxx>
>Subject: Re: year 2000 + print statments
>Date: Wed, 2 Aug 2000 18:28:18 -0400
>
>At 11:07 PM +0200 8/2/00, VK wrote:
>
> >If i use the print statement on TS 2000i i do get 10001212 insteat of
> >20001212. That means it takes the year 2000 as if it were year 1000?
>
>No. You get 1001212 for December 12, 2000.
>
>This is one year after 991212, obviously, in "Omega-speak".
>
>Bob Fulks
>
</x-flowed>
|