var isMSIE=0;

if (navigator.userAgent.indexOf("MSIE") != -1)
   { isMSIE = 1; }
else
   { isMSIE = 0; }


function GE(N,A1,A2,D1,D2,SB)

{
var a=A1+A2+'@'+D1+D2;
//if (N!="")
//   a = N+" <"+a+">";
a = "mailto:"+a;

var s="";
if (SB!="")
   s = "?subject="+SB;
window.location.href=a+s;
}


var HI;

function RH()

{
HI=new Image();
//HI.src="http://dolson1/scripts/wpisa.dll/mdra/rh?ref="+document.referrer;
HI.src="http://www.mdra-archive.org/apps/wpisa.dll/MDRA/rh?ref="+document.referrer;
}





function ieTrueTop(AnElement)

{
var y=0;
while (AnElement)
   {
   y += AnElement.offsetTop;
   AnElement = AnElement.offsetParent;
   }
return y;
}

function ieTrueLeft(AnElement)

{
var x=0;
while (AnElement)
   {
   x += AnElement.offsetLeft;
   AnElement = AnElement.offsetParent;
   }
return x;
}



var OpenDIVname;
var OpenIMGname;
var UseAutoClose=false;

function AutoClose()

{
if (!UseAutoClose) return;

if (OpenDIVname) RemoveImage(OpenDIVname,OpenIMGname);
}

function PlaceImage(DIVname,IMGname)

{
var ImageDIV;
var ImageAnchor;
var HideCombos;

AutoClose();

OpenDIVname = DIVname;
OpenIMGname = IMGname;

if (isMSIE)
   {
   ImageDIV            = document.all[DIVname];
   ImageAnchor         = document.all[IMGname];
   if (!ImageAnchor)
      {
      alert(IMGname+" not found.");
      return;
      }
   else if (ImageDIV)
      {
      ImageDIV.style.top  = ieTrueTop(ImageAnchor);
      ImageDIV.style.left = ieTrueLeft(ImageAnchor);
      ImageDIV.style.visibility = "visible";
      }
   else
      {
      alert(DIVname+" not found.");
      return;
      }
   }
else
   {
   ImageDIV   = document.getElementById(DIVname);
   ImageDIV.style.top  = document.getElementById(IMGname).y;
   ImageDIV.style.left = document.getElementById(IMGname).x;
   ImageDIV.style.visibility = "visible";
   }
}

function RemoveImage(DIVname,IMGname)

{
var ImageDIV;

if (isMSIE)
   {
   ImageDIV = document.all[DIVname];
   if (ImageDIV)
      ImageDIV.style.visibility = "hidden";
   }
else
   {
   ImageDIV   = document.getElementById(DIVname);
   if (ImageDIV)
      ImageDIV.style.visibility = "hidden";
   }
}