var vbmenu_usepopups=true;var vbmenu_registered=new Array();var vbmenu_initialized=new Array();var vbmenu_activemenus=new Array();var vbmenu_timers=new Array();var vbmenu_currentactive=false;var slidetimer=false;var vbmenu_opensteps=10;var vbmenu_doslide=true;var vbmenu_dofade=false;var vbmenu_datefields=new Array();function e_by_gum(eventobj){if(!eventobj||is_ie){window.event.cancelBubble=true;return window.event}else{if(eventobj.target.type=="submit"){eventobj.target.form.submit()}eventobj.stopPropagation();return eventobj}}function fetch_object_posleft(elm){var left=elm.offsetLeft;while((elm=elm.offsetParent)!=null){left+=elm.offsetLeft}return left}function fetch_object_postop(elm){var top=elm.offsetTop;while((elm=elm.offsetParent)!=null){top+=elm.offsetTop}return top}function vbmenu_doregister(controlid,nowrite,datefield,level2){if(document.getElementsByTagName){var controlobj=fetch_object(controlid);if(controlobj){if(datefield){vbmenu_datefields[controlid]=datefield}vbmenu_registered[vbmenu_registered.length]=controlid;if(!nowrite){var $ImgSrc=IMGDIR_MISC.substring(0,4)=="http"?IMGDIR_MISC:BBURL+"/"+IMGDIR_MISC;document.write('<img src="'+$ImgSrc+"/menu_open"+(level2?"_right":"")+'.gif" alt="" border="0" />')}return true}}return false}function vbmenu_getmenuid(controlid){var dotpos=controlid.indexOf(".");if(dotpos!=-1){return controlid.substr(0,dotpos)}else{return controlid}}function vbmenu_eventhandler_mouseover(e){e=do_an_e(e);vbmenu_hover(this)}function vbmenu_eventhandler_click(e){e=do_an_e(e);vbmenu_open(this,1)}function show_props(obj,objName){var result="";for(var i in obj){result+=objName+"."+i+" = "+obj[i]+"\n"}return result}function vbmenu_close(elem,ppparent){if(vbmenu_currentactive){for(key in vbmenu_activemenus){if(!elem||(ppparent&&ppparent.id!=key+"_menu"&&key!=elem.id)||!ppparent){fetch_object(vbmenu_getmenuid(key)+"_menu").style.display="none";vbmenu_activemenus[key]=false}}}vbmenu_currentactive=false;if(slidetimer){clearTimeout(slidetimer);slidetimer=false}if(is_ie){selects=document.getElementsByTagName("select");for(var i=0;i<selects.length;i++){selects[i].style.visibility="visible"}}}function vbmenu_hover(elm){for(key in vbmenu_activemenus){if(vbmenu_activemenus[key]==true&&key!=elm.id){vbmenu_open(elm);return }}}function vbmenu_overlap(selectobj,m){s=new Array();s["L"]=fetch_object_posleft(selectobj);s["T"]=fetch_object_postop(selectobj);s["R"]=s["L"]+selectobj.offsetWidth;s["B"]=s["T"]+selectobj.offsetHeight;if(s["L"]>=m["L"]&&s["L"]<=m["R"]&&((s["T"]>=m["T"]&&s["T"]<=m["B"])||(s["B"]>=m["T"]&&s["B"]<=m["B"]))){return true}else{if(s["R"]>=m["L"]&&s["R"]<=m["R"]&&((s["T"]>=m["T"]&&s["T"]<=m["B"])||(s["B"]>=m["T"]&&s["B"]<=m["B"]))){return true}else{if(s["B"]>=m["T"]&&s["T"]<=m["B"]&&((s["L"]>=m["L"]&&s["L"]<=m["R"])||(s["R"]>=m["R"]&&s["R"]<=m["R"]))){return true}else{if(m["B"]>=s["T"]&&m["T"]<=s["B"]&&((m["L"]>=s["L"]&&m["L"]<=s["R"])||(m["R"]>=s["R"]&&m["R"]<=s["R"]))){return true}else{return false}}}}}function vbmenu_open(elm,clicked){var openmenu=vbmenu_currentactive;if(elm&&elm.parentNode&&elm.parentNode.parentNode&&elm.parentNode.parentNode.parentNode&&elm.parentNode.parentNode.parentNode.parentNode&&elm.parentNode.parentNode.parentNode.parentNode.id.match(/_menu$/)){var pppparent=elm.parentNode.parentNode.parentNode.parentNode;var pppparent_width=pppparent.offsetWidth;var pppparent_height=elm.parentNode.offsetHeight}else{var pppparent_width=0;var pppparent_height=0}if(clicked||openmenu!=elm.id){vbmenu_close(elm,pppparent)}if(openmenu==elm.id){return false}var menuid=vbmenu_getmenuid(elm.id)+"_menu";var menuobj=fetch_object(menuid);var force_right_slide=false;if(typeof (vbmenu_datefields[elm.id])!="undefined"){force_right_slide=true;fetch_object(elm.id+"_output").innerHTML=fetch_object(vbmenu_datefields[elm.id]).value}else{force_right_slide=false}vbmenu_activemenus[elm.id]=true;vbmenu_currentactive=elm.id;var leftpx=fetch_object_posleft(elm);var toppx=fetch_object_postop(elm)+elm.offsetHeight-pppparent_height;menuobj.style.display="";var slidedir="left";if(force_right_slide||(leftpx+menuobj.offsetWidth+pppparent_width)>=document.body.clientWidth){leftpx=leftpx+elm.offsetWidth-menuobj.offsetWidth-pppparent_width;slidedir="right"}else{leftpx=leftpx+pppparent_width;slidedir="left"}if(is_ie){leftpx+=(slidedir=="left")?-2:2}menuobj.style.left=leftpx+"px";menuobj.style.top=toppx+"px";if(is_ie){menuarea={"L":leftpx,"T":toppx,"R":leftpx+menuobj.offsetWidth,"B":toppx+menuobj.offsetHeight};selects=document.getElementsByTagName("select");for(var i=0;i<selects.length;i++){if(vbmenu_overlap(selects[i],menuarea)){selects[i].style.visibility="hidden"}}}if(vbmenu_doslide&&!is_opera&&!is_ie4){if(vbmenu_dofade&&is_ie){menuobj.filters.item("DXImageTransform.Microsoft.alpha").opacity=0}var intervalX=Math.ceil(menuobj.offsetWidth/vbmenu_opensteps);var intervalY=Math.ceil(menuobj.offsetHeight/vbmenu_opensteps);if(slidedir=="left"){menuobj.style.clip="rect(auto, 0px, 0px, auto)";vbmenu_slide_left(menuid,intervalX,intervalY,0,0,0)}else{menuobj.style.clip="rect(auto, auto, 0px, "+(menuobj.offsetWidth)+"px)";vbmenu_slide_right(menuid,intervalX,intervalY,menuobj.offsetWidth,0,0)}}return false}function vbmenu_slide_left(menuid,intervalX,intervalY,clipX,clipY,opacity){var menuobj=fetch_object(menuid);if(clipX<menuobj.offsetWidth||clipY<menuobj.offsetHeight){if(vbmenu_dofade&&is_ie){opacity+=10;menuobj.filters.item("DXImageTransform.Microsoft.alpha").opacity=opacity}clipX+=intervalX;clipY+=intervalY;menuobj.style.clip="rect(auto, "+clipX+"px, "+clipY+"px, auto)";vbmenu_timers[menuid]=setTimeout("vbmenu_slide_left('"+menuid+"', "+intervalX+", "+intervalY+", "+clipX+", "+clipY+", "+opacity+");",0)}else{clearTimeout(vbmenu_timers[menuid])}}function vbmenu_slide_right(menuid,intervalX,intervalY,clipX,clipY,opacity){menuobj=fetch_object(menuid);if(clipX>0||clipY<menuobj.offsetHeight){if(vbmenu_dofade&&is_ie){opacity+=10;menuobj.filters.item("DXImageTransform.Microsoft.alpha").opacity=opacity}clipX-=intervalX;clipY+=intervalY;menuobj.style.clip="rect(auto, "+menuobj.offsetWidth+"px, "+clipY+"px, "+clipX+"px)";vbmenu_timers[menuid]=setTimeout("vbmenu_slide_right('"+menuid+"', "+intervalX+", "+intervalY+", "+clipX+", "+clipY+", "+opacity+");",0)}else{clearTimeout(vbmenu_timers[menuid])}}function vbmenu_navtolink(e){childLinks=this.getElementsByTagName("a");if(childLinks[0]){if(is_ie){childLinks[0].click();window.event.cancelBubble=true}else{if(e.shiftKey){window.open(childLinks[0].href);e.stopPropagation();e.preventDefault()}else{window.location=childLinks[0].href;e.stopPropagation();e.preventDefault()}}}}function vbmenu_switch_option_bg(e){if(is_moz){moz_rclick(e)}this.className=(this.className=="vbmenu_option")?"vbmenu_hilite":"vbmenu_option";vbmenu_hand_pointer(this)}function vbmenu_hand_pointer(obj){try{obj.style.cursor="pointer"}catch(e){obj.style.cursor="hand"}}function vbmenu_init(controlid){var menuid=vbmenu_getmenuid(controlid)+"_menu";var menuobj=fetch_object(menuid);if(document.getElementsByTagName&&menuobj){var controlobj=fetch_object(controlid);vbmenu_hand_pointer(controlobj);controlobj.unselectable=true;controlobj.onclick=vbmenu_eventhandler_click;controlobj.onmouseover=vbmenu_eventhandler_mouseover;if(typeof (vbmenu_initialized[menuid])!="undefined"){return }var popupobj=fetch_object(menuid);popupobj.style.display="none";popupobj.style.position="absolute";popupobj.style.left="0px";popupobj.style.top="0px";popupobj.onclick=e_by_gum;var tables=popupobj.getElementsByTagName("table");if(tables.length>0){tables[0].width=""}if(is_ie){popupobj.style.filter+="progid:DXImageTransform.Microsoft.alpha(enabled=1,opacity=100)";popupobj.style.filter+="progid:DXImageTransform.Microsoft.shadow(direction=135,color=#8E8E8E,strength=3)"}var tds=popupobj.getElementsByTagName("td");for(var i=0;i<tds.length;i++){if(tds[i].className=="vbmenu_option"){tds[i].style.cursor="default";if(tds[i].title=="nohilite"){tds[i].title=""}else{tds[i].onmouseover=vbmenu_switch_option_bg;tds[i].onmouseout=vbmenu_switch_option_bg;tds[i].onclick=vbmenu_navtolink;if(!is_saf&&!is_kon){try{var links=tds[i].getElementsByTagName("a");for(var j=0;j<links.length;j++){if(typeof (links[j].onclick)=="undefined"){links[j].onclick=e_by_gum}}}catch(e){}}}}else{if(is_moz){tds[i].onmouseover=moz_rclick;tds[i].onmouseout=moz_rclick}}}vbmenu_initialized[menuid]=true}}function returnfalse(){return false}function moz_rclick(e){if(e.type=="mouseover"){document.onclick=""}else{document.onclick=vbmenu_close}}function vB_Popup_Handler(){this.open_steps=10;this.open_fade=false;this.active=false;this.menus=new Array();this.activemenu=null;this.hidden_selects=new Array()}vB_Popup_Handler.prototype.activate=function(active){this.active=active};vB_Popup_Handler.prototype.register=function(controlkey,noimage){this.menus[controlkey]=new vB_Popup_Menu(controlkey,noimage);return this.menus[controlkey]};vB_Popup_Handler.prototype.hide=function(){if(this.activemenu!=null){this.menus[this.activemenu].hide()}};var vBmenu=new vB_Popup_Handler();function vbmenu_hide(e){if(e&&e.button&&e.button!=1&&e.type=="click"){return true}else{vBmenu.hide()}}function vB_Popup_Menu(controlkey,noimage){this.controlkey=controlkey;this.menuname=this.controlkey.split(".")[0]+"_menu";this.init_control(noimage);if(fetch_object(this.menuname)){this.init_menu()}this.slide_open=(is_opera?false:true);this.open_steps=vBmenu.open_steps}vB_Popup_Menu.prototype.init_control=function(noimage){this.controlobj=fetch_object(this.controlkey);this.controlobj.state=false;if(this.controlobj.firstChild&&(this.controlobj.firstChild.tagName=="TEXTAREA"||this.controlobj.firstChild.tagName=="INPUT")){}else{if(!noimage&&!(is_mac&&is_ie)){var space=document.createTextNode(" ");this.controlobj.appendChild(space);var img=document.createElement("img");img.src=IMGDIR_MISC+"/menu_open.gif";img.border=0;img.title="";img.alt="";this.controlobj.appendChild(img)}this.controlobj.unselectable=true;if(!noimage){this.controlobj.style.cursor=pointer_cursor}this.controlobj.onclick=vB_Popup_Events.prototype.controlobj_onclick;this.controlobj.onmouseover=vB_Popup_Events.prototype.controlobj_onmouseover}};vB_Popup_Menu.prototype.init_menu=function(){this.menuobj=fetch_object(this.menuname);if(this.menuobj&&!this.menuobj.initialized){this.menuobj.initialized=true;this.menuobj.onclick=e_by_gum;this.menuobj.style.position="absolute";this.menuobj.style.zIndex=50;if(is_ie&&!is_mac){this.menuobj.style.filter+="progid:DXImageTransform.Microsoft.alpha(enabled=1,opacity=100)";this.menuobj.style.filter+="progid:DXImageTransform.Microsoft.shadow(direction=135,color=#8E8E8E,strength=3)"}this.init_menu_contents()}};vB_Popup_Menu.prototype.init_menu_contents=function(){var tds=fetch_tags(this.menuobj,"td");for(var i=0;i<tds.length;i++){if(tds[i].className=="vbmenu_option"){if(tds[i].title&&tds[i].title=="nohilite"){tds[i].title=""}else{tds[i].controlkey=this.controlkey;tds[i].onmouseover=vB_Popup_Events.prototype.menuoption_onmouseover;tds[i].onmouseout=vB_Popup_Events.prototype.menuoption_onmouseout;var links=fetch_tags(tds[i],"a");if(links.length==1){tds[i].className=tds[i].className+" vbmenu_option_alink";tds[i].islink=true;var linkobj=links[0];var remove_link=false;tds[i].target=linkobj.getAttribute("target");if(typeof linkobj.onclick=="function"){tds[i].ofunc=linkobj.onclick;tds[i].onclick=vB_Popup_Events.prototype.menuoption_onclick_function;remove_link=true}else{if(typeof tds[i].onclick=="function"){tds[i].ofunc=tds[i].onclick;tds[i].onclick=vB_Popup_Events.prototype.menuoption_onclick_function;remove_link=true}else{tds[i].href=linkobj.href;tds[i].onclick=vB_Popup_Events.prototype.menuoption_onclick_link}}if(remove_link){var myspan=document.createElement("span");myspan.innerHTML=linkobj.innerHTML;tds[i].insertBefore(myspan,linkobj);tds[i].removeChild(linkobj)}}else{if(typeof tds[i].onclick=="function"){tds[i].ofunc=tds[i].onclick;tds[i].onclick=vB_Popup_Events.prototype.menuoption_onclick_function}}}}}};vB_Popup_Menu.prototype.show=function(obj,instant){if(!vBmenu.active){return false}else{if(!this.menuobj){this.init_menu()}}if(!this.menuobj){return false}if(vBmenu.activemenu!=null){vBmenu.menus[vBmenu.activemenu].hide()}vBmenu.activemenu=this.controlkey;this.menuobj.style.display="";if(this.slide_open){this.menuobj.style.clip="rect(auto, 0px, 0px, auto)"}this.pos=this.fetch_offset(obj);this.leftpx=this.pos["left"];this.toppx=this.pos["top"]+obj.offsetHeight;if((this.leftpx+this.menuobj.offsetWidth)>=document.body.clientWidth&&(this.leftpx+obj.offsetWidth-this.menuobj.offsetWidth)>0){this.leftpx=this.leftpx+obj.offsetWidth-this.menuobj.offsetWidth;this.direction="right"}else{this.direction="left"}this.menuobj.style.left=this.leftpx+"px";this.menuobj.style.top=this.toppx+"px";if(!instant&&this.slide_open){this.intervalX=Math.ceil(this.menuobj.offsetWidth/this.open_steps);this.intervalY=Math.ceil(this.menuobj.offsetHeight/this.open_steps);this.slide((this.direction=="left"?0:this.menuobj.offsetWidth),0,0)}else{if(this.menuobj.style.clip&&this.slide_open){this.menuobj.style.clip="rect(auto, auto, auto, auto)"}}this.handle_overlaps(true);if(this.controlobj.editorid){this.controlobj.state=true;vB_Editor[this.controlobj.editorid].menu_context(this.controlobj,"mousedown")}};vB_Popup_Menu.prototype.hide=function(e){if(e&&e.button&&e.button!=1){return true}this.stop_slide();this.menuobj.style.display="none";this.handle_overlaps(false);if(this.controlobj.editorid){this.controlobj.state=false;vB_Editor[this.controlobj.editorid].menu_context(this.controlobj,"mouseout")}vBmenu.activemenu=null};vB_Popup_Menu.prototype.hover=function(obj){if(vBmenu.activemenu!=null){if(vBmenu.menus[vBmenu.activemenu].controlkey!=this.id){this.show(obj,true)}}};vB_Popup_Menu.prototype.slide=function(clipX,clipY,opacity){if(this.direction=="left"&&(clipX<this.menuobj.offsetWidth||clipY<this.menuobj.offsetHeight)){if(vBmenu.open_fade&&is_ie){opacity+=10;this.menuobj.filters.item("DXImageTransform.Microsoft.alpha").opacity=opacity}clipX+=this.intervalX;clipY+=this.intervalY;this.menuobj.style.clip="rect(auto, "+clipX+"px, "+clipY+"px, auto)";this.slidetimer=setTimeout("vBmenu.menus[vBmenu.activemenu].slide("+clipX+", "+clipY+", "+opacity+");",0)}else{if(this.direction=="right"&&(clipX>0||clipY<this.menuobj.offsetHeight)){if(vBmenu.open_fade&&is_ie){opacity+=10;menuobj.filters.item("DXImageTransform.Microsoft.alpha").opacity=opacity}clipX-=this.intervalX;clipY+=this.intervalY;this.menuobj.style.clip="rect(auto, "+this.menuobj.offsetWidth+"px, "+clipY+"px, "+clipX+"px)";this.slidetimer=setTimeout("vBmenu.menus[vBmenu.activemenu].slide("+clipX+", "+clipY+", "+opacity+");",0)}else{this.stop_slide()}}};vB_Popup_Menu.prototype.stop_slide=function(){clearTimeout(this.slidetimer);this.menuobj.style.clip="rect(auto, auto, auto, auto)";if(vBmenu.open_fade&&is_ie){this.menuobj.filters.item("DXImageTransform.Microsoft.alpha").opacity=100}};vB_Popup_Menu.prototype.fetch_offset=function(obj){var left_offset=obj.offsetLeft;var top_offset=obj.offsetTop;while((obj=obj.offsetParent)!=null){left_offset+=obj.offsetLeft;top_offset+=obj.offsetTop}return{"left":left_offset,"top":top_offset}};vB_Popup_Menu.prototype.overlaps=function(obj,m){var s=new Array();var pos=this.fetch_offset(obj);s["L"]=pos["left"];s["T"]=pos["top"];s["R"]=s["L"]+obj.offsetWidth;s["B"]=s["T"]+obj.offsetHeight;if(s["L"]>m["R"]||s["R"]<m["L"]||s["T"]>m["B"]||s["B"]<m["T"]){return false}return true};vB_Popup_Menu.prototype.handle_overlaps=function(dohide){if(is_ie){var selects=fetch_tags(document,"select");if(dohide){var menuarea=new Array();menuarea={"L":this.leftpx,"R":this.leftpx+this.menuobj.offsetWidth,"T":this.toppx,"B":this.toppx+this.menuobj.offsetHeight};for(var i=0;i<selects.length;i++){if(this.overlaps(selects[i],menuarea)){var hide=true;var s=selects[i];while(s=s.parentNode){if(s.className=="vbmenu_popup"){hide=false;break}}if(hide){selects[i].style.visibility="hidden";array_push(vBmenu.hidden_selects,i)}}}}else{while(true){var i=array_pop(vBmenu.hidden_selects);if(typeof i=="undefined"||i==null){break}else{selects[i].style.visibility="visible"}}}}};function vB_Popup_Events(){}vB_Popup_Events.prototype.controlobj_onclick=function(e){if(typeof do_an_e=="function"){do_an_e(e);if(vBmenu.activemenu==null||vBmenu.menus[vBmenu.activemenu].controlkey!=this.id){vBmenu.menus[this.id].show(this)}else{vBmenu.menus[this.id].hide()}}};vB_Popup_Events.prototype.controlobj_onmouseover=function(e){if(typeof do_an_e=="function"){do_an_e(e);vBmenu.menus[this.id].hover(this)}};vB_Popup_Events.prototype.menuoption_onclick_function=function(e){this.ofunc(e);vBmenu.menus[this.controlkey].hide()};vB_Popup_Events.prototype.menuoption_onclick_link=function(e){e=e?e:window.event;if(e.shiftKey||(this.target!=null&&this.target!="")){if(this.target!=null&&this.target.charAt(0)!="_"){window.open(this.href,this.target)}else{window.open(this.href)}}else{window.location=this.href}e.cancelBubble=true;if(e.stopPropagation){e.stopPropagation()}if(e.preventDefault){e.preventDefault()}vBmenu.menus[this.controlkey].hide();return false};vB_Popup_Events.prototype.menuoption_onmouseover=function(e){this.className="vbmenu_hilite"+(this.islink?" vbmenu_hilite_alink":"");this.style.cursor=pointer_cursor};vB_Popup_Events.prototype.menuoption_onmouseout=function(e){this.className="vbmenu_option"+(this.islink?" vbmenu_option_alink":"");this.style.cursor="default"}