<!--
// Kaosweaver Calendar Settings - do not remove
// by Paul Davis - http://www.kaosweaver.com
// KW_lang[English]
// KW_order[1,0,2]
// KW_del1[/]
// KW_del2[/]
// KW_dd[false]
// KW_cWidth[250]
// KW_fd[-1]

var sDate = new Array();
sDate[sDate.length]="4,11,2008"
sDate[sDate.length]="4,12,2008"
sDate[sDate.length]="4,13,2008"
sDate[sDate.length]="10,27,2007"
var mName = new Array("Janeiro","Fevereiro","Março","Abril","Maio","Junho","Julho","Agosto","Setembro","Outubro","Novembro","Dezembro")
var wName = new Array("Seg","Ter","Qua","Qui","Sex","Sab","Dom")
var cFontName = "Arial, Helvetica, sans-serif;"
var KW_color = new Array("#000000","#FEB400","#FFFFFF","#FFFFFF","#FF5353","#ffffff","#EAEAEA","#B3C6FF")
var KW_cl=0;
var KW_od=1;
var KW_tmo=1;
var KW_cWidth=250;
var KW_fd=-1;
var KW_ss=-1;
var KW_sw=0;
var descx=-1;
var descy=-1;
var bwNN=(document.captureEvents)?1:0;
function popmousemove(e){descx=(bwNN)?e.pageX:event.x;descy=(bwNN)?e.pageY:event.y}
function KW_mouseInit(){
	if(bwNN)document.captureEvents(Event.MOUSEMOVE);document.onmousemove=popmousemove;
}
function m_class(m,d,y) { 
	this.month=(m<10)?"0"+m:m;if (d) this.day=(d<10)?"0"+d:d;else this.day="";this.year=y;
	this.output=this.day+"/"+this.month+"/"+this.year;	var kd=new Date();this.special=checkDates(this.month,this.day,this.year)
	this.today=((kd.getMonth()+1)==this.month && kd.getDate()==this.day && kd.getFullYear()==this.year)
	var td=new Date(this.year, (this.month-1), Number(this.day)+KW_od);this.past=(KW_od==-1)?0:(kd>td)
	var tf=new Date(kd.getFullYear(),kd.getMonth(),kd.getDate()+KW_fd);
	var d1=new Date(this.year, (this.month-1), this.day);
	this.future=(KW_fd==-1)?0:(tf<d1);this.ss=(this.special && KW_ss);
	this.display=(this.past || this.future || this.ss);
}

// Kaosweaver End of Calendar Settings - do not remove

function checkDates(m1,d1,y1) { //v2.1.5
	var rStr=false;for(var i=0;i<sDate.length;i++) {var tDate=sDate[i].split(",");
		if (tDate[2]=="*" || tDate[2]==y1) {if (tDate[1]==d1 && tDate[0]==m1)	rStr=true;
		}}return rStr;
}

function KW_doCalendar(obj,E,m,y) { //v2.5.3
  var d=new Date();f=0;d.setDate(1);if (!m && m!=0) {m=d.getMonth();f=KW_cl}
  if (f==1 && MM_findObj('KW_selectedMonth').value!=-1)
  m=MM_findObj('KW_selectedMonth').value-1;d.setMonth(m);
  if (!y) y=d.getFullYear();if (f==1 && MM_findObj('KW_selectedYear').value!=-1)
  y=MM_findObj('KW_selectedYear').value;d.setFullYear(y);dy=d.getDay();if (!E) E=0;
  if(E==1)dy=(dy==0)?6:dy-1;dP=new Date();dP.setMonth(m);dP.setDate(0);
  pStart=dP.getDate()-dy+1;dStr=new Array();for (i=pStart;i<dP.getDate()+1;i++) { tmo=(KW_tmo)?"":i;
  tMonth=(m==0)?"12":m;tYear=(m==0)?y-1:y;dStr[dStr.length]=new m_class(tMonth,tmo,tYear);
  }EOM=false;for (i=1;!EOM;i++){d.setDate(i);if (m!=d.getMonth()) EOM=true; else {
  dStr[dStr.length]=new m_class((Number(m)+1),i,y);}}cnt=1;si=0;
  if(E==1)si=(d.getDay()==0)?6:d.getDay()-1;else si=d.getDay();	for (i=si;i<7;i++) {
  tMonth=(m==11)?"1":Number(m)+2;tYear=(m==11)?Number(y)+1:y; tmo=(KW_tmo)?"":cnt;
  dStr[dStr.length]=new m_class(tMonth,tmo,tYear); cnt++;}pM=(m==0)?11:m-1;
  pY=(m==0)?y-1:y;nM=(m==11)?0:Number(m)+1;nY=(m==11)?Number(y)+1:y;
  wStr="<ht"+""+"ml><he"+""+"ad><st"+""+"yle type=\"text/css\"><!--  body { background-color: "+KW_color[6]+"}\ntd {  font-family: "+cFontName+" font-size: 12px; }\n.tblHdr { font-weight: bold; color: "+KW_color[0]+"; background-color: "+KW_color[6]+" }\n.subTbl{ color: "+KW_color[0]+"; background-color: "+KW_color[7]+";  text-align: center}-->\n</st"+""+"yle>\n<ti"+""+"tle>"+mName[m]+", "+y+"</ti"+""+"tle>\n</he"+""+"ad>\n<bo"+""+"dy  topmargin=\"0\" marginwidth=\"0\" marginheight=\"0\" leftmargin=\"0\" onLoad=\"window.focus()\">\n<table width=\"100%\" border=\"0\" cellspacing=\"0\">\n<tr>\n<td bgcolor=\""+KW_color[6]+"\">\n<table width=\"100%\" border=0>\n"
  wStr+="<tr>\n<td align=center bgcolor=\""+KW_color[6]+"\" class=\"tblHdr\" colspan=\"4\"><a href=\"javascript:window.opener.KW_doCalendar('"+obj+"',"+E+",'"+pM+"','"+pY+"');\" class=\"tblHdr\"><img src=\"http://www.hotelresicolibri.com/graficos/gif/arrow_l.gif\" width=\"17\" height=\"15\" border=\"0\"></a>&nbsp;&nbsp;"+mName[m]+"&nbsp;&nbsp;<a href=\"javascript:window.opener.KW_doCalendar('"+obj+"',"+E+",'"+nM+"','"+nY+"');\"  class=\"tblHdr\"><img src=\"http://www.hotelresicolibri.com/graficos/gif/arrow_r.gif\" width=\"17\" height=\"15\" border=\"0\"></a></td>\n<td colspan=3 align=center class=\"tblHdr\"><a href=\"javascript:window.opener.KW_doCalendar('"+obj+"',"+E+",'"+m+"','"+(y-1)+"');\" class=\"tblHdr\"><img src=\"http://www.hotelresicolibri.com/graficos/gif/arrow_l.gif\" width=\"17\" height=\"15\" border=\"0\"></a>&nbsp;&nbsp;"+y+"&nbsp;&nbsp;<a href=\"javascript:window.opener.KW_doCalendar('"+obj+"',"+E+",'"+m+"','"+(Number(y)+1)+"');\"  class=\"tblHdr\"><img src=\"http://www.hotelresicolibri.com/graficos/gif/arrow_r.gif\" width=\"17\" height=\"15\" border=\"0\"></a></td>\n</tr>\n"
  wStr+="<tr>\n";for(wdn=0;wdn<7;wdn++)wStr+="<td class=\"subTbl\">"+wName[wdn]+"</td>\n";wStr+="</tr>\n"
  for (x=0;x<parseInt(dStr.length/7);x++) {	wStr+="<tr>\n";	for (y=0;y<7;y++) {
  yT=(E==1)?5:0;bC=(y==yT||y==6)?KW_color[2]:KW_color[3];
  if ((y==yT||y==6) && KW_sw && !dStr[x*7+y].display) dStr[x*7+y].display=true;
  if ((Number(m)+1)!=dStr[x*7+y].month) bC=KW_color[5]; if (dStr[x*7+y].special)
  bC=KW_color[4];if (dStr[x*7+y].today) bC=KW_color[1];
  a0=(KW_cl!=1)?"":"window.opener.MM_findObj('KW_selectedMonth',window.opener.document).value='"+dStr[x*7+y].month+"';window.opener.MM_findObj('KW_selectedYear',window.opener.document).value='"+dStr[x*7+y].year+"'; "
  a1=(dStr[x*7+y].display)?"":"<a href=\"javascript:window.opener.MM_findObj('"+obj+"',window.opener.document).value='"+dStr[x*7+y].output+"';"+a0+" window.close();window.opener.kw_customCalc();\" >";
  a2=(dStr[x*7+y].display)?"":"</a>";
  wStr+="<td align=\"center\" bgcolor="+bC+">"+a1+dStr[x*7+y].day+a2+"</td>\n";
	}	wStr+="</tr>\n";}	wStr+="<tr><td colspan=7></td></tr></table></td></tr></table></bo"+""+"dy></ht"+""+"ml>";
	var screenX=(self.screenX)?self.screenX+20:window.screenLeft
	var screenY=(self.screenY)?self.screenY+70:window.screenTop
	var w =(descx==-1)?parseInt(screen.width/2-75):descx+screenX;
	var h=(descy==-1)?parseInt(screen.height/2-75):descy+screenY;
	var look='width='+KW_cWidth+',height=155,left='+w+',top='+h;	popwin=window.open('','calendar',look);
	popwin.document.open();	popwin.document.write(wStr);	popwin.document.close();
}
document.oldDate=""
function kw_customCalc() {
	oDate=MM_findObj('Data_de_Entrada').value
	if (oDate=="Data Indisponível") {oDate=document.oldDate; MM_findObj('Data_de_Entrada').value=oDate;}
	rateList=MM_findObj('Tipo_de_Quarto').selectedIndex
	nights=MM_findObj('Numero_de_Noites').value
	rooms=MM_findObj('Numero_de_Quartos').value
	
	
	// The Rate Level
	//
	// These below represent the room rate levels per the Tipo_de_Quarto column on the rate chart
	// the first entry is the green, second the blue and third the red.

	roomRates = new Array()
	roomRates[0]="35,40,45,50,50"
	roomRates[1]="39.9,49.9,60,70,70"
	roomRates[2]="39.9,49.9,70,80,70"
	roomRates[3]="49.9,59.9,85,95,90"
	thisR=roomRates[rateList].split(",")	
	
	dSplit=oDate.split("/");
	m=parseInt(Number(dSplit[1]));d=parseInt(Number(dSplit[0]));y=parseInt(Number(dSplit[2]));
	
	errMsg="";
	
	if (d>31 || d<1 || m<1 || m>12 || y<2003) {
		errMsg="Data Inválida";
	} 
	testDate=new Date(y,m-1,d)
	m2=testDate.getMonth()+1
	d2=testDate.getDate()
	y2=testDate.getFullYear()
	if (m!=m2 || d!=d2 || y!=y2) {
			errMsg="Data Inválida";
	}
	// check for a special date covered
	var stay=parseInt(MM_findObj('Numero_de_Noites').value)
	testDate=new Date(y,m-1,d)
	m2=testDate.getMonth()+1
	d2=testDate.getDate()
	y2=testDate.getFullYear()	
	document.oldDate="";
	if (stay>0) {
		for (var i=0;i<stay;i++){
			if (checkDates(m2,d2,y2)) {
				errMsg="Data Indisponível";
				document.oldDate=oDate;
			}
			testDate.setDate(d2+1)
			m2=testDate.getMonth()+1
			d2=testDate.getDate()
			y2=testDate.getFullYear()			
		}
	}
	
	
	if (errMsg!="") {
		MM_findObj('Data_de_Entrada').value=errMsg;
	} else {
		// here is where the rates dates are set, you can add as many rate sets as you want, just insure that *all*
		// dates are covered.  Since we are dealing with a programming language we have to use its counting system
		// for months use this chart:
		//
		// 0=January
		// 1=February
		// 2=March
		// 3=April
		// 4=May
		// 5=June
		// 6=July
		// 7=August
		// 8=September
		// 9=October
		// 10=November
		// 11=December
		//
		// to enter a date range use this format
		//
		// rateChart[rateChart.length]= new rateClass(Start Month,Start Day,End Month,End Day,Rate Level)
		//
		// Enter dates continuous from January 1st to the calendar end of the rate - if the rate is applicable
		// in multiple dates for the year (like the blue rate which is split by the red rate) enter it in the
		// list multiple times.  For example, the starting setup has two Rate Level 0 and 1 entries to represent
		// date periods which are split up by other, higher rate periods, when the current red rate is removed, this
		// is what the chart wil look like:
		/*
		rateChart[rateChart.length]= new rateClass(0,1,2,31,0)
		rateChart[rateChart.length]= new rateClass(3,1,9,31,1)
		rateChart[rateChart.length]= new rateClass(10,1,12,31,0)
		*/
		// Nothing else will need to be changed.

		rateChart=new Array()
		rateChart[rateChart.length]= new rateClass(0,1,4,31,0)
		rateChart[rateChart.length]= new rateClass(5,1,5,30,1)
		rateChart[rateChart.length]= new rateClass(6,1,6,31,2)
		rateChart[rateChart.length]= new rateClass(7,1,7,31,3)
		rateChart[rateChart.length]= new rateClass(8,1,8,30,1)
		rateChart[rateChart.length]= new rateClass(9,1,11,28,0)
		rateChart[rateChart.length]= new rateClass(11,29,11,31,4)
	
		d1=new Date(y,m-1,d)

		total=0
		for (i=0;i<nights;i++) {
			for (j=0;j<rateChart.length;j++) {
				sDate2=new Date(y,rateChart[j].sm,rateChart[j].sd)
				eDate=new Date(y,rateChart[j].em,rateChart[j].ed)
				if (d1>=sDate2 && d1<=eDate) 
					total+=Number(thisR[rateChart[j].r])
			}
			d1.setDate(d1.getDate()+1)
		}
		if (total==0) total=rooms*nights*55
		temp1=total*rooms
		temp1=temp1.toString();
		temp1+=(temp1.indexOf(".")==-1)?".00":(temp1.match(/\.[0-9]$/))?"0":"";
		MM_findObj('Valor_a_Pagar').value=temp1;
		}
}

function rateClass(m1,d1,m2,d2,r){
	this.sm=m1, this.sd=d1, this.em=m2, this.ed=d2, this.r=r;
}

//-->