Esempio n. 1
0
        /// <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="InSt"></param>
        /// <param name="D"></param>
        /// <returns></returns>
        public static bool TokenDate(ref string InSt, ref int D)
        {
            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 InSt, 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 InSt, "/") || MatchToken(ref InSt, "-")))       // State 1: Day found, looking for a
                    {
                        State = 2;                                                          //   delimiter or a month text
                    }
                    else
                    {
                        Mn = 1;
                        while ((Mn <= 12) && (!MatchToken(ref InSt, MonthTexts[Mn])))
                        {
                            Mn++;
                        }
                        if (Mn <= 12)
                        {
                            State = 3;
                        }
                        else
                        {
                            State = 2;
                        }
                    }
                    break;

                case 2: if (TokenInt(ref InSt, 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 InSt, "/") || MatchToken(ref InSt, "-")))      // State 3:  month has been found.  Clear
                    {
                        State = 3;                                                         //   away any delimiter and then look for a
                    }
                    else if (TokenInt(ref InSt, 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;
                D      = StdDate.DateVal(Day, Mn, Yr);
            }
            else
            {
                result = false;
            }

            return(result);
        }
Esempio n. 2
0
        /// <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);
        }