Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Year 2018 to 1918 Date Math
Message
From
15/03/2005 10:18:55
Sergey Berezniker
New York, United States
 
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Title:
Re: Year 2018 to 1918 Date Math
Environment versions
Visual FoxPro:
VFP 8 SP1
OS:
Windows XP SP2
Network:
Windows 2000 Server
Database:
MS SQL Server
Miscellaneous
Thread ID:
00995917
Message ID:
00995930
Views:
25
This message has been marked as the solution to the initial question of the thread.
There're simpler ways
dob = DATE(YEAR(dob)-100, MONTH(dob), DAY(dob))
* Even simpler
dob = GOMONT(dob, -100*12)
>a = dob
>Set date LONG
>? Ctod( Alltrim(Str(Month(a)))+"/" + Alltrim(Str(Day(a))) + "/" + Alltrim(Str(Year(a) - 100)))
>
>dob = a
>
--sb--
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform