function VNKS(e){
var kc=e.which;
return (((kc<48||kc>57)&&kc>=32&&kc!=45&&kc!=46)?false:true);
}

function VNF(f,i,E){
var v=parseFloat(E.value);
var li=-1;
var F=NF[f];
var O=NFO[f];
if(isNaN(v)){
	var V=E.value.toUpperCase();
	for(var o=0;o<O.length&&li==-1;o+=2){
		if(V==O[o].toUpperCase()){
			li=o;
			v=O[o+1];
		}
	}
}
if(isNaN(v)&&F.p!=""&&E.value.substring(0,F.p.length)==F.p)
	v=parseFloat(E.value.substring(F.p.length));
if(!isNaN(v)&&li==-1){
	v=Math.floor(v*F.x);
	for(var o=0;o<O.length&&li==-1;o+=2)
		if(v==O[o+1])
			li=o;
}
if(isNaN(v)||(li==-1&&F.mn!=F.mx&&(v<F.mn||v>F.mx))){
	alert("The value entered must be between "+Math.floor(F.mn/F.x)+" and "+Math.floor(F.mx/F.x)+".");
	E.focus();
	E.select();
}else{
	document.forms["MainForm"].elements["FieldID:"+f+(i!=-1?("."+i):"")+"=LONG"].value=v;
	UNF(f,i);
}
}

function INF(f,i,d){
var E=document.forms["MainForm"].elements["FieldID:"+f+(i!=-1?("."+i):"")+"=LONG"];
var F=NF[f];
var v=parseInt(E.value);
if(isNaN(v))
	v=0;
v+=(d*F.i*F.x);
if(F.mn==F.mx||(v>=F.mn&&v<=F.mx)){
	E.value=v;
	UNF(f,i);
}
}

function CNL(f,i,d){
E=document.forms["MainForm"].elements["FieldID:"+f+(i!=-1?("."+i):"")+"=LONG"];
var v=parseInt(E.value);
var F=NF[f];
var O=NFO[f];
if(isNaN(v))
	v=0;
for(var o=0;F.li==-2&&o<O.length;o+=2){
	if(v==O[o+1])
		F.li=o;
}
F.li+=(2*d);
if(F.li<0)
	F.li=0;
else if(F.li>=O.length)
	F.li=O.length-2;
if(F.li>=0){
	E.value=O[F.li+1];
	UNF(f,i);
}else
	F.li=-1;
}


function UNF(f,i){
var E=document.forms["MainForm"].elements;
var FI=E["FieldID:"+f+(i!=-1?("."+i):"")+"=LONG"];
var F=NF[f];
var O=NFO[f];
var d=0;
var v=parseInt(FI.value);
if(isNaN(v))
	v=0;
if(F.CUF)
	v=F.CUF(f,i,v);
for(var o=0;o<O.length&&d==0;o+=2){
	if(v==O[o+1]){
		v=O[o];
		d=1;
	}
}
if(d==0){
	v=v/F.x;
	v=(F.p+v+F.s);
}
E["Input:"+f+(i!=-1?("."+i):"")].value=v;
}

function NFD(nmn,nmx,ni,nx,np,ns,cuf){
if(nmn==nmx){
	this.mx=0;
	this.mn=0;
}else{
	this.mn=nmn;
	this.mx=nmx;
}
this.i=(ni?ni:1);
this.x=(nx?nx:1);
this.p=np?np:"";
this.s=ns?ns:"";
this.li=-2;
if(typeof(cuf) == "function")
	this.CUF=cuf;
else
	this.CUF=null;
}

var NF=new Array();
var NFO=new Array();
var CO=null;