var popupCalendarInstance=null;function popupCalendar(B){popupCalendarInstance=this;var F=420;var D=220;var E=30;var A=["January","February","March","April","May","June","July","August","September","October","November","December"];this.isIE;this.isNN4;this.wTop;this.wLeft;this.win;this.target;this.yy;this.mm;this.dd;this.time;this.doc;this.buffer;this.padding;this.findTarget=function(I){if(!document.forms){return false}for(var J=0;J<document.forms.length;++J){if(!document.forms[J].elements){continue}for(var H=0;H<document.forms[J].elements.length;++H){var K=document.forms[J].elements[H];if(!K.name){continue}if(K.name==I&&K.type!="hidden"){target=K;return true}}}return false};this.calcWinPos=function(I){wTop=null;wLeft=null;if(document.all||document.getElementById){wLeft=I.offsetLeft;wTop=I.offsetTop;for(var H=I.offsetParent;H;H=H.offsetParent){wLeft+=H.offsetLeft;wTop+=H.offsetTop}wLeft+=window.screenLeft-document.body.scrollLeft;if(wLeft+D>screen.width-50){wLeft=screen.width-D-50}if(wLeft<0){wLeft=1}wTop+=window.screenTop-document.body.scrollTop-100;if(wTop+F>screen.height-100){wTop=screen.height-F-100}if(wTop<0){wTop=1}}if(wTop==null||isNaN(wTop)||wLeft==null||isNaN(wLeft)){wTop=(screen.height-F)/2;wLeft=(screen.width-D)/2}};this.isLeapYear=function(H){return H%100==0?H%400==0:H%4==0};this.getMaxDay=function(){switch(mm){case 1:case 3:case 5:case 7:case 8:case 10:case 12:return 31;case 4:case 6:case 9:case 11:return 30;case 2:return isLeapYear(yy)?29:28}};this.loadTarget=function(){yy=null;mm=null;dd=null;time=null;var J=target.value;if(!J){return false}var I=J.indexOf("/");if(I==-1){return false}mm=parseInt(J.substring(0,I).trim());if(isNaN(mm)||mm<1||mm>12){return false}J=J.substring(I+1);I=J.indexOf("/");if(I==-1){return false}dd=parseInt(J.substring(0,I).trim());if(isNaN(dd)||dd<1||dd>31){return false}J=J.substring(I+1).trim();I=J.indexOf(" ");if(I!=-1){time=J.substring(I);J=J.substring(0,I)}var H=J.charAt(0);if(H=="0"){J=J.substring(1).trim()}yy=parseInt(J);if(isNaN(yy)){return false}if(yy<100){yy+=yy<E?2000:1900}return dd<=getMaxDay()};this.loadToday=function(){var H=new Date();yy=H.getFullYear();mm=H.getMonth()+1;dd=H.getDate();time=null};this.write=function(H){buffer+=H};this.writeln=function(H){write(H+"\n");if(!isIE){flush()}};this.flush=function(){if(buffer.length==0){return }doc.write(buffer);buffer=""};this.monthSelector=function(){writeln("<select onchange='pc.mmChanged(parseInt(this.options[this.selectedIndex].value));'>");for(var H=1;H<=12;++H){write("<option value='"+H+"'");if(H==mm){write(" selected='selected'")}writeln(">"+A[H-1]+"</option>")}writeln("</select>\n")};this.yearSelector=function(){writeln("<select onchange='pc.yyChanged(parseInt(this.options[this.selectedIndex].value));'>");var J=yy-10;var I=yy+10;for(var H=1930;H<J;H+=10){if(H+1==J){writeln("<option value='"+H+"'>"+H+"</option>")}else{writeln("<option value='"+H+"'>"+H+"s...</option>")}}if(I%10==0&&I<2020){--I}for(var H=J;H<=I;++H){write("<option value='"+H+"'");if(H==yy){write(" selected='selected'")}writeln(">"+H+"</option>")}for(var H=Math.floor(I/10)*10;H<2020;H+=10){if(H+9!=I){writeln("<option value='"+H+"'>"+H+"s...</option>")}}writeln("</select>\n")};this.dayItem=function(J,N){if(!J){writeln("<td></td>");return }write("<td><a class='");var I=new Date();var K=yy==I.getFullYear()&&mm-1==I.getMonth()&&J==I.getDate();if(K){if(N==0){write("todaySunday")}else{write("today")}}else{if(N==0){write("sunday")}}write("' href='javascript:void(0);' onclick='window.close();pc.picked(\"");var L=mm+"/"+J+"/"+((""+yy).substring(2))+(time?time:"");write(L);write("\");'>");write(J);write("</a>");if(window.gbl_day){var H=""+yy+(mm<10?"0":"")+mm+(J<10?"0":"")+J;var M=window.gbl_day[H];if(M>0){write("<span class='rooms'>&nbsp;(");write(M);write(")</span>")}}writeln("</td>")};this.dayTable=function(){writeln("<table width='150' cellpadding='1' cellspacing='0' border='0' bgcolor='#000000'><tr><td>");writeln("<table width='150' class='calendar' border='0' cellpadding='2' cellspacing='2' bgcolor='#eeeeee'>");writeln("<tr><td><b>");writeln(A[mm-1]);writeln(yy);writeln("</b></td></tr>");writeln("</table></td></tr><tr><td>");writeln("<table width='150' class='calendar' border='0' cellpadding='2' cellspacing='2' bgcolor='#ffffff'>");writeln("<tr bgcolor='#ffffff'><th class='sunday'>S</th><th>M</th><th>T</th><th>W</th><th>T</th><th>F</th><th>S</th></tr>");var J=getMaxDay();var N=new Date(yy,mm-1,1).getDay();var L=null;var I=1;for(var H=0;H<6;++H){if(I>J){break}writeln("<tr>");for(var K=0;K<7;++K){var M=null;if(N>0){if(L&&L<=J){M=L++}--N}else{if(I<=J){M=I++}}dayItem(M,K)}writeln("</tr>")}writeln("</table></td></tr></table>")};this.today=function(){var H=new Date()};this.instructions=function(){write("<span class='instructions'>");if(window.gbl_day){write("&nbsp;&nbsp;Number of Schedules in Parenthesis.")}writeln("</span>")};this.drawPage=function(){this.doc=win.document;this.buffer="";doc.open();writeln("<html>");writeln("<head>");writeln("<title>Calendar</title>");writeln("<style type='text/css'>");writeln("BODY, TD, TH {");writeln("  font-family: Arial, Helvetica, sans-serif;");writeln("  font-size: 11px;");writeln("  font-style: normal;");writeln("  font-weight: normal;");writeln("}");writeln("TH, TD {");writeln("  text-align: center;");writeln("}");writeln("TH {");writeln("  font-weight: bold;");writeln("}");writeln(".rooms {");writeln("  font-size: 10px;");writeln("}");writeln(".instructions {");writeln("  font-size: 11px;");writeln("  font-style: italic;");writeln("}");writeln(".sunday {");writeln("  color: #000000;");writeln("}");writeln("A {");writeln("  text-decoration: underline;");writeln("  color:#0000ff;");writeln("}");writeln("A:visited {");writeln("color:#990099; text-decoration:underline;}");writeln("A:HOVER {");writeln("#ff0000; text-decoration:none;}");writeln(".today {");writeln("}");writeln(".todaySunday {");writeln("  color: #000000;");writeln("  background-color: #F0F0FF;");writeln("  font-weight: bold;");writeln("}");writeln("select {");writeln("border:1 #909090 solid; font-size:11px; color:#666666; background-color:#ffffff;");writeln("}");writeln("select option {");writeln("border:1 #909090 solid; font-size:11px; color:#666666; background-color:#ffffff;");writeln("}");writeln("</style>");writeln("<script type='text/javascript'>");writeln("var pc = window.opener.popupCalendarInstance;");writeln("<\/script>");writeln("</head>");writeln("<body bgcolor='#ffffff'>");writeln("<form>");writeln("<table align='center'>");writeln("<tr height='2'><td></td></tr>");writeln("<tr><td>");dayTable();writeln("</td></tr>");writeln("<tr height='7'><td></td></tr>");writeln("<tr><td>");++mm;if(mm==13){mm=1;++yy}dayTable();--mm;if(mm==0){mm=12;--yy}writeln("</td></tr>");writeln("<tr height='5'><td></td></tr>");writeln("<tr><td><b>");writeln("<a href='javascript:void(0);' onclick='pc.prevMonth();'>&lt;</a>");writeln("&nbsp;&nbsp;");writeln("<a href='javascript:void(0);' onclick='pc.nextMonth();'>&gt;</a>");writeln("</b></td></tr>");writeln("<tr height='5'><td></td></tr>");writeln("<tr><td>");monthSelector();yearSelector();writeln("</td></tr>");writeln("</table>");writeln("</form>");writeln("</body>");writeln("</html>");flush();doc.close()};this.goToday=function(){loadToday();drawPage()};this.yyChanged=function(H){this.yy=H;drawPage()};this.mmChanged=function(H){switch(H){case 0:this.mm=12;--yy;break;case 13:this.mm=1;++yy;break;default:this.mm=H;break}drawPage()};this.prevMonth=function(){mm-=2;if(mm<1){mm+=12;--yy}drawPage()};this.nextMonth=function(){mm+=2;if(mm>12){mm-=12;++yy}drawPage()};this.picked=function(H){target.value=H;if(window.update_schedule_date){window.update_schedule_date(target)}};var G=navigator.userAgent.toLowerCase();this.isIE=G.indexOf("msie")!=-1&&G.indexOf("opera")==-1;this.isNN4=G.indexOf("mozilla")!=-1&&G.indexOf("spoofer")==-1&&G.indexOf("compatible")==-1&&G.indexOf("opera")==-1&&G.indexOf("webtv")==-1&&G.indexOf("hotjava")==-1&&parseInt(navigator.appVersion)==4;this.padding=isNN4?1:2;if(!findTarget(B.name.substring(0,B.name.length-7))){return }calcWinPos(B);var C=window.gbl_day?D*2:D;win=window.open("","_popupCalendarWindow","height="+F+",width="+C+",scrollbars=no,resizable=yes,status=no"+(wTop&&wLeft?",top="+wTop+",left="+wLeft:""));if(wTop&&wLeft){win.moveTo(wLeft,wTop)}if(!loadTarget()){loadToday()}drawPage();win.focus();return };
