var winCal;
var dtToday=new Date();
var Cal;
var MonthName=["January", "February", "March", "April", "May", "June","July",
"August", "September", "October", "November", "December"];
var WeekDayName1=["Sunday","Monday","Tuesday","Wednesday","Thursday","Friday","Saturday"];
var WeekDayName2=["Monday","Tuesday","Wednesday","Thursday","Friday","Saturday","Sunday"];
var exDateTime;//Existing Date and Time
var selDate;//selected date. version 1.7
//Configurable parameters
var cnTop="200";//top coordinate of calendar window.
var cnLeft="500";//left coordinate of calendar window
var WindowTitle ="DateTime Picker Hygeia";//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=30;//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="#cc0033";//Font Color of Month and Year in Calendar header.
var WeekHeadColor="#8E4EA0";//Background Color in Week header.#
var SundayColor="#996699";//Background color of Sunday.
var SaturdayColor="#BCAECE";//Background color of Saturday.
var WeekDayColor="white";//Background color of weekdays.
var FontColor="blue";//color of font in Calendar day cell.
var TodayColor="#FFFF33";//Background color of today.
var SelDateColor="FFFF99";//Backgrond color of selected date in textbox.
var YrSelColor="#cc0033";//color of font of Year selector.
var MthSelColor="#cc0033";//color of font of Month selector if "MonthSelector" is "arrow".
var ThemeBg="images/bg.jpg";//Background image of Calendar window.
var PrecedeZero=true;//Preceding zero [true|false]
var MondayFirstDay=true;//true:Use Monday as first day; false:Sunday as first day. [true|false] //added in version 1.7
//end Configurable parameters
//end Global variable
function NewCal(pCtrl,pFormat,pShowTime,pTimeMode,pScroller,pHideSeconds)
{
Cal=new Calendar(dtToday);
if ((pShowTime!=null) && (pShowTime))
{
Cal.ShowTime=true;
if ((pTimeMode!=null) &&((pTimeMode=='12')||(pTimeMode=='24')))
{
TimeMode=pTimeMode;
}
if ((pHideSeconds!=null)&&(pHideSeconds))
{
Cal.ShowSeconds=false;
}
}
if (pCtrl!=null)
Cal.Ctrl=pCtrl;
if (pFormat!=null)
Cal.Format=pFormat.toUpperCase();
if (pScroller!=null)
{
if (pScroller.toUpperCase()=="ARROW")
Cal.Scroller="ARROW";
else
Cal.Scroller="DROPDOWN";
}
exDateTime=document.getElementById(pCtrl).value;
if (exDateTime!="")//Parse existing 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;
var winHeight;
//parse month
Sp1=exDateTime.indexOf(DateSeparator,0)
Sp2=exDateTime.indexOf(DateSeparator,(parseInt(Sp1)+1));
var offset=parseInt(Cal.Format.toUpperCase().lastIndexOf("M"))-parseInt(Cal.Format.toUpperCase().indexOf("M"))-1;
if ((Cal.Format.toUpperCase()=="DDMMYYYY") || (Cal.Format.toUpperCase()=="DDMMMYYYY"))
{
if (DateSeparator=="")
{
strMonth=exDateTime.substring(2,4+offset);
strDate=exDateTime.substring(0,2);
strYear=exDateTime.substring(4+offset,8+offset);
}
else
{
strMonth=exDateTime.substring(Sp1+1,Sp2);
strDate=exDateTime.substring(0,Sp1);
strYear=exDateTime.substring(Sp2+1,Sp2+5);
}
}
else if ((Cal.Format.toUpperCase()=="MMDDYYYY") || (Cal.Format.toUpperCase()=="MMMDDYYYY"))
{
if (DateSeparator=="")
{
strMonth=exDateTime.substring(0,2+offset);
strDate=exDateTime.substring(2+offset,4+offset);
strYear=exDateTime.substring(4+offset,8+offset);
}
else
{
strMonth=exDateTime.substring(0,Sp1);
strDate=exDateTime.substring(Sp1+1,Sp2);
strYear=exDateTime.substring(Sp2+1,Sp2+5);
}
}
else if ((Cal.Format.toUpperCase()=="YYYYMMDD") || (Cal.Format.toUpperCase()=="YYYYMMMDD"))
{
if (DateSeparator=="")
{
strMonth=exDateTime.substring(4,6+offset);
strDate=exDateTime.substring(6+offset,8+offset);
strYear=exDateTime.substring(0,4);
}
else
{
strMonth=exDateTime.substring(Sp1+1,Sp2);
strDate=exDateTime.substring(Sp2+1,Sp2+3);
strYear=exDateTime.substring(0,Sp1);
}
}
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
YearPattern=/^\d{4}$/;
if (YearPattern.test(strYear))
Cal.Year=parseInt(strYear,10);
//end parse year
//parse time
if (Cal.ShowTime==true)
{
//parse AM or PM
if (TimeMode==12)
{
strAMPM=exDateTime.substring(exDateTime.length-2,exDateTime.length)
Cal.AMorPM=strAMPM;
}
tSp1=exDateTime.indexOf(":",0)
tSp2=exDateTime.indexOf(":",(parseInt(tSp1)+1));
if (tSp1>0)
{
strHour=exDateTime.substring(tSp1,(tSp1)-2);
Cal.SetHour(strHour);
strMinute=exDateTime.substring(tSp1+1,tSp1+3);
Cal.SetMinute(strMinute);
strSecond=exDateTime.substring(tSp2+1,tSp2+3);
Cal.SetSecond(strSecond);
}
//window.status=strHour+":"+strMinute+":"+strSecond;
}
}
selDate=new Date(Cal.Year,Cal.Month,Cal.Date);//version 1.7
winCal=window.open("","DateTimePicker","toolbar=0,status=0,menubar=0,fullscreen=no,width=225,height=238,resizable=0,top="+cnTop+",left="+cnLeft);
if (parseInt(navigator.appVersion) == 2 && navigator.appName == "Netscape")
winCal=window.open("","DateTimePicker","toolbar=0,status=0,menubar=0,fullscreen=no,width=225,height=238,resizable=0,top="+cnTop+",left="+cnLeft);
RenderCal();
winCal.focus();
}
function RenderCal()
{
var vCalHeader;
var vCalData;
var vCalTime;
var i;
var j;
var SelectStr;
var vDayCount=0;
var vFirstDay;
winCal.document.open();
winCal.document.writeln(""+WindowTitle+"");
winCal.document.writeln("");//winMain is window that open calendar window.
winCal.document.writeln("