// Absolute Form Processor XE V1.0 : Form Validation System
// Copyright(c)2000 - 2003 XIGLA SOFTWARE
// http://www.xigla.com

function cancelsubmit(msg,element){
	alert(msg);
	element.focus();
	return false
}



function isNumeric(what){
    if (what.search(/^[-+]?\d+(\.\d+)?$/) != -1)
        return true;
    else
        return false;
}

function isInteger(what){
	if (what.search(/^[-+]?[1-9]\d*.?[0]*$/) != -1)
        return true;
    else
        return false;
}


function isEmail(what) {
	// Works
    if (what.search(/^\w+((-\w+)|(\.\w+))*\@[A-Za-z0-9]+((\.|-)[A-Za-z0-9]+)*\.[A-Za-z0-9]+$/) != -1)
        return true;
    else
        return false;
}

function isAlphanumeric(what){
	// ANY alphanumeric string with spaces, commas, dashes.
    if (what.search(/^[a-zA-Z0-9\s.\-]+$/) != -1)
        return true;
    else
        return false;
}

function isAlphabetic(what){
    if (what.search(/^[a-zA-Z\s]+$/) != -1)
        return true;
    else
        return false;
}

function noSpaces(what){
    if (what.search(/\s/) != -1)
        return false;
    else
        return true;
}

function isCC(what){
    if (what.search(/^((4\d{3})|(5[1-5]\d{2})|(6011))-?\d{4}-?\d{4}-?\d{4}|3[4,7]\d{13}$/) != -1)
        return true;
    else
        return false;
}


function xlaAFPvalidate(xlaAFPform){
if (xlaAFPform.Name){if (xlaAFPform.Name.value==''){return cancelsubmit('Field \'Name\' is required',xlaAFPform.Name)}if (!isAlphabetic(xlaAFPform.Name.value)){return cancelsubmit('Field \'Name\' can only contain alphabetic characters.',xlaAFPform.Name)}if (xlaAFPform.Name.value.length>25){return cancelsubmit('Field \'Name\' cannot contain more than 25 characters.',xlaAFPform.Name)}}
if (xlaAFPform.Phone){if (xlaAFPform.Phone.value==''){return cancelsubmit('Field \'Phone\' is required',xlaAFPform.Phone)}if (xlaAFPform.Phone.value.length>20){return cancelsubmit('Field \'Phone\' cannot contain more than 20 characters.',xlaAFPform.Phone)}}
if (xlaAFPform.Address){if (xlaAFPform.Address.value==''){return cancelsubmit('Field \'Address\' is required',xlaAFPform.Address)}if (xlaAFPform.Address.value.length>35){return cancelsubmit('Field \'Address\' cannot contain more than 35 characters.',xlaAFPform.Address)}}
if (xlaAFPform.City){if (xlaAFPform.City.value==''){return cancelsubmit('Field \'City\' is required',xlaAFPform.City)}if (!isAlphabetic(xlaAFPform.City.value)){return cancelsubmit('Field \'City\' can only contain alphabetic characters.',xlaAFPform.City)}if (xlaAFPform.City.value.length>25){return cancelsubmit('Field \'City\' cannot contain more than 25 characters.',xlaAFPform.City)}}
if (xlaAFPform.Zip){if (xlaAFPform.Zip.value==''){return cancelsubmit('Field \'Zip\' is required',xlaAFPform.Zip)}if (!isNumeric(xlaAFPform.Zip.value)){return cancelsubmit('Field \'Zip\' is not numeric',xlaAFPform.Zip)}if (xlaAFPform.Zip.value.length>6){return cancelsubmit('Field \'Zip\' cannot contain more than 6 characters.',xlaAFPform.Zip)}if (!noSpaces(xlaAFPform.Zip.value)){return cancelsubmit('Field \'Zip\' cannot contain spaces.',xlaAFPform.Zip)}}
if (xlaAFPform.Email){if (xlaAFPform.Email.value==''){return cancelsubmit('Field \'Email\' is required',xlaAFPform.Email)}if (!isEmail(xlaAFPform.Email.value)){return cancelsubmit('Field \'Email\' does not contain a valid e-mail address.',xlaAFPform.Email)}if (!noSpaces(xlaAFPform.Email.value)){return cancelsubmit('Field \'Email\' cannot contain spaces.',xlaAFPform.Email)}}
if (xlaAFPform.Comments){if (xlaAFPform.Comments.value.length>250){return cancelsubmit('Field \'Comments\' cannot contain more than 250 characters.',xlaAFPform.Comments)}}

}