var Core=null;var T24SID='';var denyPG=true;window.addEventListener('beforeunload',beforeUnloadAction,false);function beforeUnloadAction(ev) {if(denyPG){var msg='ATTENTION: Do not use the browser\'s buttons for navigation- use the application controls instead !!!';if(ev)ev.returnValue=msg;return msg;}
}
function $A(o) {if (!o) return [];if (o.toArray) return o.toArray();for (var r=[], i=0, l=o.length; i<l; i++)
r.push(o[i]);return r;}
Function.prototype.bind = function() {var me=this, args=$A(arguments), o=args.shift();return function() {return me.apply(o, args.concat($A(arguments)));};};function isArray(obj){return((obj)&&(typeof(obj)=='object')&&(typeof(obj.length)!="undefined")&&(typeof(obj)!='string'));}
function clone(t) {if(typeof(t)=='object'){if(isArray(t)){var o=new Array();for(var p=0;p<t.length;p++)o.push(clone(t[p]));} else {var o=new Object();for(var p in t)o[p]=clone(t[p]);}
return(o);}
return(t);}
function bsearch(a,y,compare,nearest) {function _find(x1,x2) {var dx=x2-x1;if(dx==0) return (nearest||(compare(y,a[x1])==0))?x1:-1;if(dx==1) {var c1=compare(y,a[x1]);if(c1==0)return x1;var c2=compare(y,a[x2]);if(c2==0)return x2;if(!nearest)return -1;return (-c2>c1)?x1:x2;}
var n=Math.floor(dx/2)+x1;var c1=compare(y,a[n]);if(c1==0)return(n);else if(c1<0)return _find(x1,n-1);else return _find(n+1,x2);}
if(a.length==0)return -1;var c=compare(y,a[0]);if(c==0)return 0;if((c<0)||(a.length==1))return nearest?0:-1;var c=compare(y,a[a.length-1]);if(c>0)return nearest?(a.length-1):-1;if(c==0)return (a.length-1);return _find(0,a.length-1);}
function $TXT(txt) {var r;if (txt=='') {r=$DIV();r.innerHTML='&nbsp;';} else r=document.createTextNode(txt);return(r);}
function $HTML(html,styles) {var r=$DIV(styles);r.innerHTML=(html=='')?'&nbsp;':html;return(r);}
function $IMG(url,styles) {var r=document.createElement('img');r.src=url;setStyle(r,styles);return(r);}
function $DIV(styles) {var div=document.createElement('div');setStyle(div,styles);return(div);}
function setStyle(r,styles) {if (typeof(styles)=='object')
for (var s in styles) {if('id|title|onload|onmousedown|onclick|ondblclick|onmouseover|onmouseout'.indexOf(s)>-1) r[s]=styles[s];else
switch(s) {case 'css':r.className=styles[s]; break;case 'link':r.onclick=styles[s]; break;case 'html':r.innerHTML=styles[s]; break;/*jsl:ignore*/
default: try {r.style[s]=styles[s];} catch (e) {};/*jsl:end*/
}
}
return(r);}
function round(x, n) {if (n < 1 || n > 14) return false;var e = Math.pow(10, n);var k = (Math.round(x * e) / e).toString();if (k.indexOf('.') == -1) k += '.';k += e.toString().substring(1);return k.substring(0, k.indexOf('.') + n + 1);}
function login() {function loginAnswer() {this.Response=function(resp) {if ((resp.result!=null)&&(resp.sid!=null)&&(resp.result==0)) {T24SID = resp.sid;loadPage('$');}
else { Core.alert('Refused to log in'); }
};}
var f=document.forms[0];Core.lock('Authenticating');var loc='';if(typeof(geoip_country_code)=='function'){loc='{ccode:"'+geoip_country_code();loc+='",cname:"'+geoip_country_name();loc+='",city:"'+geoip_city();loc+='",lat:"'+geoip_latitude();loc+='",lon:"'+geoip_longitude();loc+='"}';loc='&loc='+encodeURIComponent(loc);}
Core.Request('/tom24x/login','cust=' + encodeURIComponent(f.elements['CUST'].value) + '&usr=' + encodeURIComponent(f.elements['USR'].value) + '&pwd=' + encodeURIComponent(f.elements['PWD'].value)+loc,new loginAnswer());}
function logoff() {function logoffAnswer(httpReq) {this.Response=function(resp) {if ((resp.result!=null)&&(resp.result==0))loadPage('');else { Core.alert('Refused'); }
};}
Core.lock('Loading Page');Core.Request('/tom24x/login','sid='+T24SID,new logoffAnswer());return false;}
function finish() {function closeAnswer() {this.Response=function(resp) {if ((resp.result!=null)&&(resp.result==1))loadPage('$');else { Core.alert('Refused'); }
};}
if (Core.mo) {Core.lock('Loading Page');Core.Request('/tom24x/open','sid='+T24SID,new closeAnswer());}
return false;}
function loadPage(page,proc) {denyPG=false;function createI(n,v) {var c=document.createElement('input');c.type="hidden";c.name=n;c.value=v;return c;}
Core.lock('Loading Page');var aform=document.createElement('form');aform.action="/tom24x/";aform.method="post";document.getElementById('CentralPanel').appendChild(aform);aform.appendChild(createI('p',page));if(proc)aform.appendChild(createI('proc',proc));aform.appendChild(createI('sid',T24SID));aform.submit();return false;}
function analyse (opts) {function analyse_finish() {this.Response=function(resp) {};}
var msg="Are you sure you want to run the analysis?<BR><UL>";opts=new String(opts);if (opts.indexOf('HardBeatAnalysis')!=-1) msg=msg+'<LI>Beat Analysis (discard changes)</LI>';if (opts.indexOf('DoBeatAnalysis')!=-1) msg=msg+'<LI>Beat Analysis</LI>';if (opts.indexOf('Beat')!=-1) msg=msg+'<LI>Arrhythmia Analysis</LI>';msg=msg+'</UL>';Core.confirm(msg,Core.Request.bind(Core,"/tom24x/analyse","a="+opts+"&sid="+T24SID,new analyse_finish()));}
function activateAnalysis (opts,txt) {function activate_finish(httpRequest) {this.Response=function(resp) {loadPage('#');};}
var msg="Are you sure you want to activate the selected tool?<BR><UL><LI>"+txt+"</LI></UL>";Core.confirm(msg,Core.Request.bind(Core,"/tom24x/db","action=activate&t="+opts+"&sid="+T24SID,new activate_finish()));}
function TWorkflow(id) {var me=this;var ani=new TAnimation();var _div=document.getElementById(id);var selp=null;var pClosed=true;var pCnt=0;var mv=0;var bc=[];var mr=$DIV({css:'returnL'}),ml=$DIV({css:'endL'});var procs=$DIV({css:'procs'});var pclip=$DIV({css:'clipP'});var pbut=$DIV({css:'butP'});pclip.appendChild(pbut);procs.appendChild(pclip);procs.appendChild(ml);_div.appendChild(procs);_div.appendChild(mr);var ret=$DIV({css:'return'});var retBut=$DIV({css:'toolRET'});ret.appendChild(retBut);_div.appendChild(ret);function _mv(){var o=bc[selp];if((mv==0)||(o.r2<=o.r1))return;o.r0=o.r0+mv;if (o.r0>0) {o.r0=0;mv=0;}
if (o.r0+o.r2<o.r1) {o.r0=o.r1-o.r2;mv=0;}
o.div.style.left=o.r0+16;if (mv!=0)window.setTimeout(_mv,50);}
var clip=$DIV({css:'clipWF'});ml.onmouseover=function(){mv=10;window.setTimeout(_mv,50);};ml.onmouseout=function(){mv=0;};mr.onmouseover=function(){mv=-10;window.setTimeout(_mv,50);};mr.onmouseout=function(){mv=0;};_div.appendChild(clip);this.registerProcedure=function(i,text,title,image) {bc[i]={div:$DIV({css:'buttonsWF',visibility:'hidden'}),r1:640,r2:0,r0:0,r3:0,but:$DIV({css:'procWF'})
};bc[i].cnt=pCnt;pCnt++;bc[i].but.title=title;bc[i].but.appendChild($IMG(image));bc[i].but.appendChild(document.createElement('br'));bc[i].but.appendChild(document.createTextNode(text));bc[i].but.onclick=me.selProc.bind(me,i);bc[i].but.onmouseover=function(){this.style.color='#ffaa00';};bc[i].but.onmouseout=function(){this.style.color='#fcfcfc';};pbut.appendChild(bc[i].but);clip.appendChild(bc[i].div);};this.selProc=function(i) {if(pClosed){ani.set([[pclip,'width',mr.offsetLeft+2],[clip,'opacity',0],[pbut,'left',16]
]);} else {if(selp)bc[selp].div.style.visibility='hidden';selp=i;bc[selp].div.style.visibility='visible';bc[selp].div.style.left=bc[selp].r0+16;ani.set([[pclip,'width',64],[clip,'opacity',1],[pbut,'left',-64*bc[selp].cnt]
]);}
ani.animate(30,20,null);pClosed=!pClosed;};this.registerPage=function(text,title,image,action,proc,sel) {if(proc==-1){mr.style.left=720;ret.style.left=736;retBut.title=title;retBut.onclick=action;retBut.onmouseover=function(){this.style.color='#ffaa00';this.style.fontWeight='bold';};retBut.onmouseout=function(){this.style.color='#fcfcfc';this.style.fontWeight='normal';};retBut.appendChild($IMG(image));retBut.appendChild(document.createElement('br'));retBut.appendChild(document.createTextNode(text));return;}
var a=$DIV({css:(sel?'toolWFs':'toolWF')});if(!sel){a.onmouseover=function(){this.style.color='#ffaa00';this.style.fontWeight='bold';};a.onmouseout=function(){this.style.color='#7889a5';this.style.fontWeight='normal';};}
a.title=title;a.onclick=action;if(text.length>12){a.style.fontSize='9px';a.style.padding=1;if(!sel) {a.style.height=52;a.style.width=70;}
}
a.appendChild($IMG(image,{display:'block',cssFloat:'left',styleFloat:'left',clear:'right',paddingLeft:20}));a.appendChild($DIV({display:'block',cssFloat:'left',styleFloat:'left',clear:'both',width:'100%',textAlign:'center',html:text}));bc[proc].r2+=75;if(sel){bc[proc].r2+=5;selp=proc;bc[proc].div.style.visibility='visible';bc[proc].r2+=7;bc[proc].r3=bc[proc].r2;pbut.style.left=-64*bc[proc].cnt;}
bc[proc].div.style.width=bc[proc].r2;bc[proc].div.appendChild(a);if(bc[proc].r2>bc[proc].r1){if (bc[proc].r3>0) {bc[proc].r0=(bc[proc].r1/2)+41-bc[proc].r3;if (bc[proc].r0>0)bc[proc].r0=0;if (bc[proc].r0+bc[proc].r2<bc[proc].r1)bc[proc].r0=bc[proc].r1-bc[proc].r2;bc[proc].div.style.left=bc[proc].r0+16;}
}
};}
function TState(sid) {var me=this;var _color = new Array('#9BFAD1','#FFAA00','#E0E0E0','#FAD19B','#E0E0E0');var _msg = new Array('READY','PROCESSING','LOCKED','LOADING','WAIT');var _state=-1;var _wait=0;var _wait2=true;var _pgReload=false;var _bReld;var sbox;var _pb;var _pbimg;var	_bAna;var ls=[];var anndiv;var annid=0;this.addListener=function(func) {ls.push(func);};this.autoreload=true;var waitImg=Array();this.loadImg=function(imgurl){var i=$IMG(imgurl);waitImg.push(i);_wait=waitImg.length;_set(3);if (waitImg.length==1) window.setTimeout(checkload,500);return 'url('+imgurl+')';};function checkload(){while (waitImg[0].complete) {waitImg.shift();_wait=waitImg.length;if (_wait==0) return;}
window.setTimeout(checkload,500);}
function _set(new_status) {var i;if (_wait>0) {if(_wait2) {_wait2=false;var c=_color[3];sbox.setColor(sbox,c);sbox.title.innerHTML = _msg[3];}
_pb.style.display = (_state==1)?'block':'none';if (new_status==3) _state=new_status;return;} else _wait2=true;if (new_status!=_state) {_state=new_status;var c=_color[_state];sbox.setColor(sbox,c);sbox.title.innerHTML = _msg[_state];_pb.style.display = (_state==1)?'block':'none';}
}
function annMsgAnswer() {this.Response=function(resp) {if(resp.length==1) {anndiv.innerHTML=resp[0].msg;annid=resp[0].id;}
};}
this.Response=function(ans) {if(ls.length!=0) {for(var i=0;i<ls.length;i++)ls[i](ans);}
if (ans.state!=null) {_set (ans.state);if (ans.state==1) {var percent = ans.progress;_pbimg.style.width = Math.floor(1.8*percent)+"px";}
if ((ans.state!=1) && ans.dirty) {_bAna.onclick = function(){ return analyse(ans.dirtyChans);};_bAna.style.display = 'block';} else _bAna.style.display='none';if (ans.reload) {if(me.autoreload) {loadPage('#');_pgReload=true;} else _bReld.style.display = 'block';} else _bReld.style.display='none';} else {if (ans.uid>-1)_set(0);}
if(ans.msg!=annid) {if(ans.msg){Core.Request('/tom24x/sysinfo','act=list&id='+ans.msg+'&sid='+T24SID,new annMsgAnswer());anndiv.style.visibility='visible';} else {anndiv.innerHTML='';anndiv.style.visibility='hidden';annid=0;}
}
window.setTimeout(_request,(ans.state==1)?1000:2000);};function _request() {Core.Request ('/tom24x/status','sid='+T24SID+(_pgReload?'&reload=1':'')+(Core?('&pos='+Core.time):''),me,0);_pgReload=false;}
sbox=Core.DIV('','',3,{background:'#E0E0E0',position:20});_pb=document.createElement('DIV');_pb.className='progressbar';_pb.style.display='none';sbox.main.appendChild(_pb);_pbimg=$IMG('img/common/pb.png',{width:0,height:10});_pb.appendChild(_pbimg);_bAna=new TTextButton({text:'ANALYZE !',style:'red',width:176,marginLeft:8,marginTop:8});_bAna=_bAna.Component;_bAna.style.display='none';_bReld=new TTextButton({text:'Reload Page !',style:'red',width:176,marginLeft:8,marginTop:8});_bReld=_bReld.Component;_bReld.style.display='none';_bReld.onclick = function(){loadPage('#');_pgReload=true;};sbox.main.appendChild(_bAna);sbox.main.appendChild(_bReld);anndiv=$DIV({display:'block',cssFloat:'left',styleFloat:'left',position:'relative',width:190,marginTop:4,visibility:'hidden',color:'#400000',fontSize:'9pt',fontWeight:'bold',borderTop:'2px solid #7889a5'});sbox.main.appendChild(anndiv);if (sid) {_set (4);window.setTimeout(_request,1000);}
}
function THelp() {var me=this;var _help=Core.DIV('','HELP',3,{background:'#e8e8e8',position:30});var txt='';_help.parent.style.display='none';_help.main.style.height=200;var hclip = $DIV({css:'hclip'});_help.main.appendChild(hclip);var hmain = $DIV({css:'hmain'});hclip.appendChild(hmain);var scr = new TScroll(hclip,hmain);_help.main.appendChild(scr.Component);var hlp_l=$DIV({css:'txt'});hmain.appendChild(hlp_l);this.toggle=function() {if (_help.parent.style.display=='block') _help.parent.style.display='none';else {_help.parent.style.display='block';scr.refresh();}
};this.setText=function(shrt,desc,hlp) {hlp_l.innerHTML='<CENTER><BIG><B>'+shrt.toUpperCase()+'</BIG><BR>'+((desc!='')?desc+'</B></CENTER><BR>':'')+hlp+'<BR>';};this.addKey=function(k,t) {var d=$DIV({css:'keys'});var i=0;if (k.indexOf('c')>-1) {d.appendChild($IMG('img/common/k_ctrl.png',{css:'keyimg'}));i++;}
if (k.indexOf('s')>-1) {d.appendChild($IMG('img/common/k_shift.png',{css:'keyimg'}));i++;}
if (k.indexOf('a')>-1) {d.appendChild($IMG('img/common/k_alt.png',{css:'keyimg'}));i++;}
k=k.substr(0,k.length-i);switch(k) {case '-' : d.appendChild($IMG('img/common/k_horiz.png',{css:'keyimg'})); break;case '|' : d.appendChild($IMG('img/common/k_vert.png',{css:'keyimg'})); break;case '+' : d.appendChild($IMG('img/common/k_cursor.png',{css:'keyimg'})); break;case '%' : d.appendChild($IMG('img/common/k_pgupdn.png',{css:'keyimg'})); break;case '~' : d.appendChild($IMG('img/common/k_p1end.png',{css:'keyimg'})); break;default : d.appendChild($IMG('img/common/k'+k+'.png',{css:'keyimg'}));}
var d1=$DIV({display:'block',overflow:'hidden',height:'auto',width:176});d1.appendChild(d);d1.appendChild($DIV({css:'keytxt',html:t}));hmain.appendChild(d1);};}
function TToolBox() {var me=this;var box=Core.DIV('','TOOL BOX',3,{background:'#CDC5B0',position:40});var rForm=null;var rTbl={};function rRequest(t) {if(rForm==null)return;for (var tbl in rTbl) {if((t<rTbl[tbl].start)||(t>rTbl[tbl].end)) {Core.Request('/tom24x/result','sid='+T24SID+'&n=*&t='+Core.time+'&diary='+tbl,me,1,tbl);rTbl[tbl].start=t;rTbl[tbl].end=t;}
}
}
function setSpecPerc(k,r,v1,v2) {var o=rForm.$(k+'.'+v1+'%');if(!o)return;if(r&&r[v1]&&r[v2]){o.setUnit('%');o.setValue(100*parseFloat(r[v1].val)/parseFloat(r[v2].val));} else o.setValue(-1);}
this.Response=function(resp,c,k) {var o;switch(c) {case 1:if(rForm){if(resp[0]) {rTbl[k]=resp[0];for(var n in resp[0]) {o=rForm.$(k+'.'+n);if(o){if(resp[0][n].unit)o.setUnit(resp[0][n].unit);o.setValue(resp[0][n].val);}
}
}
setSpecPerc(k,resp[0],'ULF','TOTPWR');setSpecPerc(k,resp[0],'VLF','TOTPWR');setSpecPerc(k,resp[0],'LF','TOTPWR');setSpecPerc(k,resp[0],'HF','TOTPWR');}
break;}
};var _time=null;function _setTime(t) {if(_time)_time.setValue(t);rRequest(t);}
var _hs;function _setRes(r) {if(_hs)_hs.setValue(r);}
function _changeTrendMag() {Core.setRes('*',_hs.getValue());}
var _hr,_minhr,_minhrx,_maxhr,_maxhrx,acthr;function _respHR(r) {acthr=r;if(_hr)_hr.setValue(r.hr.hr);if(_minhr)_minhr.setValue(r.minhr.hr);if(_minhrx)_minhrx.setValue(r.minhr.xval);if(_maxhr)_maxhr.setValue(r.maxhr.hr);if(_maxhrx)_maxhrx.setValue(r.maxhr.xval);}
this.jump=function(w){switch(w) {case 'MINHR' : if(acthr)Core.setTime(null,acthr.minhr.xval); break;case 'MAXHR' : if(acthr)Core.setTime(null,acthr.maxhr.xval); break;}
};this.click=function(cmd) {for(var i=0;i<cmd.length;i++) {var m=cmd[i].split('.');if(m.length==2)m.push('0');Core.Module[m[0]].cmd(parseInt(m[1],10),parseInt(m[2],10));}
};this.init=function(tools) {var b,bs;var hmain=box.main;for(var i=0;i<tools.length;i++){if(isArray(tools[i])) {bs=new TToolbar({visible:true});hmain.appendChild(bs.Component);b=bs.addGroup({decoration:false});bs.addSpacer(b,{});for(var j=0;j<tools[i].length;j++){switch(tools[i][j].feature){case 'TIME':_time=bs.addDateTime(b,{value:0});me.setTime=_setTime;break;case 'HR':_hr=bs.addValue(b,{title:'HR',unit:'bpm',precision:1});me.ResponseHR=_respHR;break;case 'MINHR':bs.addImg(b,{img:'img/trends/minhr.png',width:24});_minhr=bs.addValue(b,{title:'HR',width:45,style:'small',precision:1});_minhrx=bs.addDateTime(b,{value:0});bs.addButton(b,{img:'img/trends/go24.png',link:me.jump.bind(me,'MINHR')});me.ResponseHR=_respHR;break;case 'MAXHR':bs.addImg(b,{img:'img/trends/maxhr.png',width:24});_maxhr=bs.addValue(b,{title:'HR',width:45,style:'small',precision:1});_maxhrx=bs.addDateTime(b,{value:0});bs.addButton(b,{img:'img/trends/go24.png',link:me.jump.bind(me,'MAXHR')});me.ResponseHR=_respHR;break;case 'HSCALE':_hs=bs.addSlider(b,{title:'Trend Magnification',values:[480,240,120,60,30,15,5],titles:['4 days','2 days','1 day','12 hours','6 hours','3 hours','1 hour'],init:2,onchange:_changeTrendMag});me.setRes=_setRes;break;case 'RESULT':if(rForm==null)rForm=new TForm();bs.addValue(b,{title:tools[i][j].name,style:tools[i][j].style,unit:'',precision:(tools[i][j].precision?tools[i][j].precision:0),name:tools[i][j].table+'.'+tools[i][j].item,form:rForm});rTbl[tools[i][j].table]={start:-1,end:-1};break;case 'SPACE':bs.addSpacer(b,{width:tools[i][j].width});break;case 'SEPARATOR':b=bs.addGroup({decoration:true});break;default:if(!isArray(tools[i][j].cmd))tools[i][j].cmd=[tools[i][j].cmd];if(typeof tools[i][j].title=='undefined')tools[i][j].title=0;if(typeof tools[i][j].title=='number') {var m=tools[i][j].cmd[tools[i][j].title].split('.');tools[i][j].title=Core.Module[m[0]].help[parseInt(m[1],10)];}
bs.addButton(b,{title:tools[i][j].title,img:tools[i][j].img,link:me.click.bind(me,tools[i][j].cmd)});}
}
} else {b=$DIV({css:'SectionTitle'});b.appendChild($DIV({html:tools[i].title}));hmain.appendChild(b);hmain.appendChild($DIV({clear:'both'}));}
}
};this.setVisible=function(s){box.parent.style.display=s?'block':'none';};}
function TCore(session,usr,cus,ur,cPg,cPgId,cPr,mo,time,region,res) {var me=this;var _modules=Array();var _massoc=Object();var _keyActive=-1;var _keyEnabled=true;var _keyMap=new Array();var _tmpMap=new Array();var hlp=null;var tbx=null;var wf=null;var init={};var urc=decodeUR(ur);this.cid=cus;this.uid=usr;this.mo=mo;var tbar=document.getElementById("TaskBar");var recsup='';if(mo) {mo.mdatef-=2209161600;if(!mo.annonym)mo.patdobf-=2209161600;this.reclen=mo.mlen;this.recstart=mo.mdatef;this.datasup=mo.recsup;recsup=new String(mo.recorder);}
this.time=time;this.region=region;this.resolution=res;checkRegion();this.day=-1;this.Module=new Array();this.pgid=cPgId;this.page=cPg;this.proc=cPr;var lsp=new Array();var _imgFlippedDown = 'img/common/h1fup.png';var _imgFlippedUp = 'img/common/h1fdown.png';this.State=null;T24SID=session;if(!T24SID)denyPG=false;var main=document.getElementById('CentralPanel');var HttpReq;if (window.XMLHttpRequest) {HttpReq=function() { return new window.XMLHttpRequest(); };} else {if (window.ActiveXObject) {var hr;try {hr = new ActiveXObject("Msxml2.XMLHTTP");HttpReq=function() { return new ActiveXObject("Msxml2.XMLHTTP"); };} catch (e) {HttpReq=function() { return new ActiveXObject("Microsoft.XMLHTTP"); };}
delete hr;}
}
this.Response=function(r,c,p1) {for (var i=0; i<_modules.length; i++) {if(_modules[i][c])_modules[i][c](r,c,p1);}
if(tbx && tbx[c])tbx[c](r);};this.Request=function(addr,post,cobj,p1,p2) {var hr=HttpReq();if (!hr) { Core.alert('Giving up : Cannot create an XMLHTTP instance'); return false; }
hr.onreadystatechange = function() {if (hr&&(hr.readyState == 4)&&(hr.status==200)) {if(hr.getResponseHeader('Content-Type').indexOf('application/json')!=-1)hr=eval('('+hr.responseText+')');if((hr.error)&&(hr.error==-2)) {me.Request(addr,post,cobj,p1,p2);} else {cobj.Response(hr,p1,p2);}
}
};hr.open('POST', addr, true);hr.setRequestHeader('Content-Type','application/x-www-form-urlencoded');hr.send(post);return true;};this.setWorkflow=function(pages,procs) {wf=new TWorkflow('Workflow');if(mo!=null)
wf.registerPage('Close','Close Recording and return to Administration','img/common/back_f2.png',Function('return finish()'),-1,false);for(var i in procs){wf.registerProcedure(i,procs[i][0],procs[i][1],procs[i][2]);var s=procs[i][3];for(var j=0; j<s.length; j++){var p=pages[s[j]];if(p)wf.registerPage(p[0],p[1],p[2],Function('loadPage("#'+s[j]+'","'+i+'")'),i,((s[j]==cPg)&&(i==cPr)));}
}
};var lockmsg=$DIV({css:'txtLock'});var lockimg=$DIV({css:'imgWAIT'});var locker=document.getElementById('Locker');var lockm=document.getElementById('Message');var locki=$DIV({css:'inner'});locki.appendChild(lockimg);locki.appendChild(lockmsg);lockm.appendChild(locki);var lockb=$DIV({css:'buttons',display:'none'});var lockok=new TTextButton({text:'OK',style:'green',width:120,marginLeft:20});var lockno=new TTextButton({text:'Cancel',style:'red',width:120,marginLeft:120});lockb.appendChild(lockno.Component);lockb.appendChild(lockok.Component);lockm.appendChild(lockb);function showLock(){var i=window.innerWidth;var d=main.offsetLeft+main.offsetWidth+26;locker.style.width=(i<d)?d:i;i=window.innerHeight;d=main.offsetTop+main.offsetHeight;locker.style.height=(i<d)?d:i;locker.style.display='block';}
this.lock=function(msg) {lockb.style.display='none';lockok.Component.style.visibility='hidden';lockno.Component.style.visibility='hidden';if (msg) {lockmsg.className='txtLock';lockmsg.innerHTML=msg;} else lockmsg.style.display='none';lockm.style.display='block';lockm.style.left=main.offsetLeft+(main.offsetWidth-lockm.offsetWidth)/2;lockm.style.top=main.offsetTop+150+window.pageYOffset;showLock();};this.unlock=function(func) {me.uncaptureKey('13');me.uncaptureKey('27');document.getElementById('Message').style.display='none';locker.style.display='none';lockok.Component.style.visibility='hidden';lockno.Component.style.visibility='hidden';if(func)return func();lockimg.className='imgWAIT';return(true);};this.alert=function(msg) {lockb.style.display='block';lockimg.className='imgABOUT';lockmsg.className='txtMsg';lockmsg.innerHTML=msg;lockm.style.display='block';lockm.style.left=main.offsetLeft+(main.offsetWidth-lockm.offsetWidth)/2;lockm.style.top=main.offsetTop+150+window.pageYOffset;lockno.Component.style.visibility='hidden';lockok.Component.style.visibility='visible';lockok.Component.onclick=me.unlock.bind(me,null);me.captureKey('13',me.unlock.bind(me,null));showLock();};this.confirm=function(msg,fok,fno) {lockb.style.display='block';lockimg.className='imgHELP';lockmsg.className='txtMsg';lockmsg.innerHTML=msg;lockm.style.display='block';lockm.style.left=main.offsetLeft+(main.offsetWidth-lockm.offsetWidth)/2;lockm.style.top=main.offsetTop+150+window.pageYOffset;lockok.Component.style.visibility='visible';lockok.Component.onclick=me.unlock.bind(me,fok);me.captureKey('13',me.unlock.bind(me,fok));lockno.Component.style.visibility='visible';lockno.Component.onclick=me.unlock.bind(me,fno);me.captureKey('27',me.unlock.bind(me,fno));showLock();};_keyMap['112']=function(){hlp.toggle();return true;};_keyMap['116c']=function(){_reload();return true;};this.setHelp=function(s,d,h) {if(!hlp)hlp=new THelp();hlp.setText(s,d,h);};var fDt={ord:'MDY',sep:'/',fmt:'M/D/Y',sfmt:'M/D',reg:'(\\d+)\\s*\\/\\s*(\\d+)\\s*\\/\\s*(\\d+)'};var fTm={ord:'HNS',sep:'-',fmt:'H:N:S',reg:'(\\d+)\\s*:\\s*(\\d+)\\s*:\\s*(\\d+)'};function cvtFmt(f,d) {var r='';for (var i=0; i<f.length; i++) {switch(f.substr(i,1)) {case 'D': r=r+zeroPad(d.getUTCDate(),2);break;case 'M': r=r+zeroPad(d.getUTCMonth()+1,2);break;case 'Y': r=r+zeroPad(d.getUTCFullYear(),4);break;case 'H': r=r+zeroPad(d.getUTCHours(),2);break;case 'N': r=r+zeroPad(d.getUTCMinutes(),2);break;case 'S': r=r+zeroPad(d.getUTCSeconds(),2);break;default : r=r+f.substr(i,1);}
}
return r;}
this.getDateStr=function(d,sh) {if((typeof(d)=='undefined')||(d==null))d=me.time;if(typeof(d)=='number')d=new Date(1000*(me.recstart+d));return sh?cvtFmt(fDt.sfmt,d):cvtFmt(fDt.fmt,d);};this.getTimeStr=function(d) {if((typeof(d)=='undefined')||(d==null))d=me.time;if(d==null)d=me.time;if(typeof(d)=='number')d=new Date(1000*(me.recstart+d));return cvtFmt(fTm.fmt,d);};this.parseDate=function(dat) {var d=new Date();if (fDt.ord.substr(fDt.length-1,1)=='Y') dat=dat+fDt.sep+d.getUTCFullYear();var reg=new RegExp(fDt.reg);var t=reg.exec(dat);if (t.length==4) {for (var i=0; i<fDt.ord.length; i++) {switch(fDt.ord.substr(i,1)) {case 'D': d.setDate(parseInt(t[i+1],10));break;case 'M': d.setMonth(parseInt(t[i+1],10)-1);break;case 'Y': d.setFullYear(parseInt(t[i+1],10));break;}
}
}
return(d);};this.setTimeStr=function(callerid,dat,tim) {var d=new Date(1000*me.recstart);var dt={day:0,mon:0,yr:0,hr:0,mi:0,sec:0};if (fDt.ord.substr(fDt.length-1,1)=='Y') dat=dat+fDt.sep+d.getUTCFullYear();tim=tim+fTm.sep+'0';var reg=new RegExp(fDt.reg);var t=reg.exec(dat);if (t.length!=4) {_setTime(callerid,me.time);return(false);}
for (var i=0; i<fDt.ord.length; i++) {switch(fDt.ord.substr(i,1)) {case 'D': dt.day=parseInt(t[i+1],10);break;case 'M': dt.mon=parseInt(t[i+1],10);break;case 'Y': dt.yr=parseInt(t[i+1],10);break;}
}
reg=new RegExp(fTm.reg);t=reg.exec(tim);if (t.length!=4) {_setTime(callerid,me.time);return(false);}
for (i=0; i<fTm.ord.length; i++) {switch(fTm.ord.substr(i,1)) {case 'H': dt.hr=parseInt(t[i+1],10);break;case 'N': dt.mi=parseInt(t[i+1],10);break;case 'S': dt.sec=parseInt(t[i+1],10);break;}
}
if (dt.yr<100) dt.yr+=2000;var start=(Date.UTC(dt.yr,dt.mon-1,dt.day,dt.hr,dt.mi,dt.sec)/1000)-me.recstart;if ((start<0) && (start>-60)) start=0;if ((start>me.reclen) || (start<0)) {_setTime(callerid,me.time);return(false);}
_setTime(callerid,start);return(true);};this.fmtTime=function(t,fmt){var s='';if(!fmt)fmt='DHNS';if(t>86400){if(fmt.indexOf('D')>-1)s=Math.floor(t/86400).toFixed(0)+'d ';t=t%86400;}
if(t>3600){if(fmt.indexOf('H')>-1)s=s+Math.floor(t/3600).toFixed(0)+'h ';t=t%3600;} else if(s!='')s=s+'0h ';if(t>60){if(fmt.indexOf('N')>-1)s=s+Math.floor(t/60).toFixed(0)+'m ';t=t%60;} else if(s!='')s=s+'0m ';if(fmt.indexOf('S')>-1)s+=t.toFixed(0)+'s';return(s);};this.register=function(obj) {if(obj.id) {_massoc[obj.id]=new Array(_modules.length,obj);_modules.push(obj);this.Module[obj.id]=obj;}
};function reloadResp() {var s='sid='+T24SID;if (init.Record&&me.mo) me.Response(me.mo,'ResponseRecord');if (init.Excl) me.Request('/tom24x/channel',s+'&c=INHIBITION&a=list',me,'ResponseExcl');if (init.Noise) me.Request('/tom24x/info',s+'&a=list&c=NOISE',me,'ResponseNoise');if (init.HR) me.Request('/tom24x/hr',s+'&a=get&xval='+me.time,me,'ResponseHR');if (init.ST) me.Request('/tom24x/info',s+'&a=list&c=ST',me,'ResponseST');if (init.PEvt) me.Request('/tom24x/channel',s+'&a=list&c=pevent',me,'ResponsePatEv');if (init.Strip) me.Request('/tom24x/ecgstrip',s+'&a=list',me,'ResponseStrip');if (init.Evt) me.Request("/tom24x/EvtStrips",s,me,'ResponseEvt');}
var wins={};this.DIV=function(id,title,context,opts) {if(!context)context=0;if(!opts)opts={};switch(context){case 0:var m=document.getElementById("Main");var h=null,h1=null;if(!opts.notitle) {h=$DIV({css:'ModulTitle',id:'TITLE_'+id});var htx=$DIV();htx.innerHTML=title;h.appendChild(htx);h.appendChild($IMG(_imgFlippedDown,{id:'flipImg_'+id,onclick:function(){_toggleActive(id);}}));h.appendChild($IMG(_imgFlippedDown,{visibility:'hidden'}));m.appendChild(h);h1=$DIV({css:'ModulTask'});var htx=$DIV({display:'block',styleFloat:'left',cssFloat:'left'});htx.innerHTML=title;h1.appendChild(htx);h1.appendChild($IMG(_imgFlippedUp,{onclick:function(){_toggleActive(id);}}));tbar.appendChild(h1);}
var o={tit:h,tbd:h1,div:$DIV({css:'container',id:id})
};m.appendChild(o.div);wins[id]=o;return(o.div);case 2:var h=$DIV({css:'ModulTitle'});if(opts&&opts.margin)h.style.marginTop=opts.margin;var htx=$DIV();htx.innerHTML=title;h.appendChild(htx);var div=$DIV({css:'container'});var p=document.getElementById("RightPanel");p.appendChild(h);p.appendChild(div);p.style.visibility='visible';h.style.width=p.offsetWidth-2;div.style.width=p.offsetWidth-2;return(div);case 3:var o={parent:$DIV({css:'HelpBox',background:opts.background}),title:$DIV({css:'hpar',height:'auto',html:title}),main:$DIV({css:'hpar',height:'auto'}),frame:new Array(8),pos:opts.position,setColor:function(obj,c){obj.parent.style.background=c;for(var i=0;i<8;i++)obj.frame[i].style.background=c;}
};var b=document.createElement('B');b.className='rtop';o.frame[0]=document.createElement('B');o.frame[0].className='r1';o.frame[0].style.background=opts.background;b.appendChild(o.frame[0]);o.frame[1]=document.createElement('B');o.frame[1].className='r2';o.frame[1].style.background=opts.background;b.appendChild(o.frame[1]);o.frame[2]=document.createElement('B');o.frame[2].className='r3';o.frame[2].style.background=opts.background;b.appendChild(o.frame[2]);o.frame[3]=document.createElement('B');o.frame[3].className='r4';o.frame[3].style.background=opts.background;b.appendChild(o.frame[3]);o.parent.appendChild(b);o.parent.appendChild(o.title);o.parent.appendChild(o.main);var b=document.createElement('B');b.className='rtop';o.frame[4]=document.createElement('B');o.frame[4].className='r4';o.frame[4].style.background=opts.background;b.appendChild(o.frame[4]);o.frame[5]=document.createElement('B');o.frame[5].className='r3';o.frame[5].style.background=opts.background;b.appendChild(o.frame[5]);o.frame[6]=document.createElement('B');o.frame[6].className='r2';o.frame[6].style.background=opts.background;b.appendChild(o.frame[6]);o.frame[7]=document.createElement('B');o.frame[7].className='r1';o.frame[7].style.background=opts.background;b.appendChild(o.frame[7]);o.parent.appendChild(b);var p=document.getElementById("LeftPanel");for(var i=0;i<lsp.length;i++){if(o.pos<lsp[i].pos){p.insertBefore(o.parent,lsp[i].parent);lsp.splice(i,0,o);return(o);}
}
p.appendChild(o.parent);lsp.push(o);return(o);}
return(null);};this.toggleDIV=function(m,flag,quick) {var o=wins[m];if(o) {if(flag) {if(!quick) {var a=new TAnimation();var p=$DIV({css:'ModulAniFrame',left:getAbsX(o.tbd),top:getAbsY(o.tbd),width:o.tbd.offsetWidth,height:o.tbd.offsetHeight
});document.body.appendChild(p);o.tbd.style.visibility='hidden';o.tit.style.visibility='hidden';o.tit.style.display='block';a.set([[p,'left',getAbsX(o.tit)],[p,'top',getAbsY(o.tit)],[p,'width',o.tit.offsetWidth],[p,'height',o.tit.offsetHeight],]);a.animate(10,25,function() {o.tbd.style.display='none';o.div.style.display='block';o.tit.style.visibility='visible';document.body.removeChild(p);});} else {o.tbd.style.display='none';o.div.style.display='block';o.tit.style.display='block';}
} else {if(!quick) {var a=new TAnimation();var p=$DIV({css:'ModulAniFrame',left:getAbsX(o.tit),top:getAbsY(o.tit),width:o.tit.offsetWidth,height:o.tit.offsetHeight
});document.body.appendChild(p);o.tbd.style.visibility='hidden';}
o.tbd.style.display='block';if(a)a.set([[p,'left',getAbsX(o.tbd)],[p,'top',getAbsY(o.tbd)],[p,'width',o.tbd.offsetWidth],[p,'height',o.tbd.offsetHeight],]);o.div.style.display='none';o.tit.style.display='none';if(a)a.animate(10,25,function() {o.tbd.style.visibility='visible';document.body.removeChild(p);});}
}
}
this.init=function() {if((session)&&(session!='')){this.State=new TState(session);}
for (i=0;i<_modules.length;i++) {var obj=_modules[i];obj.init(me.time,me.region,me.resolution);var hdr = document.getElementById(obj.id);if((hdr)&&(hdr.previousSibling))hdr.previousSibling.appendChild($DIV({clear:'both',fontSize:0,height:0,width:0}));if (obj.ResponseExcl) init.Excl=true;if (obj.ResponseNoise) init.Noise=true;if (obj.ResponseHR) init.HR=true;if (obj.ResponseST) init.ST=true;if (obj.ResponseStrip) init.Strip=true;if (obj.ResponsePatEv) init.PEvt=true;if (obj.ResponseEvt) init.Evt=true;if (obj.ResponseRecord) init.Record=true;}
reloadResp();var i=(main.offsetLeft+main.offsetWidth+26)-window.innerWidth;if(i>0)window.scrollTo(i,0);};this.addCtrl = function(callerid,ctrl) {var obj = document.getElementById(callerid);if(obj)obj.previousSibling.appendChild($IMG(ctrl.src,{onclick:ctrl.onclick}));};this.setTime=_setTime;function _setTime(callerid,t,obj) {me.Request('/tom24x/hr','sid='+T24SID+'&a=get&xval='+t,Core,'ResponseHR');me.time=t;if(checkRegion())me.setRgn('*',me.region);for (var i=0; i<_modules.length; i++) if ((_modules[i].id!=callerid) && (_modules[i].isActive) && _modules[i].setTime) _modules[i].setTime(t,obj);if((tbx)&&(tbx.setTime))tbx.setTime(t,obj);}
function checkRegion() {var vis=720*me.resolution;if((me.time<me.region)||(me.time>(me.region+vis))) {me.region=me.time-(vis/2);if((me.region+vis)>me.reclen)me.region=me.reclen-vis;if(me.region<0)me.region=0;return true;} else return false;}
this.setRgn=function(callerid,t) {me.region=t;for (var i=0; i<_modules.length; i++) if ((_modules[i].id!=callerid) && (_modules[i].isActive) && _modules[i].setRgn) _modules[i].setRgn(t);};this.setRes=function(callerid,r) {var rgn2=me.time-(me.time-me.region)*r/me.resolution;me.resolution=r;for (var i=0; i<_modules.length; i++) if ((_modules[i].id!=callerid) && (_modules[i].isActive) && _modules[i].setRes) _modules[i].setRes(r);if((tbx)&&(tbx.setRes))tbx.setRes(r);me.setRgn(0,(rgn2>=0)?rgn2:0);};this.setDay=function(callerid,d) {me.day=d;for (var i=0; i<_modules.length; i++) if ((_modules[i].id!=callerid) && (_modules[i].isActive) && _modules[i].setDay) _modules[i].setDay(d);if((tbx)&&(tbx.setDay))tbx.setDay(d);};this.reload=_reload;function _reload(callerid,r) {for (var i=0; i<_modules.length; i++) if ((_modules[i].id!=callerid) && (_modules[i].isActive) && (_modules[i].reload)) _modules[i].reload(''+r);if(!r)reloadResp();}
this.toolBox=function(tools) {if(!tbx)tbx=new TToolBox();tbx.init(tools);if(tbx.setTime)tbx.setTime(time);tbx.setVisible(true);};this.keyMap=function(keys) {var q,f,o,p,h='';var k=keys.split(';');for (var i=0; i<k.length; i++) {q=k[i].split('.');if ((_massoc[q[1]]) && (_modules[_massoc[q[1]][0]].cmd)) {f=parseInt(q[2],10);o=_modules[_massoc[q[1]][0]];p=q[0].substr(1);hlp.addKey(new String(q[0]),o.help[f]);switch (q[0].substr(0,1)) {case '+' :_keyMap['37'+p]=o.cmd.bind(o,f);_keyMap['38'+p]=o.cmd.bind(o,f);_keyMap['39'+p]=o.cmd.bind(o,f);_keyMap['40'+p]=o.cmd.bind(o,f);break;case '-' :_keyMap['37'+p]=o.cmd.bind(o,f);_keyMap['39'+p]=o.cmd.bind(o,f);break;case '|' :_keyMap['38'+p]=o.cmd.bind(o,f);_keyMap['40'+p]=o.cmd.bind(o,f);break;case '%' :_keyMap['33'+p]=o.cmd.bind(o,f);_keyMap['34'+p]=o.cmd.bind(o,f);break;case '~' :_keyMap['35'+p]=o.cmd.bind(o,f);_keyMap['36'+p]=o.cmd.bind(o,f);break;default :_keyMap[q[0]]=o.cmd.bind(o,f);}
}
}
};this.setKeyEnabled=function(flag) {_keyEnabled=flag;};this.captureKey=function(key,func) {_tmpMap[key]=func;};this.uncaptureKey=function(key) {_tmpMap[key]=null;};var _dir=[-3,3,4,-4,-1,-2,1,2];document.onkeydown=function(e) {if (_keyEnabled) {var ch=0;e = e || window.event;if (e.which) ch = e.which; else if (e.keyCode) ch = e.keyCode;if ((ch>=16) && (ch<=20)) return true;var alt=''+ch+((e.ctrlKey)?'c':'')+((e.shiftKey)?'s':'')+((e.altKey)?'a':'');if ((ch>=33) && (ch<=40)) ch=_dir[ch-33];if (_tmpMap[alt]) return(!(_tmpMap[alt](ch)));else if (_keyMap[alt]) return(!(_keyMap[alt](ch)));}
return true;};window.onhelp=function() {return false;};this.toggleActive=_toggleActive;function _toggleActive(modul) {var mod=_massoc[modul];if (mod[1]) {mod[1].setActive(!mod[1].isActive);var img = document.getElementById('flipImg_'+modul);if (img) img.src = (mod[1].isActive) ? _imgFlippedDown : _imgFlippedUp;}
}
this.isActive=function(modul) {var mod=_massoc[modul];if (mod[1]) {return (mod[1].isActive);}
return false;};this.fromRecorder=function(r) {if(recsup=='')return false;if (!isArray(r)) r=[r];for (var i=0; i<r.length; i++)if (recsup.indexOf(r[i])>-1) return true;return false;};this.hasPermit=function(u) {return (urc.indexOf(u)>0);};function decodeUR(u) {if(!u)return '';var _permStr=new String('0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ');var _urights=['SEEALL','SEECUS','SEEOWN','BACKUP','DELETE','OPTION','ANALYS','EDITOR','HOLTER','UPLOAD','DNLOAD','VIEWEC','ARRADJ','PROREP','REPORT','ALLREP','REPULD','REPDEO','REPDEL','EVENTS','ACCADM','USRADM','BILADM','STATIS','SUPERU','CUSADM','RECADM','RECRUN','TECSUP','TAGSHG','TAGSHU','TAGSCU','EVTEDT','SRQALL','SRQCUS','SRQEDI','CLOREC','ACCUSR','AUTENR','PATEDT','SHAREP','******','******','******','******'
];var us='';for(var i=0;i<u.length;i++) {var n=_permStr.indexOf(u.charAt(i));var p=1;for(var j=0;j<6;j++){if((n&p)>0)us+='|'+_urights[i*5+j];p*=2;}
}
return us;}
}
function getEventName(atyp) {switch (String(atyp).toUpperCase()) {case '0':case 'PAUSE': return 'Pause';case '1':case 'TACHY': return 'Tachycardia';case '2':case 'BRADY': return 'Bradycardia';case '3':case 'TRIGEMINY': return 'Trigeminy';case '4':case 'BIGEMINY': return 'Bigeminy';case '6':case 'COUPLET': return 'Couplet';case 'MONOCOUPLET': return 'MonoCouplet';case '5':case 'POLYCOUPLET': return 'PolyCouplet';case '7':case 'VTACHY': return 'VT';case '8':case 'NSVTACHY': return 'NSVT';case '9':case 'SVECT': return 'PAC/PJC';case '10':case 'VECT': return 'PVC';case '11':case 'SALVO': return 'Salvo';case '12':case 'IVRHYTH': return 'IVR';case '13':case 'PSVT': return 'PSVT';case '14':case 'IRREGULAR': return 'Irregular';case '15':case 'UNSPECTACHY' : return 'Tachycardia*';case '16':case 'AVI': return 'AV Block I';case '17':case 'AVII1': return 'AV II Type 1';case '18':case 'AVII2': return 'AV II Type 2';case '19':case 'AVII3': return 'AV II Type 3';case '20':case 'AVIII': return 'AV Block III';case '21':case 'AFIB': return 'Atrial Fibrillation';case '22':case 'AFLUT': return 'Atrial Flutter';case 'APNOE': return 'Apnea';case 'APNOEC': return 'Central Apnea';case 'APNOEO': return 'Obstetric Apnea';case '98': return 'AF(end)';case 'AFONSET':case '99': return 'AF(start)';case 'AF':case '100': return 'AF';case 'EVTECG':case '101': return 'Patient Event';case 'MANUAL':case '200': return 'ECG Request';case 'PEVENT':case '201': return 'Patient Event';default: return '['+atyp+']';}
}
function zeroPad(i,digits) {var s=String(i);while (s.length<digits) s='0'+s;return (s);}