Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Auto find month
Message
From
13/07/2009 08:42:12
 
 
General information
Forum:
Visual FoxPro
Category:
Databases,Tables, Views, Indexing and SQL syntax
Title:
Environment versions
Visual FoxPro:
VFP 9 SP2
OS:
Windows XP
Network:
Windows XP
Database:
Visual FoxPro
Application:
Desktop
Miscellaneous
Thread ID:
01411851
Message ID:
01411861
Views:
23
>If in first text box value= oct 2009, i want value in 2nd text sep 2010 where year=1
>
>If in first text box value= oct 2009, i want value in 2nd text sep 2011 where year=2
>
>
>increase 12 month
>
>thanks

You can call this procedure to fill your second text box passing the date stored int the first and the number of years you want to skip

procedure nextdate
parameters xDate, xnumYears
private lData
lData = gomonth(xdate,(xnumyears*12)-1)

retu cmonth(ldata) + ' ' + alltrim(str(year(ldata)))
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform