function CheckStainForm(StainForm,sSelectStain) {
	if (StainForm.Stain_id.value != ""){
		return (true);
	} else {
		alert (sSelectStain);	
		return (false);
	}
}

function ChangeCategory() {
	// Erase all stains, and replace them with stains appropriate to this Category.
	var StainForm = document.forms["StainForm"];
	if (!StainForm.StainCategory_id.value) return(false);
	var aCat = eval("aCat" + StainForm.StainCategory_id.value);
	var x;
	StainForm.Stain_id.length=0;
	for (x=0;x<aCat.length;x++){
		StainForm.Stain_id.options[StainForm.Stain_id.length] = new Option(aStains[aCat[x]],aCat[x]);
	}
	return(true);
}