//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 ="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="#637D9F";//Font Color of Month and Year in Calendar header.
var WeekHeadColor="#8396B9";//Background Color in Week header.
var SundayColor="#EEEEEE";//Background color of Sunday.
var SaturdayColor="#EEEEEE";//Background color of Saturday.
var WeekDayColor="white";//Background color of weekdays.
var FontColor="black";//color of font in Calendar day cell.
var TodayColor="#A5B2BB";//Background color of today.
var SelDateColor="#F08080";//Backgrond color of selected date in textbox.
var YrSelColor="#637D9F";//color of font of Year selector.
var ThemeBg="";//Background image of Calendar window.
//end Configurable parameters
//end Global variable

function NewCal(pCtrl,pFormat,pShowTime,pTimeMode,pZeroTime)
{
  if (pZeroTime != null && pZeroTime)
  {
    dtToday.setHours(0);
    dtToday.setMinutes(0);
    dtToday.setSeconds(0);
  }
  
  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;
    var strAMPM;
    //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);
      if (TimeMode==12) {
        strAMPM=exDateTime.substring(tSp2+4);
        if (strAMPM == 'PM') Cal.AMorPM = 'PM'; else Cal.AMorPM = 'AM';
      }
      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","resizable,width=235,height=265,top="+cnTop+",left="+cnLeft);
  docCal=winCal.document;
  RenderCal();
}


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>");
  docCal.writeln("</head><body background='"+ThemeBg+"' link="+FontColor+" vlink="+FontColor+"><form name='Calendar'>");

  vCalHeader="<table border=1 cellpadding=1 cellspacing=1 width='100%' 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='right'><a href=\"javascript:winMain.Cal.DecYear(10);winMain.RenderCal()\"><b><font color=\""+YrSelColor+"\">&lt;&lt;</font></b></a>&nbsp;<a href=\"javascript:winMain.Cal.DecYear(1);winMain.RenderCal()\"><b><font color=\""+YrSelColor+"\">&lt;</font></b></a><font face=\"Verdana\" color=\""+YrSelColor+"\" size=2>&nbsp;<b>"+Cal.Year+"</b>&nbsp;</font><a href=\"javascript:winMain.Cal.IncYear(1);winMain.RenderCal()\"><b><font color=\""+YrSelColor+"\">&gt;</font></b></a>&nbsp;<a href=\"javascript:winMain.Cal.IncYear(10);winMain.RenderCal()\"><b><font color=\""+YrSelColor+"\">&gt;&gt;</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='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 align='center'><font face='Verdana' 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;
  }

  for (j=1;j<=Cal.GetMonDays();j++)
  {
    var strCell;
    vDayCount=vDayCount+1;
    if (j==Cal.Date)
      strCell=GenCell(j,true,SelDateColor);
    else
    {
      if ((j==dtToday.getDate())&&(Cal.Month==dtToday.getMonth())&&(Cal.Year==dtToday.getFullYear()))
        strCell=GenCell(j,true,TodayColor);//Highlight today's date
      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 (Cal.ShowTime)
  {
    var i, ii, min, max;
    var showHour=Cal.getShowHour();
    vCalTime="<tr>\n<td colspan='7' align='center'>";
    vCalTime+="<select name='hour' onchange=\"javascript:winMain.Cal.SetHour(this.options[this.selectedIndex].text)\">";
    if (TimeMode==12) { min = 1; max = 12; } else { min = 0; max = 23; }
    for (i = min; i <= max; i++) {
      if (i < 10) ii = '0'+i; else ii = i;
      if (ii == showHour) {
        vCalTime+="<option selected>"+ii+"</option>";
      }
      else {
        vCalTime+="<option>"+ii+"</option>";
      }
    }
    vCalTime+="</select>:<select name='minute' onchange=\"javascript:winMain.Cal.SetMinute(this.options[this.selectedIndex].text)\">";
    for (i = 0; i < 60; i++) {
      if (i < 10) ii = '0'+i; else ii = i;
      if (ii == Cal.Minutes) {
        vCalTime+="<option selected>"+ii+"</option>";
      }
      else {
        vCalTime+="<option>"+ii+"</option>";
      }
    }
    vCalTime+="</select>:<select name='second' onchange=\"javascript:winMain.Cal.SetSecond(this.options[this.selectedIndex].text)\">";
    for (i = 0; i < 60; i++) {
      if (i < 10) ii = '0'+i; else ii = i;
      if (ii == Cal.Seconds) {
        vCalTime+="<option selected>"+ii+"</option>";
      }
      else {
        vCalTime+="<option>"+ii+"</option>";
      }
    }
    vCalTime+="</select>";
    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("\n<table align='center'><tr><td><font face='Verdana'size=2><a href='javascript:winMain.OK();window.close()'>OK</a></font></td><td><font face='Verdana'size=2><a href='javascript:window.close()'>Cancel</a></font></td></tr></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 ((pHighLight!=null)&&(pHighLight))
    {vHLstr1=" color='red'><b>";vHLstr2="</b>";}

  else
    {vHLstr1=">";vHLstr2="";} 
  
  PCellStr="<td "+vColor+" align='center'><font face='verdana' size='2'"+vHLstr1+"<a href=\"javascript:winMain.Cal.Date='"+PValue+"';winMain.RenderCal();\">"+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 OK()
{
  if (Cal.ShowTime)
  {
    vTimeStr=' '+Cal.getShowHour()+':'+Cal.Minutes+':'+Cal.Seconds;
    if (TimeMode==12)
     vTimeStr+=' '+Cal.AMorPM;
  } 
  else
    vTimeStr="";    
  
  var e = document.getElementById(Cal.Ctrl);
  e.value=Cal.FormatDate(Cal.Date)+vTimeStr;
  if (e.onchange) e.onchange();
}
Calendar.prototype.OK=OK;

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

Calendar.prototype.IncYear=IncYear;

function DecYear(years)
{ Cal.Year-=years;}

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;