//Javascript name: My Date Time Picker
//Date created: 16-Nov-2003 23:19
//Scripter: TengYong 
//Website: http://www.rainforestnet.com
//Copyright (c) 2003 TengYong Ng
//FileName: DateTimePicker.js
//Version: 0.8
//Contact: contact@rainforestnet.com
// Note: Permission given to use this script in ANY kind of applications if
//       header lines are left unchanged  
 
  // Modificado e aumentado  por
  // PPires@assec.pt
  // 
 var ixframe;
 var ixframe_name;
 
	var ixurl =  location.href;
	if ( location.href.indexOf('upload') > 0 ) {
		var ixpath = '../';
		var ixpath2 = '';
		}
 
    else { 
		var ixpath = './';
		var ixpath2 = 'upload/';
    }
	/*
Santa Mãe de Deus 1 de Janeiro 
 Dia da Liberdade 25 de Abril 
 Dia do Trabalhador 1 de Maio 
 Dia de Portugal 10 de Junho 
 Assunção da Nossa Senhora 15 de Agosto 
 Implantação da República 5 de Outubro 
 Todos-os-Santos 1 de Novembro 
 Restauração da Independência 1 de Dezembro 
 Imaculada Conceição 8 de Dezembro 
 Natal 25 de Dezembro 
*/
 var feridados = '  1-1 4-25 5-1 6-10 8-15 10-5 11-1 12-1 12-8 12-25 ';	

		
		
//Global variables
var winCal;
var dtToday=new Date();
var Cal;
var docCal;
var MonthName=["Janeiro", "Fevereiro", "Março", "Abril", "Maio", "Junho","Julho", 
	"Agosto", "Setembro", "Outubro", "Novembro", "Dezembro"];
var WeekDayName=["Domingo","Segunda","Terça","Quarta","Quinta","Sexta","Sabado"];	
var exDateTime;//Existing Date and Time

//Configurable parameters
var cnTop="200";//top coordinate of calendar window.
var cnLeft="500";//left coordinate of calendar window
var WindowTitle ="DateTime Picker";//Date Time Picker title.
var WeekChar=2;//number of character for week day. if 2 then Mo,Tu,We. if 3 then Mon,Tue,Wed.
var CellWidth=20;//Width of day cell.
var DateSeparator="-";//Date Separator, you can change it to "/" if you want.
var TimeMode=24;//default TimeMode value. 12 or 24

var ShowLongMonth=true;//Show long month name in Calendar header. example: "January".
var ShowMonthYear=true;//Show Month and Year in Calendar header.
var MonthYearColor="#666666";//Font Color of Month and Year in Calendar header.
var WeekHeadColor="#CED5DB";//Background Color in Week header.
var SundayColor="#F0F2F4";//Background color of Sunday.
var SaturdayColor="#F0F2F4";//Background color of Saturday.
var WeekDayColor="white";//Background color of weekdays.
var FontColor="#666666";//color of font in Calendar day cell.
var TodayColor="#E7EFF9";//Background color of today.
var SelDateColor="#FFFFFF";//Backgrond color of selected date in textbox.
var YrSelColor="#666666";//color of font of Year selector.
var ThemeBg="";//Background image of Calendar window.
//end Configurable parameters
//end Global variable

var mostroTempo = false;

function NewCal(pCtrl,pFormat,pShowTime,pTimeMode)
{
	Cal=new Calendar(dtToday);
	
	if ( mostroTempo ) pShowTime = mostroTempo;
	
	if ((pShowTime!=null) && (pShowTime))
	{
		Cal.ShowTime=true;
		if ((pTimeMode!=null) &&((pTimeMode=='12')||(pTimeMode=='24')))
		{
			TimeMode=pTimeMode;
		}		
	}	
	if (pCtrl!=null)
		Cal.Ctrl=pCtrl;
	if (pFormat!=null)
		Cal.Format=pFormat.toUpperCase();
	
	exDateTime=document.getElementById(pCtrl).value;
	if (exDateTime!="")//Parse Date String
	{
		var Sp1;//Index of Date Separator 1
		var Sp2;//Index of Date Separator 2 
		var tSp1;//Index of Time Separator 1
		var tSp1;//Index of Time Separator 2
		var strMonth;
		var strDate;
		var strYear;
		var intMonth;
		var YearPattern;
		var strHour;
		var strMinute;
		var strSecond;
		//parse month
		Sp1=exDateTime.indexOf(DateSeparator,0)
		Sp2=exDateTime.indexOf(DateSeparator,(parseInt(Sp1)+1));
		
		if (Cal.Format.toUpperCase()=="YYYYMMDD"){
			strMonth=exDateTime.substring(Sp1+1,Sp2);
			strDate=exDateTime.substring(Sp2+1);
			strYear=exDateTime.substring(0,Sp1);
		} 
		else if ((Cal.Format.toUpperCase()=="DDMMYYYY") || (Cal.Format.toUpperCase()=="DDMMMYYYY"))
		{
			strMonth=exDateTime.substring(Sp1+1,Sp2);
			strDate=exDateTime.substring(0,Sp1);
		}
		else if ((Cal.Format.toUpperCase()=="MMDDYYYY") || (Cal.Format.toUpperCase()=="MMMDDYYYY"))
		{
			strMonth=exDateTime.substring(0,Sp1);
			strDate=exDateTime.substring(Sp1+1,Sp2);
		}
		 
		if (isNaN(strMonth))
			intMonth=Cal.GetMonthIndex(strMonth);
		else
			intMonth=parseInt(strMonth,10)-1;	
		if ((parseInt(intMonth,10)>=0) && (parseInt(intMonth,10)<12))
			Cal.Month=intMonth;
		//end parse month
		//parse Date
		if ((parseInt(strDate,10)<=Cal.GetMonDays()) && (parseInt(strDate,10)>=1))
			Cal.Date=strDate;
		//end parse Date
		//parse year
		if ( strYear == '')
			strYear=exDateTime.substring(Sp2+1,Sp2+5);
			
		YearPattern=/^\d{4}$/;
		if (YearPattern.test(strYear))
			Cal.Year=parseInt(strYear,10);
		//end parse year
		//parse time
		
		if (Cal.ShowTime==true)
		{
			tSp1=exDateTime.indexOf(":",0)
			tSp2=exDateTime.indexOf(":",(parseInt(tSp1)+1));
			strHour=exDateTime.substring(tSp1,(tSp1)-2);
			Cal.SetHour(strHour);
			strMinute=exDateTime.substring(tSp1+1,tSp2);
			Cal.SetMinute(strMinute);
			strSecond=exDateTime.substring(tSp2+1,tSp2+3);
			Cal.SetSecond(strSecond);
		}	
	}
 
			
	fadeIn();	

 	RenderCal();
}

var opacidade =0;
function fadeIn(){
	var l = document.getElementById('picker_'+ Cal.Ctrl );
	if (!l) return;
	
	l.style.height = '177px'; 	 
		
	opacidade += 6
	if ( document.all )	 
	  l.filters.alpha.opacity = opacidade;

	else  l.style.MozOpacity  = opacidade /100;
 	 
	
	if (opacidade < 85 )
		setTimeout("fadeIn()",50);
		
	}

////////////////////////////////
function fechaCal(nome){
	 
	var l = document.getElementById('picker_'+ nome );
	if (!l) return;
  
	opacidade -= 12
	if ( document.all ) l.filters.alpha.opacity = opacidade;	
		 
	else l.style.MozOpacity = opacidade /100 ;
 	
	if (opacidade < 5 )
		l.innerHTML ='';
	 else setTimeout("fechaCal('"+nome+"')",50);
}

 
	
function iniciaCal(nome){
   // fechaCal(nome);
	
	var l = document.getElementById('picker_'+ nome );
    l.innerHTML ='<iframe id="fpick_'+nome +'" width=245 height=193 frameborder=0   border=1 hspace=0 vspace=0 ></iframe>';
	
	
	
	if ( !document.all ){
		 winCal = document.getElementById('fpick_'+ nome ); 
		 eval('docCal =   winCal.contentDocument;');
		} else {
		eval ('winCal =  fpick_'+nome+' ;' );
	    docCal = winCal.document;
		}  
 		
  
	
	
}


function RenderCal()
{
	var vCalHeader;
	var vCalData;
	var vCalTime;
	var i;
	var j;
	var SelectStr;
	var vDayCount=0;
	var vFirstDay;
	
	iniciaCal(Cal.Ctrl);
 
	if ( !docCal) {
 
	 alert('erro');
	}
	
	docCal.writeln("<html><head><title>"+WindowTitle+"</title>");
 	docCal.writeln("<script>var winMain= parent;</script>");
	
	docCal.writeln("<LINK REL=STYLESHEET HREF=\""+ixpath+"templates/admstyles.css\" TYPE=\"text/css\">");
	docCal.writeln("<LINK REL=STYLESHEET HREF=\""+ixpath2+"padm.css\" TYPE=\"text/css\">");
	
	
	
	docCal.writeln("</head><body   link="+FontColor+" vlink="+FontColor+" style=\"margin:0; margin-top:10; margin-left:2; margin-right:0; \"  class=\"calnormal\" ><form name='Calendar'>");
    vCalHeader='<div style="position:absolute; top:1;  left:217px;"><a href="javascript:parent.fechaCal(\''+Cal.Ctrl+'\');" title="fechar sem modificar">x</a> </div>';
	vCalHeader+="<table border=0 cellpadding=0 cellspacing=0 width='215' align=\"center\" valign=\"top\">\n";
	//Month Selector
	vCalHeader+="<tr>\n<td colspan='7'><table border=0 width='100%' cellpadding=0 cellspacing=0><tr><td align='left'>\n";
	vCalHeader+="<select name=\"MonthSelector\" onChange=\"javascript:winMain.Cal.SwitchMth(this.selectedIndex);winMain.RenderCal();\">\n";
	for (i=0;i<12;i++)
	{
		if (i==Cal.Month)
			SelectStr="Selected";
		else
			SelectStr="";	
		vCalHeader+="<option "+SelectStr+" value >"+MonthName[i]+"\n";
	}
	vCalHeader+="</select></td>";
	//Year selector
	vCalHeader+="\n<td align='left' ><a href=\"javascript:winMain.Cal.DecYear();winMain.RenderCal()\"><b><font color=\""+YrSelColor+"\"><</font></b></a><font face=\"Arial\" color=\""+YrSelColor+"\" size=2><b> "+Cal.Year+" </b></font><a href=\"javascript:winMain.Cal.IncYear();winMain.RenderCal()\"><b><font color=\""+YrSelColor+"\">></font></b></a></td></tr></table></td>\n";	
	vCalHeader+="</tr>";
	//Calendar header shows Month and Year
	if (ShowMonthYear)
		vCalHeader+="<tr><td colspan='7'><font face='Arial' size='2' align='center' color='"+MonthYearColor+"'><b>"+Cal.GetMonthName(ShowLongMonth)+" "+Cal.Year+"</b></font></td></tr>\n";
	//Week day header
	vCalHeader+="<tr bgcolor="+WeekHeadColor+">";
	for (i=0;i<7;i++)
	{
		vCalHeader+="<td align='center'><font face='Arial' size='2'>"+WeekDayName[i].substr(0,WeekChar)+"</font></td>";
	}
	vCalHeader+="</tr>";	
	docCal.write(vCalHeader);
	
	//Calendar detail
	CalDate=new Date(Cal.Year,Cal.Month);
	CalDate.setDate(1);
	vFirstDay=CalDate.getDay();
	vCalData="<tr>";
	for (i=0;i<vFirstDay;i++)
	{
		vCalData=vCalData+GenCell();
		vDayCount=vDayCount+1;
	}
	
	
	if ( Cal.Date.indexOf )
		var pPosH = Cal.Date.indexOf(' ',0);
		else var pPosH = -1;
		
	if (pPosH > -1 )
		var pDataValor = parseInt(Cal.Date.substring(0,pPosH));
	else var pDataValor = parseInt(Cal.Date);
	 
	for (j=1;j<=Cal.GetMonDays();j++)
	{
		var strCell;
		vDayCount=vDayCount+1;
		if ((j==dtToday.getDate())&&(Cal.Month==dtToday.getMonth())&&(Cal.Year==dtToday.getFullYear()))
			strCell=GenCell(j,true,TodayColor);//Highlight today's date
		else
		{
		    
			if (j== pDataValor )
			{
				strCell=GenCell(j,true,SelDateColor);
			}
			else
			{	 
				if (vDayCount%7==0)
					strCell=GenCell(j,false,SaturdayColor);
				else if ((vDayCount+6)%7==0)
					strCell=GenCell(j,false,SundayColor);
				else
					strCell=GenCell(j,null,WeekDayColor);
			}		
		}						
		vCalData=vCalData+strCell;

		if((vDayCount%7==0)&&(j<Cal.GetMonDays()))
		{
			vCalData=vCalData+"</tr>\n<tr>";
		}
	}
	docCal.writeln(vCalData);	
	//Time picker
	if ( mostroTempo ) Cal.ShowTime = mostroTempo;
	
	if (Cal.ShowTime)
	{
		var showHour;
		showHour=Cal.getShowHour();		
		vCalTime="<tr>\n<td colspan='7' align='center'>";
		vCalTime+="<input type='text' name='hour' maxlength=2 size=1 style=\"WIDTH: 22px\" value="+showHour+" onchange=\"javascript:winMain.Cal.SetHour(this.value)\">";
		vCalTime+=" : ";
		vCalTime+="<input type='text' name='minute' maxlength=2 size=1 style=\"WIDTH: 22px\" value="+Cal.Minutes+" onchange=\"javascript:winMain.Cal.SetMinute(this.value)\">";
		vCalTime+=" : ";
		vCalTime+="<input type='text' name='second' maxlength=2 size=1 style=\"WIDTH: 22px\" value="+Cal.Seconds+" onchange=\"javascript:winMain.Cal.SetSecond(this.value)\">";
		vCalTime+='<div style="position:absolute; top:160;  left:180px;"><a href="javascript: parent.clickDia(\''+Cal.Ctrl+'\'); " title="Aplicar modificações">aplicar</a> </div>';

		if (TimeMode==12)
		{
			var SelectAm =(parseInt(Cal.Hours,10)<12)? "Selected":"";
			var SelectPm =(parseInt(Cal.Hours,10)>=12)? "Selected":"";

			vCalTime+="<select name=\"ampm\" onchange=\"javascript:winMain.Cal.SetAmPm(this.options[this.selectedIndex].value);\">";
			vCalTime+="<option "+SelectAm+" value=\"AM\">AM</option>";
			vCalTime+="<option "+SelectPm+" value=\"PM\">PM<option>";
			vCalTime+="</select>";
		}	
		vCalTime+="\n</td>\n</tr>";
		docCal.write(vCalTime);
	}	
	//end time picker
	docCal.writeln("\n</table>");
	docCal.writeln("</form></body></html>");
	//docCal.close();
}

function GenCell(pValue,pHighLight,pColor)//Generate table cell with value
{
	var PValue;
	var PCellStr;
	var vColor;
	var vHLstr1;//HighLight string
	var vHlstr2;
	var vTimeStr;
	
	if (pValue==null)
		PValue="";
	else
		PValue=pValue;
	
	if (pColor!=null)
		vColor="bgcolor=\""+pColor+"\"";
	else
		vColor="";	
	
	if ( pColor== TodayColor )	
		vColor=' class="agendahoje" ';
	else 
		if ( pColor== SelDateColor )	
			vColor=' class="diaocupado" ';
	 
	 
	 var cmes =  Cal.FormatDate(PValue);
    
	if ( feridados.indexOf( ' '+ cmes.substr(5)+' ' ) > 0 ) 
		vColor=' class="agendaferiado" ';
		
	/*if ((pHighLight!=null)&&(pHighLight))
		{vHLstr1="color='red'><b>";vHLstr2="</b>";}
	else
		{vHLstr1=">";vHLstr2="";}	*/
	if ( mostroTempo ) Cal.ShowTime = mostroTempo;
	if (Cal.ShowTime)
	{
		vTimeStr="winMain.document.getElementById('"+Cal.Ctrl+"').value+=' '+"+"winMain.Cal.getShowHour()"+"+':'+"+"winMain.Cal.Minutes"+"+':'+"+"winMain.Cal.Seconds";
		if (TimeMode==12)
			vTimeStr+="+' '+winMain.Cal.AMorPM";
			
		//PCellStr="<td "+vColor+" width="+CellWidth+" align=\"right\"><a href=\"javascript:parent.clickDiaHora('"+Cal.Ctrl+"','"+PValue+"' ); "+vTimeStr+"; \">"+PValue+"</a></td>";
		PCellStr="<td "+vColor+" width="+CellWidth+" align=\"right\"><a href=\"javascript:parent.clickDiaHora('"+Cal.Ctrl+"','"+PValue+"' );   \">"+PValue+"</a></td>";
	
	}	
	else  
 	//PCellStr="<td "+vColor+" width="+CellWidth+" align=\"right\"><a href=\"javascript:winMain.document.getElementById('"+Cal.Ctrl+"').value='"+Cal.FormatDate(PValue)+"';"+vTimeStr+";  winMain.fechaCal('"+Cal.Ctrl+"'); \">"+PValue+"</a></td>";
	//PCellStr="<td "+vColor+" width="+CellWidth+" align=\"right\"><a href=\"javascript:parent.clickDia('"+Cal.Ctrl+"','"+PValue+"' );\">"+PValue+"</a></td>";
	PCellStr="<td "+vColor+" width="+CellWidth+" align=\"right\"><a href=\"javascript:parent.clickDia('"+Cal.Ctrl+"','"+PValue+"' );\">"+PValue+"</a></td>";
	
	return PCellStr;
}


function clickDia(campo,valor){
    if (campo =='' ) return;
	var l= document.getElementById(campo);
	if  ( !l )  return;
	
	if (  !valor  || valor == undefined) valor = Cal.Date;
	l.value = Cal.FormatDate(valor);
	
    if ( mostroTempo  ){ 
		var hPos =  l.value.indexOf(' ',0);
		 
		var horario = ' '+ Cal.getShowHour() +':'+ Cal.Minutes +':'+ Cal.Seconds
		if ( hPos < 0  ) l.value =  Cal.FormatDate(valor) + horario;
			else l.value =  l.value.substr(0,hPos)+ horario;
		}
	
	fechaCal(campo);
	l.focus(); 
	}


function clickDiaHora(campo,valor){	
	Cal.Date = valor;			 

	RenderCal();
	}

function Calendar(pDate,pCtrl)
{
	//Properties
	this.Date=pDate.getDate();//selected date
	this.Month=pDate.getMonth();//selected month number
	this.Year=pDate.getFullYear();//selected year in 4 digits
	this.Hours=pDate.getHours();	
	
	if (pDate.getMinutes()<10)
		this.Minutes="0"+pDate.getMinutes();
	else
		this.Minutes=pDate.getMinutes();
	
	if (pDate.getSeconds()<10)
		this.Seconds="0"+pDate.getSeconds();
	else		
		this.Seconds=pDate.getSeconds();
		
	this.MyWindow=winCal;
	this.Ctrl=pCtrl;
	this.Format="ddMMyyyy";
	this.Separator=DateSeparator;
	this.ShowTime=false;
	if (pDate.getHours()<12)
		this.AMorPM="AM";
	else
		this.AMorPM="PM";	
}

function GetMonthIndex(shortMonthName)
{
	for (i=0;i<12;i++)
	{
		if (MonthName[i].substring(0,3).toUpperCase()==shortMonthName.toUpperCase())
		{	return i;}
	}
}
Calendar.prototype.GetMonthIndex=GetMonthIndex;

function IncYear()
{	Cal.Year++;}
Calendar.prototype.IncYear=IncYear;

function DecYear()
{	Cal.Year--;}
Calendar.prototype.DecYear=DecYear;
	
function SwitchMth(intMth)
{	Cal.Month=intMth;}
Calendar.prototype.SwitchMth=SwitchMth;

function SetHour(intHour)
{	
	var MaxHour;
	var MinHour;
	if (TimeMode==24)
	{	MaxHour=23;MinHour=0}
	else if (TimeMode==12)
	{	MaxHour=12;MinHour=1}
	else
		alert("TimeMode can only be 12 or 24");		
	var HourExp=new RegExp("^\\d\\d$");
	if (HourExp.test(intHour) && (parseInt(intHour,10)<=MaxHour) && (parseInt(intHour,10)>=MinHour))
	{	
		if ((TimeMode==12) && (Cal.AMorPM=="PM"))
		{
			if (parseInt(intHour,10)==12)
				Cal.Hours=12;
			else	
				Cal.Hours=parseInt(intHour,10)+12;
		}	
		else if ((TimeMode==12) && (Cal.AMorPM=="AM"))
		{
			if (intHour==12)
				intHour-=12;
			Cal.Hours=parseInt(intHour,10);
		}
		else if (TimeMode==24)
			Cal.Hours=parseInt(intHour,10);	
	}
}
Calendar.prototype.SetHour=SetHour;

function SetMinute(intMin)
{
	var MinExp=new RegExp("^\\d\\d$");
	if (MinExp.test(intMin) && (intMin<60))
		Cal.Minutes=intMin;
}
Calendar.prototype.SetMinute=SetMinute;

function SetSecond(intSec)
{	
	var SecExp=new RegExp("^\\d\\d$");
	if (SecExp.test(intSec) && (intSec<60))
		Cal.Seconds=intSec;
}
Calendar.prototype.SetSecond=SetSecond;

function SetAmPm(pvalue)
{
	this.AMorPM=pvalue;
	if (pvalue=="PM")
	{
		this.Hours=(parseInt(this.Hours,10))+12;
		if (this.Hours==24)
			this.Hours=12;
	}	
	else if (pvalue=="AM")
		this.Hours-=12;	
}
Calendar.prototype.SetAmPm=SetAmPm;

function getShowHour()
{
	var finalHour;
    if (TimeMode==12)
    {
    	if (parseInt(this.Hours,10)==0)
		{
			this.AMorPM="AM";
			finalHour=parseInt(this.Hours,10)+12;	
		}
		else if (parseInt(this.Hours,10)==12)
		{
			this.AMorPM="PM";
			finalHour=12;
		}		
		else if (this.Hours>12)
		{
			this.AMorPM="PM";
			if ((this.Hours-12)<10)
				finalHour="0"+((parseInt(this.Hours,10))-12);
			else
				finalHour=parseInt(this.Hours,10)-12;	
		}
		else
		{
			this.AMorPM="AM";
			if (this.Hours<10)
				finalHour="0"+parseInt(this.Hours,10);
			else
				finalHour=this.Hours;	
		}
	}
	else if (TimeMode==24)
	{
		if (this.Hours<10)
			finalHour="0"+parseInt(this.Hours,10);
		else	
			finalHour=this.Hours;
	}	
	return finalHour;	
}				
Calendar.prototype.getShowHour=getShowHour;		

function GetMonthName(IsLong)
{
	var Month=MonthName[this.Month];
	if (IsLong)
		return Month;
	else
		return Month.substr(0,3);
}
Calendar.prototype.GetMonthName=GetMonthName;

function GetMonDays()//Get number of days in a month
{
	var DaysInMonth=[31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31];
	if (this.IsLeapYear())
	{
		DaysInMonth[1]=29;
	}	
	return DaysInMonth[this.Month];	
}
Calendar.prototype.GetMonDays=GetMonDays;

function IsLeapYear()
{
	if ((this.Year%4)==0)
	{
		if ((this.Year%100==0) && (this.Year%400)!=0)
		{
			return false;
		}
		else
		{
			return true;
		}
	}
	else
	{
		return false;
	}
}
Calendar.prototype.IsLeapYear=IsLeapYear;

function FormatDate(pDate)
{
    this.oMes =this.Month+1 
	if  ( this.oMes < 10 )  this.oMes  =  '0'+ this.oMes
	
	
	if (this.Format.toUpperCase()=="YYYYMMDD")
		return (this.Year+DateSeparator+this.oMes+DateSeparator+ pDate);
	else
	if (this.Format.toUpperCase()=="DDMMYYYY")
		return (pDate+DateSeparator+this.oMes+DateSeparator+this.Year);
	else if (this.Format.toUpperCase()=="DDMMMYYYY")
		return (pDate+DateSeparator+this.GetMonthName(false)+DateSeparator+this.Year);
	else if (this.Format.toUpperCase()=="MMDDYYYY")
		return (this.oMes+DateSeparator+pDate+DateSeparator+this.Year);
	else if (this.Format.toUpperCase()=="MMMDDYYYY")
		return (this.GetMonthName(false)+DateSeparator+pDate+DateSeparator+this.Year);			
}
Calendar.prototype.FormatDate=FormatDate;