Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Convert Text to Date, but conditionally
Message
 
To
31/08/2008 12:40:18
Jay Johengen
Altamahaw-Ossipee, North Carolina, United States
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Environment versions
Visual FoxPro:
VFP 9 SP2
Miscellaneous
Thread ID:
01343648
Message ID:
01343651
Views:
20
>
>cDate = '081308'
>cTime = '0945'
>cValue = cDate + cTime
>
>dNewDate = CTOT(TRANSFORM(cValue),'@R ^99/99/99T99:99:99'))
>
>The Result is a valid DateTime.
>
>But what if the cValue is not a valid datetime? I want to be able to do this:
>
>IF cValue is a valid datetime
>	dNewDate = CTOT(TRANSFORM(cValue),'@R ^99/99/99T99:99:99'))
>ELSE
>	* This is some other type and I do not want to try and convert it
>ENDIF
>
>This is for a report where cValue can be anything. It is always character, but on the report I want to evaluate it and display a real date if it is a date, but leave it alone if it is not.


Get some beer :-)
dNewDate = CTOT(TRANSFORM(cValue),'@R ^99/99/99T99:99:99'))
IF EMPTY(dNewDate)
    *** Not a valid date time
ELSE
     *** Valid date time
ENDIF
Against Stupidity the Gods themselves Contend in Vain - Johann Christoph Friedrich von Schiller
The only thing normal about database guys is their tables.
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform