<!--

<!-- Data-->
var mydate=new Date();
var year=mydate.getYear();
if (year < 1000) year+=1900;
var day=mydate.getDay();
var month=mydate.getMonth();
var daym=mydate.getDate();
var dayarray=new Array("Domingo","Segunda","Terça","Quarta","Quinta","Sexta","Sábado");
var montharray=new Array("Janeiro","Fevereiro","Março","Abril","Maio","Junho","Julho","Agosto","Setembro","Outubro","Novembro","Dezembro");
<!-- document.write("&nbsp;"+dayarray[day]+" "+montharray[month]+" "+daym+" "+year); -->
<!-- FIM DATA -->

<!-- Janela Pop Up-->
function _popup(x,y,endereco){
    window.open( endereco, "WndName","toolbar=no,location=no,directories=no,status=1,menubar=no,scrollbars=yes,resizable,width="+x+",height="+y);
}
function abrepopup(){

	x=600;
	y=400;

	esquerda = ((screen.width)-x)/2 ; 
	topo = ((screen.height)-y)/2 ;

    window.open( "about:blank", "popupvd","toolbar=no,location=no,directories=no,status=1,menubar=no,scrollbars=yes,noresizable,width="+x+",height="+y+',left='+esquerda+',top='+topo);
}


function selHiddenShow(who){
	if (document.all) {
        if(window.document.all[who].style.visibility=='visible'){
			window.document.all[who].style.visibility = 'hidden';
        	window.document.all[who].style.display = 'none';
		} else{
			window.document.all[who].style.visibility = 'visible';
        	window.document.all[who].style.display = 'block';
		}
	} else if(document.getElementById){
		if(window.document.getElementById(who).style.visibility=='visible'){
			window.document.getElementById(who).style.visibility = 'hidden';
			window.document.getElementById(who).style.display = 'none';
		} else{
			window.document.getElementById(who).style.visibility = 'visible';
			window.document.getElementById(who).style.display = 'block';
		}
	}	
}
<!-- Calendário_admin -->

	function buildCal(whitchdata,f_n,f_i){
	
	var todaydate=new Date();
	
	var m = '';
	var y = '';
	var d = '';
	var h = '';
	var n = '';
	var s = '';
	
	var2Split = whitchdata;
	varSplit = var2Split.split(" ");
	
	if (varSplit.length == 2) {
	
		data2Split = varSplit[0];
		hour2Split = varSplit[1];
		
		dataSplit = data2Split.split("-");
		if (dataSplit.length == 3) {
			y = dataSplit[0];
			m = dataSplit[1];
			d = dataSplit[2];
		}
		
		hourSplit = hour2Split.split(":");
		if (hourSplit.length == 3) {
			h = hourSplit[0];
			n = hourSplit[1];
			s = hourSplit[2];
		}
	
	} else {
		dataSplit = whitchdata.split("-");
		if (dataSplit.length == 3) {
			y = dataSplit[0];
			m = dataSplit[1];
			d = dataSplit[2];
		}
	}
	
	m = (m=='') ? todaydate.getMonth()+1 : m
	m = (m>12) ? 1 : m	
	m = (m<1) ? 12 : m	
	
	y = (y=='') ? (todaydate.getFullYear()) : y
	d = (d=='') ? (todaydate.getDate()) : d
	h = (h=='') ? (todaydate.getHours()) : h
	n = (n=='') ? (todaydate.getMinutes()) : n
	s = (s=='') ? (todaydate.getSeconds()) : s

	
	datanow=todaydate.getFullYear()+"-"+(todaydate.getMonth()+1)+"-"+todaydate.getDate()+" "+todaydate.getHours()+":"+todaydate.getMinutes()+":"+todaydate.getSeconds();	
	
	m=Number(m);
	y=Number(y);
	d=Number(d);
	h=Number(h);
	n=Number(n);
	s=Number(s);	
	
	var mn=['Janeiro','Fevereiro','Março','Abril','Maio','Junho','Julho','Agosto','Setembro','Outubro','Novembro','Dezembro'];
	var dim=[31,0,31,30,31,30,31,31,30,31,30,31];
	
	var oD = new Date(y, m-1, 1);
	oD.od=oD.getDay()+1;
	
	var scanfortoday=(y==todaydate.getFullYear() && m==todaydate.getMonth()+1)? todaydate.getDate() : 0

	previousmonth = "<a href='javascript: buildCal(\""+y+"-"+(m-1)+"-"+d+" "+h+":"+n+":"+s+"\",\""+f_n+"\",\""+f_i+"\")' class='caltxt'>-</a>";
	
	listMonth = "<select onchange='buildCal(\""+y+"-\"+this.value+\"-"+d+" "+h+":"+n+":"+s+"\",\""+f_n+"\",\""+f_i+"\")'>";
	for(i=0;i<=11;i++){
		if (mn[i]==mn[m-1]) {
			thisMonth=" selected";
		} else {
			thisMonth="";
		}
		listMonth += "<option value=\""+(i+1)+"\""+thisMonth+">"+mn[i];
	}
	listMonth +="</select>";
	
	nextmonth = "<a href='javascript: buildCal(\""+y+"-"+(m+1)+"-"+d+" "+h+":"+n+":"+s+"\",\""+f_n+"\",\""+f_i+"\")' class='caltxt'>+</a>";

	previousyear = "<a href='javascript: buildCal(\""+(y-1)+"-"+m+"-"+d+" "+h+":"+n+":"+s+"\",\""+f_n+"\",\""+f_i+"\")' class='caltxt'>-</a>";
	
	nextyear = "<a href='javascript: buildCal(\""+(y+1)+"-"+m+"-"+d+" "+h+":"+n+":"+s+"\",\""+f_n+"\",\""+f_i+"\")' class='caltxt'>+</a>";
	
	dim[1]=(((oD.getFullYear()%100!=0)&&(oD.getFullYear()%4==0))||(oD.getFullYear()%400==0))?29:28;
	datepast="21111974";
	var t='<table cellpadding="0" border="0" cellspacing="2" class="caltable"><tr align="center">';
	t+='<td colspan="7" align="center">';
	t+='<table cellspacing="0" border="0" cellpadding="0"><tr>';
	t+='<td>&nbsp;</td>';
	t+='<td>'+previousmonth+'</td>';
	t+='<td>&nbsp;</td>';
	t+='<td>'+listMonth+'</td>';
	t+='<td>'+nextmonth+'</td>';
	t+='<td>&nbsp;&nbsp;&nbsp;</td>';
	t+='<td>'+previousyear+'</td>';
	t+='<td>&nbsp;</td>';
	t+='<td class="caltxt">'+y+'</td>';
	t+='<td>&nbsp;</td>';
	t+='<td>'+nextyear+'</td>';
	t+='</tr></table>';
		
	t+='</td></tr><tr align="center">';
	for(ss=0;ss<7;ss++)t+='<td class="caltable">'+"DSTQQSS".substr(ss,1)+'</td>';
	t+='</tr><tr align="center">';

	for(i=1;i<=42;i++){
	var x=((i-oD.od>=0)&&(i-oD.od<dim[m-1]))? i-oD.od+1 : '&nbsp;';
	xx=x;
	if (x==scanfortoday){
		xx='<b class="calsel">'+x+'</b>';
	}
	if (xx!="&nbsp;") {
		x="<a href='javascript: updatedata(\""+y+"-"+m+"-"+x+" "+h+":"+n+":"+s+"\",\""+f_n+"\",\""+f_i+"\")' class='cal'>"+xx+"</a>";
	} else {
		x="&nbsp;";
	}
	t+='<td>'+x+'</td>';
	if(((i)%7==0)&&(i<36))t+='</tr><tr align="center">';
	}
	
	t+='</tr>';
	
	t+='<tr><td colspan="7" align="center">';
	
	listhour = "<select onchange='buildCal(\""+y+"-"+m+"-"+d+" \"+this.value+\":"+n+":"+s+"\",\""+f_n+"\",\""+f_i+"\")'>";
	for(i=0;i<=23;i++){
		if (h==i) {
			listthishour=" selected";
		} else {
			listthishour="";
		}

		listhour += "<option value=\""+i+"\""+listthishour+">"+i;
	}
	listhour +="</select>";	
	
	listmin = "<select onchange='buildCal(\""+y+"-"+m+"-"+d+" "+h+":\"+this.value+\":"+s+"\",\""+f_n+"\",\""+f_i+"\")'>";
	for(i=0;i<=59;i++){
		if (n==i) {
			listthismin=" selected";
		} else {
			listthismin="";
		}
		listmin += "<option value=\""+i+"\""+listthismin+">"+i;
	}
	listmin +="</select>";	
	
	t+='<table cellspacing="0" border="0" cellpadding="0" width="100%"><tr>';
	t+='<td width="40%"><a href="javascript: buildCal(\''+datanow+'\',\''+f_n+'\',\''+f_i+'\')" class="calop" title="Data actual">&nbsp;A&nbsp;</a></td>';
	t+='<td  width="10" class="caltxt">'+listhour+'</td>';
	t+='<td  width="10" class="caltxt">h&nbsp;&nbsp;</td>';
	t+='<td  width="10" class="caltxt">'+listmin+'</td>';
	t+='<td  width="10" class="caltxt">m</td>';
	t+='<td width="40%" align="right"><a href="javascript: Calendar(\''+datanow+'\',\''+f_n+'\',\''+f_i+'\')" class="calop" title="Fechar">&nbsp;X&nbsp;</a></td>';
	t+='</tr></table>';
	
	t+='</td></tr>';
	
	calltotal = t+='</table>';
	
	
	
		if (document.getElementById&&!document.all) {
			br=document.getElementById('calendar');
		} else if (document.all) {
			br=document.all.calendar;
		}
	
		br.innerHTML=calltotal;
		br.style.visibility = "visible";

	}
	
	function updatedata(thedata,f_n,f_i) {
	
	
		var2Split = thedata;
		varSplit = var2Split.split(" ");
		
		if (varSplit.length == 2) {
		
			data2Split = varSplit[0];
			hour2Split = varSplit[1];
			
			dataSplit = data2Split.split("-");
			if (dataSplit.length == 3) {
				y = dataSplit[0];
				m = dataSplit[1];
					m = (m<10) ? "0"+m : m
				
				d = dataSplit[2];
					d = (d<10) ? "0"+d : d
			}
			
			hourSplit = hour2Split.split(":");
			if (hourSplit.length == 3) {
				h = hourSplit[0];
					h = (h<10) ? "0"+h : h
				n = hourSplit[1];
					n = (n<10) ? "0"+n : n
				s = hourSplit[2];
					s = (s<10) ? "0"+s : s
			}
		
		}
	
		thedata=y+"-"+m+"-"+d+" "+h+":"+n+":"+s;
		

		if (document.all) {
			document.all.calendar.style.visibility="hidden";
		} else if(document.getElementById){
			document.getElementById('calendar').style.visibility="hidden";
			
		}
		//doc="document."+f_n;
		document[f_n][f_i].value=thedata;
	}
	
	function Calendar(thedata,f_n,f_i) {
		if (document.getElementById&&!document.all) {
			br=document.getElementById('calendar');
		} else if (document.all) {
			br=document.all.calendar;
		}
		
		if (br.style.visibility=='visible'){
			br.style.visibility='hidden';
		} else {
			br.style.visibility='visible';
			buildCal(thedata,f_n,f_i);
		}
	}
	


