<!--

function onLoaded(){
setPageId()
//setDateModified()
setPageTitle()
setCrumbs()
}

function getPageId(){return getObj("pid").innerHTML}

function setPageId(){
var fnm=document.URL.toString()
getObj("pid").innerHTML=fnm.substring(fnm.lastIndexOf("/")+1,fnm.lastIndexOf("."))
}

function setDateModified(){
var mth=["Jan","Feb","Mar","Apr","May","Jun","Jul","Aug","Sep","Oct","Nov","Dec"]
var src=document.lastModified.split(" ")
var dtm=src[0].split("/")
if(dtm[2])src=dtm[1]+mth[dtm[0]-1]+dtm[2].substr(3,1)
else src=src[2].substring(0,src[2].length-1)+src[1].substring(0,3)+src[3].charAt(3)
getObj("changed").innerHTML=src
}

function setPageTitle(){
var src
var obj=getObj("pagetitle")
if(obj)src=obj.innerHTML
if(!src)src=""
else document.title=src
getObj("ph").innerHTML=src
}

function setCrumbs(){
var sav,len,tok,viz,lnk,spl,phr,nxt,tmp,my
var raquo="<span style='font:bold;color:black'>&raquo;</span>"
var me=getObj("pid").innerHTML
var obj=getObj("shorttitle")
if(obj&&obj.innerHTML!="")my=obj.innerHTML
else{
obj=getObj("pagetitle")
if(obj)my=obj.innerHTML
}
if(!my)my="<unknown>"
var mo=document.URL.toString()
sav=getCookie("OR")
if(!sav)sav=""
sav=sav.split("$")
len=sav.length
tok=new Array(len)
viz=new Array(len)
lnk=new Array(len)
for(var i=0;i<len-1;i++){
spl=sav[i].split("#")
tok[i]=spl[0]
viz[i]=spl[1]
lnk[i]=spl[2]
if(tok[i]==me)len=i+1
}
tok[len-1]=me
viz[len-1]=my
lnk[len-1]=mo
phr=""
nxt=""
if(len>1){
for(var i=0;i<len-1;i++){
phr=phr+makeAnchor(viz[i],lnk[i])+raquo
nxt=nxt+tok[i]+"#"+viz[i]+"#"+lnk[i]+"$"
}
}
else{
if(me!="H001"){
tmp="../hom/H001.php"
phr=makeAnchor("Home Page",tmp)+raquo
nxt="H001"+"#"+"Home Page"+"#"+tmp+"$"
}
}
phr=phr+"<span id=\"thisPage\">"+my+"</span>"
getObj("cr").innerHTML=phr
nxt=nxt+tok[len-1]+"#"+viz[len-1]+"#"+lnk[len-1]+"$"
setCookie("OR",nxt)
}

function makeAnchor(txt,ptr){
  return "<a href=\""+ptr+"\">"+txt+"</a>"
}

function setColor(ele,clr){if(ele)ele.style.color = clr}

function getObj(id){
  if(document.all)return document.all[id]
  else return document.getElementById(id)
}

function intlDate(dt){
  if(!dt)return"10661120"
  var d=dt.split("/")
  return d[2]+d[0]+d[1]
}

function getNiceDate(intlDate,shortDate){
  var mth=["January","February","March","April","May","June","July","August",
           "September","October","November","December"]
  var y=intlDate.substring(0,4)
  var m=mth[intlDate.substring(4,6)-1]
  var d=intlDate.substring(6)
  if(shortDate) return d+m.substring(0,3)+y.charAt(3)
  if(d.charAt(0)=="0")d=d.substring(1)
  return d+" "+m+" "+y
}


function sb(stxt) {
  window.status = stxt;
}

function setCookie(name,value,days){
  if(days){
    var date=new Date()
    date.setTime(date.getTime()+(days*24*60*60*1000))
    var expires=";expires="+date.toGMTString()
  }
  else expires=""
  document.cookie=name+"="+escape(value)+expires+";path=/"
}

function getCookie(name){
  var nameEQ=name+"="
  var ca=document.cookie.split(';')
  for(var i=0;i<ca.length;i++){
    var c=ca[i]
    while(c.charAt(0)==' ')c=c.substring(1,c.length)
    if (c.indexOf(nameEQ)==0)return unescape(c.substring(nameEQ.length,c.length))
  }
  return null
}


//-->


