<!--
// Copyright The Intersoft Group, Inc. 1999-2006
// Modified 4/28/2004, 5/13/2006
function valflds(frm) {
	var fname,fail,lab,re;
	var tok,pos1,pos2,ftok;
	var wrk;
	var emes;
	var slist;
	var flds = frm.elements["_val"].value;
	if (frm.elements["_debug"] != undefined) {
	if(frm.elements["_debug"].value == "yes") return(true);
	}
	slist = flds.split(",");
	fail = false;
	emes = "";
	
	
	for ( i = 0; i < slist.length; i++) {
			wrk = slist[i];
			pos1 = wrk.indexOf("(");
			pos2 = wrk.indexOf(")");
			if (pos1 > -1) {
				lab = wrk.substring(pos1 + 1,pos2);
				tok = wrk.substring(0,pos1 - 1);
				}
			else {
				lab = "";
				tok = wrk;
				}
			ftok = findMatch(frm,tok);			
			if(frm.elements[ftok].value == "") {
				fail = true;
				if ( lab == "" ) {
					fname = tok;
					}
				else {	
					fname = lab;
					}
				// Replace underscore with space
				
				emes = emes + fname.toUpperCase() + "\n";
				}
		}
	

	if(fail) {
		alert("Please enter the following information:\n\n" + emes + "\nThank you" );
		return(false);
		}
	else {
		return(true);
		}
		
	}	
	
function findMatch(frm,tk) {
    var ctok,cnt;
    for (cnt=0;cnt<frm.elements.length;cnt++) {
       ctok = frm.elements[cnt];
       if(ctok.tagName == 'INPUT' || ctok.tagName == 'SELECT') {
           if (ctok.name.match(tk)) {
           return(ctok.name);
           }
       }
    }
    return (null);
}							
//-->