// Global chemsrv variables and functions //

var recordID;
var recordNUM;

function cslib_isText(input){
 return (input.type == 'text' || input.type == 'textarea');
}
                           
function cslib_getElements(form){
  var el_arr = new Array(form.elements.length);
  for (var i=0; i<el_arr.length; i++){el_arr[i] = form.elements[i]};
  return el_arr;
}

function cslib_cs_disable(b){
var aElements = this.elements;
var    ftText = new Boolean();
for ( var   i = 0; i<aElements.length; i++ ){
       var el = aElements[i];
       ftText = cslib_isText(el);
  el.disabled =      el.className == 'cs_ctl' ||
                     el.type      == 'button' ||
                     el.type      == 'submit' ||
                     el.type      == 'reset'  ||
                   (!Boolean(b)) && (ftText && (el.className != 'cs_cs')) ||
                     Boolean(b)  && !(ftText && el.checked);       // find string only
   //if(el.name){alert(el.name+', class = '+ el.className +':ck:'+ el.checked+':dis:'+el.disabled);};
   //if (!el.disabled) {    alert(el.name+', class = '+ el.className);}

  }
}

function cslib_cs_enable(){
  var aElements = this.elements;
  for (i=0; i<aElements.length; i++){aElements[i].disabled=false}
}

function include(obj,val){with(obj){disabled=false;value=val;}}

function a_cs_findstate(){
  var aElements = this.elements;
  for (var i=0; i<aElements.length; i++){
    if ( (aElements[i].tagName=='INPUT') &&
         (aElements[i].checked)             ){return true}
  }
  return false;
}

function next_input(input){
var aElements = input.form.elements;
  function next(i){
    for(   ; (i<input.form.length)&&
             (aElements[i].tagName !== 'TEXTAREA')&&
             ((aElements[i].tagName !== 'INPUT') || (aElements[i].type !== 'text')); i++){};
    return i;
  }
  var i;
  for(i=0; aElements[i++]!==input;){};
  i=next(i);
  if (i == input.form.length){i=next(0);};
  aElements[i].focus();
}

function cslib_ck_click(){with(this){
  if(!field.__defineGetter__){ // MSIE only //
    field.checked = this.checked;}
  if(checked){alert('Switched to Find by "'+ this.field.name + '" mode!');}
  if(field.form.cs_update_anchors){field.form.cs_update_anchors()};
}}

function cslib_getDivById(id){
  if( (id                              ) &&
//      (el = document.getElementById(id)) &&
//      (el.tagName == 'DIV'             )    ){return el}
      (el = document.getElementById(id))    ){return el}
}

function cslib_new_checkbox(aparent,aonclick,before){if(aparent){
var nn = document.createElement("input");
    nn.setAttribute("type", "checkbox");
    nn.onclick = aonclick;
    if(Boolean(before)){aparent.insertBefore(nn,aparent.firstChild)}
                   else{aparent.appendChild( nn                   )};
//    nn.parentField = aparent;
    return nn;
}}

function cslib_setCheckBox(cb,field){if(cb){
    cb.field       = field;
    field.checkbox = cb;
    if(field.__defineGetter__){     // Mozilla, Opera //
        field.__defineGetter__("checked", function(){return this.checkbox.checked;})
     }else{                          // MSIE only //
        field.checked = cb.checked};
}}


function cslib_setUpAnchor(aname){
  var _adir = location.pathname.slice(0,location.pathname.lastIndexOf("/")+1);
  with(document.getElementsByName(aname)[0]){if (tagName=='A'){
           href = _adir;
      innerHTML = '<img src="/def/of.gif">'+_adir+'..';}}
}


ld_cslib = true;