var URI_BASE="/";var URI_ICONS=URI_BASE+"shared/images/icons/";var URI_DATARETRIEVAL=URI_BASE+"dr/";function create_cookie(name,value,days)
{if(days)
{var date=new Date();date.setTime(date.getTime()+(days*24*60*60*1000));var expires="; expires="+date.toGMTString();}
else
var expires="";document.cookie=name+"="+value+expires+"; path=/";}
function read_cookie(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 c.substring(nameEQ.length,c.length);}
return null;}
function erase_cookie(name)
{create_cookie(name,"",-1);}
function add_event_simple(obj,evt,fn)
{if(obj.addEventListener)
obj.addEventListener(evt,fn,false);else if(obj.attachEvent)
obj.attachEvent('on'+evt,fn);}
function remove_event_simple(obj,evt,fn)
{if(obj.removeEventListener)
obj.removeEventListener(evt,fn,false);else if(obj.detachEvent)
obj.detachEvent('on'+evt,fn);}
var XMLHttpFactories=[function(){return new XMLHttpRequest()},function(){return new ActiveXObject('Msxml2.XMLHTTP')},function(){return new ActiveXObject('Msxml3.XMLHTTP')},function(){return new ActiveXObject('Microsoft.XMLHTTP')}];function createXMLHTTPObject()
{var xmlhttp=false;for(var i=0;i<XMLHttpFactories.length;i++)
{try{xmlhttp=XMLHttpFactories[i]();}
catch(e){continue;}
break;}
return xmlhttp;}
function sendRequest(url,callback,postData)
{var req=createXMLHTTPObject();if(!req)
return;var method=(postData)?"POST":"GET";req.open(method,url,true);req.setRequestHeader('User-Agent','XMLHTTP');if(postData)
req.setRequestHeader('Content-type','application/x-www-form-urlencoded');req.onreadystatechange=function(){if(req.readyState!=4)return;if(callback!=null)
callback(req);}
if(req.readyState==4)return;req.send(postData);return true;}
function find_pos_x(obj)
{var curleft=0;if(obj.offsetParent)
{while(obj.offsetParent)
{curleft+=obj.offsetLeft
obj=obj.offsetParent;}}
else if(obj.x)
curleft+=obj.x;return curleft;}
function find_pos_y(obj)
{var curtop=0;if(obj.offsetParent)
{while(obj.offsetParent)
{curtop+=obj.offsetTop
obj=obj.offsetParent;}}
else if(obj.y)
curtop+=obj.y;return curtop;}
function find_pos(obj)
{var pos=new Object();pos.x=0;pos.y=0;if(obj.offsetParent)
{while(obj.offsetParent)
{pos.x+=obj.offsetLeft;pos.y+=obj.offsetTop;obj=obj.offsetParent;}}
else if(obj.x)
{pos.x+=obj.x;pos.y+=obj.y;}
pos.left=pos.x;pos.top=pos.y;return pos;}
var drag_handlers=new Array();var drag_handlers_ids=new Array();var drag_parked=new Object();var drag_offset;var drag_shadow_obj;var drag_obj;var drag_mousetrigger_any=0;var drag_mousetrigger_leftonly=1;var drag_mousetrigger_rightonly=2;function drag_register_by_ids(handler_id,callbacks,mousetrigger,obj_ids)
{if(!is_array(obj_ids)||obj_ids.length==0)
return false;if(handler_id=="")
return false;if(!drag_handlers[handler_id])
{drag_handlers[handler_id]=new Object();drag_handlers[handler_id].handler_id=handler_id;drag_handlers[handler_id].callbacks=callbacks;drag_handlers[handler_id].mousetrigger=mousetrigger;}
var obj;var success=true;for(var i=0;i<obj_ids.length;i++)
{var obj=document.getElementById(obj_ids[i]);if(!obj)
success=false;else
{drag_handlers_ids[obj_ids[i]]=handler_id;obj.onmousedown=drag_start;obj.style.cursor='move';}}
return success;}
function drag_register_by_tag_class(handler_id,callbacks,mousetrigger,tagname,classname)
{var ids=new Array();var tags=document.getElementsByTagName(tagname);if(!tags||tags.length==0)
return true;for(var ti=0;ti<tags.length;ti++)
{if(tags[ti].className.search(classname)!=-1&&tags[ti].id!="")
ids.push(tags[ti].id);}
return drag_register_by_ids(handler_id,callbacks,mousetrigger,ids);}
function drag_register_by_id_children(handler_id,callbacks,mousetrigger,obj_id,tagname,classname)
{var ids=new Array();var obj=document.getElementById(obj_id);if(!obj)
return false;var tags=obj.getElementsByTagName(tagname);if(!tags||tags.length==0)
return true;for(var ti=0;ti<tags.length;ti++)
{if(tags[ti].className.search(classname)!=-1&&tags[ti].id!="")
ids.push(tags[ti].id);}
return drag_register_by_ids(handler_id,callbacks,mousetrigger,ids);}
function drag_start(e)
{var targ;if(!e)var e=window.event;if(e.target)targ=e.target;else if(e.srcElement)targ=e.srcElement;if(targ.nodeType==3)
targ=targ.parentNode;var origtarg=new Object();origtarg.tagName=targ.tagName;origtarg.id=targ.id;origtarg.className=targ.className;while((targ.id==""||!drag_handlers_ids[targ.id])&&targ.parentNode)
{targ=targ.parentNode;}
if(targ.id==""||!drag_handlers_ids[targ.id])
return false;if(targ.id==""||!drag_handlers_ids[targ.id])
return true;targ.origtarg=origtarg;if(drag_obj)
drag_abandon();drag_obj=targ;if(drag_handlers[drag_handlers_ids[targ.id]].callbacks["getobject"])
{var obj_dimensions=drag_handlers[drag_handlers_ids[targ.id]].callbacks["getobject"](targ);if(!obj_dimensions)
return true;}
else
{var obj_dimensions=new Object();obj_dimensions.x=find_pos_x(drag_obj);obj_dimensions.y=find_pos_y(drag_obj);obj_dimensions.width=find_pos_x(drag_obj.offsetWidth);obj_dimensions.height=find_pos_y(drag_obj.offsetHeight);}
var draghandlerid=drag_handlers_ids[targ.id];switch(drag_handlers[draghandlerid].mousetrigger)
{case drag_mousetrigger_leftonly:if(e.which)
var leftclick=(e.which==1);else if(e.button)
var leftclick=(e.button!=2);if(!leftclick)
return true;break;case drag_mousetrigger_rightonly:if(e.which)
var rightclick=(e.which==3);else if(e.button)
var rightclick=(e.button==2);if(!rightclick)
return true;break;}
var pos=new Object();if(e.pageX||e.pageY)
{pos.x=e.pageX;pos.y=e.pageY;}
else if(e.clientX||e.clientY)
{pos.x=e.clientX+document.body.scrollLeft;pos.y=e.clientY+document.body.scrollTop;}
drag_offset=new Object();drag_offset.x=pos.x-obj_dimensions.x;drag_offset.y=pos.y-obj_dimensions.y;drag_shadow_obj=document.createElement("div");drag_shadow_obj.className="dragdropshadow";drag_shadow_obj.style.width=obj_dimensions.width+"px";drag_shadow_obj.style.height=obj_dimensions.height+"px";drag_shadow_obj.id="dragshadowobj";drag_shadow_obj.style.top=(pos.y-drag_offset.y)+"px";drag_shadow_obj.style.left=(pos.x-drag_offset.x)+"px";var anyshadowblock=document.getElementById("dragshadowobj");if(anyshadowblock)
anyshadowblock.parentNode.replaceChild(anyshadowblock,drag_shadow_obj);else
document.body.appendChild(drag_shadow_obj);if(drag_handlers[draghandlerid].callbacks["hideoriginal"])
drag_handlers[draghandlerid].callbacks["hideoriginal"]();else
drag_obj.style.display="none";document.onmousemove=drag_move;document.onmouseup=drag_finish;if(!e)var e=window.event;e.cancelBubble=true;if(e.stopPropagation)e.stopPropagation();return false;}
function drag_move(e)
{var targ;if(!e)var e=window.event;if(e.target)targ=e.target;else if(e.srcElement)targ=e.srcElement;if(targ.nodeType==3)
targ=targ.parentNode;var pos=new Object();pos.x=0;pos.y=0;if(e.pageX||e.pageY)
{pos.x=e.pageX;pos.y=e.pageY;}
else if(e.clientX||e.clientY)
{pos.x=e.clientX+document.body.scrollLeft;pos.y=e.clientY+document.body.scrollTop;}
drag_shadow_obj.style.top=(pos.y-drag_offset.y)+'px';drag_shadow_obj.style.left=(pos.x-drag_offset.x)+'px';var draghandlerid=drag_handlers_ids[drag_obj.id];if(drag_handlers[draghandlerid].callbacks["park"])
drag_handlers[draghandlerid].callbacks["park"](pos);drag_park_completed();return true;}
function drag_park_completed()
{var shadowblock=document.getElementById("dragshadowobj");if(!shadowblock)
return true;if(drag_parked.parked&&shadowblock.className.search(/dragok/)==-1)
shadowblock.className+=" dragok";else if(!drag_parked.parked)
shadowblock.className=shadowblock.className.replace(/dragok/gi,"");return true;}
function drag_finish()
{document.onmousemove=null;document.onmouseup=null;var draghandlerid=drag_handlers_ids[drag_obj.id];if(!drag_handlers[draghandlerid].callbacks["complete"]||!drag_handlers[draghandlerid].callbacks["complete"]())
{if(drag_handlers[draghandlerid].callbacks["unpark"])
drag_handlers[draghandlerid].callbacks["unpark"]();if(drag_handlers[draghandlerid].callbacks["showoriginal"])
drag_handlers[draghandlerid].callbacks["showoriginal"]();else
drag_obj.style.display="block";}
drag_shadow_obj.parentNode.removeChild(drag_shadow_obj);drag_obj=null;drag_shadow_obj=null;drag_parked=new Object();drag_offset=null;return true;}
function drag_abandon()
{if(drag_shadow_obj&&drag_shadow_obj.parentNode)
drag_shadow_obj.parentNode.removeChild(drag_shadow_obj);var draghandlerid=drag_handlers_ids[drag_obj.id];if(drag_handlers[draghandlerid].callbacks["unpark"])
drag_handlers[draghandlerid].callbacks["unpark"]();drag_obj=null;drag_shadow_obj=null;drag_parked=new Object();drag_offset=null;return true;}
var cmenu_handlers=new Array();var cmenu_target;document.oncontextmenu=cmenu_activate;add_event_simple(window,"mousedown",cmenu_click_deactivate);add_event_simple(window,"keydown",cmenu_escape_deactivate);var cmenu_item_type_item=0;var cmenu_item_type_title=1;var cmenu_item_type_break=2;function cmenu_register_by_ids(handler_id,callbacks,obj_ids)
{if(!is_array(obj_ids)||obj_ids.length==0)
return false;if(handler_id=="")
return false;if(!cmenu_handlers[handler_id])
{cmenu_handlers[handler_id]=new Object();cmenu_handlers[handler_id].handler_id=handler_id;cmenu_handlers[handler_id].callbacks=callbacks;}
var obj;var success=true;for(var i=0;i<obj_ids.length;i++)
{var obj=document.getElementById(obj_ids[i]);if(!obj)
success=false;else
{if(!obj.contextHandlers)
obj.contextHandlers=new Array();obj.contextHandlers[obj.contextHandlers.length]=handler_id;}}
return success;}
function cmenu_register_by_tag_class(handler_id,callbacks,tagname,classname)
{if(handler_id=="")
return false;if(!cmenu_handlers[handler_id])
{cmenu_handlers[handler_id]=new Object();cmenu_handlers[handler_id].handler_id=handler_id;cmenu_handlers[handler_id].callbacks=callbacks;}
var tags=document.getElementsByTagName(tagname);if(!tags||tags.length==0)
return true;for(var ti=0;ti<tags.length;ti++)
{if(classname==""||tags[ti].className.search(classname)!=-1)
{if(!tags[ti].contextHandlers)
tags[ti].contextHandlers=new Array();tags[ti].contextHandlers[tags[ti].contextHandlers.length]=handler_id;}}
return true;}
function cmenu_register_by_id_children(handler_id,callbacks,obj_id,tagname,classname)
{if(handler_id=="")
return false;if(!cmenu_handlers[handler_id])
{cmenu_handlers[handler_id]=new Object();cmenu_handlers[handler_id].handler_id=handler_id;cmenu_handlers[handler_id].callbacks=callbacks;}
var obj=document.getElementById(obj_id);if(!obj)
return false;var tags=obj.getElementsByTagName(tagname);if(!tags||tags.length==0)
return true;for(var ti=0;ti<tags.length;ti++)
{var regexp=new RegExp(classname);if(classname==""||tags[ti].className.search(regexp)!=-1)
{if(!tags[ti].contextHandlers)
tags[ti].contextHandlers=new Array();tags[ti].contextHandlers[tags[ti].contextHandlers.length]=handler_id;}}
return true;}
function cmenu_activate(e)
{var targ;if(!e)var e=window.event;if(e.target)targ=e.target;else if(e.srcElement)targ=e.srcElement;if(targ.nodeType==3)
targ=targ.parentNode;if(!targ.contextHandlers)
return true;cmenu_target=targ;var contextmenu=new Array();for(var i=0;i<targ.contextHandlers.length;i++)
{cmenu_handlers[targ.contextHandlers[i]].callbacks["buildmenu"](cmenu_target,contextmenu,targ.contextHandlers[i]);}
if(contextmenu.length==0)
return true;cmenu_deactivate();var menuobj=document.createElement("UL");menuobj.id="contextmenu";for(var i=0;i<contextmenu.length;i++)
{var element=document.createElement("LI");if(contextmenu[i].type&&contextmenu[i].type==cmenu_item_type_title)
{element.className="title";element.innerHTML=contextmenu[i].title;}
else if(contextmenu[i].type&&contextmenu[i].type==cmenu_item_type_break)
{element.className="break";}
else
{element.itemId=contextmenu[i].item_id;element.contextHandler=contextmenu[i].handler_id;if(!contextmenu[i].href)
element.onclick=cmenu_click;if(contextmenu[i].type)
{if(element.className=="")
element.className="context-"+contextmenu[i].type;else
element.className+=" context-"+contextmenu[i].type;}
var title=document.createElement("A");if(contextmenu[i].href)
title.href=contextmenu[i].href;else
title.href="#";title.innerHTML=contextmenu[i].title;element.appendChild(title);}
if(i==(contextmenu.length-1))
element.className+=" noborder";menuobj.appendChild(element);}
var pos=new Object();pos.x=0;pos.y=0;if(e.pageX||e.pageY)
{pos.x=e.pageX;pos.y=e.pageY;}
else if(e.clientX||e.clientY)
{pos.x=e.clientX+document.body.scrollLeft;pos.y=e.clientY+document.body.scrollTop;}
menuobj.style.top=(pos.y)+'px';menuobj.style.left=(pos.x)+'px';document.body.appendChild(menuobj);return false;}
function cmenu_click(e)
{var targ;if(!e)var e=window.event;if(e.target)targ=e.target;else if(e.srcElement)targ=e.srcElement;if(targ.nodeType==3)
targ=targ.parentNode;var li=targ;var protect=0;while(li.tagName.search(/li/i)==-1&&protect<5&&li.parentNode)
{li=li.parentNode;protect++;}
if(li.tagName.search(/li/i)==-1)
return false;cmenu_handlers[li.contextHandler].callbacks["click"](cmenu_target,li);cmenu_deactivate();return true;}
function cmenu_escape_deactivate(e)
{if(!e)var e=window.event;if(e.keyCode)code=e.keyCode;else if(e.which)code=e.which;if(code==27)
cmenu_deactivate();return true;}
function cmenu_click_deactivate(e)
{var targ;if(!e)var e=window.event;if(e.target)targ=e.target;else if(e.srcElement)targ=e.srcElement;if(targ.nodeType==3)
targ=targ.parentNode;while(targ.id!="contextmenu"&&targ.parentNode)
{targ=targ.parentNode;}
if(targ&&targ.id=="contextmenu")
return true;return cmenu_deactivate();}
function cmenu_deactivate()
{var menuobj=document.getElementById("contextmenu");if(menuobj)
menuobj.parentNode.removeChild(menuobj);return true;}
var fn_ca_callback;add_event_simple(window,"load",initialise_clever_alerts);function initialise_clever_alerts()
{var divs=document.getElementsByTagName("div");var found=false;for(var i=0;i<divs.length&&!found;i++)
{if(divs[i].className.search(/takefs/gi)!=-1)
{var type="error";var regexp=/alert-(error|warning|info)/i;var results=regexp.exec(divs[i].className);if(results&&results.length>1)
type=results[1];var h1s=divs[i].getElementsByTagName("h1");if(h1s&&h1s.length==1)
var title=h1s[0].innerHTML;else
var title="";var ps=divs[i].getElementsByTagName("p");if(ps&&ps.length==1)
var description=ps[0].innerHTML;else
var description="";divs[i].parentNode.removeChild(divs[i]);clever_alert(type,title,description,false,false);found=true;}}
return true;}
function clever_alert(s_type,s_title,s_description,a_buttons,fn_callback)
{var exists=document.getElementById("cleveralert");if(exists)
clever_close();var cleveralert=document.createElement("DIV");cleveralert.id="cleveralert";cleveralert.className="alert";var winsize=get_window_size();cleveralert.style.height=winsize.height+"px";cleveralert.style.width=winsize.width+"px";var alertbox=document.createElement("DIV");alertbox.className="alert-area alert-"+s_type;var element=document.createElement("H1");element.innerHTML=s_title;alertbox.appendChild(element);var element=document.createElement("P");element.innerHTML=s_description;alertbox.appendChild(element);var buttons=document.createElement("UL");if(!a_buttons)
{a_buttons=new Object();a_buttons['101']="OK";}
for(var id in a_buttons)
{var buttonitem=document.createElement("LI");var button=document.createElement("INPUT");button.type="submit";button.id="cab"+id;if(id&1)
button.className="btn-main";else
button.className="btn-sub";button.alt=a_buttons[id];button.value=a_buttons[id];add_event_simple(button,"click",clever_click);buttonitem.appendChild(button);buttons.appendChild(buttonitem);}
alertbox.appendChild(buttons);cleveralert.appendChild(alertbox);document.body.appendChild(cleveralert);document.getElementsByTagName('html')[0].style.overflow='hidden';if(window.scrollTo)
window.scrollTo(0,0);fn_ca_callback=fn_callback;if(navigator.userAgent&&navigator.userAgent.search(/MSIE 6/gi)!=-1)
{var selects=document.getElementsByTagName("select")
for(var s=0;s<selects.length;s++)
{selects[s].style.visibility='hidden';}}
return true;}
function clever_click(e)
{var targ;if(!e)var e=window.event;if(e.target)targ=e.target;else if(e.srcElement)targ=e.srcElement;if(targ.nodeType==3)
targ=targ.parentNode;if(fn_ca_callback)
fn_ca_callback(targ.id.replace(/cab/i,""));clever_close();return true;}
function clever_close()
{var cleveralert=document.getElementById("cleveralert");if(cleveralert)
cleveralert.parentNode.removeChild(cleveralert);document.getElementsByTagName('html')[0].style.overflow='auto';if(navigator.userAgent&&navigator.userAgent.search(/MSIE 6/gi)!=-1)
{var selects=document.getElementsByTagName("select")
for(var s=0;s<selects.length;s++)
{selects[s].style.visibility='visible';}}
return true;}
function is_array(test)
{if(test.constructor.toString().indexOf("Array")==-1)
return false;else
return true;}
function get_window_size()
{var myWidth=0,myHeight=0;if(typeof(window.innerWidth)=='number'){myWidth=window.innerWidth;myHeight=window.innerHeight;}else if(document.documentElement&&(document.documentElement.clientWidth||document.documentElement.clientHeight)){myWidth=document.documentElement.clientWidth;myHeight=document.documentElement.clientHeight;}else if(document.body&&(document.body.clientWidth||document.body.clientHeight)){myWidth=document.body.clientWidth;myHeight=document.body.clientHeight;}
return{"width":myWidth,"height":myHeight};}