//\/////
//\  coolTip Crossframe Plugin
//\  This file requires coolTip 1.00 or later.
//\  Modified July 11, 2005
//\
//\  You may not remove or change this notice.
//\  Copyright Robert E Boughner 2005. All rights reserved.
//\  
//\  This plugin is governed by the same restrictions set forth
//\  in the prologue to cCore.js.
//\/////
//\  THIS IS A VERY MODIFIED VERSION. DO NOT EDIT OR PUBLISH. GET THE ORIGINAL!
if(typeof cInfo==cUdf||!cInfo.meets(1.00))alert('coolTip 1.00 or later is required for the Crossframe Support Plugin.');else{
registerCommands('frame');
function parseFrameExtras(pf,i,ar){var k=i,v;if(k<ar.length){if(ar[k]==FRAME){v=ar[++k];if(pf=='cd_')cd_frame=v;else opt_FRAME(v);return k;}}
return-1;}
function opt_FRAME(frm){var lyr;cFrame=frm;lyr=initLayerObject('ctDiv',false,frm);lyr.pop=cTip.pop;cTip=lyr;return 0;}
function frmDepth(thisFrame,ofrm){var retVal='';for(var i=0;i<thisFrame.length;i++){if(thisFrame[i].length>0){retVal=frmDepth(thisFrame[i],ofrm);if(retVal=='')continue;}
else if(thisFrame[i]!=ofrm)continue;retVal='['+i+']'+retVal;break;}
return retVal;}
function getFrmRef(srcFrm,tgetFrm){var rtnVal=''
if(tgetFrm!=srcFrm){var tFrm=frmDepth(top.frames,tgetFrm)
var sFrm=frmDepth(top.frames,srcFrm)
if(sFrm.length==tFrm.length){l=tFrm.lastIndexOf('[')
if(l){while(sFrm.substring(0,l)!=tFrm.substring(0,l))
l=tFrm.lastIndexOf('[',l-1)
tFrm=tFrm.substr(l)
sFrm=sFrm.substr(l)}}
var cnt=0,p='',str=tFrm
while((k=str.lastIndexOf('['))!=-1){cnt++
str=str.substring(0,k)}
for(var i=0;i<cnt;i++)p=p+'parent.'
rtnVal=p+'frames'+sFrm+'.'}
return rtnVal}
function chkForFrmRef(pf,args){if(cFrame!=cd_frame&&po)po.fnRef=getFrmRef(cd_frame,cFrame);return true;}
registerCmdLineFunction(parseFrameExtras);registerPostParseFunction(chkForFrmRef);}