// Global value to be set usually in the OnFocus event
var originalFieldValue;
var page = document.URL

function refresh() {
 window.location.href = page;
}

function setOriginalValue( field ) {
    originalFieldValue = field.value;
    field.select();
}

function checkDate( field ) {
	checkDates( field, true );
}

function checkDates( field, show ) {
	if((!checkFormat(field,"##/##/####") || !checkTime(field)) && show)  {
		alert("Please enter a valid date format. MM/DD/YYYY");
		field.value = originalFieldValue;
      	field.focus();
	} else if ((!checkFormat(field,"##/##/####") || !checkTime(field)) && !show) {
		field.value = originalFieldValue;
		field.focus();
	}
}

function checkTime( field ) {
 var obj = field.value;
 var months = Array("01","02","03","04","05","06","07","08","09","10","11","12");
 var days = Array("01","02","03","04","05","06","07","08","09","10","11","12","13","14","15","16","17","18","19","20","21","22","23","24","25","26","27","28","29","30","31");
 var month = obj.substring(0,obj.indexOf("/"));
 var day = obj.substring(obj.indexOf("/")+1,obj.lastIndexOf("/"));
 var gooddays = false;
 var goodmonths = false;
 for(var i=0;i<days.length;i++){
   if(days[i].indexOf(day) != -1) {
	gooddays = true;		
   }
 }

 for(var i=0;i<months.length;i++){
   if(months[i].indexOf(month) != -1) {
	goodmonths = true;		
   }
 }

 if(!gooddays || !goodmonths)
	return false;
 else
	return true;
}

function checkFormat(field, pic) {
 var obj = field.value;
 var good = true;
 var error = "";
 var validData = "";
 if(obj.length == pic.length) {
 	for( var i=0; i != obj.length; i++ ) {
		var vpic = pic.charAt(i);
		var vobj = obj.charAt(i);
		error += "[ " + i + " ] Field: " + vobj + "\n";
		error += "[ " + i + " ] Pictur: " + vpic + "\n";
		if(vpic == "#")
			validData = DIGITS;
		else
			validData = vpic;
		if( validData.indexOf(vobj) == -1) {
				error += "FAILED\n";
				good = false;
		} else {
			error  +="PASSED\n";
		}
	}
 } else
	good = false;
  return(good);
}


function validateMe( field, type, length, precision, lowerLimit, upperLimit, inputRequired ) {
    var newValue = field.value;
    var newLength = newValue.length;
    var errorCode = false;

    if( inputRequired == 0 && newLength == 0 ) {
        return( errorCode );
    }

    if( inputRequired == 1 ) {
        if( newLength == 0 ) {
            errorCode = true;
        }
        else {
            if( doTrim(newValue) == "" ) {
                field.value = doTrim(originalFieldValue)
            }
            else {
                errorCode = false;
            }
        }
    }

    if( errorCode == false ) {
        if( type == 'NONE' ) {
        }
        else if( type == 'NUM' ) {
            var newLength = newValue.length;

            for( var i = 0; i != newLength; i++ ) {
                aChar = newValue.substring(i,i+1)
                if( ( aChar < "0" || aChar > "9") && ( aChar != "-" ) ) {
                    errorCode = true;
                }
            }

            if( (field.value < lowerLimit) || (field.value > upperLimit) ) {
                errorCode = true;
            }

            if( errorCode == true ) {
                alert('This field requires a value in the range of ' + lowerLimit + ' to ' + upperLimit + '.\nPlease re-enter a value');
                field.value = originalFieldValue;
                field.focus();
                //field.select()
            }
        }
        // This uses javascripts date functions.  Works pretty good, but doesn't handle dates of the form mm.dd.yy (with periods) too well.
        else if( type == 'DATE' ) {
            if( isNaN(Date.parse(field.value)) ) {
                alert('This field requires a valid date.\nPlease re-enter a value')
                field.value = originalFieldValue;
                field.focus();
                //field.select()
								errorCode = true;
            }
        }
        // Currency.  Precision is hard coded to 2, upper and lower limits are important
        else if( type == 'CURR' ) {
            decimalValid(field, type, 2, lowerLimit, upperLimit);
        }
        // Decimal.  Precision, as well as upper and lower limits are important
        else if( type == 'DEC' ) {
            decimalValid(field, type, precision, lowerLimit, upperLimit);
        }
        else if( type == 'ALPH' ) {
            var extraChars=". -,";
            var search;

            if( newLength == 0 ) {
                alert('This field requires a valid alphabetical string.\nPlease re-enter a value');
                field.value = originalFieldValue;
                field.focus();
                //field.select()
								errorCode = true;
            }
            if( newLength > length ) {
                alert('This field supports a maximum length of '+length.toString()+'.\nPlease re-enter a value');
                field.value = originalFieldValue;
                field.focus()
                //field.select()
								errorCode = true;
            }
            for( var i = 0; i != newLength; i++ ) {
                aChar = newValue.substring(i,i+1);
                aChar = aChar.toUpperCase();
                search = extraChars.indexOf(aChar);
                if(search == -1 && (aChar < "A" || aChar > "Z") ) {
                    alert('This field requires a valid alphabetical string.\nPlease re-enter a value');
                    field.value = originalFieldValue;
                    field.focus();
                    //field.select()
										errorCode = true;
                }
            }
        }
        else if( type == 'STR' ) {
            var extraChars=". -,0123456789:?><!@#$%^&*()_+=|}{][/\'\"";
            var search;

            if( newLength == 0 ) {
                alert('This field requires a valid alphanumeric string.\nPlease re-enter a value');
                field.value = originalFieldValue;
                field.focus();
                //field.select()
								errorCode = true;
            }
            if( newLength > length ) {
                alert('This field supports a maximum length of '+length.toString()+'.\nPlease re-enter a value');
                field.value = field.value.substring(0,length-1);
                field.focus();
                //field.select()
								errorCode = true;
            }
            for( var i = 0; i != newLength; i++ ) {
                aChar = newValue.substring(i,i+1);
                aChar = aChar.toUpperCase();
                search = extraChars.indexOf(aChar);
                if( search == -1 && (aChar < "A" || aChar > "Z") ) {
                    alert('This field requires a valid alphanumeric string.\nPlease re-enter a value');
                    field.value = originalFieldValue;
                    field.focus();
                    //field.select()
										errorCode = true;
                }
            }
        }
        else if( type == 'TIME' ) {
            var status1 = true;
            status1 = pictureValid(field, "##:##:##");
            if( status1 == false ) {
                alert('This field requires a valid Time ##:##:## .\nPlease re-enter a value');
                field.value = originalFieldValue;
                field.focus();
                //field.select()
								errorCode = true;
            }
        }
        else if( type == 'ZIP' ) {
            var status1 = true;
            var status2 = true;
            var switchzip = field.value;

            status1 = pictureValid(field, "#####");
            if( status1 == false ) {
                status2 = pictureValid(field, "#####-####");
                if( switchzip.length == 9 ) {
                    if(pictureValid(field, "#########") == true) {
                        fieldtemp = switchzip.substring(0,5) + '-' + switchzip.substring(5, switchzip.length);
                        field.value = fieldtemp;
                        status2 = true;
                    }
                }
            }

            if( status1 == false && status2 == false ) {
                alert('This field requires a valid ZIP code of the form ##### or #####-####.\nPlease re-enter a value');
                field.value = originalFieldValue;
                field.focus();
                //field.select()
								errorCode = true;
            }
        }
        else if( type == 'PHONE' ) {
            var failed = true;
            var fieldtemp;
            var switchme = field.value;

            if( switchme.length == 7 ) {
                if( pictureValid(field, "#######") == true ) {
                    fieldtemp = switchme.substring(0,3) + '-' + switchme.substring(3, switchme.length)
                    field.value = fieldtemp
                    failed = false;
                }
            }
            else if( switchme.length == 8 ) {
                if( pictureValid(field, "###-####") == true ) {
                    failed = false;
                }
            }
            else if( switchme.length == 10 ) {
                if( pictureValid(field, "##########") == true ) {
                    fieldtemp = switchme.substring(0,3) + '-' +
                            switchme.substring(3,6) + '-' +
                            switchme.substring(6, switchme.length);
                    field.value = fieldtemp;
                    failed = false;
                }
            }
            else if( switchme.length == 12 ) {
                if( pictureValid(field, "###-###-####") == true ) {
                    failed = false;
                }
            }
            if( failed == true ) {
                alert('This field requires a valid phone number of the form ###-####, #######, ###-###-#### or ##########.\nPlease re-enter a value'+status+switchme+switchme.length);
                field.value = originalFieldValue;
                field.focus();
                //field.select()
								errorCode = true;
            }
        }
        else if( type == 'SSN' ) {
            var status1 = true;
            var status2 = true;
			var status3 = true;
            var fieldtemp;

            status1 = pictureValid(field, "###-##-####");
            if( status1 == false ) {
				status3 = pictureValid(field, "##-#######");
				if(status3 == false ) {
                	status2 = pictureValid(field, "#########");
                	if( status2 == true ) {
                    	fieldtemp = field.value.substring(0,3) + '-' + field.value.substring(3, 5) + '-' +  field.value.substring(5,9);
                    	field.value = fieldtemp;
                	}
				}
            }

            if(status1 == false && status2 == false) {
                alert('This field requires a valid Social Security number or Tax-Id of the form ###-##-####, ######### or ##-#######.\nPlease re-enter a value');
                field.value = originalFieldValue;
                field.focus();
                //field.select()
								errorCode = true;
            }
        }
        else if( type == 'EMAIL' ) {
            var errorCode = false
            if( newLength > 5 ) {
                var linSumOfx = 0;
                var linSumOfy = 0;

                for( j=0; j < newLength; j++ ) {
                    Ch = newValue.charAt(j);

                    if( ReplaceWildChar("@-_",Ch) == true ) {
                        errorCode = true;
                    }

                    if( Ch == "@" ) {
                        //check posisi . (error : xxx@.com)
                        if( linSumOfy > 0 ) {
                            linSumOfy = 0;
                        }

                        if ( newValue.substring(j,(j+2)) == "@.") {
                            errorCode = true;
                            break;
                        }
                        linSumOfx++;
                    }
                    else if( Ch == "." ) {
                        linSumOfy++;
                    }
                }

                if (errorCode == true) {
                    alert( "This MUST be a Correctly Formatted E-Mail Address\n.Please re-enter a value" );
                    field.value = originalFieldValue;
                    field.focus();
                    //field.select()
										errorCode = true;
                }
                else if( (linSumOfx > 1) || (linSumOfx < 1) ) {
                    alert( "There can be only 1 '@' symbol!" );
                    field.value = originalFieldValue;
                    field.focus();
                    //field.select()
										errorCode = true;
                }
                else if( linSumOfy < 1 ) {
                    alert( "There MUST be at least 1 '.' following the '@' symbol!" );
                    field.value = originalFieldValue;
                    field.focus();
                    //field.select()
										errorCode = true;
                }
            }
            else {
                alert( "An E-Mail Address MUST be Greater than 5 characters." );
                field.value = originalFieldValue;
                field.focus();
                //field.select()
								errorCode = true;
            }
        }
        else if( type == 'URL' ) {
            var errorCode = false;
            //set begin of URL : http://www.

            if( newValue.substring(0,11) == "http://www." ) {
                var lstrURL = "";
                var status = "0";
            }
            else if( newValue.substring(0,4) == "www." ) {
                var lstrURL = "http://";
                var status = "1";
            }
            else {
                var lstrURL = "http://www.";
                var status = "3";
            }

            var linSumOfDot = 0;
            var linSumOfDotBeforeSlash = 0;
            var linSumOfSlash = 0;
            var linSumOfDot2 = 0;
            var linSumOfSlash2 = 0;

            for( j=0; j < newLength; j++ ) {
                Ch = newValue.charAt(j);
                if( ReplaceWildChar("-_:/",Ch) == true ) {
                    field.value = "";
                    field.focus();
                    field.select();
                }
/* Check if user input http://www.bali.com/ ---> substring(0,11)
   Check if user input www.bali.com ---> substring(0,4)
   syntax URL : Domain_Name/Dir/subDir/
*/
                if( (lstrURL == "http://www.") || (lstrURL == "http://") ) {
                    if( (Ch == ":") || (newValue.substring(j,j+1) == "//") ) {
                        errorCode = true;
                        field.value = "";
                        field.focus();
                        field.select();
                    }
                    if( Ch == "." ) {
                        linSumOfDot++;
                    }
                    if( Ch == "/" ) {
                        linSumOfSlash++;
                        if( lstrURL == "http://www." ) {
                            if( linSumOfDot < 1 ) {
                                errorCode = true;
                            }
                        }
                        else {
                            if( linSumOfDot < 2 ) {
                                errorCode = true;
                            }
                        }
                        if( linSumOfSlash == 1 ) {
                            linSumOfDotBeforeSlash = linSumOfDot;
                        }
                    }
                }
                if( lstrURL == "" ) {
                    if( Ch == ":" ) {
                        linSumOfDot2++;
                    }
                    if( (Ch == ":") && (linSumOfDot2 > 1) ) {
                        errorCode = true;
                    }
                    if( (newValue.substring(j,j+1) == "//") && (linSumOfSlash2 > 1) ) {
                        errorCode = true;
                    }
                    else {
                        linSumOfSlash2++;
                    }
                    if( Ch == "." ) {
                        linSumOfDot++;
                    }
                    if( (Ch == "/") && (linSumOfSlash2 == 1) ) {
                        if( (linSumOfDot < 2) && (linSumOfSlash == 0) ) {
                            errorCode = true;
                        }
                        else {
                            linSumOfSlash++;
                            if( linSumOfSlash == 1 ) {
                                linSumOfDotBeforeSlash = linSumOfDot;
                            }
                        }
                    }
                }
            }
            // end of For statement
            if( linSumOfSlash == 0 ) {
                linSumOfDotBeforeSlash = linSumOfDot;
            }
            if( (status <= "1") ) {
                if( linSumOfDotBeforeSlash < 2 ) {
                    errorCode = true;
                }
            }
            else {
                if( linSumOfDotBeforeSlash < 1 ) {
                    errorCode = true;
                }
            }
            if( errorCode == true ) {
                alert('This field requires a valid syntax URL of the form .\nwww.DomainName/  http://www.DomainName/  DomainName/ . \nPlease re-enter a value');
                field.value = originalFieldValue;
                field.focus();
                //field.select()
								errorCode = true;
            }
            else {
                field.value = lstrURL + newValue;
            }
        }
        else if( type == 'PERCENT' ) {
            var lstrCheckOK = "1234567890.%";
            var errorCode = false;
            gstrNewStr = "";
            lblPct = false;

            if( (field.value < lowerLimit) || (field.value > upperLimit) ) {
                alert('This field requires a value in the range of ' + lowerLimit + ' to ' + upperLimit + '.\nPlease re-enter a value');
                errorCode = true;
                field.value = originalFieldValue;
                field.focus();
                //field.select()
								errorCode = true;
            }
            CheckNumeric(newValue,"%.");
            if( allValid ) {
                decimalValid(field, type, 3, lowerLimit, upperLimit);
                newValue = field.value;
                for( j=0; j < newValue.length ; j++ ) {
                    lstrCh = newValue.charAt(j);
                    for( k=0; k < lstrCheckOK.length ; k++ ) {
                        if( (lstrCh == lstrCheckOK.charAt(k)) && (!lblPct) ) {
                            if( lstrCh == "." ) {
                                //gstrNewStr = parseInt(gstrNewStr);
                                //lblDec = true;
                                gstrNewStr += lstrCh;
                            }
                            else if( lstrCh == "%" ) {
                                lblPct = true;
                            }
                            else {
                                gstrNewStr += lstrCh;
                            }
                        }
                        else {
                            k == lstrCheckOK.length;
                        }
                    }
                }
            }
//          gstrNewStr = parseFloat(gstrNewStr);
            if( gstrNewStr >= 0 ) {
                field.value = gstrNewStr;
            }
            else {
                errorCode = true;
                field.value = originalFieldValue;
                field.focus();
                //field.select()
            }
        } //End Code of type == 'PERCENT'
        else if( type == 'DOLLAR' ) {
            var lstrcheckOK = "0123456789.";
            var gstrNewStr = "";
            var errorCode = false;
            if( (field.value < lowerLimit) || (field.value > upperLimit) ) {
                alert('This field requires a value in the range of ' + lowerLimit + ' to ' + upperLimit + '.\nPlease re-enter a value');
                errorCode = true;
                field.value = originalFieldValue;
                field.focus();
                //field.select()
								errorCode = true;
            }
            CheckNumeric(newValue,"$,.");
            if( allValid ) {
                for( j=0; j < newValue.length ; j++ ) {
                    lstrCh = newValue.charAt(j);
                    for( k=0; k < lstrcheckOK.length ; k++ ) {
                        if( lstrCh == lstrcheckOK.charAt(k) ) {
                            gstrNewStr = gstrNewStr + lstrCh;
                        }
                    }
                }
            }
            gstrNewStr = parseFloat(gstrNewStr);
            if( gstrNewStr >=0 ) {
                field.value = gstrNewStr;
            }
            else {
                errorCode = true;
                field.value = originalFieldValue;
                field.focus();
                //field.select()
            }
        } // End Code of type == 'DOLLAR'
    } // End Code Error Code == false
		return( errorCode )
}

function decimalValid( field, type, precision, lowerLimit, upperLimit ) {
    var errorCode = false;
    var newValue = field.value;

    var decAmount = "";
    var dolAmount = "";
    var decFlag = false;
    var aChar = "";
    var totalValue = 0;
    var decLen = 0;

    // ignore all but digits and decimal points.
    for( i=0; i < newValue.length; i++ ) {
        aChar = newValue.substring(i,i+1);
        if( aChar >= "0" && aChar <= "9" ) {
            if( decFlag ) {
                decAmount = "" + decAmount + aChar;
            }
            else {
                dolAmount = "" + dolAmount + aChar;
            }
        }
        else if( aChar == "." ) {
            if( decFlag ) {
                dolAmount = "";
                errorCode = true;
                break;
            }
            decFlag=true;
        }
        else if( aChar == "-" ) {
            if( dolAmount != "" ) {
                errorCode = true;
                break;
            }
        }
        else if( aChar == "," ) {
            continue;
        }
        else {
            errorCode = true;
            break;
        }
    }
    // Ensure that at least a zero appears for the dollar amount.
    if( dolAmount == "" ) {
        dolAmount = "0";
    }
    // Strip leading zeros.
    if( dolAmount.length > 1 ) {
        while( dolAmount.length > 1 && dolAmount.substring(0,1) == "0" ) {
            dolAmount = dolAmount.substring(1,dolAmount.length);
        }
    }
    // Round the decimal amount.
    if( decAmount.length > precision ) {
        if( decAmount.substring(precision,precision+1) > "4" ) {
            var decAmount2 = parseInt(decAmount.substring(0,precision)) + 1;
            if( decAmount2 < Math.pow(10, precision-1) ) {
                decLen = precision - decAmount2.toString(10).length;
                for( var j=0; j< decLen; ++j ) {
                    decAmount2 = "0" + decAmount2;
                }
            }
            else {
                decAmount2 = "" + decAmount2;
            }
            decAmount = decAmount2;
        }
        else {
            decAmount = decAmount.substring(0,precision);
        }
        if( decAmount == Math.pow(10,precision) ) {
            decAmount = "";
            for( var j=0; j<= precision; ++j ) {
                decAmount = "0" + decAmount;
            }
            dolAmount = parseInt(dolAmount) + 1;
        }
    }
    // Pad right side of decAmount
    if( decAmount.length < precision ) {
        decLen = precision-decAmount.length;
        for( var j=0; j< decLen; ++j ) {
            decAmount = decAmount + "0";
        }
    }
    //if the precision = 0, drop the decimal point
    if( precision == 0 ) {
        totalValue =  dolAmount;
    }
    else {
        totalValue = dolAmount + "." + decAmount;
    }
    if( (parseFloat(totalValue) < lowerLimit) || (parseFloat(totalValue) > upperLimit) ) {
        errorCode = true
    }
    if( errorCode == true ) {
        if( type == 'CURR' ) {
            alert('This field requires a valid currency amount in the range of ' + lowerLimit + ' to ' + upperLimit + '.\nPlease re-enter a value');
        }
        else {
            alert('This field requires a valid decimal amount in the range of ' + lowerLimit + ' to ' + upperLimit + '.\nPlease re-enter a value');
        }
        field.value = originalFieldValue;
        field.focus();
        //field.select()
    }
    else {
        // Check for negative values and reset textObj
        if( newValue.substring(0,1) != '-' || (dolAmount == "0" && decAmount == "00") ) {
            field.value = totalValue;
        }
        else {
            field.value = '-' + totalValue
        }
    }
}

//  PictureValid will validate against a format mask, such as (###) ###-####
// The following are valid values
// @ - Any character allowed by an HTML text element
// ? - Any Letter
// # - Any Number
// $ - Money Characters. 0 through 9, minus sign (-), plus sign (+), and decimal point (.)
// [] - Specifies custom data set to use for the character, such as [2345] would allow 2, 3, 4, or 5
// * - any number of the character that follows it.  For example, using an asterisk followed by a ?
//     would allow any number of letters to be entered.

// Globals used by pictureValid
var DIGITS = "0123456789";
var UPPERS = "ABCDEFGHIJKLMNOPQRSTUVWXYZ";
var LOWERS = "abcdefghijklmnopqrstuvwxyz";

function pictureValid( field, picture ) {
    var status = true;
    var isRepeat = false;
    var pLen = picture.length;
    var search = 0;
    var validData = "";
    var picChar = "";
    var aChar = "";
    var newValue = field.value;
    var tLen = newValue.length;
    var detailError = "";

    for( var i = 0, j = 0; (i != newValue.length)&& (j != picture.length)&& (status==true); i++ ) {
        picChar=picture.substring(j,j+1);
        if( picChar == "[" ) {
            validData = "";
            j++;
            for( ; j != picture.length; j++ ) {
                if( picture.substring(j,j+1) == "]" ) {
                    break;
                }
                validData = validData + picture.substring(j,j+1);
            }
        }
        else if( picChar =="@" ) {  // Any character
            j++;
            continue;
        }
        else if( picChar == "?" ) {   // Any letter
            validData = UPPERS + LOWERS;
        }
        else if( picChar == "#" ) {      // Any number
            validData = DIGITS;
        }
        else if( picChar =="$" ) {       // Money characters
            validData = DIGITS + "." + "-" + "+";
        }
        else if( picChar == "*" ) {
            isRepeat = true;
            j++;
            i--;
            continue;
        }
        else {
            validData = picChar;
        }
        aChar = newValue.substring(i,i+1);
        search = validData.indexOf(aChar);
        if( search == -1 ) {
            if( isRepeat ) {
                isRepeat = false;
                j++;
                i--;
                continue;
            }
            status = false;
            if( aChar == " " ) {
                detailError = "A space is not allowed in position #"+(i+1)+". ";
            }
            else {
                detailError = "The character, " + aChar + ", is not allowed in position #"+(i+1)+". ";
            }
        }
        else {
            if( !isRepeat ) {
                j++;
            }
        }
    }
    //Check length
    if( status == true && (j < picture.length || i < newValue.length) ) {
        status = false;
        detailError = "incorrect length";
    }
 //       if(detailError != "")
 //       {
 //               alert(detailError+'\nPlease re-enter a value')
 //               field.value = originalFieldValue
 //               field.focus()
 //               field.select()
 //       }

    return(status)
}

//Function strToCurr()
//Author: Greg Burgess
//Purpose: This function takes one parameter (a string representing a currency amount) which it validates
//formats and returns.
//
//Example strToCurr("12.5")   --> 12.50
//	  strToCurr("12")      --> 12.00
//	  strToCurr("12.59") --> 12.60

function strToCurr( newValue ) {
    var errorCode = false;
    var decAmount = "";
    var dolAmount = "";
    var decFlag = false;
    var aChar = "";
    var totalValue = 0;
	var decLen = 0;

	if( isNaN( newValue ) )
		return( 0 );

    // ignore all but digits and decimal points.
    for( i = 0; i < newValue.length; i++ ) {
    	aChar = newValue.substring( i, (i + 1) );
    	if( aChar >= "0" && aChar <= "9" ) {
            if( decFlag )
                decAmount = "" + decAmount + aChar;
            else
                dolAmount = "" + dolAmount + aChar;
    	}
    	else if( aChar == "." ) {
            if( decFlag ) {
                dolAmount = "";
                errorCode = true;
                break;
            }
            decFlag = true;
    	}
    	else {
        	errorCode = true;
        	break;
    	}
    }
    // Ensure that at least a zero appears for the dollar amount.
    if( dolAmount == "" )
        dolAmount = "0";
    // Strip leading zeros.
    if( dolAmount.length > 1 ) {
        while( dolAmount.length > 1 && dolAmount.substring( 0, 1 ) == "0" )
            dolAmount = dolAmount.substring( 1, dolAmount.length );
    }

    // Round the decimal amount.
    precision = 2;
	if( strToCurr.arguments.length > 1 )
		precision = strToCurr.arguments[1];
    if( decAmount.length > precision ) {
	    if(decAmount.substring( precision, precision + 1 ) > "4" ) {
	        var decAmount2 = parseInt(decAmount.substring( 0, precision ) ) + 1;
            if( decAmount2 < Math.pow( 10,  (precision -1) ) ) {
                decLen = precision - decAmount2.toString( 10 ).length;
                for( var j = 0; j < decLen; ++j )
                    decAmount2 = "0" + decAmount2;
            }
            else
        	    decAmount2 = "" + decAmount2;
            decAmount = decAmount2;
        }
        else
	        decAmount = decAmount.substring( 0, precision )

		if( decAmount == Math.pow( 10, precision ) ) {
            decAmount = ""
            for( var j = 0; j <= precision; ++j )
	            decAmount = "0" + decAmount;
            dolAmount = parseInt( dolAmount ) + 1;
        }
    }
    // Pad right side of decAmount
    if( decAmount.length < precision ) {
        decLen = precision - decAmount.length;
        for(var j = 0; j < decLen; ++j )
	        decAmount = decAmount + "0";
    }

    totalValue = dolAmount + "." + decAmount
    if( errorCode == true ) {
        alert('This field requires a valid currency amount.' );
		return( 0 );
    }
    else
		return( totalValue );
}

function sumValues( list, cnt ) {  				// this will assume a precision of 2, but will accept an optional precision argument
	var totVal = 0;
	var precision = 2;
	if( sumValues.arguments.length > 2 )
		precision = sumValues.arguments[2];

	var mult = Math.pow( 10, precision );
	for( var x = 0; x < cnt; x++ )
		totVal += Math.round( (list[x] * mult) );
	return( strToCurr( ("" + (totVal / mult)), precision ) );
}

function sumFieldValues( fields, cnt ) {		// this will assume a precision of 2, but will accept an optional precision argument
	var precision = 2;
	if( sumFieldValues.arguments.length > 2 )
		precision = sumFieldValues.arguments[2];

	var values = new Array( cnt );
	for( var x = 0; x < cnt; x++ )
		values[x] = fields[x].value;
	return( sumValues( values, cnt, precision ) );
}

function validateR50( pwd ) {           // second argument optionally a Boolean true or false to allow spaces

	var rtnPwd = pwd.value.toUpperCase();
	var valid = " .'0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ#";
	var i, c, pos = 1;
	if( validateR50.arguments.length > 1 ) {
		var allowSpace = new Boolean( validateR50.arguments[1] );
		if( allowSpace == true )
			pos = 0;
	}
	/* space is invalid - if pos == 1 */
	for( i = 0; i < rtnPwd.length; i++ ) {
		if( valid.indexOf( rtnPwd.charAt( i ) ) < pos ) {
			alert( "Field Contains Invalid Characters!" );
			pwd.focus();
			pwd.select();
			return( false );
		}
	}
	pwd.value = rtnPwd;
	return( true );
}

function OldpwCrypt( origStr, edFlag ) {  //edFlag: 0 = Encrypt, 1 = Decrypt
	var DCRPTSTR = " !\"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\\]^_`abcdefghijklmnopqrstuvwxyz{|}~"
	var ECRPTSTR = "~{[}u;Ce83KX%:VIm!|gs]_aL-QEOpx<UlzZjBq6#1($\\\"FS5H0'cM&>Po.NGA*Jr)Y Dv/t9kd?^fni,hR2Wy=`+4T@7wb"
	var uepwd = "" + origStr;
    var l_DecryptPass = "";
    var l_Work = "";
    var l_Length = 0, l_Position = 0, l_Multiplier = 0, l_Offset = 0, l_Count = 0;

    l_Length = uepwd.length;

    if( (l_Length >= 1) && (l_Length <= 3) )
        l_Multiplier = 1;
    else if( (l_Length >= 4) && (l_Length <= 6) )
        l_Multiplier = 2;
    else if( (l_Length >= 7) && (l_Length <= 9) )
        l_Multiplier = 3;
    else
        l_Multiplier = 4;

    for( l_Count = 1; l_Count <= l_Length; l_Count++ ) {
        l_Offset = (l_Count * l_Multiplier) * ((edFlag) ? 1 : -1);
        l_Work = uepwd.charAt( l_Count - 1 );
		if( edFlag == 0 )
			l_Position = DCRPTSTR.indexOf( l_Work ) + 1;
		else
			l_Position = ECRPTSTR.indexOf( l_Work ) + 1;
        l_Position = l_Position - l_Offset;
        if( edFlag == 0 ) {
            l_Position %= 95;
            l_Position++;
        }
        else {
            l_Position--;
            while( l_Position <= 0 )
                l_Position += 95;
        }
        l_DecryptPass[l_Count - 1] = (edFlag == 1) ?
                DCRPTSTR[l_Position - 1] : ECRPTSTR[l_Position - 1];
        if ( (l_Multiplier >= 1) && (l_Multiplier <= 3) )
            l_Multiplier++;
        else
            l_Multiplier = 1;
    }
    return( l_DecryptPass );
}

/***************************************************************************************
 * Encryption algorithm developed by: Curinir / ZErtA
 * EMAIL - curinir@zerta.org	Atridox encryption algorithm
 * 	MODIFIED to use milliseconds instead of Math.random() for consistency between browsers
 * *************************************************************************************/

function pwCrypt( origStr, edFlag ) {  /* edFlag: 0 = Encrypt, 1 = Decrypt */
	var numbers		= "0123456789";
	var lowerCase	= "abcdefghijklmnopqrstuvwxyz";
	var upperCase	= "ABCDEFGHIJKLMNOPQRSTUVWXYZ";
	var special		= " ,.:;!?/\\|@#$%^&*()[]{}<>+=-_«»\"<>";
	var special2	= "'";
	var special3	= "æøåÆØÅ";
	var charArray	= numbers + lowerCase + upperCase + special + special2 + special3;		// Put together main-string
	var charsLen	= charArray.length;
	var encodedStr	= "";
	var decodedStr	= "";
	var adder		= 0;

	if( edFlag == 0 ) {
		var strToEnc = "" + origStr;
		var today = new Date();
		var len = strToEnc.length;
		var o = 0;

		if( len < 1 )
			return( "" );
		adder = Math.round( (((today.getTime() % 999.0) / 999.0) * 89) + 10 );				// Create a random number
		for( var i = 0; i <= len; i++ ) {
			if( i >= len )
          		o = charsLen;
        	else
          		o = charArray.indexOf( strToEnc.charAt( i ) );
        	if( o <= charsLen && o >= 0 )
				encodedStr += 10000 + (adder * 2 * i) + (2 * charsLen * o) + ((i^2) + 1 * adder); // Do encrypting
		}
		return( encodedStr + adder );														// Add decrypting help from adder and return
	}
	else {
		var strToDec = "" + origStr;
		var chars = 0.0;
        var n = 0, p = 0, q = 0;

		if( strToDec.length < 12 )
			return( "" );
		adder = strToDec.substring( strToDec.length - 2, strToDec.length );					// Get adder
        strToDec = strToDec.substring( 0, strToDec.length - 2 );							// Fix value of strToDec
        chars = (strToDec.length / 5) - 1;													// Check number of chars in output string
        for( var i = 0; i < (chars * 5); i += 5 ) {											// Do for each four of the characters
			p = strToDec.substring( i, i + 5 ).valueOf();												// Get four-digit code of strToDec
            q = (p - 10000 - (adder * 2 * n) - ((n^2) + 1 * adder)) / (2 * charsLen);		// Do decrypting
            decodedStr += charArray.substring( q, q + 1 ); 									// Add decrypted part of string
            n++;																			// Get decodedStr.substring value
        }
        return( decodedStr );																// Return decoded string
	}
}
/***************************************************************************************/

/*
BaliCamp Code
Author : I Made Susantho BPK

Function name: CheckNumeric(fobjToBeCheck, fstrParam)
Objective: check numeric value of string or inputted data on a html tag/object
Input parameter:
	fobjToBeCheck : String to be checked
	fstrParam : Some of Wild Character such as "%".
Output parameter : return value of variable "allValid" ---> true/false
*/

function CheckNumeric( fobjToBeCheck, fstrParam ) {
    var lstrCheckOK = "0123456789 " + fstrParam;
    allValid = true;
    for( i = 0;  i < fobjToBeCheck.length; i++ ) {
        lstrCh = fobjToBeCheck.charAt(i);

        for( j = 0; j < lstrCheckOK.length; j++ )
            if( lstrCh == lstrCheckOK.charAt(j) )
                break;

        if( j == lstrCheckOK.length ) {
            allValid = false;
            break;
        }
    }

    if( !allValid ) {
        alert("Please enter only valid characters in the field.");
        return (false);
    }
    return (true);
}

/*
Function name: ReplaceWildChar(fstrExclude,fstrCh)
Objective: check wild characters
Input parameter:
	fstrexclude : String to be checked
	fstrCh : Some of Wild Character such as "%" to be eliminate from list wild characters.
Output parameter : return value of variable "status" ---> true/false
*/

function ReplaceWildChar( fstrExclude, fstrCh ) {
    var lstrWildChar = "~!#$%^&*()+={}[]',<>?@-_:/|\ ";
	var status = false;
	fstrExclude = lstrWildChar.replace(fstrExclude,"");
    for( y = 0; y < fstrExclude.length; y++ ) {
        if( fstrCh == fstrExclude.charAt(y) ) {
            status = true;
			return(status);
        }
	}
}

/*
Function name: validateForm(gstrInputName)
Objective: check blank input (only required)
Input parameter:
	gstrInputName : Passing input text object must be not blank !
Output parameter : return value true/false.
*/

function doTrim( oldValue ) {
    var count = oldValue.length;
    var newValue = "";
    for( i=0; i<count; i++ ) {
        if( oldValue.charAt(i) != " " ) {
            newValue = newValue + oldValue.substring(i, i+1);
        }
    }
    return(newValue);
}

/*
Function name: validateForm(gstrInputName)
Objective: check blank input (only required)
Input parameter:
	gstrInputName : Passing input text object must be not blank !
Output parameter : return value true/false.
*/

function validateForm( gstrInputName ) {
    var TempObject = "";
	var TempObj = new Array();
	var TempObject_ = "";
	var SumOfObject = 0;

    for( i=0; i<gstrInputName.length; i++) {
        TempObject_ = gstrInputName.charAt(i);
        if( TempObject_ == "," ) {
			TempObj[SumOfObject] = TempObject;
			TempObject = "";
			SumOfObject++;
		}
        else {
			TempObject = TempObject + TempObject_;
		}
	}
    for( k=0; k<=(SumOfObject-1); k++ ) {
		Temp = TempObj[k];
        if( doTrim(document.forms[0].elements[Temp].value) == "" ) {
            alert( 'Some Required Data is Missing.' );
            document.forms[0].elements[Temp].focus();
            document.forms[0].elements[Temp].select();
            k=(SumOfObject-1);
            return( false );
        }
    }
}

/*
Function name: validateForm1(gstrInputName,IndexForm)
Objective: check blank input (only required) which use more than one FORM.
Input parameter:
	gstrInputName : Passing input text object must be not blank !
	IndexForm : number Form started from 0, counted form Top of HTML Page.
Output parameter : return value true/false.
*/

function validateForm1( gstrInputName, IndexForm ) {
	var TempObject = "";
	var TempObj = new Array();
	var TempObject_ = "";
	var SumOfObject = 0;

    for( i=0; i<gstrInputName.length; i++) {
		TempObject_ = gstrInputName.charAt(i);
        if( TempObject_ == "," ) {
			TempObj[SumOfObject] = TempObject;
			TempObject = "";
			SumOfObject++;
		}
        else {
			TempObject = TempObject + TempObject_;
		}
	}
    for( k=0; k<=(SumOfObject-1); k++ ) {
		Temp = TempObj[k];
        if( doTrim(document.forms[IndexForm].elements[Temp].value) == "" ) {
            alert('Some required fields are missing.');
            document.forms[IndexForm].elements[Temp].focus();
            document.forms[IndexForm].elements[Temp].select();
            k=(SumOfObject-1);
            return( false );
        }
    }
}

/*
Function name: validateSE(gstrInputName,IndexForm)
Objective: Check Start Date and End Date.
Input parameter:
	gstrInputName : Passing input text object must be not blank !
	IndexForm : number Form started from 0, counted form Top of HTML Page.
Output parameter : return value true/false.
*/
function validateSE( gstrInputName, IndexForm ) {
	var TempObject = "";
	var TempObj = new Array();
	var TempObject_ = "";
	var SumOfObject = 0;

    for( i=0; i<gstrInputName.length; i++ ) {
		TempObject_ = gstrInputName.charAt(i);
        if( TempObject_ == "," ) {
			TempObj[SumOfObject] = TempObject;
			TempObject = "";
			SumOfObject++;
		}
        else {
			TempObject = TempObject + TempObject_;
		}
	}
    Temp = TempObj[0];
    var StartDate = parseDate(document.forms[IndexForm].elements[Temp].value);
    Temp = TempObj[1];
    var EndDate = parseDate(document.forms[IndexForm].elements[Temp].value);

    if( Date.parse(StartDate) > Date.parse(EndDate) ) {
        alert('End Date must be equal to or greater than Start Date');
        Temp = TempObj[0];
        document.forms[IndexForm].elements[Temp].focus();
        document.forms[IndexForm].elements[Temp].select();
        return( false );
    }
}

function validateBDate( gstrInputName, IndexForm ) {
	var TempObject = "";
	var TempObj = new Array();
	var TempObject_ = "";
	var SumOfObject = 0;

    for( i=0; i<gstrInputName.length; i++ ) {
		TempObject_ = gstrInputName.charAt(i);
        if( TempObject_ == "," ) {
			TempObj[SumOfObject] = TempObject;
			TempObject = "";
			SumOfObject++;
		}
        else {
			TempObject = TempObject + TempObject_;
		}
	}
    Temp = TempObj[0];
    var TBirthDate = parseDate(document.forms[IndexForm].elements[Temp].value);
    Temp = TempObj[1];
    var BToday = parseDate(document.forms[IndexForm].elements[Temp].value);

    if( Date.parse(TBirthDate) > Date.parse(BToday) ) {
        alert('Birthdate Cannot Be Greater Than Today!');
        Temp = TempObj[0];
        document.forms[IndexForm].elements[Temp].focus();
        document.forms[IndexForm].elements[Temp].select();
        return( false );
    }
}

function MM_swapImgRestore() { //v3.0
    var i,x,a=document.MM_sr;
    for( i=0; a&&i<a.length&&(x=a[i])&&x.oSrc; i++ )
        x.src=x.oSrc;
}

function MM_preloadImages() { //v3.0
    var d=document;
    if( d.images ) {
        if( !d.MM_p )
            d.MM_p=new Array();
        var i,j=d.MM_p.length,a=MM_preloadImages.arguments;
        for(i=0; i<a.length; i++)
            if (a[i].indexOf("#")!=0) {
                d.MM_p[j]=new Image;
                d.MM_p[j++].src=a[i];
            }
    }
}

function MM_findObj( n, d ) { //v3.0
    var p,i,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=MM_findObj(n,d.layers[i].document);
    return x;
}

function MM_swapImage() { //v3.0
    var i,j=0,x,a=MM_swapImage.arguments;
    document.MM_sr=new Array;
    for( i=0; i<(a.length-2); i+=3 )
        if( (x=MM_findObj(a[i]))!=null ) {
            document.MM_sr[j++]=x;
            if( !x.oSrc )
                x.oSrc=x.src; x.src=a[i+2];
        }
}

function changeMe( inobj ) {
    return;
}
/*
	End Of BaliCamp Code
*/