// JScript File
function emailCheck (source, args) {
var emailStr=args.Value
var emailPat=/^(.+)@(.+)$/
var specialChars="\\(\\)<>@,;:\\\\\\\"\\.\\[\\]"
var validChars="\[^\\s" + specialChars + "\]"
var quotedUser="(\"[^\"]*\")"
var ipDomainPat=/^\[(\d{1,3})\.(\d{1,3})\.(\d{1,3})\.(\d{1,3})\]$/
var atom=validChars + '+'
var word="(" + atom + "|" + quotedUser + ")"
var userPat=new RegExp("^" + word + "(\\." + word + ")*$")
var domainPat=new RegExp("^" + atom + "(\\." + atom +")*$")
var matchArray=emailStr.match(emailPat)
//if (emailCheck=="") {
//	args.IsValid = false
//	return
//}
if (matchArray==null) {
	args.IsValid = false
	return
}
var user=matchArray[1]
var domain=matchArray[2]
if (user.match(userPat)==null) {
	args.IsValid = false
	return
}
var IPArray=domain.match(ipDomainPat)
if (IPArray!=null) {
	  for (var i=1;i<=4;i++) {
	    if (IPArray[i]>255) {
    	args.IsValid = false
    	return
	    }
    }
	args.IsValid = true
}
var domainArray=domain.match(domainPat)
if (domainArray==null) {
   	args.IsValid = false
	return
}
var atomPat=new RegExp(atom,"g")
var domArr=domain.match(atomPat)
var len=domArr.length
if (domArr[domArr.length-1].length<2 || 
    domArr[domArr.length-1].length>3) {
   	args.IsValid = false
	return
}
if (len<2) {
   alert(errStr)
   	args.IsValid = false
   	return
}
   	args.IsValid = true
   	return
}
function ValidateNumber(source, arguments) {
arguments.IsValid = checknumber(arguments.Value);
}
function ValidateInteger(source, arguments) {
arguments.IsValid = checkinteger(arguments.Value);
}
function ValidateDate(source, arguments) {
arguments.IsValid = checkdate(arguments.Value);
}

function validateDate(object_value,seperator){
//Returns true if value is a date format 
    //otherwise returns false	
 if (seperator != "" )
	{
    if (object_value.length == 0)
        return false;
  
		//Returns true if value is a date in the mm/dd/yyyy format
		isplit = object_value.indexOf(seperator);

		if (isplit == -1 || isplit == object_value.length)
			return false;
	
		//sMonth = object_value.substring(0, isplit);
		sDay = object_value.substring(0, isplit);

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

		isplit = object_value.indexOf(seperator, isplit + 1);

		if (isplit == -1 || (isplit + 1 ) == object_value.length)
			return false;

		//sDay = object_value.substring((sMonth.length + 1), isplit);
		sMonth = object_value.substring((sDay.length + 1), isplit);
		
		if (sMonth.length == 0)
		  return false;

		sYear = object_value.substring(isplit + 1);
	
		//convert the mmm into a numeric so that it can be read
		sMonth = convertMonth(sMonth);
		
		// check date not above current date
		// var vCompareDate = new Date(sYear, sMonth-1, sDay);
		// var vToday = new Date();
		
		// if (vCompareDate > vToday)
		//		return false;
				
		
	}
else
	{ 

		//case of dmmyy or ddmmyy
	
		switch (object_value.length)
		{
		case 5:
			sDay = object_value.substring(0,1);
			sMonth = object_value.substring(1,3);
			sYear = object_value.substring(3,5);
			break;	
		case 6:
			sDay = object_value.substring(0,2);
			sMonth = object_value.substring(2,4);
			sYear = object_value.substring(4,6);
			break;
		default:
			return false;
		}
	}	

	//convert the year into four digit year if it isn't
	switch (sYear.length)
	{
		case 1:
			if (sYear > 29){
				sYear = 190 + sYear
			}
			else{
				sYear = 200 + sYear
			}
			break;
		case 2:
			if (sYear > 29){
				sYear = 19 + sYear
			}
			else{
				sYear = 20 + sYear
			}
			break;
		case 3:
			sYear = 2 + sYear;
			break;
	}
	
	if (!checkinteger(sMonth)) //check month
		return false;
	else
	if (!checkrange(sMonth, 1, 12)) //check month
		return false;
	else
	if (!checkinteger(sYear)) //check year
		return false;
	else
	if (!checkrange(sYear, 0, 9999)) //check year
		return false;
	else
	if (!checkinteger(sDay)) //check day
		return false;
	else
	if (!checkday(sYear, sMonth, sDay)) // check day
		return false;
	else

		// check date not above current date
		// var vCompareDate = new Date(sYear, sMonth-1, sDay);
		// var vToday = new Date();
		
		// if (vCompareDate > vToday)
		//	{
		//		return false;
		//	}
		// else
		//	{
				return sDay + '/' + returnTextMonth(sMonth) + '/' + sYear;
		//	}
}

function convertMonth(sMonth){
	switch ((sMonth).toUpperCase()){
		case "JAN":
			sMonth = "1";
			break;
		case "FEB":
			sMonth = "2";
			break;
		case "MAR":
			sMonth = "3";
			break;
		case "APR":
			sMonth = "4";
			break;
		case "MAY":
			sMonth = "5";
			break;
		case "JUN":
			sMonth = "6";
			break;
		case "JUL":
			sMonth = "7";
			break;
		case "AUG":
			sMonth = "8";
			break;
		case "SEP":
			sMonth = "9";
			break;
		case "OCT":
			sMonth = "10";
			break;
		case "NOV":
			sMonth = "11";
			break;
		case "DEC":
			sMonth = "12";
			break;
	}
	return sMonth;
}

function returnTextMonth(sMonth){
	switch (sMonth){
		case "1":
			sMonth = "Jan";
			break;
		case "01":
			sMonth = "Jan";
			break;
		case "2":
			sMonth = "Feb";
			break;
		case "02":
			sMonth = "Feb";
			break;
		case "3":
			sMonth = "Mar";
			break;
		case "03":
			sMonth = "Mar";
			break;
		case "4":
			sMonth = "Apr";
			break;
		case "04":
			sMonth = "Apr";
			break;
		case "5":
			sMonth = "May";
			break;
		case "05":
			sMonth = "May";
			break;
		case "6":
			sMonth = "Jun";
			break;
		case "06":
			sMonth = "Jun";
			break;
		case "7":
			sMonth = "Jul";
			break;
		case "07":
			sMonth = "Jul";
			break;
		case "8":
			sMonth = "Aug";
			break;
		case "08":
			sMonth = "Aug";
			break;
		case "9":
			sMonth = "Sep";
			break;
		case "09":
			sMonth = "Sep";
			break;
		case "10":
			sMonth = "Oct";
			break;
		case "11":
			sMonth = "Nov";
			break;
		case "12":
			sMonth = "Dec";
			break;
	}
	return sMonth;
}

	
	function checkdate(object_value)
    {
    //Returns true if value is a date format or is NULL
    //otherwise returns false	

    if (object_value.length == 0)
        return true;

    //Returns true if value is a date in the mm/dd/yyyy format
	isplit = object_value.indexOf('/');

	if (isplit == -1 || isplit == object_value.length)
		return false;

    sDay = object_value.substring(0, isplit);

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

	isplit = object_value.indexOf('/', isplit + 1);

	if (isplit == -1 || (isplit + 1 ) == object_value.length)
		return false;

	sMonth = object_value.substring((sDay.length + 1), isplit);

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

    if (sMonth.toLowerCase()  == 'jan') 
        sMonth = '1';
    if (sMonth.toLowerCase()  == 'feb') 
        sMonth = '2';
    if (sMonth.toLowerCase()  == 'mar') 
        sMonth = '3';
    if (sMonth.toLowerCase()  == 'apr') 
        sMonth = '4';
    if (sMonth.toLowerCase()  == 'may') 
        sMonth = '5';
    if (sMonth.toLowerCase()  == 'jun') 
        sMonth = '6';
    if (sMonth.toLowerCase()  == 'jul') 
        sMonth = '7';
    if (sMonth.toLowerCase()  == 'aug') 
        sMonth = '8';
    if (sMonth.toLowerCase()  == 'sep') 
        sMonth = '9';
    if (sMonth.toLowerCase()  == 'oct') 
        sMonth = '10';
    if (sMonth.toLowerCase()  == 'nov') 
        sMonth = '11';
    if (sMonth.toLowerCase()  == 'dec') 
        sMonth = '12';
        
	sYear = object_value.substring(isplit + 1);

	if (!checkinteger(sMonth) ) //check month
		return false;
	else
	if (!checkrange(sMonth, 1, 12)) //check month
		return false;
	else
	if (!checkinteger(sYear)) //check year
		return false;
	else
	if (!checkrange(sYear, 0, 9999)) //check year
		return false;
	else
	if (!checkinteger(sDay)) //check day
		return false;
	else
	if (!checkday(sYear, sMonth, sDay)) // check day
		return false;
	else
		return true;
    }

function checkday(checkYear, checkMonth, checkDay)
    {

	maxDay = 31;

	if (checkMonth == 4 || checkMonth == 6 ||
			checkMonth == 9 || checkMonth == 11)
		maxDay = 30;
	else
	if (checkMonth == 2)
	{
		if (checkYear % 4 > 0)
			maxDay =28;
		else
		if (checkYear % 100 == 0 && checkYear % 400 > 0)
			maxDay = 28;
		else
			maxDay = 29;
	}

	return checkrange(checkDay, 1, maxDay); //check day
    }

function checkinteger(object_value)
    {
    //Returns true if value is a number or is NULL
    //otherwise returns false	

    if (object_value.length == 0)
        return true;
 
    //Returns true if value is an integer defined as
    //   having an optional leading + or -.
    //   otherwise containing only the characters 0-9.
	var decimal_format = ".";
	var check_char;

    //The first character can be + -  blank or a digit.
	check_char = object_value.indexOf(decimal_format)

    //Was it a decimal?
    if (check_char < 1)
	return checknumber(object_value);
    else
	return false;
    }
function checknumber(object_value)
    {
    //Returns true if value is a numberd
    //otherwise returns false	

    if (object_value.length == 0)
        return true;

    //Returns true if value is a number defined as
    //   having an optional leading + or -.
    //   having at most 1 decimal point.
    //   otherwise containing only the characters 0-9.
	var start_format = " .+-0123456789";
	var number_format = " .0123456789";
	var check_char;
	var decimal = false;
	var trailing_blank = false;
	var digits = false;

    //The first character can be + - .  blank or a digit.
	check_char = start_format.indexOf(object_value.charAt(0))
    //Was it a decimal?
	if (check_char == 1)
	    decimal = true;
	else if (check_char < 1)
		return false;
        
	//Remaining characters can be only . or a digit, but only one decimal.
	for (var i = 1; i < object_value.length; i++)
	{
		check_char = number_format.indexOf(object_value.charAt(i))
		if (check_char < 0)
			return false;
		else if (check_char == 1)
		{
			if (decimal)		// Second decimal.
				return false;
			else
				decimal = true;
		}
		else if (check_char == 0)
		{
			if (decimal || digits)	
				trailing_blank = true;
        // ignore leading blanks

		}
	        else if (trailing_blank)
			return false;
		else
			digits = true;
	}	
    //All tests passed, so...
    return true
    }

	

function numberrange(object_value, min_value, max_value)
    {
    // check minimum
    if (min_value != null)
	{
        if (object_value < min_value)
		return false;
	}

    // check maximum
    if (max_value != null)
	{
	if (object_value > max_value)
		return false;
	}
	
    //All tests passed, so...
    return true;
    }

function checkrange(object_value, min_value, max_value)
    {
    //if value is in range then return true else return false

    if (object_value.length == 0)
        return true;

    if (!checknumber(object_value))
	{
	return false;
	}
    else
	{
	return (numberrange((eval(object_value)), min_value, max_value));
	}
	
    //All tests passed, so...
    return true;
    }