/* All content copyright © 2003-2011 Tatler Software. */

var custom,loading,logUsr,queRun,toolEl,runTyp,resized;function init(con){if(win.ini)return;ini=loading=1;custom=getEl("hdrMsg");var typ=["Btn","Ovr","Dwn"];var btn,hdr,lyr,vis,pos,wid;for(i in allBtn){btn=getEl(i+"_Btn");for(var j=1;j<typ.length+1;j++){lyr=getEl(i+"_"+typ[j-1]);if(btn){vis=(j==1)?((con&&i!="mgrhelp")||win.tls&&tls[i]&&i!="logoff")?"hidden":"visible":"hidden";pos=(win.tls&&tls[i])?getXY(getEl("tlslnk_Btn")):(i=="logoff"&&!con)?getXY(getEl(i)):getXY(btn);wid=(getEl(i))?getEl(i).offsetWidth:(btn)?btn.offsetWidth:0;if(lyr&&(win.tls&&win.tls[i]||j>1))objProps(lyr,vis,pos.x,pos.y,wid);}}}with(document){onmouseover=btnEvent;onmousedown=btnEvent;onmouseout=btnEvent;onmouseup=btnEvent;body.ondragstart=function(e){return false};body.onselectstart=function(e){return false};}if(qlr){hdr=win.location.href;if(!qlr.page)chkPage(hdr);else if(con||qlr.page!="connect")btnDwn(qlr.page,2);qlr.hdrRdy=hdr.substring(hdr.lastIndexOf("qlr_")+4,hdr.lastIndexOf(".html"));}}function chkPage(hdr){if(qlr.page&&qlr.page!="browser")win.location.replace(qlr.location.href.substring(0,qlr.location.href.lastIndexOf("/"))+"/qlr_manager/"+qlr.btnSet);else setTimeout('chkPage("'+hdr+'")',100);}function hdrType(){var typ=(qlr.hdrRdy=="admin")?3:(qlr.hdrRdy=="macro")?2:1;return typ;}function setStatus(tgt){if(!loading){var frm,lnk,msg,servDB,hasSDB,notSDB,server,logBtn,logPos,msgSDB,conMsg;frm=(qlr&&qlr.frames[2]);lnk=custom&&"hdrFont"||"lnk";msg=custom&&"hdrFont"||"msg";servDB=(frm&&frm.servDB)?(frm.servDB.length>30)?frm.servDB.substr(0,30)+"*":frm.servDB:0;hasSDB=(servDB&&servDB!="!_nodb_!");notSDB=(!servDB&&servDB!="!_nodb_!");server=(frm&&frm.server&&unescape(frm.server));server=(server)?(server.length>25&&hasSDB)?server.substr(0,25)+"*":server:0;logBtn=getEl("logoff");logPos=(logBtn)?getXY(logBtn):0;if(!logUsr){hdrMsg(0,'<b class="'+msg+'">'+(qlr.getMsg("header0")||"Not connected")+'<\/b>',logPos);if(logPos)objProps(logBtn,"hidden",logPos.x,logPos.y);}else if(notSDB)hdrMsg(0,'<b class="'+msg+'">'+(qlr.getMsg("header1")||"Please select a database")+'<\/b>',logPos);else{msgSDB=(hasSDB)?'<b class="'+msg+'">'+servDB+'<\/b><font class="'+lnk+'">&nbsp;'+(qlr.getMsg("header2")||"on")+'&nbsp;<\/font>':'';conMsg=(hdrType()==3)?'<font class="'+lnk+'">'+(qlr.getMsg("header3")||"Connected as")+'&nbsp;<\/font><b class="'+msg+'">'+logUsr+'<\/b>':'<b class="'+msg+'">'+logUsr+'<\/b><font class="'+lnk+'">&nbsp;'+(qlr.getMsg("header4")||"connected to")+'&nbsp;<\/font>'+msgSDB+'<b class="'+msg+'">'+server+'<\/b>';if(tgt=="logoff")hdrMsg("",'<b class="'+msg+'">'+logoffMsg+'<\/b>',logPos);else{hdrMsg("",conMsg,logPos);if(logPos&&!custom)objProps(logBtn,"visible",logPos.x,logPos.y,0,0,100,Opr,Opr);}}if(toolEl&&hdrType())objProps(getEl(toolEl+"_Btn"),"hidden");if(queRun&&hdrType()){toolEl=(hdrType()==1)?(qlr.curPge=="report")?(queRun==1)?"outtools":"rpttools":(queRun==1)?"coutput":"creport":(hdrType()==2&&qlr.curPge=="preview"&&queRun)?"pretools":"cpreview";objProps(getEl(toolEl+"_Btn"),"visible");}}}function toolsWin(cls,src){var frm,sub,php,sep,ses,str,tls,lnk,wid;tls=qlr.toolswin;if(!src&&tls&&!tls.closed&&tls.open)return false;qlr.tlsNam=null;frm=qlr&&qlr.frames[2];sub=frm&&frm.document.sub1Form;wid=qlr.getMsg("toolsWid")||340;if(sub){lnk=sub.isLink&&sub.isLink.value;lnk=lnk&&"isLink="+lnk||"";php=sub.idName&&sub.idName.value||"";ses=php&&sub.elements[php]&&sub.elements[php].value||"";}sep=nls&&"&"||"?";str=(nls&&"?language="+nls||"")+(php&&ses&&sep+"idName="+php+"&"+php+"="+ses+(lnk&&"&"+lnk)||lnk&&sep+lnk||"");if(queRun){if(hdrType()==1){if(queRun==1)qlr.openWin('toolswin','Tools',qlr.getMsg("outtools")||'Output Tools','qlr_manager/out_tools.html'+str,wid,198,1,0,0,0,0,0,0,0,0,1);else if(queRun==2)qlr.openWin('toolswin','Tools',qlr.getMsg("rpttools")||'Report Tools','qlr_manager/rpt_tools.html'+str,wid,316,1,0,0,0,0,0,0,0,0,1);}else qlr.openWin('toolswin','Tools',qlr.getMsg("pretools")||'Preview Tools','qlr_manager/pre_tools.html'+str,wid,256,1,0,0,0,0,0,0,0,0,1);runTyp=queRun;}return false;}function hdrMsg(err,msg,pos){var lyr=getEl("logMsg");var htm='<table border="0" cellspacing="0" cellpadding="0" height="31"><tr><td nowrap>'+msg+'<\/td><\/tr><\/table>';var con=(qlr.btnSet=="qlr_logon.html"||qlr.btnSet=="qlr_logon_custom.html");if(msg){if(custom)custom.innerHTML=msg;else if(lyr){var wid=(pos)?pos.x-205:404;objProps(lyr,"visible",205,3,wid);lyr.innerHTML=htm;if(!con)lyr.style.clip='rect(auto '+(wid-5)+'px auto auto)';}}else if(err){var x=(pos);qlr.showMsg(err,1,x,5);return false;}return true;}function getXY(obj,img){if(!obj&&!img)return false;var xy={x:0,y:0,x2:0,y2:0};var el=obj;img=(img&&document.images[img]);while(el){xy.x+=el.offsetLeft;xy.y+=el.offsetTop;el=el.offsetParent;}xy.x2=xy.x+obj.offsetWidth;xy.y2=xy.y+obj.offsetHeight;return xy;}function getID(el){if(!el)return;var nde=(el.parentLayer)?"el.parentLayer":(el.parentNode)?"el.parentNode":(el.parentElement)?"el.parentElement":null;while(el){if(el.id&&el.id.indexOf("_js")==-1)return el.id;el=eval(nde);}return false;}function objProps(el,v,x,y,w,h,z,m,r){var msk,arg,set;msk=(Opr&&(m||v=="hidden"))?getEl("msk"):0;arg=objProps.arguments;set=["visibility","left","top","width","height","zIndex"];if(el)for(var i=1;i<arg.length;i++){if(!r)el.style[set[i-1]]=(arg[i]&&i>1&&i<6)?arg[i]+"px":arg[i];if(msk&&m!="mgrhelp"){msk.style[set[i-1]]=(arg[i]&&i>1&&i<6)?arg[i]+"px":arg[i];msk.style.zIndex=500;}}}function sameObj(e,pos){var x=(e&&(e.pageX||e.clientX));var y=(e&&(e.pageY||e.clientY));if(x>pos.x&&x<pos.x2&&y>pos.y&&y<pos.y2)return true;return false;}function winStat(txt){if(win.tmr)clearTimeout(tmr);if(txt)win.status=txt;else tmr=setTimeout('win.status=""',100);return true;}function btnEvent(e){var frm,exp,src,evt,id,hlp,lnk,nam,tgt,btn,ovr,log,pos;if(!qlr.hdrRdy)return;e=(e||win.event);evt=(e&&e.type);src=(e&&(e.target||e.srcElement));id=(src&&getID(src));nam=(id)?id.replace(/_Btn/,"").replace(/_Ovr/,"").replace(/_Dwn/,""):0;hlp=(id=="mgrhelp"||nam=="mgrhelp");lnk=(src&&src.href&&src.href=="http://www.qlrmanager.com"||id=="logo");frm=(qlr&&qlr.frames[2]);exp=(frm&&win.expired&&expired(frm));ctl=(qlr.page&&qlr.page.indexOf("vars")!=-1);if(!hlp&&!lnk&&(nam==qlr.curPge||loading||(exp&&nam!="connect"))){if(src&&src.style)src.style.cursor="default";return true;}btn=(nam&&nam!="tlslnk")?getEl(nam+"_Btn"):0;if(evt=="mouseover"&&btn){log=(id=="logoff"||nam=="logoff")?"logoff":0;pos=(log)?getXY(getEl(log)):getXY(btn);if(Opr)objProps(btn,"visible",pos.x,pos.y,btn.offsetWidth,btn.offsetHeight,100,nam,1);if(src&&nam)tgt=btnOvr(src,nam);if((!win.EL||win.EL&&EL.nam!=nam)&&nam!="tlslnk"){ovr=getEl(nam+"_Ovr");if(win.EL)objProps(EL.ovr,"hidden");if(ovr&&tgt)objProps(ovr,"visible",pos.x,pos.y,btn.offsetWidth,btn.offsetHeight,100,nam);if(log)setStatus(log);EL={btn:btn,nam:nam,ovr:ovr,pos:pos,tls:custom&&win.tls&&tls[nam]&&btn};if(EL.tls)btn.style.visibility="hidden";}}else if(win.EL){if(evt=="mousedown"){if(frm.QLR&&EL.nam!="report"&&EL.nam!="preview")frm.QLR.abort=1;if(EL.nam=="mgrhelp")return true;else if(EL.nam){dwnBtn=id;return false;}}else if(evt=="mouseup"){if(EL.nam.indexOf("tools")!=-1)return toolsWin(0,1);else if(hlp)return true;else if(id==win.dwnBtn&&btnDwn(EL.nam)){EL.dwn=getEl(EL.nam+"_Dwn");if(EL.ovr)objProps(EL.ovr,"hidden");if(EL.dwn)objProps(EL.dwn,"visible",EL.pos.x,EL.pos.y,EL.dwn.offsetWidth,EL.dwn.offsetHeight,200,EL.nam);}}else if(!sameObj(e,EL.pos)){winStat();objProps(EL.ovr,"hidden");if(EL.tls)objProps(EL.tls,"visible");if(EL.nam=="logoff")setStatus();EL=dwnBtn=null;}}return true;}function clearMsg(){if(qlr.showMsg)qlr.showMsg('clr')}function resize(){if(win.delay)clearTimeout(delay);if(win.innerWidth&&Opr){var w=win.innerWidth;if(wnW&&w&&wnW!=w)delay=setTimeout("win.history.go(0)",100);}else delay=setTimeout("btnDwn(qlr.curPge,0,1)",100);return false;}if(DOM)expired=new Function("frm","var exp;try{exp=(frm&&!frm.servDir)}catch(e){};if(exp)return true;return false;");
