function abstract_isok(f){
  var msg_abs = "";
// deal with title input
  var textest = f.elements[3];
    if((textest.value==null)||(textest.value=="")||isblank(textest.value)){
      msg_abs += "-> Title is empty  <BR>" ;
    }
// character count in title  
  var testval = textest.value;
  if(testval.length>=73) msg_abs += "-> Title contains "+testval.length+
    " characters <BR>  - must contain no more then 72 <BR>"
//dealing with the session("ssn") select box - do not use a session named 'x'  
  var es = f.elements[4];
  if(es.type=="select-one" && es.name=="ssn"){
  if(es.options.value=="x" || es.selectedIndex==0){
    msg_abs +="-> No topic selected <BR> "
    }
  }
// deal with autohs+affilliation input
  var textest = f.elements[5];
  if((textest.value==null)||(textest.value=="")||isblank(textest.value)){
    msg_abs += "-> No authors/affiliation supplied  <BR>"
  }
// deal with abstract input
//  var textest = f.elements[6];
//    if((textest.value==null)||(textest.value=="")||isblank(textest.value)){
//      msg_abs += "No abstract entered  <BR>" ;
//    }
// word count in abstract
  var textest = f.elements[6];
  var testval = textest.value;
  var testsiz = testval.split(" ")
  if(testsiz.length>=520) msg_abs += "-> Abstract contains "+testsiz.length+
     " words <BR> -  the word limit is 500"    
// deal with outcome of test
// no problem section
  if(msg_abs==""){
    var verwx_abs=window.open("","verf");
      verwx_abs.close();
      return confirm("Form is ready for submittal. OK?") ;
    }
// text and or text area off
  var verw_abs=window.open("","verf");
  verw_abs.close(); // make sure we do not add to existing window 
  alert(" form was not submitted") ;
  verw_abs=window.open("","verf","width=280,height=200,scrollbars,resizable=n");
  verw_abs.document.write(msg_abs);
  return false;
}

function isblank(s)
{
  for (var i = 0; i < s.length; i++){
    var c = s.charAt(i) ;
    if ((c != ' ') && (c != '\n') && (c != '\t')) return false ;
  }
  return true ;
}

function profile_isok(f){
  var msg ;
  var empty_fields="";
  var errors="";
  var f_name=new Array() ;
  f_name[2]="Title";
  f_name[3]="First name";
  f_name[4]="Middle name";
  f_name[5]="Last name";
  f_name[6]="Affiliation";
  f_name[9]="memb_id";
  f_name[10]="Street Address";
  f_name[12]="City";
  f_name[13]="State";
  f_name[14]="Zip (Postal) code";
  f_name[15]="Country";
  f_name[16]="Phone area code";
  f_name[17]="Phone number";
  f_name[18]="Fax area code";
  f_name[19]="Fax number";
  f_name[20]="Email address";
  for(var i=0; i<f.length-1; i++){
    var e = f.elements[i];
// deal with text input
    if((e.type=="text"||e.type=="textarea") && !e.optional && e.name!="email"){
      if((e.value==null)||(e.value=="")||isblank(e.value)){
        empty_fields +="<BR> &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;" + f_name[i] ;
      }
    }
// check format of email
    if(e.name=="email"){
      while ((e.value==null)||(e.value=="")||isblank(e.value))
        e.value = prompt("Pleas enter Email address", e.value);
      while ( (e.value.indexOf("@") == "-1") ||
        (e.value.indexOf(".") == "-1") && 
        !((e.value==null)||(e.value=="")||isblank(e.value)) ) 
        e.value = prompt("Email form is Name@Address.xxx - correct & reenter", e.value);
    }
  }
  if(!empty_fields && !errors){
      var verwx=window.open("","verf");
      verwx.close();
      return confirm("Form is ready for submittal. OK?") ;
    }
// if errors or omissions found post message and abort submission
  msg  ="<FONT COLOR='red' FACE='arial'>"
  msg +="----------------------------------<BR>"
  msg +=" You may move/resize this window. <BR>"
  msg +=" Use list as guide - correct and  <BR>"
  msg +=" re-submit the form <BR>"
  msg +="----------------------------------</font><br><br>"

  if (empty_fields) {
    msg +=" The following required field(s) were empty:<br>"+empty_fields+"<br>";
  }
  if (errors) {
    msg += "<br>   The following error(s) were found" ;
    msg += errors ;
  }
  var verw=window.open("","verf");
  verw.close(); // make sure we do not add to existing window   (l. 75)
  alert(" form could not be submitted") ;
  verw=window.open("","verf","width=280,height=200,scrollbars,resizable=n");
  verw.document.write(msg);
  return false;
}


// printing page script
var agt=navigator.userAgent.toLowerCase();

function printArticle() {
	var prn = new Image();

	prn.src="articles.html";

	if (window.print) {
		setTimeout('window.print();',200);
	}
	else if (agt.indexOf("mac") != -1) {
		alert("Press 'Comand+p' on your keyboard to print article.");
	}
	else {
		alert("Press 'Ctrl+p' on your keyboard to print article.")
	}
}

function hidePrint() {
	if (document.all) {
		document.all.hideTop.innerHTML = "";
		document.all.hideBottom.innerHTML = "";
	}
}

function showPrint() {
	if (document.all) {
		document.all.hideTop.innerHTML = str;
		document.all.hideBottom.innerHTML = str;
	}
}

function showLayer() {
	if (document.layers) {
		document.layers.layerTop.visibility = "show";
		document.layers.layerBottom.visibility = "show";
	}
}