var sf=0;
var RQln=0;
RQ=new Array()

// CopyFone functions (1,2,3 number components)
function cf1(oa1,oa2){
 if(oa1.value.length==3 && oa2.value.length==0){
  oa2.value=oa1.value;
  x(oa2);
 }
}

function cf2(oa1,oa2,op1,op2){
 if((oa1.value.length==3 || op1.value.length==3)
  && oa2.value.length==0 && op2.value.length==0){
  oa2.value=oa1.value;
  op2.value=op1.value;
  x(oa2);
  x(op2);
 }
}

function cf3(oa1,oa2,op1,op2,ol1,ol2){
 if((oa1.value.length==3 || op1.value.length==3 || ol1.value.length==4)
  && oa2.value.length==0 && op2.value.length==0 && ol2.value.length==0){
  oa2.value=oa1.value;
  op2.value=op1.value;
  ol2.value=ol1.value;
  x(op2);
  x(ol2);
 }
}

function ckln(o,s,l,h,n,t){
 if(s.length==0)return true;
 if(t=='#'){
  s2=s.replace(/[0-9]/g,"");
  if(s2!=""){sf=1;
   overlib("Please enter only digits (found a " + s2.substr(0,1) + ")");
   o.focus();
   return false;
  }
 }
 if(s.length<l){if(sf==1)return false;sf=1;
  if(h==l){overlib(n + " too short, must be " + l + " character(s) in length");o.focus();return false;}
   else overlib(n + " too short, must be from " + l + " to " + h + " characters in length");o.focus();return false;};
 if(s.length>h){if(sf==1)return false;sf=1;
  overlib(n + " too long, must be from " + l + " to " + h + " characters in length - truncated");o.value=o.value.substr(0,h);o.focus();return false;
 }
 sf=0;
 return true;
}

function ckem(o){
 s=o.value
 if(s.length==0)return true
 s2=s.replace(/@/g,"")
 p1=s.indexOf('@')
 p2=s.indexOf('.',p1)
 if(s.length!=s2.length+1||p1+2>p2||s.length<6||p1<1||p2+3>s.length){if(sf==1)return false;sf=1
  overlib("Invalid E-Mail address");o.focus();return false;}
 return true
}

function ckurl(o){
 s=o.value;
 if(s.length==0||s=='www.')return true;
 p1=s.indexOf('.');
 p2=s.indexOf('.',p1+1);
 if(p1<1||(p1+2>p2&&p2>0)||p2+3>s.length||(p2<0&&s.substr(0,4)=='www.')){if(sf==1)return false;sf=1;
  overlib("Invalid URL, please enter a valid web address");o.focus();return false;}
}

function ckrq(f){
 var i1,i2,c,tmpobj,r,t;
 for(i2=0;i2<RQln;){i2++
  r=0;
  c=0;
  for(i1=0;i1<f.length;i1++){
   tmpobj=f.elements[i1];
//alert("ckrq:"+tmpobj.name+"="+tmpobj.type);
   if (tmpobj.name==RQ[i2]){
//alert("RQ["+i2+"]="+RQ[i2]+" tmpobj.name="+tmpobj.name+" tmpobj.type="+tmpobj.type);
    if (((tmpobj.type=="text"||tmpobj.type=="textarea"||tmpobj.type=="password")&&
    tmpobj.value=='')||(tmpobj.type.toString().charAt(0)=="s"&&
    tmpobj.selectedIndex==0)) {
     alert("Not all required fields have been filled in");
     sf=1;
     tmpobj.focus();
     return false;
    }else if(tmpobj.type=="select-one"){
//alert(tmpobj.name+"=SELECT-ONE");
//alert("length="+tmpobj.length);
//alert("size="+tmpobj.size);
    }else if(tmpobj.type=="radio"||tmpobj.type=="checkbox"){
     if(r==0)t=tmpobj;
     r=1;
     if(tmpobj.checked)c++;
    }
   }
  }
  if(r>0&&c==0){
   alert("Not all required fields have been selected");
   sf=1;
   t.focus(); // Color the set of missing radio buttons
   for(i1=0;i1<f.length;i1++)
    if(t.name==f.elements[i1].name)
     f.elements[i1].style.background='#ffd0d0';
   return false;
  }
 }
 sf=0;
 return true;
}

function cn2_1(on1,on2,oo){
 if(oo.value.length>0)return;
 oo.value=on1.value+" "+on2.value;
}

function e(o){
 window.status='';
 if(o.name=='con_login_name')window.status='A User Name must be 6 to 20 alphanumeric characters in length.';
 if(o.name=='con_password')window.status='Password is 6 to 12 chars, start with a letter & contain a digit or one of ~ ! @ # $ % ^ & * ( ) _ - + = { } [ ] : ; < > ? . , / ? \ |';
 if(window.status=='')window.status=o.name;
 if(typeof(o.style)!="undefined")o.style.background='#c0ffe0';
}

function x(o){
 var i;
//alert("o.name ="+o.name+", o="+o+", o.value="+o.value);
 if(sf==0)nd();sf=0; // <==OVERLIB call needs another JS
 if(typeof(o.style)!="undefined"){
  if((o.value.length == 0)||((o.type=="select-one")&&(o.value==0))){
   o.style.background='#ffffff'; // or pink ('#ffdddd') if required???
  }else{
   o.style.background='#eaecee';//'#e8e8e8';
//   o.value=o.value.toUpperCase();
  }
 }
}

function r(o){
 var i;
//enable 040130 per MF	return;// 020415:DISABLE per MF
//alert("r:o.name="+o.name+", o="+o);
 if(sf==0)nd();sf=0;
//JLB:TEMP comment out required fields
  for(i=0; i<=RQln; i++){if(RQ[i]==o.name){break;}}
  if(i>RQln)RQln++;
  RQ[i]=o.name;
//alert("RQ["+i+"]="+RQ[i]);
  window.status=i+" of "+RQln+":"+RQ[i];
}


function l(o){o.value=o.value.toLowerCase();}
function u(o){o.value=o.value.toUpperCase();}