/// <summary>
/// Get the string of a std date (integer). The string form is 'dd mmm'
/// </summary>
/// <param name="value"></param>
protected string SetFromStdDate(int value)
{
if (value != 0)
{
return(StdDate.DateStrFmt(value, "D mmm"));
}
else
{
return(String.Empty);
}
}
/// <summary>
/// Token_Date follows the same rules for its parameters as Token_Int. It
/// expects day to precede months, and months to precede years, but it can
/// cope with D-M-Y and D-M-0 kinds of date. Token_Date is implemented as a
/// state-based parser:
/// -----
/// State Next token Token means Go to state
/// ----- ---------- ----------- -----------
/// -1 Error
/// 0 Start of parsing Number Day of month 1
/// else -1
/// 1 Past day '/' or '-' Delimiter 2
/// JAN-DEC Month 3
/// else 2
/// 2 Numeric month 1-12 Month 3
/// else -1
/// 3 Past month '/' or '-' Delimiter 3
/// Number Year 4
/// else Year=0 4
/// </summary>
/// <param name="inputStr">Input date string</param>
/// <param name="dateValue">Returned date</param>
/// <returns>True is parsed ok</returns>
public static bool TokenDate(ref string inputStr, ref int dateValue)
{
bool result;
// We need to have these in upper case as that is how TextToken returns them
string[] monthTexts = { "JAN", "FEB", "MAR", "APR", "MAY", "JUN", "JUL", "AUG", "SEP", "OCT", "NOV", "DEC" };
int state = 0;
int day = 0;
int mn = 0;
int yr = 0;
while ((state != -1) && (state != 4))
{
switch (state)
{
case 0:
if (TokenInt(ref inputStr, ref day) && (day >= 1) && (day <= 31)) // state 0: we expect a number for the day
{
state = 1;
}
else
{
state = -1;
}
break;
case 1: if (MatchToken(ref inputStr, "/") || MatchToken(ref inputStr, "-")) // State 1: Day found, looking for a
{
state = 2; // delimiter or a month text
}
else
{
mn = 1;
while ((mn <= 12) && (!MatchToken(ref inputStr, monthTexts[mn])))
{
mn++;
}
if (mn <= 12)
{
state = 3;
}
else
{
state = 2;
}
}
break;
case 2: if (TokenInt(ref inputStr, ref mn) && (mn >= 1) && (mn <= 12)) // State 2: Day/month delimiter found, so
{
state = 3; // looking for a numeric month
}
else
{
state = -1;
}
break;
case 3: if (MatchToken(ref inputStr, "/") || MatchToken(ref inputStr, "-")) // State 3: month has been found. Clear
{
state = 3; // away any delimiter and then look for a
}
else if (TokenInt(ref inputStr, ref yr) && (yr >= 1)) // year
{
if (yr < 100)
{
yr = 1900 + yr;
}
state = 4; // state=4 is the exit point
}
else
{
yr = 0;
state = 4;
}
break;
}
}
if ((state != -1) && StdDate.DateValid(StdDate.DateVal(day, mn, yr)))
{
result = true;
dateValue = StdDate.DateVal(day, mn, yr);
}
else
{
result = false;
}
return(result);
}
