// Pick Date/Time from popup window
// Looks for calendar icon "cal.gif"

//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="#cc0033";//Font Color of Month and Year in Calendar header.
var WeekHeadColor="#0099CC";//Background Color in Week header.
var SundayColor="#6699FF";//Background color of Sunday.
var SaturdayColor="#CCCCFF";//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 ThemeBg="";//Background image of Calendar window.
//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();
        
        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=195,height=245,resizable=0,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();winMain.RenderCal()\"><b><font color=\""+YrSelColor+"\"><</font></b></a><font face=\"Verdana\" 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='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==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>";
                }
        }
        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 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 ((pHighLight!=null)&&(pHighLight))
                {vHLstr1="color='red'><b>";vHLstr2="</b>";}
        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'><font face='verdana' size='2'"+vHLstr1+"<a href=\"javascript:winMain.document.getElementById('"+Cal.Ctrl+"').value='"+Cal.FormatDate(PValue)+"';"+vTimeStr+";window.close();\">"+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 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;       

// (Used for expanding and collapsing block elements. Good for hiding divs or expanding the divs for forms.)
// Link: Read more...
// In page: <div id="more_stuff" style="display:none;">Extra content...</div>

function toggleLayer(whichLayer) 
{
        if (document.getElementById) 
        {
                // this is the way the standards work
                var style2 = document.getElementById(whichLayer).style;
                style2.display = style2.display? "":"none";
        }
        else if (document.all)
        {
                // this is the way old msie versions work
                var style2 = document.all[whichLayer].style;
                style2.display = style2.display? "":"none";
        }
        else if (document.layers)
        {
                // this is the way nn4 works
                var style2 = document.layers[whichLayer].style;
                style2.display = style2.display? "":"none";
        }
}

// Creates a Print this Page button
// usage: document.write("<form><input type=button "+"value=\""+message+"\" onClick=\"printpage()\"></form>");
//printpage

var message = "Print this Page";
function printpage() {
window.print();  
}

// Pop Up Window Generator
// (Parameters passed through URL string)
// Usage: Link Text

var win=null;

function NewWindow(mypage,myname,w,h,pos,infocus) {
        if (pos == "random") {
                myleft=(screen.width)?Math.floor(Math.random()*(screen.width-w)):100;
                mytop=(screen.height)?Math.floor(Math.random()*((screen.height-h)-75)):100;
        }
        if (pos == "center") {
                myleft = (screen.width)?(screen.width-w)/2:100;
                mytop = (screen.height)?(screen.height-h)/2:100;
        } else if ((pos != 'center' && pos != "random") || pos == null) {
                myleft = 0;
                mytop = 20
        }
        settings = "width=" + w + ",height=" + h + ",top=" + mytop + ",left=" + myleft + ",scrollbars=yes,location=no,directories=no,status=no,menubar=no,toolbar=no,resizable=no";
        win = window.open(mypage,myname,settings);
        win.focus();
}

// If you want to make sure your website is not opened in a frame from some other website, put this JavaScript in the <head> of your html page:

<script type="text/javascript">
if (top.location != self.location) { top.location.href = self.location.href; }
</script>