<!--
function emailCheck(elm)
    {
    var email_pattern = /^(\w|-|\.)+\@([a-zA-Z0-9]|-)+\.(\w|\.)+/;
    var email_result;
    email_result = email_pattern.exec(elm);
    if (email_result)
        {
        return true;
        }
    else
        {
        alert(msg + "That is not a valid e-mail address.\nPlease try again.");
        return false;
        }
    }
function isNumb(elm,subpos)
    {
    theNumb = elm.value.replace(/(_|-|\.|\:|\;|\s)/g, "");
    if (isNaN(theNumb))
        {
        fieldName = elm.name.substring(subpos+1,elm.name.length).replace(/_/g," ");
        alert(msg + fieldName + " must be a number");
        return false;
        }
    else
        {
        return true;
        }
    }
function isAlphaNumb(elm,subpos)
    {
    alphanum_pattern = /^(\w)+([0-9a-zA-Z]|-)/;
    alphanum_result = alphanum_pattern.test(elm.value);
    if (alphanum_result == true)
        {
        return true;
        }
    else
        {
        fieldName = elm.name.substring(subpos+1,elm.name.length).replace(/_/g," ");
        alert(msg + fieldName + " must be a combination of letters and numbers.\nYou can also use \"-\" and \"_\" but,\n"
        + "the first character has to be a letter or a number.\n" + fieldName + " may also need to be longer");        
        return false;
        }
    }
function isFilled(elm)
    {
    if (elm.value.replace(/\s/g, "") == "" || elm.value == null)
        {
        return false;
        }
    else
        {
        return true;
        }
    }
function verify(form)
    {
    msg = "There was an Error processing your form: \n ________________________________ \n\n";
    for (i=0; i < form.elements.length; i++)
        {
        var f = form.elements[i]
        var ftype = f.type
        var fname = f.name
        var fvalue = f.value
        var del2nd
        if (fname.indexOf("~") >= 0)
            {
            del2nd = fname.indexOf("~",1)
            }
        else if (fname.indexOf("#") >= 0)
            {
            del2nd = fname.indexOf("#",1)
            }
        var fspecial = fname.substring(1, del2nd)//item between delimiters
        if (fspecial.indexOf("Len-") >= 0) //is there character length requirement?
            {
            CharsReqloc = fspecial.indexOf("Len-"); //location right before required number of characters
            CharsReq = fspecial.substring(CharsReqloc+4, del2nd-1);//required character length
            }
        else {CharsReq = 0}
        if (fspecial.indexOf("Num") >= 0) {NumbReq = "Num"}
        else {NumbReq = ""}
        if (fspecial.indexOf("Alphanum") >= 0) {AlphanumReq = "Alphanum"}
        else {AlphanumReq = ""}
        if (fspecial.indexOf("Email") >= 0) {EmailReq = "Email"}
        else {EmailReq = ""}
        var fieldName = fname.substring(del2nd+1, fname.length).replace(/_/g," ")
        if (fname.substring(0,1) == "~")
            {
            if (ftype == "select-one")
                {
                if (f.selectedIndex == 0)
                    {
                    alert("You must select a " + fieldName);
                    f.focus();
                    return false;
                    }
                }
            else if (isFilled(f) == false)
                {
                alert(msg + fieldName + " is required");
                f.focus();
                return false;
                }
            else
                {
                if (NumbReq == "Num")
                    {
                    if (isNumb(f,del2nd) == false)
                        {
                        f.focus();
                        return false;
                        }
                    }
                if (AlphanumReq == "Alphanum")
                    {
                    if (isAlphaNumb(f,del2nd) == false)
                        {
                        f.focus();
                        return false;
                        }
                    }
                if (CharsReq > 0)
                    {
                    if (parseInt(fvalue.length) < CharsReq)
                        {
                        alert(msg + fieldName + " needs to be at least " + CharsReq + " characters long");
                        f.focus();
                        return false;
                        }
                    }
                if (EmailReq == "Email")
                    {
                    if(emailCheck(fvalue) == false)
                        {
                        f.focus();
                        return false;
                        }
                    }
                }
            }
        else if (fname.substring(0,1) == "#")
            {
            if (isFilled(f) != false)
                {
                if (NumbReq == "Num")
                    {
                    if (isNumb(f,del2nd) == false)
                        {
                        f.focus();
                        return false;
                        }
                    }
                if (AlphanumReq == "Alphanum")
                    {
                    if (isAlphaNumb(f,del2nd) == false)
                        {
                        f.focus();
                        return false;
                        }
                    }
                if (CharsReq > 0)
                    {
                    if (fvalue.length < CharsReq)
                        {
                        alert(msg + fieldName + " needs to be at least " + CharsReq + " characters long");
                        f.focus();
                        return false;
                        }
                    }
                if (EmailReq == "Email")
                    {
                    if(emailCheck(fvalue) == false)
                        {
                        f.focus();
                        return false;
                        }
                    }
                }
            }
        }
        return true;
    }
//-->