/************************ begin - calender **************************/

//no parametro:	functionClickDay 
//	- é passado no formato de string o nome da função a ser executada e tem como parametro a data
//	- ex: ..,'openDay' - e será executado como: eval('openDay(+' date '+)')


function QueryString(variavel){
	qs=new Array()
	variaveis=location.search.replace(/\x3F/,"").replace(/\x2B/g," ").split("&")
	if(variaveis!=""){
		for(i=0;i<variaveis.length;i++){
			nvar=variaveis[i].split("=")
			qs[nvar[0]]=unescape(nvar[1])
		}
	}
	return qs[variavel]
}



function popdate(obj,div,tam,ddd,closed,functionClickDay)
{

	var setNumMonth;
    if (ddd) 
    {
        day = ""
        mmonth = ""
        ano = ""
        c = 1
        xchar = ""
        for (s=0;s<parseInt(ddd.length);s++)
        {
            xchar = ddd.substr(s,1)
            if (xchar == "/") 
            {
                c++; 
                s++; 
                xchar = ddd.substr(s,1);
            }
            if (c==1) day    += xchar
            if (c==2) mmonth += xchar
            if (c==3) ano    += xchar
        }
        ddd = mmonth + "/" + day + "/" + ano
    }
  
    if(!ddd) {today = new Date()} else {today = new Date(ddd)}
    date_Form = eval (obj)
    if (date_Form.value == "") { date_Form = new Date()} else {date_Form = new Date(date_Form.value)}

	if(setNumMonth==null || setNumMonth==undefined){setNumMonth = date_Form.getMonth()+1;}
  
    ano = today.getFullYear();
    mmonth = today.getMonth ();
    day = today.toString ().substr (8,2)
  
    umonth = new Array ("Janeiro", "Fevereiro", "Março", "Abril", "Maio", "Junho", "Julho", "Agosto", "Setembro", "Outubro", "Novembro", "Dezembro")
    days_Feb = (!(ano % 4) ? 29 : 28)
    days = new Array (31, days_Feb, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31)

    if ((mmonth < 0) || (mmonth > 11))  alert(mmonth)
    if ((mmonth - 1) == -1) {month_prior = 11; year_prior = ano - 1} else {month_prior = mmonth - 1; year_prior = ano}
    if ((mmonth + 1) == 12) {month_next  = 0;  year_next  = ano + 1} else {month_next  = mmonth + 1; year_next  = ano}
    txt  = "<table bgcolor='' style='border:solid #999999; border-width:1' cellspacing='1' cellpadding='0' border='0' width='"+tam+"' height='"+tam*1.1 +"'>"
    /*
	txt += "<tr bgcolor='#FFFFFF'><td colspan='7' align='center'><table border='0' cellpadding='0' width='100%' bgcolor='#FFFFFF'><tr>"
    txt += "<td width=20% align=center><a href=javascript:popdate('"+obj+"','"+div+"','"+tam+"','"+((mmonth+1).toString() +"/01/"+(ano-1).toString())+"',"+closed+",'"+functionClickDay+"') class='Cabecalho_Calendario' title='Ano Anterior'><<</a></td>"
    txt += "<td width=20% align=center><a href=javascript:popdate('"+obj+"','"+div+"','"+tam+"','"+( "01/" + (month_prior+1).toString() + "/" + year_prior.toString())+"',"+closed+",'"+functionClickDay+"') class='Cabecalho_Calendario' title='Mês Anterior'><</a></td>"
    txt += "<td width=20% align=center><a href=javascript:popdate('"+obj+"','"+div+"','"+tam+"','"+( "01/" + (month_next+1).toString()  + "/" + year_next.toString())+"',"+closed+",'"+functionClickDay+"') class='Cabecalho_Calendario' title='Próximo Mês'>></a></td>"
    txt += "<td width=20% align=center><a href=javascript:popdate('"+obj+"','"+div+"','"+tam+"','"+((mmonth+1).toString() +"/01/"+(ano+1).toString())+"',"+closed+",'"+functionClickDay+"') class='Cabecalho_Calendario' title='Próximo Ano'>>></a></td>"
    txt += "<td width=20% align=right><a href=javascript:force_close('"+div+"') class='Cabecalho_Calendario' title='Fexchar Calendário'><b>X</b></a></td></tr></table></td></tr>"
    */
	
	txt += "<tr><td colspan='7' align='center' bgcolor='#cccccc' style='font-size:8pt;color:#ffffff;cursor:pointer;cursor:hand;' onClick=popdate('"+obj+"','"+div+"','"+tam+"','',"+closed+",'"+functionClickDay+"');><span id='"+div+"_calenderDateLabel'></span></td></tr>"
	
	txt += "<tr><td colspan='7' align='center' bgcolor='#ffffff' class='mes' style='border-top:1px solid #cccccc;'>"

	txt += "<table cellspacing='0' cellpadding='0' border='0' width='100%' ><tr>"
		txt += "<td align=left><a href=javascript:popdate('"+obj+"','"+div+"','"+tam+"','"+( "01/" + (month_prior+1).toString() + "/" + year_prior.toString())+"',"+closed+",'"+functionClickDay+"'); onClick=\"setNumMonth="+(month_prior+1)+";loadMarcDate('"+div+"','"+"01/" + (month_prior+1).toString() + "/" + year_prior.toString()+"')\" class='Cabecalho_Calendario' title='Mês Anterior' style='padding-left:3px;'><img src='"+siteUrl+"/image/setaEsquerda.gif' border=0 width=7 height=12></a></td>"
		txt += "<td align=center><a style='text-decoration:none;color:#0066CC;font-weight:normal;' href=javascript:pop_month('"+obj+"','"+div+"','"+tam+"','" + ano + "',"+setNumMonth+",'"+functionClickDay+"',"+closed+") class='mes'>" + umonth[mmonth] + "</a> <a style='text-decoration:none;color:#0066CC;font-weight:normal;'  href=javascript:pop_year('"+obj+"','"+div+"','"+tam+"','" + (mmonth+1) + "',"+setNumMonth+",'"+functionClickDay+"',"+closed+") class='mes'>" + ano.toString() + "</a> <div id='"+div+"_popd' style='position:absolute'></div></td>"
		txt += "<td align=right><a href=javascript:popdate('"+obj+"','"+div+"','"+tam+"','"+( "01/" + (month_next+1).toString()  + "/" + year_next.toString())+"',"+closed+",'"+functionClickDay+"'); onClick=\"setNumMonth="+(month_next+1)+";loadMarcDate('"+div+"','"+ "01/" + (month_next+1).toString()  + "/" + year_next.toString() +"')\" class='Cabecalho_Calendario' title='Próximo Mês' style='padding-right:3px;'><img src='"+siteUrl+"/image/setaDireita.gif' border=0 width=7 height=12> </a></td>"
    txt += "</tr></table>"
	txt += "</td></tr><tr bgcolor='#999999'><td width='14%' class='dia' align=center>Dom</td><td width='14%' class='dia' align=center>Seg</td><td width='14%' class='dia' align=center>Ter</td><td width='14%' class='dia' align=center>Qua</td><td width='14%' class='dia' align=center>Qui</td><td width='14%' class='dia' align=center>Sex</td><td width='14%' class='dia' align=center>Sab</td></tr>"
    setNumMonth = (mmonth+1);
	today1 = new Date((mmonth+1).toString() +"/01/"+ano.toString());
    diainicio = today1.getDay () + 1;
    week = d = 1
    start = false;
    for (n=1;n<= 42;n++) 
    {
        if (week == 1)  txt += "<tr bgcolor='#FFFFFF' align=center>" ; 
        if (week==diainicio) {start = true;}
        if (d > days[mmonth]) {start=false;}
        if (start) 
        {
				todayX = new Date();
				colorcell =  (todayX.getDate()==d  &&  (todayX.getMonth()+1).toString()==(mmonth+1).toString()  &&  todayX.getYear().toString()==ano.toString() ? " style='color:#0066CC;font-weight:bold;' " : "" );
				
				txt += "<td "+colorcell+" id='"+div+"_idDia_"+ d + "x' title='' align=center style='border:1px solid #FFFFFF;color:#" + (week==7 || week==1 ? "999999" : "666666") +";cursor:hand;font-size:8pt;' onMouseOut=\"this.style.backgroundColor='#FFFFFF'\" onMouseOver=\"this.style.backgroundColor='#eeeeee'\" onClick=\"block('"+  d + "/" + (mmonth+1).toString() + "/" + ano.toString() +"','"+ obj +"','" + div +"',"+closed+",'"+functionClickDay+"')\" >"+ d.toString() + "</td>"
				d ++ 
        } 
        else 
        { 
           	 txt += "<td class='data' align=center>&nbsp;</td>";
        }
        week ++
        if (week == 8) 
        { 
            week = 1; txt += "</tr>"} 
        }
        txt += "</table>"
        div2 = eval (div)
        div2.innerHTML = txt 
		
		setDateLabel(div);
}


function setDateLabel(div){
	var dateNow = new Date();
	document.getElementById(div+'_calenderDateLabel').innerHTML = "Hoje - "+dateNow.getDate() +" de "+ umonth[dateNow.getMonth()].substring(0,3) +" de "+ String(dateNow.getYear()).substring(0,4); //+" às "+ dateNow.getHours() +":"+ dateNow.getMinutes() ;//+":"+ dateNow.getSeconds()
	setTimeout("setDateLabel('"+div+"')",1000);
}

// função para exibir a janela com os meses
function pop_month(obj, div, tam, ano,setNumMonth,functionClickDay,closed)
{
  txt  = "<table bgcolor='#FFFFFF' style='border:2px solid #CCCCCC;' border='0' width=80>"
  for (n = 0; n < 12; n++) { txt += "<tr><td align=center><a style='font-size:9pt;color:#0066CC;font-weight:normal;' onClick=\"loadMarcDate('"+div+"','"+ ("01/" + (n+1).toString() + "/" + ano.toString()) +"')\" href=javascript:popdate('"+obj+"','"+div+"','"+tam+"','"+("01/" + (n+1).toString() + "/" + ano.toString())+"',"+closed+",'"+functionClickDay+"')>" + umonth[n] +"</a></td></tr>" }
  txt += "</table>"
if (document.getElementById(div+'_popd').innerHTML==''){document.getElementById(div+'_popd').innerHTML = txt}else{document.getElementById(div+'_popd').innerHTML = '';}

}

// função para exibir a janela com os anos
function pop_year(obj, div, tam, umonth,setNumMonth,functionClickDay,closed){
  txt  = "<table bgcolor='#FFFFFF' style='border:2px solid #CCCCCC;' border='0' width=160>"
  l = 1
  
  var dx = new Date();
  for (n=dx.getYear()-9; n<=dx.getYear()+2; n++)
  {  if (l == 1) txt += "<tr>"
     txt += "<td align=center><a style='font-size:9pt;color:#0066CC;font-weight:normal;' onClick=\"loadMarcDate('"+div+"','"+ umonth.toString () +"/"+   (setNumMonth==undefined?'01':setNumMonth)   +"/" + n +"')\" href=javascript:popdate('"+obj+"','"+div+"','"+tam+"','"+(umonth.toString () +"/"+ setNumMonth +"/" + n) +"',"+closed+",'"+functionClickDay+"')>" + n + "</a></td>"
     l++
     if (l == 4) 
        {txt += "</tr>"; l = 1 } 
  }
  txt += "</tr></table>"
  
  if (document.getElementById(div+'_popd').innerHTML==''){document.getElementById(div+'_popd').innerHTML = txt}else{document.getElementById(div+'_popd').innerHTML = '';}
  
}

// função para fexchar o calendário
function force_close(div,closed){ 
	if(closed==1){
		//div2 = eval (div); div2.innerHTML = ''
		document.getElementById(div).style.visibility='hidden';document.getElementById(div).style.position='absolute';
	}
}
    
// função para fexchar o calendário e setar a data no campo de data associado
function block(data, obj, div,closed,functionClickDay)
{ 
    force_close (div,closed)
    obj2 = eval(obj)
    obj2.value = data ;
	if(functionClickDay!='')eval(functionClickDay+"('"+data+"')")
}

/*************************/
document.write ("<style>.dia {padding:1px;font-family: helvetica, arial; font-size: 7.5pt;bold; color: #FFFFFF}.data {font-family: helvetica, arial; font-size: 8pt; text-decoration:none; color:#191970}.mes {font-family: helvetica, arial; font-size: 9pt}.Cabecalho_Calendario {font-family: helvetica, arial; font-size: 10pt; color: #000000; text-decoration:none; font-weight:bold}</style>");

function loadMarcDate(div,date){
	var layer='calenderLayerFunction1';
	var jx=new AJAX();
	jx.url=siteUrl+'/eventoLoad.asp?pag=marcDate&date='+date;
	//document.getElementById(layer).innerHTML='Carregando..'
	jx.modo = 'T'; //'T' - text   'X' - XML
	jx.processaresultado = function(r){
		//document.getElementById(layer).innerHTML= r;
		setTimeout('loadMarcDateFunction(\''+r+'\',\''+div+'\')',500);
	}
	jx.conectar();
}
function loadMarcDateFunction(r,div){
	if(r!=''){
		var ds = r.split(',');
		for (i=0;i<ds.length;i++){
			if(document.getElementById(div+'_idDia_'+ ds[i] +'x')!=null){
			document.getElementById(div+'_idDia_'+ ds[i] +'x').style.border='1px solid #FFFFFF';
			}
		}
		for (i=0;i<ds.length;i++){
			if(document.getElementById(div+'_idDia_'+ ds[i] +'x')!=null){
			document.getElementById(div+'_idDia_'+ ds[i] +'x').style.border='1px solid #999999';
			}
		}
	}
}
/************************ end - calender **************************/