/* ****************************************************************** */
/* COPYRIGHT NOTICE                                                   */
/* This script is the property of guyslink.com                        */
/* It may be copied in whole or in part, free of charge, for use      */
/* on any other web site, provided that -                             */
/*   (a) This copyright notice is left intact at the beginning of     */
/*       every script file containing any or all of the script code   */
/*       copied from this file, AND,                                  */
/*   (b) Any web site using such a script file displays a banner link */
/*       to the guyslink.com web site, in the manner described on the */
/*       guyslink.com site, in the Information/Links section.         */
/* ****************************************************************** */

var popupfail=0;
function popuperror(msg,url,lno)
    {
    popupfail=1;
    return true;
    }
function popup(link,tgt)
    {
    /* open profile/pager popup */
    popupfail=0;
    window.onerror=popuperror
    profWindow=window.open(link.href,tgt,'height=400,width=800,screenX=20,screenY=50,menubar=no,personalbar=no,resizable=yes,scrollbars=yes,toolbar=no');
    window.onerror=null;
    if ( (popupfail==1) || (profWindow==null) )
        {
        link.target=tgt;  
        return true;
        }
    return false;
    }
function popup2(link,tgt)
    {
    /* open profile/pager popup */
    popupfail=0;
    window.onerror=popuperror
    profWindow=window.open(link.href,tgt,'height=400,width=800,screenX=20,screenY=100,menubar=yes,personalbar=yes,resizable=yes,scrollbars=yes,toolbar=yes');
    window.onerror=null;
    if ( (popupfail==1) || (profWindow==null) )
        {
        link.target=tgt;
        return true;
        }
    return false;
    }
function popupmap(link,tgt)
    {
    /* open map popup */
    popupfail=0;
    window.onerror=popuperror
    profWindow=window.open(link.href,tgt,'height=820,width=800,screenX=20,screenY=1,location=yes,menubar=yes,personalbar=yes,resizable=yes,scrollbars=yes,toolbar=yes');
    window.onerror=null;
    if ( (popupfail==1) || (profWindow==null) )
        {
        link.target=tgt;
        return true;
        }
    return false;
    }
function showdist(loc,dist)
    {
    /* show distance in status bar */
    window.status=loc+' is '+dist+' from your location';
    return true;
    }

/* Function called by navequalize (below) to equalize size of buttons within a single navigation set */
function navequalizeset(odiv)
    {
    var cdiv=document.getElementById&&!document.all? odiv.getElementsByTagName('*'):odiv.all
    var maxwidth=0;
    var maxheight=0;
    for (var cdividx=0; cdividx<cdiv.length; cdividx++)
        {
        if ( (cdiv[cdividx].className=="NavigationButton") || (cdiv[cdividx].className=="NavigationSelButton") )
            {
            var ospan=cdiv[cdividx]
            ospan.style.width='auto'
            ospan.style.height='auto'
            if (ospan.offsetWidth>maxwidth)
                 maxwidth=ospan.offsetWidth
            if (ospan.offsetHeight>maxheight)
                 maxheight=ospan.offsetHeight
            }
        }
    maxwidth+=1
    for (var cdividx=0; cdividx<cdiv.length; cdividx++)
        {
        if ( (cdiv[cdividx].className=="NavigationButton") || (cdiv[cdividx].className=="NavigationSelButton") )
            {
            var ospan=cdiv[cdividx]
            ospan.style.width=maxwidth+"px"
            ospan.style.height=maxheight+"px"
            ospan.style.display="inline"
            /*opera.postError('Item Width '+cdividx+' = '+ospan.style.width)*/
            }
        if (cdiv[cdividx].className=="NavigationBlock") 
            {
            var ospan=cdiv[cdividx]
            newwidth=ospan.offsetWidth+1
            ospan.style.width=newwidth+"px"
            }
        }
    }

/* Function called to equalize size of buttons within each navigation set */
function navequalize()
    {
    if ( (navigator.userAgent.indexOf("Opera") >= 0) && (document.getElementById) )
        {
        var celement=document.getElementById&&!document.all? document.getElementsByTagName("*"):document.all
        for (var celementidx=0; celementidx<celement.length; celementidx++)
            {
            if  (celement[celementidx].className=="NavigationSet")
                {
                var odiv=celement[celementidx];
                navequalizeset(odiv);
                }
            }
        resizeiframes() 
        }
    }

/* onResize event function to resize iframes (see resizereload function below) */
function resizeiframes()
    {
    if ( (navigator.userAgent.indexOf("Opera") >= 0) && (document.getElementById) )
        {
        /* For Opera7, resizing of iframes can be forced by twidling with the marginHeight (note: onresize does not work in Opera 6, so this function will never be executed)*/
        var obody=document.body
        var odiv=document.getElementById&&!document.all? document.getElementsById("ContentFrameDiv"):document.all["ContentFrameDiv"];
        var ofrm=document.getElementById&&!document.all? document.getElementsById("ContentFrame"):document.all["ContentFrame"];
        var otop=document.getElementById&&!document.all? document.getElementsById("DocSectionTop"):document.all["DocSectionTop"];
        if (obody) 
            {
            var availheight=obody.clientHeight;
            if (otop)
                 {
                 otop.style.height='1%';
                 otop.style.height=otop.scrollHeight+"px"
                 availheight-=otop.offsetHeight;
                 }
            if (ofrm)
                 ofrm.style.height=availheight+"px"
            if (odiv)
                 odiv.style.height=availheight+"px"
            }
        /* var cfrm=document.getElementsByTagName("iframe")
        for (var cfrmidx=0; cfrmidx<cfrm.length; cfrmidx++)
            {
            var ofrm=cfrm[cfrmidx];
            var savemh=ofrm.marginHeight;
            ofrm.marginHeight=savemh+3;
            ofrm.marginHeight=savemh;
            } */
        }
    else
        {
        /* For Netscape and maybe others, seemingly the only option is to reload the page */
        location.reload();
        }
    }
/* Function called by <BODY ONLOAD> for windows containing IFRAMES            */
/* (which Netscape/Opera doesn't resize automatically when window is resized  */
function resizereload()
    {
    if (navigator.userAgent.indexOf("MSIE") >= 0 && navigator.userAgent.indexOf("Opera") < 0)
        return; /*action not required for IE, but needed for Netscape and Opera */
    window.onresize=resizeiframes;
    if (navigator.userAgent.indexOf("Opera") >= 0)
        setTimeout(resizeiframes,500);
    }
/* Function to navigate to child frame of specified name, even when name is that of a DOM property */
function childframe(oframe,childname)
    {
    if (!oframe)
        return null;
    cframe=oframe.frames;
    for (var cframeidx=0; cframeidx<cframe.length; cframeidx++)
        {
        var ochild=cframe[cframeidx];
        if (ochild.name==childname)
            return ochild;
        }
    return null;
    }
/* Function to reload statusl frame */
function reloadstatusl()
    {
    ostatus=childframe(childframe(top,'screen'),'statusl');
    if (ostatus)
         ostatus.location.reload(true);
    }
/* Function to reload statusr frame */
function reloadstatusr()
    {
    ostatus=childframe(childframe(top,'screen'),'status');
    if (ostatus)
         ostatus.location.reload(true);
    }
/* Function to set focus on element with specified ID' */
function setfocus(fieldid)
    {
    if (document.getElementById)
        {
        var target=document.getElementById(fieldid)
        if (target)
            target.focus();
        }
    }
/* Function to resize scrollable content div and set/clear overflow:auto as required */
function resizescrollable()
    {
    window.onresize=resizescrollable
    var obody=document.body
    var odiv=document.getElementById&&!document.all? document.getElementById("ScrollableContent"):document.all['ScrollableContent']
    if ( (obody) && (odiv) && (odiv.style) && (obody.style) )
        {
        if (odiv.style.overflow=="auto") 
            { /*if div is scrolling, can only get fullpageheight from obody.scrollHeight by removing div scrolling and retrying after repainted*/
            odiv.style.height="auto";
            odiv.style.width="auto";
            odiv.style.overflow="visible";
            setTimeout(resizescrollable,100)
            return
            }
        /*alert(' obody.offsetTop='+obody.offsetTop+' obody.clientTop='+obody.clientTop+' obody.offsetHeight='+obody.offsetHeight+'obody.clientHeight='+obody.clientHeight+'obody.scrollHeight='+obody.scrollHeight+' odiv.offsetTop='+odiv.offsetTop+' odiv.clientTop='+odiv.clientTop+' odiv.offsetHeight='+odiv.offsetHeight+' odiv.clientHeight='+odiv.clientHeight+' odiv.scrollHeight='+odiv.scrollHeight)*/
        var minpageheight=obody.scrollHeight-odiv.offsetHeight+40
        if ( (obody.clientHeight<obody.scrollHeight) && (obody.clientHeight>minpageheight) )
            { /*we need div the scroll */
            var requireddivheight=odiv.offsetHeight-(obody.scrollHeight-obody.clientHeight)-15
            var requireddivwidth=odiv.offsetWidth-(obody.scrollWidth-obody.clientWidth)-15
            odiv.style.height=String(requireddivheight)+"px"
            if (navigator.userAgent.indexOf("Opera") < 0)
                odiv.style.width=String(requireddivwidth)+"px"
            odiv.style.overflow="auto";
            obody.style.overflow="hidden"
            }
        else
            { /*don't want div to scroll */
            obody.style.overflow="auto"
            }
        }                   
    }
/* Special functions to get around Opera 7 nested frames bug */
function iframelink(link)
    {
    if (navigator.userAgent.indexOf("Opera") < 0)
        return true /*action not required except for Opera */
    target=link.target
    if (!parent[target])
        return true
    parent[target].location.href=link.href
    return false
    }
function iframesubmit(obutton)
    {
    if (navigator.userAgent.indexOf("Opera") < 0)
        return true /*action not required except for Opera */
    oform=obutton.form
    target=oform.target
    if (!parent[target])
        return true
    link=oform.action
    firstparm=true
    celement=oform.elements
    for (var celementidx=0; celementidx<celement.length; celementidx++)
        {
        oelement=celement[celementidx]
        if ( (oelement.name!='')  &&
             ( (oelement.type=="text") ||
               (oelement.type=="hidden") ||
               (oelement.type=="password") ||
               ( (oelement.type=="submit") &&
                 (oelement==obutton) ) || 
               ( (oelement.type=="radio") &&
                 (oelement.checked) ) || 
               ( (oelement.type=="checkbox") &&
                 (oelement.checked) ) 
             )
           )
            {
            if (firstparm)
                link=link+'?'+oelement.name+'='+escape(oelement.value)
            else
                link=link+'&amp;'+oelement.name+'='+escape(oelement.value)
            firstparm=false
            }
        if ( (oelement.type=="select-one") ||
             (oelement.type=="select-multiple") )
            {
            coption=oelement.options
            for (var coptionidx=0; coptionidx<coptions.length; coptionidx++)
                {
                ooption=coption[coptionidx]
                if (ooption.selected)
                    {
                    if (firstparm)
                       link=link+'?'+oelement.name+'='+escape(ooption.value)
                    else
                       link=link+'&amp;'+oelement.name+'='+escape(ooption.value)
                    firstparm=false
                    }
                }
            }
        }
    parent[target].location.href=link
    return false
    }
/* Insert chars into textarea */
function TextareaInsert(FormName,FieldName,DataToInsert) 
    {
    oform=document.forms[FormName]
    if (oform)
        {
        ofield=oform.elements[FieldName]
        if (ofield)
            {
            //IE support
            if (document.selection)
                {
                ofield.focus();
                sel = document.selection.createRange();
                sel.text = DataToInsert;
                }
            //MOZILLA support
            else if (ofield.selectionStart || ofield.selectionStart == '0')
                {
                var startPos = ofield.selectionStart;
                var endPos = ofield.selectionEnd;
                ofield.value = ofield.value.substring(0, startPos)
                              + DataToInsert
                              + ofield.value.substring(endPos, ofield.value.length);
                }
            else
                ofield.value += DataToInsert;
            }
        }
    }
/* Resize thumbnails */
function tnupdate(imageid,ximage)
{
    if (!ximage.complete)
        {
        setTimeout(tnupdate(imageid,ximage),100);
        return;
        }
    if (ximage.height>ximage.width)
        document.images[imageid].width=document.images[imageid].height*ximage.width/ximage.height;
    else if (ximage.height<ximage.width)
        document.images[imageid].height=document.images[imageid].width*ximage.height/ximage.width;
}
function tnresize()
{
    if (document.images)
        {
        var ximage=new Array();
        for (var i=1;1==1;i++)
            {
            var imageid="TNIMG"+i;
            oimage=document.images[imageid];
            if (!oimage) break;
            ximage[i]=new Image;
            ximage[i].src=oimage.src;
            tnupdate(imageid,ximage[i]);
            }
        }
}