//Global variables
var winCal = null;
var dtToday=new Date();
var Cal = null;
var docCal = null;
var MonthName=["Januar", "Februar", "Mars", "April", "Mai", "Juni","Juli", 
	"August", "September", "Oktober", "November", "Desember"];
var WeekDayName=["Søndag","Mandag","Tirsdag","Onsdag","Torsdag","Fredag","Lørdag"];	
var exDateTime = null;//Existing Date and Time

//Configurable parameters
var cnTop="200";//top coordinate of calendar window.
var cnLeft="500";//left coordinate of calendar window
var WindowTitle ="Velg dato";//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=18;//Width of day cell.
var CellHeight = 100; //Height of the cell if this is a largecalbox
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="#000000";//Font Color of Month and Year in Calendar header.
var WeekHeadColor="#cccccc";//Background Color in Week header.
var SundayColor="#E7E3E0";//Background color of Sunday.
var SaturdayColor="#E7E3E0";//Background color of Saturday.
var WeekDayColor="#E7E3E0";//Background color of weekdays.
var FontColor="black";//color of font in Calendar day cell.
var TodayColor="#DAECDA";//Background color of today.
var SelDateColor="#FFFF99";//Backgrond color of selected date in textbox.
var YrSelColor="#000000";//color of font of Year selector.
var ThemeBg="#E7E3E0";//Background image of Calendar window.
var box_x_cal;
var box_y_cal;
//end Configurable parameters
//end Global variable


function NewCal(pCtrl,pFormat,pShowTime,pTimeMode)
{
	Cal=new Calendar(dtToday);
	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();
	var exDateTime = "";
	if (pCtrl!='inline')
            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()=="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
		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);
		}	
	}
        
		
		if( pCtrl =='calbox' ){
            winCal=window.calframe;
            docCal = winCal.document;
        }else if( pCtrl =='largecalbox' ){
            winCal=window.largecalframe;
            docCal = winCal.document;
        } else {            	
		  
		   box_x_cal=box_x;
           box_y_cal=box_y;
		  RenderCal(pCtrl);

/*				winCal=window.open("","DateTimePicker","toolbar=0,status=0,menubar=0,fullscreen=no,leftmargin=0,topmargin=0,marginwidth=0,marginheight=0,width=210,height=195,resizable=0,top="+box_y+",left="+box_x);
            docCal = winCal.document;*/
        }
	
}




function popLayer(desc){

if (navigator.family == "gecko") {pad="0"; bord="1 bordercolor=black";}
else {pad="1"; bord="0";}

 	
if(navigator.family =="nn4") {
	var obj=document.p_layer;
	obj.document.write(desc);
	obj.document.close();
	obj.left=(box_x_cal)+"px";
	obj.top=(box_y_cal)+"px";
	
	}
else if(navigator.family =="ie4"){
	p_layer.innerHTML=desc;
	p_layer.style.pixelLeft=(box_x_cal);
	p_layer.style.pixelTop=(box_y_cal);
	
	
	}
else if(navigator.family =="gecko"){
	var obj=document.getElementById("p_layer");
	obj.innerHTML=desc;
	obj.style.left=(box_x_cal)+"px";
	obj.style.top=(box_y_cal)+"px";
	
	}

return false;
}



function hideLayer(){
  
	if(navigator.family =="nn4") {eval(document.p_layer.top="-500px");}
	else if(navigator.family =="ie4"){p_layer.innerHTML="";p_layer.style.pixelTop="-500";}
	else if(navigator.family =="gecko") {document.getElementById("p_layer").style.top="-500px";}

}




var box_x;
var box_y;
var isNav = (navigator.appName.indexOf("Netscape") !=-1);

function handlerMM(e){
//box_x = (isNav) ? e.pageX - document.body.scrollLeft: event.clientX;
//box_y = (isNav) ? e.pageY - document.body.scrollTop : event.clientY;
box_x = (isNav) ? e.pageX : event.clientX + document.body.scrollLeft;;
box_y = (isNav) ? e.pageY : event.clientY + document.body.scrollTop;

}
if (isNav){document.captureEvents(Event.MOUSEMOVE);}
document.onmousemove = handlerMM;



//Modifisert version av RenderCall
function RenderCal(pCtrl)
{
	var vCalHeader;
	var vCalData;
	var vCalTime;
	var i;
	var j;
	var SelectStr;
	var vDayCount=0;
	var vFirstDay;
    var desc;
	
	desc="";
        if(pCtrl != "calbox" && pCtrl != "largecalbox"){
            desc+="<html><head><title>"+WindowTitle+"</title>";
            +"<style>a {color: black; text-decoration: none; font-weight:none size:11px}</style>";
            +"<link rel="shortcut icon" href="favicon.ico" /> </head><body background='"+ThemeBg+"' link="+FontColor+" vlink="+FontColor+">";
            
		}else{
            desc+="<html><head>";
            +"<style>a:link {color: black; text-decoration: none; font-weight:none size:11px}</style>";
                        +"<link rel="shortcut icon" href="favicon.ico" /> </head><body background='"+ThemeBg+"' link="+FontColor+" vlink="+FontColor+">";
						
						        }
        +"<form name='Calendar'>";
	vCalHeader="<table class=\"cal_table\" width=\"180\" border=0 cellpadding=1 cellspacing=1  height='13' align=\"center\" >\n";
	vCalHeader+="<tr><td align=\"right\" valign=\"bottom\"><a href=\"javascript:hideLayer()\"><img src=\"image/kryss.gif\" height=\"7px\" width=\"7px\" Border=\"0\"></a></td></tr></table>\n";
	vCalHeader+="<table class=\"cal_table\" width=\"180\" border=0 cellpadding=1 cellspacing=1  height='170' align=\"center\" valign=\"top\">\n";
	
	//Calendar header shows Month and Year
	if (ShowMonthYear){
		vCalHeader+="<tr><td colspan='7' align='center'>";
                vCalHeader+="<table class=\"cal_table\" border=0 width=100% cellspacing=0 cellpadding=0><tr><td align=left>";
                vCalHeader+="<a href=\"javascript:Cal.DecYear();RenderCal('"+pCtrl+"')\"><font color="+MonthYearColor+" size=1> &nbsp; << </font></a> ";
                vCalHeader+="<a href=\"javascript:Cal.DecMonth();RenderCal('"+pCtrl+"')\"><font color="+MonthYearColor+" size=1>&nbsp;  < </font></a> ";
                if(pCtrl == "largecalbox") vCalHeader+="&nbsp;";
                vCalHeader+="</td><td align=center> ";
                if(pCtrl == "largecalbox")
                    vCalHeader+="<font face='Verdana' size='2' align='center' color='"+MonthYearColor+"'>"+Cal.GetMonthName(ShowLongMonth)+" "+Cal.Year+"</font>";
                else
                    vCalHeader+="<font face='Verdana' size='2' align='center' color='"+MonthYearColor+"'>"+Cal.GetMonthName(ShowLongMonth)+" "+Cal.Year+"</font>";
                vCalHeader+="</td><td align=right>";
                vCalHeader+=" <a href=\"javascript:Cal.IncMonth();RenderCal('"+pCtrl+"')\"><font color="+MonthYearColor+" size=1> > &nbsp;</font></a> ";
                if(pCtrl == "largecalbox") vCalHeader+="&nbsp;";
                vCalHeader+=" <a href=\"javascript:Cal.IncYear();RenderCal('"+pCtrl+"')\"><font color="+MonthYearColor+" size=1> >> &nbsp;</font></a>";
                vCalHeader+="</td></tr></table>";
                vCalHeader+="</td></tr>\n";
        }

	//Week day header
	vCalHeader+="<tr bgcolor="+WeekHeadColor+">";
	for (i=0;i<7;i++)
	{
		vCalHeader+="<td align='center'><font face='Verdana' size='1'>"+WeekDayName[i].substr(0,WeekChar)+"</font></td>";
	}
	vCalHeader+="</tr>";	
	desc+=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(pCtrl);
		vDayCount=vDayCount+1;
	}
	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(pCtrl, j,true,TodayColor);
			
	}
		else
		{
			if (j==Cal.Date)
			{
				strCell=GenCell(pCtrl, j,true,SelDateColor);
			}
			else
			{	 
				if (vDayCount%7==0)
					strCell=GenCell(pCtrl, j,false,SaturdayColor);
				else if ((vDayCount+6)%7==0)
					strCell=GenCell(pCtrl, j,false,SundayColor);
				else
					strCell=GenCell(pCtrl, j,null,WeekDayColor);
			}		
		}						
		vCalData=vCalData+strCell;

		if((vDayCount%7==0)&&(j<Cal.GetMonDays()))
		{
			vCalData=vCalData+"</tr>\n<tr>";
		}
	}
	desc+=vCalData;	
	//Time picker
	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:Cal.SetHour(this.value)\">";
		vCalTime+=" : ";
		vCalTime+="<input type='text' name='minute' maxlength=2 size=1 style=\"WIDTH: 22px\" value="+Cal.Minutes+" onchange=\"javascript:Cal.SetMinute(this.value)\">";
		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: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>";
		desc+=vCalTime;
	}
	


	//end time picker
	desc+="\n</table>";
        //if(pCtrl != "inline"){
            desc+="</form><!-- START OF SDC Advanced Tracking Code -->";
	
desc+="</body></html>";
        //}
	     if (document.layers) {navigator.family = "nn4"}
         if (document.all) {navigator.family = "ie4"}
         if (window.navigator.userAgent.toLowerCase().match("gecko")) {navigator.family = "gecko"}
         popLayer(desc);
}

function GenCell(pCtrl, 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 ((pHighLight!=null)&&(pHighLight))
		{vHLstr1="color='black'><b>";vHLstr2="</b>";}
	else
		{vHLstr1=">";vHLstr2="";}	
	
	if (Cal.ShowTime)
	{
		vTimeStr="document.getElementById('"+Cal.Ctrl+"').value+=' '+"+"Cal.getShowHour()"+"+':'+"+"Cal.Minutes";  //+"+':'+"+"Cal.Seconds";
		if (TimeMode==12)
			vTimeStr+="+' '+Cal.AMorPM";
	}	
	else
		vTimeStr="";		
	PCellStr="\n <td width=14% ";  //+CellWidth;
        if( pCtrl == "largecalbox"){
            PCellStr+=" height="+CellHeight;
        }
        if( pCtrl == "largecalbox" ){
            if( window.parent.Events[ Cal.FormatDate(PValue) ] != null ){
                PCellStr+=" "+vColor+" align='center'>";
                PCellStr+="<a target=_parent href="+window.parent.pmdir+"pm.cgi?action=app_search&app="+ window.parent.app_name;
                PCellStr+="&bydate="+window.parent.app_field+"&fromdate=";
                PCellStr+=Cal.FormatDate(PValue)+"&todate="+Cal.FormatDate(PValue);
                PCellStr+="&sortby="+window.parent.app_field+">";
                PCellStr+="<font color=navy face='verdana' size='2'"+vHLstr1;
                PCellStr+= PValue + vHLstr2;
                desc = window.parent.Events[ Cal.FormatDate(PValue) ];
                if(desc.length>100){
                    desc = desc.substr(0, 100) + "...";
                } 
                PCellStr+= "<br><font size=1 face=arial>" + desc + "</font></a>";
            }else{
                PCellStr+= " "+vColor+" align='center'><font face='verdana' size='2'"+vHLstr1+PValue+vHLstr2+"</font></td>";
            }
            PCellStr+="</font></td>";
        } else if( pCtrl == "calbox" ){
            if( window.parent.Events[ Cal.FormatDate(PValue) ] != null ){
                PCellStr+= " bgcolor=gray align='center'>";
                PCellStr+="<a target=_parent href="+window.parent.pmdir+"pm.cgi?action=app_search&app="+ window.parent.app_name;
                PCellStr+="&bydate="+window.parent.app_field+"&fromdate=";
                PCellStr+=Cal.FormatDate(PValue)+"&todate="+Cal.FormatDate(PValue);
                PCellStr+="&sortby="+window.parent.app_field+">";
                PCellStr+="<font color=navy face='verdana' size='1'"+vHLstr1;
                PCellStr+= PValue + vHLstr2;
                PCellStr+= "</font>";
                PCellStr+= "</a>";
            } else {
                PCellStr+= " "+vColor+" align='center'><font color=black face='verdana' size='1'>"+vHLstr1+PValue+vHLstr2+"</font></td>";
            }
        }else{
            PCellStr+=" "+vColor+" align='center'><font color=black face='verdana' size='1'"+vHLstr1+"<a href=\"javascript:document.getElementById('"+Cal.Ctrl+"').value='"+Cal.FormatDate(PValue)+"';"+vTimeStr+"hideLayer();\">"+PValue+"</a>"+vHLstr2+"</font></td>";
        }
	return PCellStr;
}

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 IncMonth()
{	
    if(Cal.Month==11) {
        Cal.Month=0; 
        Cal.Year++; 
    } else  {
        Cal.Month++;
    }
}
Calendar.prototype.IncMonth=IncMonth;

function DecMonth()
{
    if(Cal.Month==0) {
        Cal.Month=11; 
        Cal.Year--; 
    } else { 
        Cal.Month--;
    }
}
Calendar.prototype.DecMonth=DecMonth;

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)
{
	if (this.Format.toUpperCase()=="DDMMYYYY")
		return (pDate+DateSeparator+(this.Month+1)+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.Month+1)+DateSeparator+pDate+DateSeparator+this.Year);
	else if (this.Format.toUpperCase()=="MMMDDYYYY")
		return (this.GetMonthName(false)+DateSeparator+pDate+DateSeparator+this.Year);			
}
Calendar.prototype.FormatDate=FormatDate;