function IsString(V)
    {
    if (typeof V != "string")
        {return false}
    else if (V=="")
        {return false}
    else
        {
        for (i=0 ; i < V.length ; i++)
            {
            if (V.charAt(i) !=" ")
                {return true}
            }
        }
    return false
    }

function IsEmail(V)
    {
    var i
    if (!IsString(V))
        {return false}
    i = V.indexOf("@")
    if (i < 1)
        {return false}
    if (V.lastIndexOf("@") != i)
        {return false}
    if (V.lastIndexOf(".") <= i)
        {return false}
    if (V.lastIndexOf(".") >= (V.length-1))
        {return false}
    i = V.indexOf(" ")
    if (i >= 0)
        {return false}
    i = V.indexOf(",")
    if (i >= 0)
        {return false}
    i = V.indexOf(";")
    if (i >= 0)
        {return false}
    i = V.indexOf(":")
    if (i >= 0)
        {return false}
    return true
    }

function IsPassword(V1,V2)
    {
    var i
    if (!IsString(V1))
        {return false}
    if (!IsString(V2))
        {return false}
    i = V1.indexOf(" ")
    if (i >= 0)
        {return false}
    if (V1.length < 4)
        {return false}
    if (V1 != V2)
        {return false}
    return true
    }

function IsInteger(V)
    {
    var l
    var i
    var ch
    l = "0123456789"
    if (!IsString(V))
        {return false}
    for (i = 0 ; i < V.length ; i++)
        {
        ch = V.charAt(i)
        if (l.indexOf(ch) < 0)
            {return false}
        }
    return true
    }

function IsFloatingPoint(V)
    {
    var l
    var i
    var ch
    l = "0123456789,"
    if (!IsString(V))
        {return false}
    for (i = 0 ; i < V.length ; i++)
        {
        ch = V.charAt(i)
        if (l.indexOf(ch) < 0)
            {return false}
        }
    i = V.indexOf(",")
    if (i == 0)
        {return false}
    if (i == (V.length - 1))
        {return false}
    if (i != V.lastIndexOf(","))
        {return false}
    return true
    }

function IsDate(V)
    {
    var D
    var M
    var Y
    if (!IsString(V))
        {return false}
    if (V.indexOf(" ") >= 0)
        {return false}
    if (V.length != 10)
        {return false}
    D = V.substr(0,2)
    M = V.substr(3,2)
    Y = V.substr(6)
    if (!IsInteger(D))
        {return false}
    if (!IsInteger(M))
        {return false}
    if (!IsInteger(Y))
        {return false}
    D =  Number(D)
    M =  Number(M)
    Y =  Number(Y)
    if (D < 1 || D > 31)
        {return false}
    if (M < 1 || M > 12)
        {return false}
    if (Y < 1900)
        {return false}
    if (V.charAt(2) !="-")
        {return false}
    if (V.charAt(5) !="-")
        {return false}
    return true
    }

function IsSqlDate(V)
    {
    var D
    var M
    var Y
    if (!IsString(V))
        {return false}
    if (V.indexOf(" ") >= 0)
        {return false}
    if (V.length != 10)
        {return false}
    Y = V.substr(0,4)
    M = V.substr(5,2)
    D = V.substr(8,2)
    if (!IsInteger(D))
        {return false}
    if (!IsInteger(M))
        {return false}
    if (!IsInteger(Y))
        {return false}
    D =  Number(D)
    M =  Number(M)
    Y =  Number(Y)
    if (D < 1 || D > 31)
        {return false}
    if (M < 1 || M > 12)
        {return false}
    if (Y < 1900)
        {return false}
    if (V.charAt(4) !="-")
        {return false}
    if (V.charAt(7) !="-")
        {return false}
    return true
    }

function IsTime(V)
    {
    var M
    var H
    if (!IsString(V))
        {return false}
    if (V.indexOf(" ") >= 0)
        {return false}
    if (V.length != 5)
        {return false}
    H = V.substr(0,2)
    M = V.substr(3)
    if (!IsInteger(H))
        {return false}
    if (!IsInteger(M))
        {return false}
    H =  Number(H)
    M =  Number(M)
    if (H < 0 || H > 23)
        {return false}
    if (M < 0 || M > 59)
        {return false}
    if (V.charAt(2) !=":")
        {return false}
    return true
    }