function submitTableForm () {
        document.tableForm.submit();
    } 
    

function checkCurrent() {
//   [# check if some entries have been selected before viewing details #]
   if (document.current.viewList.value!="," && document.current.viewList.value) return true;
   window.alert("Please first select at least one entry to view!");
   return false;
}

function viewDetail() {
   if (checkCurrent()) {   window.open("http://www.matport.com/component/scienceOnDemand/properties/cwl/_entryDetail.shtml?viewList="+document.current.viewList.value,this.target,"toolbar=no,location=no,directories=no,status=yes,menubar=yes,scrollbars=yes,resizable=yes,dependent=yes");
      return true;
   }
   else return false;
}

function checkEmailInfo() {
//   [# the email should not be null #]
   if (document.addCurrent.email.value=="") {
      window.alert("Please write down your email address!");
      return false;
   }
//   [# increase step value #]
   document.addCurrent.step.value=parseInt(document.addCurrent.step1.value)+1;
   document.addCurrent.submit();
}

function checkAllInfo() {
//   [# the email should not be null #]
   if (document.addCurrent.email.value=="") {
      window.alert("Please write down your email address!");
      return false;
   }
//   [# the first name should not be null #]
   if (document.addCurrent.firstName.value=="") {
      window.alert("Please write down your first name!");
      return false;
   }
//   [# the last name should not be null #]
   if (document.addCurrent.lastName.value=="") {
      window.alert("Please write down your last name!");
      return false;
   }
//   [# check the required fields of the organization #]
   if (document.addCurrent.inst.value=="" || document.addCurrent.office.value=="" ||
       document.addCurrent.postalCode.value=="" || document.addCurrent.city.value=="" ||
       document.addCurrent.country.value=="" || document.addCurrent.instAbbr.value=="")
   {
      window.alert("Please fill in all the required fields of the organization!");
      return false;
   }
   
//   [# the system name should not be null #]
   if (document.addCurrent.sysName1.value=="") {
      window.alert("Please first input the system name!");
      return false;
   }
//   [# one of the bold lines should be filled in #]
   if (document.addCurrent.statusExpd.options[0].selected &&
       document.addCurrent.monExpd.options[0].selected &&
       document.addCurrent.yearExpd.options[0].selected &&
       document.addCurrent.statusExtd.options[0].selected &&
       document.addCurrent.monExtd.options[0].selected &&
       document.addCurrent.yearExtd.options[0].selected &&
       document.addCurrent.statusCTd.options[0].selected &&
       document.addCurrent.monCTd.options[0].selected &&
       document.addCurrent.yearCTd.options[0].selected &&
       document.addCurrent.statusCAt.options[0].selected &&
       document.addCurrent.monCAt.options[0].selected &&
       document.addCurrent.yearCAt.options[0].selected &&
       document.addCurrent.statusCE.options[0].selected &&
       document.addCurrent.monCE.options[0].selected &&
       document.addCurrent.yearCE.options[0].selected &&
       document.addCurrent.statusPa.options[0].selected &&
       document.addCurrent.monPa.options[0].selected &&
       document.addCurrent.yearPa.options[0].selected
       ) {
      window.alert("Complete at least one of the lines printed bold.");
      return false;
   }
//   [# the bold line should be completed if filled in #]
   if ((!document.addCurrent.statusExpd.options[0].selected ||
       !document.addCurrent.monExpd.options[0].selected ||
       !document.addCurrent.yearExpd.options[0].selected) &&
       (document.addCurrent.statusExpd.options[0].selected ||
        document.addCurrent.monExpd.options[0].selected ||
        document.addCurrent.yearExpd.options[0].selected)) {
      window.alert("Please finish the 'Experimental Work on Phase Equilibria' by filling in at least the general status AND date.");
      return false;
   }
   if ((!document.addCurrent.statusExtd.options[0].selected ||
       !document.addCurrent.monExtd.options[0].selected ||
       !document.addCurrent.yearExtd.options[0].selected) &&
       (document.addCurrent.statusExtd.options[0].selected ||
        document.addCurrent.monExtd.options[0].selected ||
        document.addCurrent.yearExtd.options[0].selected)) {
      window.alert("Please finish the 'Experimental Work on Thermodynamic Data' by filling in at least the general status AND date.");
      return false;
   }
   if ((!document.addCurrent.statusPa.options[0].selected ||
       !document.addCurrent.monPa.options[0].selected ||
       !document.addCurrent.yearPa.options[0].selected) &&
       (document.addCurrent.statusPa.options[0].selected ||
        document.addCurrent.monPa.options[0].selected ||
        document.addCurrent.yearPa.options[0].selected)) {
      window.alert("Please finish the 'Experimental Work on Related Properties or Applications' by filling in at least the general status AND date.");
      return false;
   }
   if ((!document.addCurrent.statusCTd.options[0].selected ||
       !document.addCurrent.monCTd.options[0].selected ||
       !document.addCurrent.yearCTd.options[0].selected) &&
       (document.addCurrent.statusCTd.options[0].selected ||
        document.addCurrent.monCTd.options[0].selected ||
        document.addCurrent.yearCTd.options[0].selected)) {
      window.alert("Please finish the 'Computational Thermodynamics' by filling in at least the general status AND date.");
      return false;
   }
   if ((!document.addCurrent.statusCAt.options[0].selected ||
       !document.addCurrent.monCAt.options[0].selected ||
       !document.addCurrent.yearCAt.options[0].selected) &&
       (document.addCurrent.statusCAt.options[0].selected ||
        document.addCurrent.monCAt.options[0].selected ||
        document.addCurrent.yearCAt.options[0].selected)) {
      window.alert("Please finish the 'Computational Atomistics' by filling in at least the general status AND date.");
      return false;
   }
   if ((!document.addCurrent.statusCE.options[0].selected ||
       !document.addCurrent.monCE.options[0].selected ||
       !document.addCurrent.yearCE.options[0].selected) &&
       (document.addCurrent.statusCE.options[0].selected ||
        document.addCurrent.monCE.options[0].selected ||
        document.addCurrent.yearCE.options[0].selected)) {
      window.alert("Please finish the 'Critical Evaluation of ALL Data' by filling in at least the general status AND date.");
      return false;
   }
   document.addCurrent.sysName.value=document.addCurrent.sysName1.value;
//   [# assign the right values to the background variables #]
   if (document.addCurrent.motivation1.value=="Note that text boxes can accept plain text characters only!")
      document.addCurrent.motivation.value="";
   else document.addCurrent.motivation.value=document.addCurrent.motivation1.value;
   if (document.addCurrent.comments1.value=="Note that text boxes can accept plain text characters only!")
      document.addCurrent.comments.value="";
   else document.addCurrent.comments.value=document.addCurrent.comments1.value;
   if (document.addCurrent.comment_rainer1.value=="25 characters maximum")
      document.addCurrent.comment_rainer.value="";
   else document.addCurrent.comment_rainer.value=document.addCurrent.comment_rainer1.value;
   if (document.addCurrent.funding1.value=="Note that text boxes can accept plain text characters only!")
      document.addCurrent.funding.value="";
   else document.addCurrent.funding.value=document.addCurrent.funding1.value;
   
   
//   [# increase step value #]
   document.addCurrent.step.value=parseInt(document.addCurrent.step1.value)+1;
   document.addCurrent.submit();
}

function checkPerInfo() {
//   [# the first name should not be null #]
   if (document.addCurrent.firstName.value=="") {
      window.alert("Please write down your first name!");
      return false;
   }
//   [# the last name should not be null #]
   if (document.addCurrent.lastName.value=="") {
      window.alert("Please write down your last name!");
      return false;
   }
 //  [# increase step value #]
   document.addCurrent.step.value=parseInt(document.addCurrent.step1.value)+1;
   document.addCurrent.submit();
}

function checkInstInfo() {
 //  [# check the required fields of the organization #]
   if (document.addCurrent.inst.value=="" || document.addCurrent.office.value=="" ||
       document.addCurrent.postalCode.value=="" || document.addCurrent.city.value=="" ||
       document.addCurrent.country.value=="" || document.addCurrent.instAbbr.value=="")
   {
      window.alert("Please fill in all the required fields of the organization!");
      return false;
   }
//   [# increase step value #]
   document.addCurrent.step.value=parseInt(document.addCurrent.step1.value)+1;
   document.addCurrent.submit();
}

function checkTypeInfo() {
 //  [# the system name should not be null #]
   if (document.addCurrent.sysName1.value=="") {
      window.alert("Please first input the system name!");
      return false;
   }
//   [# one of the bold lines should be filled in #]
   if (document.addCurrent.statusExpd.options[0].selected &&
       document.addCurrent.monExpd.options[0].selected &&
       document.addCurrent.yearExpd.options[0].selected &&
       document.addCurrent.statusExtd.options[0].selected &&
       document.addCurrent.monExtd.options[0].selected &&
       document.addCurrent.yearExtd.options[0].selected &&
       document.addCurrent.statusCTd.options[0].selected &&
       document.addCurrent.monCTd.options[0].selected &&
       document.addCurrent.yearCTd.options[0].selected &&
       document.addCurrent.statusCAt.options[0].selected &&
       document.addCurrent.monCAt.options[0].selected &&
       document.addCurrent.yearCAt.options[0].selected &&
       document.addCurrent.statusCE.options[0].selected &&
       document.addCurrent.monCE.options[0].selected &&
       document.addCurrent.yearCE.options[0].selected &&
       document.addCurrent.statusPa.options[0].selected &&
       document.addCurrent.monPa.options[0].selected &&
       document.addCurrent.yearPa.options[0].selected
       ) {
      window.alert("Complete at least one of the lines printed bold.");
      return false;
   }
   //  [# the bold line should be completed if filled in #]
   if ((!document.addCurrent.statusExpd.options[0].selected ||
       !document.addCurrent.monExpd.options[0].selected ||
       !document.addCurrent.yearExpd.options[0].selected) &&
       (document.addCurrent.statusExpd.options[0].selected ||
        document.addCurrent.monExpd.options[0].selected ||
        document.addCurrent.yearExpd.options[0].selected)) {
      window.alert("Please finish the 'Experimental Work on Phase Equilibria' by filling in at least the general status AND date.");
      return false;
   }
   if ((!document.addCurrent.statusExtd.options[0].selected ||
       !document.addCurrent.monExtd.options[0].selected ||
       !document.addCurrent.yearExtd.options[0].selected) &&
       (document.addCurrent.statusExtd.options[0].selected ||
        document.addCurrent.monExtd.options[0].selected ||
        document.addCurrent.yearExtd.options[0].selected)) {
      window.alert("Please finish the 'Experimental Work on Thermodynamic Data' by filling in at least the general status AND date.");
      return false;
   }
   if ((!document.addCurrent.statusPa.options[0].selected ||
       !document.addCurrent.monPa.options[0].selected ||
       !document.addCurrent.yearPa.options[0].selected) &&
       (document.addCurrent.statusPa.options[0].selected ||
        document.addCurrent.monPa.options[0].selected ||
        document.addCurrent.yearPa.options[0].selected)) {
      window.alert("Please finish the 'Experimental Work on Related Properties or Applications' by filling in at least the general status AND date.");
      return false;
   }
   if ((!document.addCurrent.statusCTd.options[0].selected ||
       !document.addCurrent.monCTd.options[0].selected ||
       !document.addCurrent.yearCTd.options[0].selected) &&
       (document.addCurrent.statusCTd.options[0].selected ||
        document.addCurrent.monCTd.options[0].selected ||
        document.addCurrent.yearCTd.options[0].selected)) {
      window.alert("Please finish the 'Computational Thermodynamics' by filling in at least the general status AND date.");
      return false;
   }
   if ((!document.addCurrent.statusCAt.options[0].selected ||
       !document.addCurrent.monCAt.options[0].selected ||
       !document.addCurrent.yearCAt.options[0].selected) &&
       (document.addCurrent.statusCAt.options[0].selected ||
        document.addCurrent.monCAt.options[0].selected ||
        document.addCurrent.yearCAt.options[0].selected)) {
      window.alert("Please finish the 'Computational Atomistics' by filling in at least the general status AND date.");
      return false;
   }
   if ((!document.addCurrent.statusCE.options[0].selected ||
       !document.addCurrent.monCE.options[0].selected ||
       !document.addCurrent.yearCE.options[0].selected) &&
       (document.addCurrent.statusCE.options[0].selected ||
        document.addCurrent.monCE.options[0].selected ||
        document.addCurrent.yearCE.options[0].selected)) {
      window.alert("Please finish the 'Critical Evaluation of ALL Data' by filling in at least the general status AND date.");
      return false;
   }
   document.addCurrent.sysName.value=document.addCurrent.sysName1.value;
   //  [# increase step value #]
   document.addCurrent.step.value=parseInt(document.addCurrent.step1.value)+1;
   document.addCurrent.submit();
}

function checkBackgroundInfo() {
   //  [# assign the right values to the background variables #]
   if (document.addCurrent.motivation1.value=="Note that text boxes can accept plain text characters only!")
      document.addCurrent.motivation.value="";
   else document.addCurrent.motivation.value=document.addCurrent.motivation1.value;
   if (document.addCurrent.comments1.value=="Note that text boxes can accept plain text characters only!")
      document.addCurrent.comments.value="";
   else document.addCurrent.comments.value=document.addCurrent.comments1.value;
   if (document.addCurrent.comment_rainer1.value=="25 characters maximum")
      document.addCurrent.comment_rainer.value="";
   else document.addCurrent.comment_rainer.value=document.addCurrent.comment_rainer1.value;
   if (document.addCurrent.funding1.value=="Note that text boxes can accept plain text characters only!")
      document.addCurrent.funding.value="";
   else document.addCurrent.funding.value=document.addCurrent.funding1.value;
   //  [# increase step value #]
   document.addCurrent.step.value=parseInt(document.addCurrent.step.value)+1;
   document.addCurrent.submit();
}

var content;
var fontsize=8;               //in "pt" units; used with "font-size" style element

function addElement(el) {
   //  [# add the element el to the periodic table #]
   content+=("<TD ALIGN=center><A HREF='javascript:void(0);' ");
   content+=("onClick=\"document.addCurrent.sysName1.value+='"+el+"-';");
   content+=("document.addCurrent.flag_"+el+".value='true';showPeriodicTable();\">");
   content+=("<font color='#0000FF'>"+el+"</font></A></TD>");
}

function delElement(el) {
   //  [# mark the element el as removed from the periodic table #]
   content+=("<TD ALIGN=center><A HREF='javascript:void(0);' ");
   var val=document.addCurrent.sysName1.value;
   var index=val.search(el);
   var str1=val.substr(0,index);           //  [# the name part before el #]
   var str=val.substr(index);
   var index_separator=str.search("-");
   var str2=str.substr(index_separator+1); //  [# the name part after el #]
   content+=("onClick=\"document.addCurrent.sysName1.value='"+str1+str2+"';");
   content+=("document.addCurrent.flag_"+el+".value=false;showPeriodicTable();\">");
   content+=("<font color='#FF0000'>"+el+"</font></A></TD>");
}

function showPeriodicTable() {
   //  [# draw the periodic table #]
   content="";
   content+=("<TABLE WIDTH='100%' BORDER=1 CELLSPACING=0 CELLPADDING=0 BGCOLOR='#E0E0E0' style='font-size:"+fontsize+"pt;'>");
   content+=("<TR>");
   if (document.addCurrent.flag_H.value=="false") addElement("H");
   else delElement("H");
   content+=("<TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD>");
   content+=("<TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD><TD></TD>");
   if (document.addCurrent.flag_He.value=="false") addElement("He");
   else delElement("He");
   content+=("</TR><TR>");
   if (document.addCurrent.flag_Li.value=="false") addElement("Li");
   else delElement("Li");
   if (document.addCurrent.flag_Be.value=="false") addElement("Be");
   else delElement("Be");
   content+=("<TD></TD><TD></TD><TD></TD><TD></TD><TD></TD>");
   content+=("<TD></TD><TD></TD><TD></TD><TD></TD><TD></TD>");
   if (document.addCurrent.flag_B.value=="false") addElement("B");
   else delElement("B");
   if (document.addCurrent.flag_C.value=="false") addElement("C");
   else delElement("C");
   if (document.addCurrent.flag_N.value=="false") addElement("N");
   else delElement("N");
   if (document.addCurrent.flag_O.value=="false") addElement("O");
   else delElement("O");
   if (document.addCurrent.flag_F.value=="false") addElement("F");
   else delElement("F");
   if (document.addCurrent.flag_Ne.value=="false") addElement("Ne");
   else delElement("Ne");
   content+=("</TR><TR>");
   if (document.addCurrent.flag_Na.value=="false") addElement("Na");
   else delElement("Na");
   if (document.addCurrent.flag_Mg.value=="false") addElement("Mg");
   else delElement("Mg");
   content+=("<TD></TD><TD></TD><TD></TD><TD></TD><TD></TD>");
   content+=("<TD></TD><TD></TD><TD></TD><TD></TD><TD></TD>");
   if (document.addCurrent.flag_Al.value=="false") addElement("Al");
   else delElement("Al");
   if (document.addCurrent.flag_Si.value=="false") addElement("Si");
   else delElement("Si");
   if (document.addCurrent.flag_P.value=="false") addElement("P");
   else delElement("P");
   if (document.addCurrent.flag_S.value=="false") addElement("S");
   else delElement("S");
   if (document.addCurrent.flag_Cl.value=="false") addElement("Cl");
   else delElement("Cl");
   if (document.addCurrent.flag_Ar.value=="false") addElement("Ar");
   else delElement("Ar");
   content+=("</TR><TR>");
   if (document.addCurrent.flag_K.value=="false") addElement("K");
   else delElement("K");
   if (document.addCurrent.flag_Ca.value=="false") addElement("Ca");
   else delElement("Ca");
   if (document.addCurrent.flag_Sc.value=="false") addElement("Sc");
   else delElement("Sc");
   if (document.addCurrent.flag_Ti.value=="false") addElement("Ti");
   else delElement("Ti");
   if (document.addCurrent.flag_V.value=="false") addElement("V");
   else delElement("V");
   if (document.addCurrent.flag_Cr.value=="false") addElement("Cr");
   else delElement("Cr");
   if (document.addCurrent.flag_Mn.value=="false") addElement("Mn");
   else delElement("Mn");
   if (document.addCurrent.flag_Fe.value=="false") addElement("Fe");
   else delElement("Fe");
   if (document.addCurrent.flag_Co.value=="false") addElement("Co");
   else delElement("Co");
   if (document.addCurrent.flag_Ni.value=="false") addElement("Ni");
   else delElement("Ni");
   if (document.addCurrent.flag_Cu.value=="false") addElement("Cu");
   else delElement("Cu");
   if (document.addCurrent.flag_Zn.value=="false") addElement("Zn");
   else delElement("Zn");
   if (document.addCurrent.flag_Ga.value=="false") addElement("Ga");
   else delElement("Ga");
   if (document.addCurrent.flag_Ge.value=="false") addElement("Ge");
   else delElement("Ge");
   if (document.addCurrent.flag_As.value=="false") addElement("As");
   else delElement("As");
   if (document.addCurrent.flag_Se.value=="false") addElement("Se");
   else delElement("Se");
   if (document.addCurrent.flag_Br.value=="false") addElement("Br");
   else delElement("Br");
   if (document.addCurrent.flag_Kr.value=="false") addElement("Kr");
   else delElement("Kr");
   content+=("</TR><TR>");
   if (document.addCurrent.flag_Rb.value=="false") addElement("Rb");
   else delElement("Rb");
   if (document.addCurrent.flag_Sr.value=="false") addElement("Sr");
   else delElement("Sr");
   if (document.addCurrent.flag_Y.value=="false") addElement("Y");
   else delElement("Y");
   if (document.addCurrent.flag_Zr.value=="false") addElement("Zr");
   else delElement("Zr");
   if (document.addCurrent.flag_Nb.value=="false") addElement("Nb");
   else delElement("Nb");
   if (document.addCurrent.flag_Mo.value=="false") addElement("Mo");
   else delElement("Mo");
   if (document.addCurrent.flag_Tc.value=="false") addElement("Tc");
   else delElement("Tc");
   if (document.addCurrent.flag_Ru.value=="false") addElement("Ru");
   else delElement("Ru");
   if (document.addCurrent.flag_Rh.value=="false") addElement("Rh");
   else delElement("Rh");
   if (document.addCurrent.flag_Pd.value=="false") addElement("Pd");
   else delElement("Pd");
   if (document.addCurrent.flag_Ag.value=="false") addElement("Ag");
   else delElement("Ag");
   if (document.addCurrent.flag_Cd.value=="false") addElement("Cd");
   else delElement("Cd");
   if (document.addCurrent.flag_In.value=="false") addElement("In");
   else delElement("In");
   if (document.addCurrent.flag_Sn.value=="false") addElement("Sn");
   else delElement("Sn");
   if (document.addCurrent.flag_Sb.value=="false") addElement("Sb");
   else delElement("Sb");
   if (document.addCurrent.flag_Te.value=="false") addElement("Te");
   else delElement("Te");
   if (document.addCurrent.flag_I.value=="false") addElement("I");
   else delElement("I");
   if (document.addCurrent.flag_Xe.value=="false") addElement("Xe");
   else delElement("Xe");
   content+=("</TR><TR>");
   if (document.addCurrent.flag_Cs.value=="false") addElement("Cs");
   else delElement("Cs");
   if (document.addCurrent.flag_Ba.value=="false") addElement("Ba");
   else delElement("Ba");
   if (document.addCurrent.flag_La.value=="false") addElement("La");
   else delElement("La");
   if (document.addCurrent.flag_Hf.value=="false") addElement("Hf");
   else delElement("Hf");
   if (document.addCurrent.flag_Ta.value=="false") addElement("Ta");
   else delElement("Ta");
   if (document.addCurrent.flag_W.value=="false") addElement("W");
   else delElement("W");
   if (document.addCurrent.flag_Re.value=="false") addElement("Re");
   else delElement("Re");
   if (document.addCurrent.flag_Os.value=="false") addElement("Os");
   else delElement("Os");
   if (document.addCurrent.flag_Ir.value=="false") addElement("Ir");
   else delElement("Ir");
   if (document.addCurrent.flag_Pt.value=="false") addElement("Pt");
   else delElement("Pt");
   if (document.addCurrent.flag_Au.value=="false") addElement("Au");
   else delElement("Au");
   if (document.addCurrent.flag_Hg.value=="false") addElement("Hg");
   else delElement("Hg");
   if (document.addCurrent.flag_Tl.value=="false") addElement("Tl");
   else delElement("Tl");
   if (document.addCurrent.flag_Pb.value=="false") addElement("Pb");
   else delElement("Pb");
   if (document.addCurrent.flag_Bi.value=="false") addElement("Bi");
   else delElement("Bi");
   if (document.addCurrent.flag_Po.value=="false") addElement("Po");
   else delElement("Po");
   if (document.addCurrent.flag_At.value=="false") addElement("At");
   else delElement("At");
   if (document.addCurrent.flag_Rn.value=="false") addElement("Rn");
   else delElement("Rn");
   content+=("</TR><TR>");
   if (document.addCurrent.flag_Fr.value=="false") addElement("Fr");
   else delElement("Fr");
   if (document.addCurrent.flag_Ra.value=="false") addElement("Ra");
   else delElement("Ra");
   if (document.addCurrent.flag_Ac.value=="false") addElement("Ac");
   else delElement("Ac");
   if (document.addCurrent.flag_Rf.value=="false") addElement("Rf");
   else delElement("Rf");
   if (document.addCurrent.flag_Db.value=="false") addElement("Db");
   else delElement("Db");
   if (document.addCurrent.flag_Sg.value=="false") addElement("Sg");
   else delElement("Sg");
   if (document.addCurrent.flag_Bh.value=="false") addElement("Bh");
   else delElement("Bh");
   if (document.addCurrent.flag_Hs.value=="false") addElement("Hs");
   else delElement("Hs");
   if (document.addCurrent.flag_Mt.value=="false") addElement("Mt");
   else delElement("Mt");
   content+=("<TD></TD><TD></TD><TD></TD><TD></TD>");
   content+=("<TD></TD><TD></TD><TD></TD><TD></TD><TD></TD>");
   content+=("</TR><TR>");
   content+=("<TD COLSPAN=3>Lanthanides</TD>");
   if (document.addCurrent.flag_Ce.value=="false") addElement("Ce");
   else delElement("Ce");
   if (document.addCurrent.flag_Pr.value=="false") addElement("Pr");
   else delElement("Pr");
   if (document.addCurrent.flag_Nd.value=="false") addElement("Nd");
   else delElement("Nd");
   if (document.addCurrent.flag_Pm.value=="false") addElement("Pm");
   else delElement("Pm");
   if (document.addCurrent.flag_Sm.value=="false") addElement("Sm");
   else delElement("Sm");
   if (document.addCurrent.flag_Eu.value=="false") addElement("Eu");
   else delElement("Eu");
   if (document.addCurrent.flag_Gd.value=="false") addElement("Gd");
   else delElement("Gd");
   if (document.addCurrent.flag_Tb.value=="false") addElement("Tb");
   else delElement("Tb");
   if (document.addCurrent.flag_Dy.value=="false") addElement("Dy");
   else delElement("Dy");
   if (document.addCurrent.flag_Ho.value=="false") addElement("Ho");
   else delElement("Ho");
   if (document.addCurrent.flag_Er.value=="false") addElement("Er");
   else delElement("Er");
   if (document.addCurrent.flag_Tm.value=="false") addElement("Tm");
   else delElement("Tm");
   if (document.addCurrent.flag_Yb.value=="false") addElement("Yb");
   else delElement("Yb");
   if (document.addCurrent.flag_Lu.value=="false") addElement("Lu");
   else delElement("Lu");
   content+=("<TD></TD>");
   content+=("</TR><TR>");
   content+=("<TD COLSPAN=3>Actinides</TD>");
   if (document.addCurrent.flag_Th.value=="false") addElement("Th");
   else delElement("Th");
   if (document.addCurrent.flag_Pa.value=="false") addElement("Pa");
   else delElement("Pa");
   if (document.addCurrent.flag_U.value=="false") addElement("U");
   else delElement("U");
   if (document.addCurrent.flag_Np.value=="false") addElement("Np");
   else delElement("Np");
   if (document.addCurrent.flag_Pu.value=="false") addElement("Pu");
   else delElement("Pu");
   if (document.addCurrent.flag_Am.value=="false") addElement("Am");
   else delElement("Am");
   if (document.addCurrent.flag_Cm.value=="false") addElement("Cm");
   else delElement("Cm");
   if (document.addCurrent.flag_Bk.value=="false") addElement("Bk");
   else delElement("Bk");
   if (document.addCurrent.flag_Cf.value=="false") addElement("Cf");
   else delElement("Cf");
   if (document.addCurrent.flag_Es.value=="false") addElement("Es");
   else delElement("Es");
   if (document.addCurrent.flag_Fm.value=="false") addElement("Fm");
   else delElement("Fm");
   if (document.addCurrent.flag_Md.value=="false") addElement("Md");
   else delElement("Md");
   if (document.addCurrent.flag_No.value=="false") addElement("No");
   else delElement("No");
   if (document.addCurrent.flag_Lr.value=="false") addElement("Lr");
   else delElement("Lr");
   content+=("<TD></TD>");
   content+=("</TR></TABLE>");
   overlib(content, STICKY, TEXTSIZEUNIT, "pt", TEXTSIZE, 8, CAPTIONSIZEUNIT, "pt", CAPTIONSIZE, 8, CLOSESIZEUNIT, "pt", CLOSESIZE, 8, CAPTION, "Select Elements");
}

function updateViewList(id) {
   var viewList=",";
   if (document.current.viewList.value)//  [#get the current view list#]
      viewList=document.current.viewList.value;
   var idComma=","+id+",";
   var index=viewList.search(idComma); //  [#must search with ",",#]
                                       //  [#otherwise, there will be 2 inside 20 searched out#]
                                       //  [#or 2 inside 12 searched out#]
   if (index==-1) viewList+=id+=",";   //  [#id not existing in the current view list#]
   else {
      index+=1;                        //  [#delete from the number to the comma behind#]
      var str1=viewList.substr(0,index);
      var str=viewList.substr(index);
      var index_separator=str.search(",");
      var str2=str.substr(index_separator+1);
      viewList=str1+str2;
   }
   document.current.viewList.value=viewList;   //  [#update the view list#]
}

function deleteEntry() {
   //  [#confirm the entry deletion#]
   if (window.confirm("Are you sure you want to delete this entry?"))
   {
      document.detail.action='deleteEntry.shtml';
      document.detail.submit();
   }
}

function negotiation() {
   //  [#check the comments field#]
   if (document.detail.reason.value=="Tell us why you don't agree with it." || document.detail.reason.value=="") {
      window.alert("Please tell us why you don't agree with it!");
      return false;
   }
   else {
      document.detail.action="continue.shtml";
      document.detail.submit();
   }
}