//KVersionID=1
//KProgramID=539
function ValidateOptNumField(p_num,p_err1,p_msg){
	if(!p_num.value)
		p_num.value = "0";
	else if(isNaN(parseInt(p_num.value))||p_num.value.length!=parseInt(p_num.value).toString().length){
		alert(EmbedParmInString(p_err1.value,p_msg.value,"",""));
		p_num.focus();
		return 0;
	}
	return 1;
}

function ValidateMandNumField(p_num,p_err1,p_err2,p_err3,p_err4,p_msg,p_min,p_max){
	Trim(p_num);
	if (!p_num.value){
		alert(EmbedParmInString(p_err1.value, p_msg.value,"",""));
		p_num.focus();
		return 0;
	}
	else
		if(isNaN(parseInt(p_num.value))){
			alert(EmbedParmInString(p_err2.value,p_msg.value,"",""));
			p_num.focus();
			return 0;
		}
		else
			if(parseInt(p_num.value)<parseInt(p_min)){
				alert(EmbedParmInString(p_err3.value,p_msg.value,p_min,""));
				p_num.focus();
				return 0;
			}
			else
				if (parseInt(p_num.value)>parseInt(p_max)){
					alert(EmbedParmInString(p_err4.value,p_msg.value,p_max,""));
					p_num.focus();
					return 0;
				}
	if(p_num.value.length!=parseInt(p_num.value).toString().length){
		alert(EmbedParmInString(p_err2.value,p_msg.value,"",""));
		p_num.focus();
		return 0;
	}
	return p_num;
}