<!--

bNS4 = (document.layers);
bIE4 = (document.all);
bV4 = (bNS4 || bIE4);


if (bNS4) {window.captureEvents(Event.KEYPRESS)};

function updateESC(objForm) {
	if (bIE4) {objForm.st.value = objForm.st.value.toUpperCase()};
	objForm.esc.value = TAG2ESC(objForm.st.value);
}

function updateTAG(objForm) {
	objForm.st.value = ESC2TAG(objForm.esc.value);
}

function selectSYSTEM(objForm) {
	objForm.esc.value = "";
	objForm.st.value = "";
}

function setSYS(objForm) {
	if (objForm.esc.value == "" && objForm.st.value == "") {
		objForm.sys.value = "G";
	}
	return true;
}

function TAG2ESC(strTAG) {
	var intESC = "";
	if (VALIDTAGFORMAT(strTAG)) {
		var intLength = strTAG.length;
		intESC = 0;
		var Digit = new Array(intLength - 1);
		var x = 0;
		for (i = intLength - 1; i > -1; i--) { 
			Digit[x] = strTAG.charAt(i).toUpperCase();
			x++;
		}
		for (i = 0; i < intLength ; i++) {
			if (Digit[i] != "0") {
				if (parseInt(Digit[i]) < 10) {
					intESC = intESC + Math.pow(36, i) * parseInt(Digit[i]);
				} else {
					var posx = Digit[i].charAt(0);
					intESC = intESC + Math.pow(36, i) * (posx.charCodeAt(0) - 55);
				}
			}
		}
	}
	if (intESC == 0)
		intESC = "";

	return intESC;
}

function VALIDTAGFORMAT(strTAG) {
	var result = false;
	if (((strTAG != "") && (strTAG != "00000") && (strTAG != null))) {
		strTAG = strTAG.toUpperCase();
		var intLength = strTAG.length;
		if ((intLength == 5) || (intLength == 7)) {
			result = true;
			var intCharCode;
			for (i = 0; i < intLength; i++) {
				intCharCode = strTAG.charCodeAt(i);
				if (!(((intCharCode >= 65) && (intCharCode <= 90)) || ((intCharCode >= 48) && (intCharCode <= 57))))
					result = false; 
			}
		}
	}

	return result;
}

function ESC2TAG(intESC) {
	var strTAG = "";
	if (!intESC.trim == "") 
		intESC = intESC.replace(/-/g, "");
	if ((!isNaN(intESC)) && (intESC > 0)) {
		intESC = parseInt(intESC);
		if (intESC == 1) {
			strTAG = "00001"
		} else {
			var intDigit;
			var intESCr;
			var sESC = 4;
			if (intESC > 60466175)
				sESC = 6;
			for (i = sESC; i >= 0; i--) {
				intDigit = parseInt(intESC / Math.pow(36, i));
				if (isNaN(intDigit)) {
					intDigit = 0;
					strTAG = strTAG + intDigit.toString();
				} else if (intDigit < 10) {
					strTAG = strTAG + intDigit.toString();
				} else {
					strTAG = strTAG + String.fromCharCode(intDigit + 55);
				}
				intESCr = intESC - (intDigit * Math.pow(36, i));
				if (!isNaN(intESCr))
					intESC = intESCr;
			}
		}
	}
	
	if (VALIDTAGFORMAT(strTAG)) {
		return strTAG.toUpperCase();
	} else {
		return "";
	}
}

//-->