<!--
var nn4= (document.layers);
var nn6= (document.getElementById && !document.all);
var ie4= (document.all && !document.getElementById);
var ie5= (document.all && document.getElementById);

function hcms_loadPage (id, nestref, url)
{
  // layer width
  content_width = 460;
  
  if (nn4)
  {
    var lyr = (nestref)? eval('document.'+nestref+'.document.'+id) : document.layers[id]
    lyr.load(url,content_width)
  }
  else if (ie4) parent.contentFRM.location = url;
  else if (ie5 || nn6) document.getElementById('contentFRM').src = url;
}

function hcms_showPage (id)
{
  if (ie4)
  {
    document.all[id].innerHTML = parent.contentFRM.document.body.innerHTML;
  }  
  else if (nn6 || ie5)
  { 
    document.getElementById(id).innerHTML = window.frames['contentFRM'].document.getElementById('hcms_htmlbody').innerHTML;
  }
}

function hcms_reloadPage(init) 
{ //reloads the window if Nav4 resized
  if (init==true) with (navigator) 
  {
    if ((appName=="Netscape")&&(parseInt(appVersion)==4)) 
    {
      document.pgW=innerWidth; document.pgH=innerHeight; onresize=hcms_reloadPage; 
    }
  }
  else if (innerWidth!=document.pgW || innerHeight!=document.pgH) location.reload();
}
hcms_reloadPage(true);

function hcms_findObj(n, d) 
{ //v4.01
  var p,i,x;  
  
  if(!d) d=document; 
  
  if((p=n.indexOf("?"))>0&&parent.frames.length) 
  {
    d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);
  }
  
  if(!(x=d[n])&&d.all) x=d.all[n]; 
  for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
  for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=hcms_findObj(n,d.layers[i].document);
  if(!x && d.getElementById) x=d.getElementById(n); 
  return x;
}

function hcms_swapImgRestore()
{
  var i,x,a=document.sr;
  
  for(i=0;a&&i<a.length&&(x=a[i])&&x.oSrc;i++) x.src=x.oSrc;
}

function hcms_preloadImages()
{
  var d=document;

  if(d.images)
  {
    if(!d.p) d.p=new Array();
    var i,j=d.p.length,a=hcms_preloadImages.arguments;
    for(i=0; i<a.length; i++)
    if (a[i].indexOf("#")!=0){ d.p[j]=new Image; d.p[j++].src=a[i];}
  }
}

function hcms_swapImage()
{
  var i,j=0,x,a=hcms_swapImage.arguments;
  
  document.sr=new Array;
  for(i=0;i<(a.length-2);i+=3)
   if ((x=hcms_findObj(a[i]))!=null){document.sr[j++]=x; if(!x.oSrc) x.oSrc=x.src; x.src=a[i+2];}
}

function hcms_ButtonOver(Image) 
{
  if (Image.className != "ButtonOver") Image.className = "ButtonOver" ;
}

function hcms_ButtonOut(Image)	
{
  if (Image.className != "ButtonOut") Image.className = "ButtonOut" ;
}

function hcms_ButtonOutCtrl(Image)	
{
  if (Image.className != "ButtonOutCtrl") Image.className = "ButtonOutCtrl" ;
}

function hcms_ButtonOutHead(Image)	
{
  if (Image.className != "ButtonOutHead") Image.className = "ButtonOutHead" ;
}

function hcms_dragLayer(objName,x,hL,hT,hW,hH,toFront,dropBack,cU,cD,cL,cR,targL,targT,tol,dropJS,et,dragJS) 
{ //v4.01
  var i,j,aLayer,retVal,curDrag=null,curLeft,curTop,IE=document.all,NS4=document.layers;
  var NS6=(!IE&&document.getElementById), NS=(NS4||NS6); 
  
  if (!IE && !NS) return false;
  retVal = true; 
  if(IE && event) event.returnValue = true;
  if (hcms_dragLayer.arguments.length > 1) {
    curDrag = hcms_findObj(objName); if (!curDrag) return false;
    if (!document.allLayers) { document.allLayers = new Array();
      with (document) if (NS4) { for (i=0; i<layers.length; i++) allLayers[i]=layers[i];
        for (i=0; i<allLayers.length; i++) if (allLayers[i].document && allLayers[i].document.layers)
          with (allLayers[i].document) for (j=0; j<layers.length; j++) allLayers[allLayers.length]=layers[j];
      } else {
        if (NS6) { var spns = getElementsByTagName("span"); var all = getElementsByTagName("div"); 
          for (i=0;i<spns.length;i++) if (spns[i].style&&spns[i].style.position) allLayers[allLayers.length]=spns[i];}
        for (i=0;i<all.length;i++) if (all[i].style&&all[i].style.position) allLayers[allLayers.length]=all[i]; 
    } }
    curDrag.dragOk=true; curDrag.targL=targL; curDrag.targT=targT;
    curDrag.tol=Math.pow(tol,2); curDrag.hLeft=hL; curDrag.hTop=hT;
    curDrag.hWidth=hW; curDrag.hHeight=hH; curDrag.toFront=toFront;
    curDrag.dropBack=dropBack; curDrag.dropJS=dropJS;
    curDrag.everyTime=et; curDrag.dragJS=dragJS;
    curDrag.oldZ = (NS4)?curDrag.zIndex:curDrag.style.zIndex;
    curLeft= (NS4)?curDrag.left:(NS6)?parseInt(curDrag.style.left):curDrag.style.pixelLeft; 
    if (String(curLeft)=="NaN") curLeft=0; curDrag.startL = curLeft;
    curTop = (NS4)?curDrag.top:(NS6)?parseInt(curDrag.style.top):curDrag.style.pixelTop; 
    if (String(curTop)=="NaN") curTop=0; curDrag.startT = curTop;
    curDrag.bL=(cL<0)?null:curLeft-cL; curDrag.bT=(cU<0)?null:curTop-cU;
    curDrag.bR=(cR<0)?null:curLeft+cR; curDrag.bB=(cD<0)?null:curTop+cD;
    curDrag.LEFTRIGHT=0; curDrag.UPDOWN=0; curDrag.SNAPPED=false; //use in your JS!
    document.onmousedown = hcms_dragLayer; document.onmouseup = hcms_dragLayer;
    if (NS) document.captureEvents(Event.MOUSEDOWN|Event.MOUSEUP);
  } else {
    var theEvent = ((NS)?objName.type:event.type);
    if (theEvent == 'mousedown') {
      var mouseX = (NS)?objName.pageX : event.clientX + document.body.scrollLeft;
      var mouseY = (NS)?objName.pageY : event.clientY + document.body.scrollTop;
      var maxDragZ=null; document.maxZ = 0;
      for (i=0; i<document.allLayers.length; i++) { aLayer = document.allLayers[i];
        var aLayerZ = (NS4)?aLayer.zIndex:parseInt(aLayer.style.zIndex);
        if (aLayerZ > document.maxZ) document.maxZ = aLayerZ;
        var isVisible = (((NS4)?aLayer.visibility:aLayer.style.visibility).indexOf('hid') == -1);
        if (aLayer.dragOk != null && isVisible) with (aLayer) {
          var parentL=0; var parentT=0;
          if (NS6) { parentLayer = aLayer.parentNode;
            while (parentLayer != null && parentLayer.style.position) {             
              parentL += parseInt(parentLayer.offsetLeft); parentT += parseInt(parentLayer.offsetTop);
              parentLayer = parentLayer.parentNode;
          } } else if (IE) { parentLayer = aLayer.parentElement;       
            while (parentLayer != null && parentLayer.style.position) {
              parentL += parentLayer.offsetLeft; parentT += parentLayer.offsetTop;
              parentLayer = parentLayer.parentElement; } }
          var tmpX=mouseX-(((NS4)?pageX:((NS6)?parseInt(style.left):style.pixelLeft)+parentL)+hLeft);
          var tmpY=mouseY-(((NS4)?pageY:((NS6)?parseInt(style.top):style.pixelTop) +parentT)+hTop);
          if (String(tmpX)=="NaN") tmpX=0; if (String(tmpY)=="NaN") tmpY=0;
          var tmpW = hWidth;  if (tmpW <= 0) tmpW += ((NS4)?clip.width :offsetWidth);
          var tmpH = hHeight; if (tmpH <= 0) tmpH += ((NS4)?clip.height:offsetHeight);
          if ((0 <= tmpX && tmpX < tmpW && 0 <= tmpY && tmpY < tmpH) && (maxDragZ == null
              || maxDragZ <= aLayerZ)) { curDrag = aLayer; maxDragZ = aLayerZ; } } }
      if (curDrag) {
        document.onmousemove = hcms_dragLayer; if (NS4) document.captureEvents(Event.MOUSEMOVE);
        curLeft = (NS4)?curDrag.left:(NS6)?parseInt(curDrag.style.left):curDrag.style.pixelLeft;
        curTop = (NS4)?curDrag.top:(NS6)?parseInt(curDrag.style.top):curDrag.style.pixelTop;
        if (String(curLeft)=="NaN") curLeft=0; if (String(curTop)=="NaN") curTop=0;
        oldX = mouseX - curLeft; oldY = mouseY - curTop;
        document.curDrag = curDrag;  curDrag.SNAPPED=false;
        if(curDrag.toFront) {
          eval('curDrag.'+((NS4)?'':'style.')+'zIndex=document.maxZ+1');
          if (!curDrag.dropBack) document.maxZ++; }
        retVal = false; if(!NS4&&!NS6) event.returnValue = false;
    } } else if (theEvent == 'mousemove') {
      if (document.curDrag) with (document.curDrag) {
        var mouseX = (NS)?objName.pageX : event.clientX + document.body.scrollLeft;
        var mouseY = (NS)?objName.pageY : event.clientY + document.body.scrollTop;
        newLeft = mouseX-oldX; newTop  = mouseY-oldY;
        if (bL!=null) newLeft = Math.max(newLeft,bL);
        if (bR!=null) newLeft = Math.min(newLeft,bR);
        if (bT!=null) newTop  = Math.max(newTop ,bT);
        if (bB!=null) newTop  = Math.min(newTop ,bB);
        LEFTRIGHT = newLeft-startL; UPDOWN = newTop-startT;
        if (NS4) {left = newLeft; top = newTop;}
        else if (NS6){style.left = newLeft; style.top = newTop;}
        else {style.pixelLeft = newLeft; style.pixelTop = newTop;}
        if (dragJS) eval(dragJS);
        retVal = false; if(!NS) event.returnValue = false;
    } } else if (theEvent == 'mouseup') {
      document.onmousemove = null;
      if (NS) document.releaseEvents(Event.MOUSEMOVE);
      if (NS) document.captureEvents(Event.MOUSEDOWN); //for mac NS
      if (document.curDrag) with (document.curDrag) {
        if (typeof targL =='number' && typeof targT == 'number' &&
            (Math.pow(targL-((NS4)?left:(NS6)?parseInt(style.left):style.pixelLeft),2)+
             Math.pow(targT-((NS4)?top:(NS6)?parseInt(style.top):style.pixelTop),2))<=tol) {
          if (NS4) {left = targL; top = targT;}
          else if (NS6) {style.left = targL; style.top = targT;}
          else {style.pixelLeft = targL; style.pixelTop = targT;}
          SNAPPED = true; LEFTRIGHT = startL-targL; UPDOWN = startT-targT; }
        if (everyTime || SNAPPED) eval(dropJS);
        if(dropBack) {if (NS4) zIndex = oldZ; else style.zIndex = oldZ;}
        retVal = false; if(!NS) event.returnValue = false; }
      document.curDrag = null;
    }
    if (NS) document.routeEvent(objName);
  } return retVal;
}

function hcms_showHideLayers() 
{ //v6.0
  var i,p,v,obj,args=hcms_showHideLayers.arguments;
  for (i=0; i<(args.length-2); i+=3) if ((obj=hcms_findObj(args[i]))!=null) { v=args[i+2];
    if (obj.style) { obj=obj.style; v=(v=='show')?'visible':(v=='hide')?'hidden':v; }
    obj.visibility=v; }
}

function hcms_jumpMenu(targ,selObj,restore)
{
  eval(targ+".location='"+selObj.options[selObj.selectedIndex].value+"'");
  if (restore) selObj.selectedIndex=0;
}

function hcms_jumpMenuGo(selName,targ,restore)
{
  var selObj = hcms_findObj(selName); 
  if (selObj) hcms_jumpMenu(targ,selObj,restore);
}
//-->
