//Javascript name: My Date Time Picker
//Date created: 16-Nov-2003 23:19
//Scripter: TengYong Ng
//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.

//Global variables
var winCal;
var dtToday=new Date();
var Cal;
var docCal;
var MonthName=["January", "February", "March", "April", "May", "June","July",
"August", "September", "October", "November", "December"];
var WeekDayName=["Sunday","Monday","Tuesday","Wednesday","Thursday","Friday","Saturday"];
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 ="Date Picker";//Date Time Picker title.
var WeekChar=1;//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=false;//Show Month and Year in Calendar header.
var MonthYearColor="#cc0033";//Font Color of Month and Year in Calendar header.
var WeekHeadColor="#dcdcdc";//Background Color in Week header.
//var SundayColor="#6699FF";//Background color of Sunday.
var SundayColor="white";//Background color of Sunday.
//var SaturdayColor="#CCCCFF";//Background color of Saturday.
var SaturdayColor="White";//Background color of Saturday.
var WeekDayColor="white";//Background color of weekdays.
var FontColor="black";//color of font in Calendar day cell.
//var TodayColor="#FFFF33";//Background color of today.
var TodayColor="#DCDCDC";//Background color of today.
var SelDateColor="#0054E3";//Backgrond color of selected date in textbox.
var YrSelColor="#000000";//color of font of Year selector.
var ThemeBg="";//Background image of Calendar window.
var CalendarBgColor = "white";//Background color of Calendar table.
var PageBgColor = "#ECE9D8";//Background color of the whole page

//Added By Kevin L. on 31 Aug 05
//Cached images
var imgMonth= new Array(12);
var strImgPath='';
var imgPrevYear = new Image();
var imgNextYear = new Image();
var callFunction;

//end Configurable parameters
//end Global variable
//GJ 26/5/08 - added new parameter dtDefaultDate to pass the default date to display
function NewCal(pCtrl,pFormat,pShowTime,pTimeMode, dtDefaultDate,callFunc)
{
if (callFunc!=null) {
callFunction = callFunc
}
//Preload month images
//N.B. Image path is calculated

if (document.getElementsByTagName) {
var objScript = document.getElementsByTagName('script');
var iScriptSrcIndex = -1;
for (var i=0; i<objScript.length; i++) {
if (objScript[i].src ) {

iScriptSrcIndex = objScript[i].src.toLowerCase().indexOf('datetimepicker.js');
if (iScriptSrcIndex >= 0) {
strImgPath = objScript[i].src.substr(0, iScriptSrcIndex);
strImgPath += '../../Images/';
break;
}
}//end of for
}
//Preload images
for (var i=0; i<imgMonth.length; i++) {
imgMonth[i] = new Image();
imgMonth[i].src = strImgPath + 'cal_' + MonthName[i] + '.gif';
}//end of for
imgPrevYear.src = strImgPath + 'cal_PrevMonth.gif';
imgNextYear.src = strImgPath + 'cal_NextMonth.gif';
}

//check if we have a default date to display
if (dtDefaultDate!=null && dtDefaultDate!='') {
Cal=new Calendar(new Date(dtDefaultDate));

}
else {
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();

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);
}
}
winCal=window.open("","DateTimePicker","toolbar=0,status=0,menubar=0,fullscreen=no,width=250,height=214,resizable=0,top="+cnTop+",left="+cnLeft);
docCal=winCal.document;
RenderCal();
winCal.focus();
}
//Added by GJ 26/5/08
//Allows you to pass a textbox of name 'ElementNameDefault' with a date value and this will
//display as the default date.
function NewCalWithDefaultDateObject(pCtrl,pFormat,pShowTime,pTimeMode, ElementNameDefault,callFunc)
{
var tmpvalue;
//replace "-" with " " eg 1-jan-08 becomes 1 jan 08
tmpvalue = eval("document.getElementById('" + ElementNameDefault + "').value");
tmpvalue = tmpvalue.replace(/-/g," ")
NewCal(pCtrl,pFormat,pShowTime,pTimeMode, tmpvalue,callFunc)
}

function RenderCal()
{
var vCalHeader;
var vCalData;
var vCalTime;
var i;
var j;
var SelectStr;
var vDayCount=0;
var vFirstDay;

docCal.open();
docCal.writeln("<html><head><title>"+WindowTitle+"</title>");
docCal.writeln("<script>var winMain=window.opener;</script>");
//Added by Kevin L. on 04 Aug 2005
//Added scripts for style sheets
//N.B. current document equal caller document
if (document.getElementsByTagName) {
var objLink = document.getElementsByTagName('link');
if (objLink) {
for (var i=0; i<objLink.length; i++) {
if (objLink[i].type && objLink[i].type.toLowerCase() == 'text/css') {
var strLink = "";
strLink ="<link type=text/css ";
if (objLink[i].media)
strLink +=" media=" + objLink[i].media;
if (objLink[i].href)
strLink +=" href=" + objLink[i].href;
if (objLink[i].rel)
strLink += " rel=" + objLink[i].rel;
strLink +='>';
//docCal.writeln(strLink);
}
}//end of for
}

}

docCal.writeln("</head><body marginwidth=0 marginheight=0 leftmargin=0 rightmargin=0 topmargin=0 bottommargin=0 bgColor='" + PageBgColor + "' background='"+ThemeBg+"' link="+FontColor+" vlink="+FontColor+">");
docCal.writeln("<table border=0 width='100%' height='100%' cellpadding=0 cellspacing=0 bgColor='" + PageBgColor + "' >");
docCal.writeln("<form name='Calendar'>");
docCal.writeln("<tr><td style=\"width:15px\"></td>");
docCal.writeln("<td width='100%'>");
vCalHeader="<table border=0 cellpadding=1 cellspacing=0 width='210' height='175' align=\"center\" valign=\"top\" bgColor=\"" + CalendarBgColor + "\">\n";
vCalHeader+="<tr><td style='width:10px'></td>";
vCalHeader+="<td>";
vCalHeader+="<table border=0 cellpadding=1 cellspacing=0 width='190' height='155' align=\"center\" valign=\"top\" bgColor=\"" + CalendarBgColor + "\">\n";

//Month Selector
vCalHeader+="<tr>\n";
vCalHeader+="<td rowspan=10 valign=top background='" + strImgPath + "cal_month_bg.gif'><img src='" + imgMonth[Cal.Month].src + "' alt='' /></td>\n";
vCalHeader+="<td rowspan=10 style='width:5px;'></td>\n";
vCalHeader+="<td colspan='7'><table border=0 width='160' cellpadding=0 cellspacing=0><tr><td align='left'>\n";
vCalHeader+="<select style=\"font-family:Verdana; FONT-SIZE:10px;color:#666666\" 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='right' nowrap><a class=\"\" href=\"javascript:winMain.Cal.DecYear();winMain.RenderCal()\"><img src=\"" + imgPrevYear.src + "\" border=0 alt=\"previous year\" style=\"vertical-align:middle\" /></a><font face=\"Verdana\" color=\""+YrSelColor+"\" size=1><b> "+Cal.Year+" </b></font><a class=\"\" href=\"javascript:winMain.Cal.IncYear();winMain.RenderCal()\"><img src=\"" + imgNextYear.src + "\" border=0 alt=\"next year\" align=middle ></a></td></tr></table></td>\n";
vCalHeader+="</tr>";

//Calendar header shows Month and Year
if (ShowMonthYear)
vCalHeader+="<tr><td colspan='7'><font face='Verdana' 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 width=14% align='center' height=20><font face='Verdana' size='1' ><b>"+WeekDayName[i].substr(0,WeekChar)+"</b></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(null, false, WeekDayColor);
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(j,true,TodayColor);//Highlight today's date
else
{
if (j==Cal.Date)
{
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>";
}
}
//Added By Kevin L. on 31 Aug 2005
//Added empty cell at the end of the calendar
//N.B. maximun 35 cells, i.e. 7 cols x 5 rows
for (k=vDayCount; k<35; k++)
{
vCalData=vCalData+GenCell(null, false, WeekDayColor);
vDayCount=vDayCount+1;
}
docCal.writeln(vCalData);

//Additional empty row for display
vCalData="</tr>";
if (vDayCount<=35) {
vCalData = "\n<tr>";
for (i=0;i<7;i++)
{
vCalData=vCalData+GenCell(null, false, WeekDayColor);
vDayCount=vDayCount+1;
}
vCalData+="</tr>";
}
docCal.writeln(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: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)\">";
if (TimeMode==12)
{
var SelectAm =(parseInt(Cal.Hours,10)<12)? "Selected":"";
var SelectPm =(parseInt(Cal.Hours,10)>=12)? "Selected":"";

vCalTime+="<select class=\"clsNormal\" 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("</td>");
docCal.writeln("<td style=\"width:15px\"></td>");
docCal.writeln("</tr></form>");
docCal.writeln("</table>");
docCal.writeln("</td>");
docCal.writeln("<td style='width:10px'></td>");
docCal.writeln("</tr>");
docCal.writeln("</table>");
docCal.writeln("</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="&nbsp;";
else
PValue=pValue;

if (pColor!=null)
vColor="bgcolor=\""+pColor+"\"";
else
vColor="";

if (pColor == SelDateColor) {
vHLstr1="color='white'>";vHLstr2="";
} else {
if ((pHighLight!=null)&&(pHighLight))
{vHLstr1="color='black'>";vHLstr2="";}
else
{vHLstr1=">";vHLstr2="";}

}

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";
}
else
vTimeStr="";

PCellStr="<td "+vColor+" width="+CellWidth+" align='center' height=20 >";
if (PValue !='' && PValue!=' ' && PValue !='&nbsp;')
{
if (callFunction) {
//PCellStr+="<a class=\"\" style=\"{text-decoration:none;} :hover {text-decoration:underline;}\" href=\"javascript:winMain.document.getElementById('"+Cal.Ctrl+"').value='"+Cal.FormatDate(PValue)+"';"+vTimeStr+"; this.checkExec('" + callFunction + "');window.close();\">";

PCellStr+="<a class=\"\" style=\"{text-decoration:none;} :hover {text-decoration:underline;}\" href=\"javascript:winMain.document.getElementById('"+Cal.Ctrl+"').value='"+Cal.FormatDate(PValue)+"';"+vTimeStr+"; winMain.Cal.CustomFunction();window.close();\">";
}
else {
PCellStr+="<a class=\"\" style=\"{text-decoration:none;} :hover {text-decoration:underline;}\" href=\"javascript:winMain.document.getElementById('"+Cal.Ctrl+"').value='"+Cal.FormatDate(PValue)+"';"+vTimeStr+";window.close();\">";
}
PCellStr+="<font style='font-family:verdana; font-size:10px' " +vHLstr1;
PCellStr+=PValue+vHLstr2;
PCellStr+="</font>";
PCellStr+="</a>";


}
PCellStr+="</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";
}
//Added by GJ 26/5/08
//This allows a function to be called after the user clicks on a date.
function CustomFunction(){
if (callFunction)
eval(callFunction)
}
Calendar.prototype.CustomFunction=CustomFunction;

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)
{
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;