function F_Survey_IsEmail(str)
{
        var nLen;
        var nCnt1, nCnt2;

        nCnt1=0;
        nCnt2=0;
        nLen = str.length;
        if(str.indexOf('@',0)==0)
        {
           return false;
        }
        for(var i=0; i<nLen; i++)
        {

                if(str.charAt(i)==' ')
                {
                        return false;
                }
                if(str.charAt(i)=='\'' || str.charAt(i)=='\"')
                {
                        return false;
                }
                if(str.charAt(i)=='<' || str.charAt(i)=='>' )
                {
                        return false;
                }
                if(str.charAt(i)=='@')
                {
                        nCnt1++;
                }
                if(str.charAt(i)=='.')
                {
                        nCnt2++;
                }
        }
        if( nCnt1<1 || nCnt2<1)
        {
                return false;
        }
        return true;
}
function F_Survey_IsPID(str)
{
    if (isNaN(str.substr(0,17)))
        return false;
    if ((str.length==15)||(str.length==18))
        return true;
    else
        return false;
}
function F_Survey_IsZipCode(str)
{
    if (isNaN(str))
        return false;
    if (str.length==6)
        return true;
    else
        return false;
}

