var checkObjects	= new Array();
var errors		= "";
var returnVal		= false;
var language		= new Array();
language["header"]	= "There are errors in the form: ";
language["start"]	= "";
language["field"]	= " Field ";
language["require"]	= " is mandatory and ";
language["min"]		= " must have at less ";
language["max"]		= " must not have more than ";
language["minmax"]	= " no more than ";
language["chars"]	= " characters ";
language["string"]	= " must contain alphanumeric values ";
language["num"]		= " must contain numbers ";
language["email"]	= " must contain a valida e-mail direction ";
language["date"]	= " must contain a valid date ";
language["monthyear"]	= " must contain a valid month/year ";
language["minValue"]	= " and must contain a value at least "; //y debe tener un valor de al menos
language["maxValue"]	= " and must not contain a value higher than "; //y no debe contener un valor de mas de 
// Begin ccard
var Cards = new makeArray(8);
Cards[0] = new CardType("MasterCard", "51,52,53,54,55", "16");
var MasterCard = Cards[0];
Cards[1] = new CardType("VisaCard", "4", "13,16");
var VisaCard = Cards[1];
Cards[2] = new CardType("AmExCard", "34,37", "15");
var AmExCard = Cards[2];
Cards[3] = new CardType("DinersClubCard", "30,36,38", "14");
var DinersClubCard = Cards[3];
Cards[4] = new CardType("DiscoverCard", "6011", "16");
var DiscoverCard = Cards[4];
Cards[5] = new CardType("enRouteCard", "2014,2149", "15");
var enRouteCard = Cards[5];
Cards[6] = new CardType("JCBCard", "3088,3096,3112,3158,3337,3528", "16");
var JCBCard = Cards[6];
var LuhnCheckSum = Cards[7] = new CardType();
// End ccard
function define(req, n, type, HTMLname, minValue, maxValue, min, max, d) {
var p;
var i;
var x;
if (!d) d = document;
if ((p=n.indexOf("?"))>0&&parent.frames.length) {
d = parent.frames[n.substring(p+1)].document;
n = n.substring(0,p);
}
if (!(x = d[n]) && d.all) x = d.all[n];
for (i = 0; !x && i < d.forms.length; i++) {
x = d.forms[i][n];
}
for (i = 0; !x && d.layers && i < d.layers.length; i++) {
x = define(req, n, type, HTMLname, minValue, maxValue, min, max, d.layers[i].document);
return x;       
}
eval("V_"+n+" = new formResult(req, x, type, HTMLname, minValue, maxValue, min, max);");
checkObjects[eval(checkObjects.length)] = eval("V_"+n);
}

function formResult(req, form, type, HTMLname, minValue, maxValue, min, max) {
this.req = req;
this.form = form;
this.type = type;
this.HTMLname = HTMLname;
this.minValue  = minValue;
this.maxValue  = maxValue;
this.min  = min;
this.max  = max;
}

function setRequired(req,name){
for (i = 0; i < checkObjects.length; i++){
  if (checkObjects[i].form.name == name){
    checkObjects[i].req = req;
  }
}
}
function validate() {
var messRequired = "";
var condReq = false;
var condNoReqButValue = false;
if (checkObjects.length > 0) {
	errorObject = "";
	for (i = 0; i < checkObjects.length; i++) {
	  validateObject = new Object();
	  validateObject.req = checkObjects[i].req;
	  validateObject.form = checkObjects[i].form;
	  validateObject.HTMLname = checkObjects[i].HTMLname;
	  validateObject.val = checkObjects[i].form.value;
	  validateObject.len = checkObjects[i].form.value.length;
	  validateObject.minValue = checkObjects[i].minValue;
	  validateObject.maxValue = checkObjects[i].maxValue;
	  validateObject.min = checkObjects[i].min;
	  validateObject.max = checkObjects[i].max;
	  validateObject.type = checkObjects[i].type;
	
	  condReq = false; 
	  condNoReqButValue = false; 
	  if (validateObject.req == "y"){
	    messRequired = language["require"];
	    condReq = true;  
	  } else if (validateObject.req == "n" && validateObject.val) {
	    condNoReqButValue = true;
	    messRequired = "";
	  }
	  
	  if (condReq || condNoReqButValue){
	  if (validateObject.type == "num" || validateObject.type == "string") {
		if ((validateObject.type == "num" && validateObject.len <= 0) || (validateObject.type == "num" && isNaN(validateObject.val))) { 
			errors += language['start'] + language['field'] + validateObject.HTMLname + messRequired + language['num'] + "\n";
		} else if (validateObject.minValue && (validateObject.val < validateObject.minValue)) { 
			errors += language['start'] + language['field'] + validateObject.HTMLname + messRequired + language['minValue'] + validateObject.minValue + "\n";
		} else if (validateObject.maxValue && (validateObject.val > validateObject.maxValue)) { 
			errors += language['start'] + language['field'] + validateObject.HTMLname + messRequired + language['maxValue'] + validateObject.maxValue + "\n";
		} else if (validateObject.min && validateObject.max && (validateObject.len < validateObject.min || validateObject.len > validateObject.max)) { 
			errors += language['start'] + language['field'] + validateObject.HTMLname + messRequired + language['min'] + validateObject.min + language['minmax'] + validateObject.max+language['chars'] + "\n";
		} else if (validateObject.min && !validateObject.max && (validateObject.len < validateObject.min)) { 
			errors += language['start'] + language['field'] + validateObject.HTMLname + messRequired + language['min'] + validateObject.min + language['chars'] + "\n";
		} else if (validateObject.max && !validateObject.min &&(validateObject.len > validateObject.max)) { 
			errors += language['start'] + language['field'] + validateObject.HTMLname + messRequired + language['max'] + validateObject.max + language['chars'] + "\n";
		} else if (!validateObject.min && !validateObject.max && validateObject.len <= 0) { 
			errors += language['start'] + language['field'] + validateObject.HTMLname + messRequired + language['string'] + "\n";
		}

	  } else if(validateObject.type == "email") {
		if ((validateObject.val.indexOf("@") == -1) || (validateObject.val.charAt(0) == ".") || (validateObject.val.charAt(0) == "@") || (validateObject.len < 6) || (validateObject.val.indexOf(".") == -1) || (validateObject.val.charAt(validateObject.val.indexOf("@")+1) == ".") || (validateObject.val.charAt(validateObject.val.indexOf("@")-1) == ".")) { 
			errors += language['start'] + language['field'] + validateObject.HTMLname + language['email'] + "\n"; 
		}
	  } else if(validateObject.type == "date" && checkdate(validateObject.val) != 0) {
		errors += language['start'] + language['field'] + validateObject.HTMLname + language['date'] + "\n"; 
	  } else if(validateObject.type == "monthyear" && checkmonthyear(validateObject.val) != 0) {
		errors += language['start'] + language['field'] + validateObject.HTMLname + language['monthyear'] + "\n"; 
	  }
	}
	}
	if (errors != "") {
		alert(language["header"].concat("\n" + errors));
		errors = "";
		returnVal = false;
	} else {
		returnVal = true;
	}
  }
  return returnVal;
}

function checkdate(val){
	var err=0;
	var psj=0;
	a=val;
	if (a.length != 10) err=1;
	b = a.substring(0, 2); // day
	c = a.substring(2, 3); // '/'
	d = a.substring(3, 5); // month
	e = a.substring(5, 6) // '/'
	f = a.substring(6, 10); // year

	if (b<1 || b>31) err = 1;
	if (b<"01" || b>"31") err = 1;
	if (c != '/') err = 1;
	if (d<1 || d>12) err = 1;
	if (d<"01" || d>"12") err = 1;
	if (e != '/') err = 1;
	if (f<1900 || f>2100) err = 1;
	if (f<"1900" || f>"2100") err = 1;	
	
	if (d==4 || d==6 || d==9 || d==11){
		if (b==31) err=1;
	}

	if (d==2){
		var g=parseInt(f/4);
		if (isNaN(g)) {
			err=1;
		}

		if (b>29) err=1;
		last2YearDigit = f.substring(2,4);
		if (b==29 && ((last2YearDigit/4)!=parseInt(last2YearDigit/4))) err=1;
	}
	return err;
}

function checkmonthyear(val){
	var err=0;
	var psj=0;
	a=val;

	if (a.length != 7) err=1;
	d = a.substring(0, 2); // month
	e = a.substring(2, 3); // '/'
	f = a.substring(3, 7); // year

	if (d<1 || d>12) err = 1;
	if (d<"01" || d>"12") err = 1;
	if (e != '/') err = 1;
	if (f<1900 || f>2100) err = 1;
	if (f<"1900" || f>"2100") err = 1;	
	
	return err;
}
//*************************************************************************\
//CheckCardNumber(form)
//function called when users click the "check" button.
//*************************************************************************/
function CheckCardNumber(form) {
var tmpyear;
if (form.CardNumber.value.length == 0) {
alert("Please enter a Card Number.");
form.CardNumber.focus();
return;
}
if (form.ExpYear.value.length == 0) {
alert("Please enter the Expiration Year.");
form.ExpYear.focus();
return;
}
if (form.ExpYear.value > 96)
tmpyear = "19" + form.ExpYear.value;
else if (form.ExpYear.value < 21)
tmpyear = "20" + form.ExpYear.value;
else {
alert("The Expiration Year is not valid.");
return;
}
tmpmonth = form.ExpMon.options[form.ExpMon.selectedIndex].value;
// The following line doesn't work in IE3, you need to change it
// to something like "(new CardType())...".
// if (!CardType().isExpiryDate(tmpyear, tmpmonth)) {
if (!(new CardType()).isExpiryDate(tmpyear, tmpmonth)) {
alert("This card has already expired.");
return;
}
card = form.CardType.options[form.CardType.selectedIndex].value;
var retval = eval(card + ".checkCardNumber(\"" + form.CardNumber.value +
"\", " + tmpyear + ", " + tmpmonth + ");");
cardname = "";
if (retval)


// comment this out if used on an order form
alert("This card number appears to be valid.");


else {
// The cardnumber has the valid luhn checksum, but we want to know which
// cardtype it belongs to.
for (var n = 0; n < Cards.size; n++) {
if (Cards[n].checkCardNumber(form.CardNumber.value, tmpyear, tmpmonth)) {
cardname = Cards[n].getCardType();
break;
   }
}
if (cardname.length > 0) {
alert("This looks like a " + cardname + " number, not a " + card + " number.");
}
else {
alert("This card number is not valid.");
      }
   }
}
/*************************************************************************\
Object CardType([String cardtype, String rules, String len, int year, 
                                        int month])
cardtype    : type of card, eg: MasterCard, Visa, etc.
rules       : rules of the cardnumber, eg: "4", "6011", "34,37".
len         : valid length of cardnumber, eg: "16,19", "13,16".
year        : year of expiry date.
month       : month of expiry date.
eg:
var VisaCard = new CardType("Visa", "4", "16");
var AmExCard = new CardType("AmEx", "34,37", "15");
\*************************************************************************/
function CardType() {
var n;
var argv = CardType.arguments;
var argc = CardType.arguments.length;

this.objname = "object CardType";

var tmpcardtype = (argc > 0) ? argv[0] : "CardObject";
var tmprules = (argc > 1) ? argv[1] : "0,1,2,3,4,5,6,7,8,9";
var tmplen = (argc > 2) ? argv[2] : "13,14,15,16,19";

this.setCardNumber = setCardNumber;  // set CardNumber method.
this.setCardType = setCardType;  // setCardType method.
this.setLen = setLen;  // setLen method.
this.setRules = setRules;  // setRules method.
this.setExpiryDate = setExpiryDate;  // setExpiryDate method.

this.setCardType(tmpcardtype);
this.setLen(tmplen);
this.setRules(tmprules);
if (argc > 4)
this.setExpiryDate(argv[3], argv[4]);

this.checkCardNumber = checkCardNumber;  // checkCardNumber method.
this.getExpiryDate = getExpiryDate;  // getExpiryDate method.
this.getCardType = getCardType;  // getCardType method.
this.isCardNumber = isCardNumber;  // isCardNumber method.
this.isExpiryDate = isExpiryDate;  // isExpiryDate method.
this.luhnCheck = luhnCheck;// luhnCheck method.
return this;
}

/*************************************************************************\
boolean checkCardNumber([String cardnumber, int year, int month])
return true if cardnumber pass the luhncheck and the expiry date is
valid, else return false.
\*************************************************************************/
function checkCardNumber() {
var argv = checkCardNumber.arguments;
var argc = checkCardNumber.arguments.length;
var cardnumber = (argc > 0) ? argv[0] : this.cardnumber;
var year = (argc > 1) ? argv[1] : this.year;
var month = (argc > 2) ? argv[2] : this.month;

this.setCardNumber(cardnumber);
this.setExpiryDate(year, month);

if (!this.isCardNumber())
return false;
if (!this.isExpiryDate())
return false;

return true;
}
/*************************************************************************\
String getCardType()
return the cardtype.
\*************************************************************************/
function getCardType() {
return this.cardtype;
}
/*************************************************************************\
String getExpiryDate()
return the expiry date.
\*************************************************************************/
function getExpiryDate() {
return this.month + "/" + this.year;
}
/*************************************************************************\
boolean isCardNumber([String cardnumber])
return true if cardnumber pass the luhncheck and the rules, else return
false.
\*************************************************************************/
function isCardNumber() {
var argv = isCardNumber.arguments;
var argc = isCardNumber.arguments.length;
var cardnumber = (argc > 0) ? argv[0] : this.cardnumber;
if (!this.luhnCheck())
return false;

for (var n = 0; n < this.len.size; n++)
if (cardnumber.toString().length == this.len[n]) {
for (var m = 0; m < this.rules.size; m++) {
var headdigit = cardnumber.substring(0, this.rules[m].toString().length);
if (headdigit == this.rules[m])
return true;
}
return false;
}
return false;
}

/*************************************************************************\
boolean isExpiryDate([int year, int month])
return true if the date is a valid expiry date,
else return false.
\*************************************************************************/
function isExpiryDate() {
var argv = isExpiryDate.arguments;
var argc = isExpiryDate.arguments.length;

year = argc > 0 ? argv[0] : this.year;
month = argc > 1 ? argv[1] : this.month;

if (!isNum(year+""))
return false;
if (!isNum(month+""))
return false;
today = new Date();
expiry = new Date(year, month);
if (today.getTime() > expiry.getTime())
return false;
else
return true;
}

/*************************************************************************\
boolean isNum(String argvalue)
return true if argvalue contains only numeric characters,
else return false.
\*************************************************************************/
function isNum(argvalue) {
argvalue = argvalue.toString();

if (argvalue.length == 0)
return false;

for (var n = 0; n < argvalue.length; n++)
if (argvalue.substring(n, n+1) < "0" || argvalue.substring(n, n+1) > "9")
return false;

return true;
}

/*************************************************************************\
boolean luhnCheck([String CardNumber])
return true if CardNumber pass the luhn check else return false.
Reference: http://www.ling.nwu.edu/~sburke/pub/luhn_lib.pl
\*************************************************************************/
function luhnCheck() {
var argv = luhnCheck.arguments;
var argc = luhnCheck.arguments.length;

var CardNumber = argc > 0 ? argv[0] : this.cardnumber;

if (! isNum(CardNumber)) {
return false;
  }

var no_digit = CardNumber.length;
var oddoeven = no_digit & 1;
var sum = 0;

for (var count = 0; count < no_digit; count++) {
var digit = parseInt(CardNumber.charAt(count));
if (!((count & 1) ^ oddoeven)) {
digit *= 2;
if (digit > 9)
digit -= 9;
}
sum += digit;
}
if (sum % 10 == 0)
return true;
else
return false;
}

/*************************************************************************\
ArrayObject makeArray(int size)
return the array object in the size specified.
\*************************************************************************/
function makeArray(size) {
this.size = size;
return this;
}

/*************************************************************************\
CardType setCardNumber(cardnumber)
return the CardType object.
\*************************************************************************/
function setCardNumber(cardnumber) {
this.cardnumber = cardnumber;
return this;
}

/*************************************************************************\
CardType setCardType(cardtype)
return the CardType object.
\*************************************************************************/
function setCardType(cardtype) {
this.cardtype = cardtype;
return this;
}

/*************************************************************************\
CardType setExpiryDate(year, month)
return the CardType object.
\*************************************************************************/
function setExpiryDate(year, month) {
this.year = year;
this.month = month;
return this;
}

/*************************************************************************\
CardType setLen(len)
return the CardType object.
\*************************************************************************/
function setLen(len) {
// Create the len array.
if (len.length == 0 || len == null)
len = "13,14,15,16,19";

var tmplen = len;
n = 1;
while (tmplen.indexOf(",") != -1) {
tmplen = tmplen.substring(tmplen.indexOf(",") + 1, tmplen.length);
n++;
}
this.len = new makeArray(n);
n = 0;
while (len.indexOf(",") != -1) {
var tmpstr = len.substring(0, len.indexOf(","));
this.len[n] = tmpstr;
len = len.substring(len.indexOf(",") + 1, len.length);
n++;
}
this.len[n] = len;
return this;
}

/*************************************************************************\
CardType setRules()
return the CardType object.
\*************************************************************************/
function setRules(rules) {
// Create the rules array.
if (rules.length == 0 || rules == null)
rules = "0,1,2,3,4,5,6,7,8,9";
  
var tmprules = rules;
n = 1;
while (tmprules.indexOf(",") != -1) {
tmprules = tmprules.substring(tmprules.indexOf(",") + 1, tmprules.length);
n++;
}
this.rules = new makeArray(n);
n = 0;
while (rules.indexOf(",") != -1) {
var tmpstr = rules.substring(0, rules.indexOf(","));
this.rules[n] = tmpstr;
rules = rules.substring(rules.indexOf(",") + 1, rules.length);
n++;
}
this.rules[n] = rules;
return this;
}
//  End -->