// Keypad entry Copyright Western Media Imaging
function loadClear() {
	if (document.form1) {
		clear_entry();
	}
}
function clear_entry() {
	document.form1.num.value = ""
	return;
}
function add_entry(key_val) {
	var add_val = ""+key_val;
	if (document.form1.d.value > document.form1.num.value.length) {
		document.form1.num.value = document.form1.num.value + add_val;
	}
	return;
}
function back_entry() {
	document.form1.num.value = document.form1.num.value.substring (0, document.form1.num.value.length-1);
	return;
}