// ===================================================================
// Author: Matt Kruse <matt@mattkruse.com>
// WWW: http://www.mattkruse.com/
//
// NOTICE: You may use this code for any purpose, commercial or
// private, without any further permission from the author. You may
// remove this notice from your final code if you wish, however it is
// appreciated by the author if at least my web site address is kept.
//
// You may *NOT* re-distribute this code in any way except through its
// use. That means, you can include it in your product, or your web
// site, or any other form where the code is actually being used. You
// may not put the plain javascript up on your site for download or
// include it in your javascript libraries for download. 
// If you wish to share this code with others, please just point them
// to the URL instead.
// Please DO NOT link directly to my .js files from your site. Copy
// the files to your server and use them there. Thank you.
// ===================================================================

// HISTORY
// ------------------------------------------------------------------
// May 17, 2003: Fixed bug in parseDate() for dates <1970
// March 11, 2003: Added parseDate() function
// March 11, 2003: Added "NNN" formatting option. Doesn't match up
//                 perfectly with SimpleDateFormat formats, but 
//                 backwards-compatability was required.

// ------------------------------------------------------------------
// These functions use the same 'format' strings as the 
// java.text.SimpleDateFormat class, with minor exceptions.
// The format string consists of the following abbreviations:
// 
// Field        | Full Form          | Short Form
// -------------+--------------------+-----------------------
// Year         | yyyy (4 digits)    | yy (2 digits), y (2 or 4 digits)
// Month        | MMM (name or abbr.)| MM (2 digits), M (1 or 2 digits)
//              | NNN (abbr.)        |
// Day of Month | dd (2 digits)      | d (1 or 2 digits)
// Day of Week  | EE (name)          | E (abbr)
// Hour (1-12)  | hh (2 digits)      | h (1 or 2 digits)
// Hour (0-23)  | HH (2 digits)      | H (1 or 2 digits)
// Hour (0-11)  | KK (2 digits)      | K (1 or 2 digits)
// Hour (1-24)  | kk (2 digits)      | k (1 or 2 digits)
// Minute       | mm (2 digits)      | m (1 or 2 digits)
// Second       | ss (2 digits)      | s (1 or 2 digits)
// AM/PM        | a                  |
//
// NOTE THE DIFFERENCE BETWEEN MM and mm! Month=MM, not mm!
// Examples:
//  "MMM d, y" matches: January 01, 2000
//                      Dec 1, 1900
//                      Nov 20, 00
//  "M/d/yy"   matches: 01/20/00
//                      9/2/00
//  "MMM dd, yyyy hh:mm:ssa" matches: "January 01, 2000 12:30:45AM"
// ------------------------------------------------------------------

var MONTH_NAMES=new Array('January','February','March','April','May','June','July','August','September','October','November','December','Jan','Feb','Mar','Apr','May','Jun','Jul','Aug','Sep','Oct','Nov','Dec');
var DAY_NAMES=new Array('Sunday','Monday','Tuesday','Wednesday','Thursday','Friday','Saturday','Sun','Mon','Tue','Wed','Thu','Fri','Sat');
		
// REQUIRES: isDate()
function dateAdd(p_Interval, p_Number, p_Date){
	//if(!isDate(p_Date)){return "invalid date: '" + p_Date + "'";}
	//if(isNaN(p_Number)){return "invalid number: '" + p_Number + "'";}	

	p_Number = new Number(p_Number);
	var dt = new Date(p_Date);
	switch(p_Interval.toLowerCase()){
		case "yyyy": {// year
			dt.setFullYear(dt.getFullYear() + p_Number);
			break;
		}
		case "q": {		// quarter
			dt.setMonth(dt.getMonth() + (p_Number*3));
			break;
		}
		case "m": {		// month
			dt.setMonth(dt.getMonth() + p_Number);
			break;
		}
		case "y":		// day of year
		case "d":		// day
		{
			dt.setDate(dt.getDate() + p_Number);
			break;
		}
		case "w": {		// weekday
			dt.setDate(dt.getDate() + p_Number);
			break;
		}
		case "ww": {	// week of year
			dt.setDate(dt.getDate() + (p_Number*7));
			break;
		}
		case "h": {		// hour
			dt.setHours(dt.getHours() + p_Number);
			break;
		}
		case "n": {		// minute
			dt.setMinutes(dt.getMinutes() + p_Number);
			break;
		}
		case "s": {		// second
			dt.setSeconds(dt.getSeconds() + p_Number);
			break;
		}
		case "ms": {		// second
			dt.setMilliseconds(dt.getMilliseconds() + p_Number);
			break;
		}
		default: {
			return "invalid interval: '" + p_Interval + "'";
		}
	}
	return dt;
}

// NOT SUPPORTED: firstdayofweek and firstweekofyear (defaults for both)
function dateDiff(p_Interval, p_Date1, p_Date2, p_firstdayofweek, p_firstweekofyear){
	var dt1 = new Date(p_Date1);
	var dt2 = new Date(p_Date2);

	// get ms between dates (UTC) and make into "difference" date
	var iDiffMS = dt2.valueOf() - dt1.valueOf();
	var dtDiff = new Date(iDiffMS);

	// calc various diffs
	var nYears  = dt2.getUTCFullYear() - dt1.getUTCFullYear();
	var nMonths = dt2.getUTCMonth() - dt1.getUTCMonth() + (nYears!=0 ? nYears*12 : 0);
	var nQuarters = parseInt(nMonths/3);	
	
	var nMilliseconds = iDiffMS;
	var nSeconds = parseInt(iDiffMS/1000);
	var nMinutes = parseInt(nSeconds/60);
	var nHours = parseInt(nMinutes/60);
	var nDays  = parseInt(nHours/24);
	var nWeeks = parseInt(nDays/7);


	// return requested difference
	var iDiff = 0;		
	switch(p_Interval.toLowerCase()){
		case "yyyy": return nYears;
		case "q": return nQuarters;
		case "m": return nMonths;
		case "y": 		// day of year
		case "d": return nDays;
		case "w": return nDays;
		case "ww":return nWeeks;		
		case "h": return nHours;
		case "n": return nMinutes;
		case "s": return nSeconds;
		case "ms":return nMilliseconds;	
		default: return "invalid interval: '" + p_Interval + "'";
	}
}

// REQUIRES: isDate(), dateDiff()
// NOT SUPPORTED: firstdayofweek and firstweekofyear (does system default for both)
function datePart(p_Interval, p_Date, p_firstdayofweek, p_firstweekofyear){

	var dtPart = new Date(p_Date);
	switch(p_Interval.toLowerCase()){
		case "yyyy": return dtPart.getFullYear();
		case "q": return parseInt(dtPart.getMonth()/3)+1;
		case "m": return dtPart.getMonth()+1;
		case "y": return dateDiff("y", "1/1/" + dtPart.getFullYear(), dtPart);			// day of year
		case "d": return dtPart.getDate();
		case "w": return dtPart.getDay();	// weekday
		case "ww":return dateDiff("ww", "1/1/" + dtPart.getFullYear(), dtPart);		// week of year
		case "h": return dtPart.getHours();
		case "n": return dtPart.getMinutes();
		case "s": return dtPart.getSeconds();
		case "ms":return dtPart.getMilliseconds();	
		default: return "invalid interval: '" + p_Interval + "'";
	}
}

function LZ(x) {return(x<0||x>9?"":"0")+x}

// ------------------------------------------------------------------
// isDate ( date_string, format_string )
// Returns true if date string matches format of format string and
// is a valid date. Else returns false.
// It is recommended that you trim whitespace around the value before
// passing it to this function, as whitespace is NOT ignored!
// ------------------------------------------------------------------
function isDate(val,format) {
	var date=getDateFromFormat(val,format);
	if (date==0) { return false; }
	return true;
	}

// -------------------------------------------------------------------
// compareDates(date1,date1format,date2,date2format)
//   Compare two date strings to see which is greater.
//   Returns:
//   1 if date1 is greater than date2
//   0 if date2 is greater than date1 of if they are the same
//  -1 if either of the dates is in an invalid format
// -------------------------------------------------------------------
function compareDates(date1,dateformat1,date2,dateformat2) {
	var d1=getDateFromFormat(date1,dateformat1);
	var d2=getDateFromFormat(date2,dateformat2);
	if (d1==0 || d2==0) {
		return -1;
		}
	else if (d1 > d2) {
		return 1;
		}
	return 0;
	}

// ------------------------------------------------------------------
// formatDate (date_object, format)
// Returns a date in the output format specified.
// The format string uses the same abbreviations as in getDateFromFormat()
// ------------------------------------------------------------------
function formatDate(date,format) {
	format=format+"";
	var result="";
	var i_format=0;
	var c="";
	var token="";
	var y=date.getYear()+"";
	var M=date.getMonth()+1;
	var d=date.getDate();
	var E=date.getDay();
	var H=date.getHours();
	var m=date.getMinutes();
	var s=date.getSeconds();
	var yyyy,yy,MMM,MM,dd,hh,h,mm,ss,ampm,HH,H,KK,K,kk,k;
	// Convert real date parts into formatted versions
	var value=new Object();
	if (y.length < 4) {y=""+(y-0+1900);}
	value["y"]=""+y;
	value["yyyy"]=y;
	value["yy"]=y.substring(2,4);
	value["M"]=M;
	value["MM"]=LZ(M);
	value["MMM"]=MONTH_NAMES[M-1];
	value["NNN"]=MONTH_NAMES[M+11];
	value["d"]=d;
	value["dd"]=LZ(d);
	value["E"]=DAY_NAMES[E+7];
	value["EE"]=DAY_NAMES[E];
	value["H"]=H;
	value["HH"]=LZ(H);
	if (H==0){value["h"]=12;}
	else if (H>12){value["h"]=H-12;}
	else {value["h"]=H;}
	value["hh"]=LZ(value["h"]);
	if (H>11){value["K"]=H-12;} else {value["K"]=H;}
	value["k"]=H+1;
	value["KK"]=LZ(value["K"]);
	value["kk"]=LZ(value["k"]);
	if (H > 11) { value["a"]="PM"; }
	else { value["a"]="AM"; }
	value["m"]=m;
	value["mm"]=LZ(m);
	value["s"]=s;
	value["ss"]=LZ(s);
	while (i_format < format.length) {
		c=format.charAt(i_format);
		token="";
		while ((format.charAt(i_format)==c) && (i_format < format.length)) {
			token += format.charAt(i_format++);
			}
		if (value[token] != null) { result=result + value[token]; }
		else { result=result + token; }
		}
	return result;
	}
	
// ------------------------------------------------------------------
// Utility functions for parsing in getDateFromFormat()
// ------------------------------------------------------------------
function _isInteger(val) {
	var digits="1234567890";
	for (var i=0; i < val.length; i++) {
		if (digits.indexOf(val.charAt(i))==-1) { return false; }
		}
	return true;
	}
function _getInt(str,i,minlength,maxlength) {
	for (var x=maxlength; x>=minlength; x--) {
		var token=str.substring(i,i+x);
		if (token.length < minlength) { return null; }
		if (_isInteger(token)) { return token; }
		}
	return null;
	}
	
// ------------------------------------------------------------------
// getDateFromFormat( date_string , format_string )
//
// This function takes a date string and a format string. It matches
// If the date string matches the format string, it returns the 
// getTime() of the date. If it does not match, it returns 0.
// ------------------------------------------------------------------
function getDateFromFormat(val,format) {
	val=val+"";
	format=format+"";
	var i_val=0;
	var i_format=0;
	var c="";
	var token="";
	var token2="";
	var x,y;
	var now=new Date();
	var year=now.getYear();
	var month=now.getMonth()+1;
	var date=1;
	var hh=now.getHours();
	var mm=now.getMinutes();
	var ss=now.getSeconds();
	var ampm="";
	
	while (i_format < format.length) {
		// Get next token from format string
		c=format.charAt(i_format);
		token="";
		while ((format.charAt(i_format)==c) && (i_format < format.length)) {
			token += format.charAt(i_format++);
			}
		// Extract contents of value based on format token
		if (token=="yyyy" || token=="yy" || token=="y") {
			if (token=="yyyy") { x=4;y=4; }
			if (token=="yy")   { x=2;y=2; }
			if (token=="y")    { x=2;y=4; }
			year=_getInt(val,i_val,x,y);
			if (year==null) { return 0; }
			i_val += year.length;
			if (year.length==2) {
				if (year > 70) { year=1900+(year-0); }
				else { year=2000+(year-0); }
				}
			}
		else if (token=="MMM"||token=="NNN"){
			month=0;
			for (var i=0; i<MONTH_NAMES.length; i++) {
				var month_name=MONTH_NAMES[i];
				if (val.substring(i_val,i_val+month_name.length).toLowerCase()==month_name.toLowerCase()) {
					if (token=="MMM"||(token=="NNN"&&i>11)) {
						month=i+1;
						if (month>12) { month -= 12; }
						i_val += month_name.length;
						break;
						}
					}
				}
			if ((month < 1)||(month>12)){return 0;}
			}
		else if (token=="EE"||token=="E"){
			for (var i=0; i<DAY_NAMES.length; i++) {
				var day_name=DAY_NAMES[i];
				if (val.substring(i_val,i_val+day_name.length).toLowerCase()==day_name.toLowerCase()) {
					i_val += day_name.length;
					break;
					}
				}
			}
		else if (token=="MM"||token=="M") {
			month=_getInt(val,i_val,token.length,2);
			if(month==null||(month<1)||(month>12)){return 0;}
			i_val+=month.length;}
		else if (token=="dd"||token=="d") {
			date=_getInt(val,i_val,token.length,2);
			if(date==null||(date<1)||(date>31)){return 0;}
			i_val+=date.length;}
		else if (token=="hh"||token=="h") {
			hh=_getInt(val,i_val,token.length,2);
			if(hh==null||(hh<1)||(hh>12)){return 0;}
			i_val+=hh.length;}
		else if (token=="HH"||token=="H") {
			hh=_getInt(val,i_val,token.length,2);
			if(hh==null||(hh<0)||(hh>23)){return 0;}
			i_val+=hh.length;}
		else if (token=="KK"||token=="K") {
			hh=_getInt(val,i_val,token.length,2);
			if(hh==null||(hh<0)||(hh>11)){return 0;}
			i_val+=hh.length;}
		else if (token=="kk"||token=="k") {
			hh=_getInt(val,i_val,token.length,2);
			if(hh==null||(hh<1)||(hh>24)){return 0;}
			i_val+=hh.length;hh--;}
		else if (token=="mm"||token=="m") {
			mm=_getInt(val,i_val,token.length,2);
			if(mm==null||(mm<0)||(mm>59)){return 0;}
			i_val+=mm.length;}
		else if (token=="ss"||token=="s") {
			ss=_getInt(val,i_val,token.length,2);
			if(ss==null||(ss<0)||(ss>59)){return 0;}
			i_val+=ss.length;}
		else if (token=="a") {
			if (val.substring(i_val,i_val+2).toLowerCase()=="am") {ampm="AM";}
			else if (val.substring(i_val,i_val+2).toLowerCase()=="pm") {ampm="PM";}
			else {return 0;}
			i_val+=2;}
		else {
			if (val.substring(i_val,i_val+token.length)!=token) {return 0;}
			else {i_val+=token.length;}
			}
		}
	// If there are any trailing characters left in the value, it doesn't match
	if (i_val != val.length) { return 0; }
	// Is date valid for month?
	if (month==2) {
		// Check for leap year
		if ( ( (year%4==0)&&(year%100 != 0) ) || (year%400==0) ) { // leap year
			if (date > 29){ return 0; }
			}
		else { if (date > 28) { return 0; } }
		}
	if ((month==4)||(month==6)||(month==9)||(month==11)) {
		if (date > 30) { return 0; }
		}
	// Correct hours value
	if (hh<12 && ampm=="PM") { hh=hh-0+12; }
	else if (hh>11 && ampm=="AM") { hh-=12; }
	var newdate=new Date(year,month-1,date,hh,mm,ss);
	return newdate.getTime();
	}

// ------------------------------------------------------------------
// parseDate( date_string [, prefer_euro_format] )
//
// This function takes a date string and tries to match it to a
// number of possible date formats to get the value. It will try to
// match against the following international formats, in this order:
// y-M-d   MMM d, y   MMM d,y   y-MMM-d   d-MMM-y  MMM d
// M/d/y   M-d-y      M.d.y     MMM-d     M/d      M-d
// d/M/y   d-M-y      d.M.y     d-MMM     d/M      d-M
// A second argument may be passed to instruct the method to search
// for formats like d/M/y (european format) before M/d/y (American).
// Returns a Date object or null if no patterns match.
// ------------------------------------------------------------------
function parseDate(val) {
	var preferEuro=(arguments.length==2)?arguments[1]:false;
	generalFormats=new Array('y-M-d','MMM d, y','MMM d,y','y-MMM-d','d-MMM-y','MMM d');
	monthFirst=new Array('M/d/y','M-d-y','M.d.y','MMM-d','M/d','M-d');
	dateFirst =new Array('d/M/y','d-M-y','d.M.y','d-MMM','d/M','d-M');
	var checkList=new Array('generalFormats',preferEuro?'dateFirst':'monthFirst',preferEuro?'monthFirst':'dateFirst');
	var d=null;
	for (var i=0; i<checkList.length; i++) {
		var l=window[checkList[i]];
		for (var j=0; j<l.length; j++) {
			d=getDateFromFormat(val,l[j]);
			if (d!=0) { return new Date(d); }
			}
		}
	return null;
	}


// check date2 > date1 ko qua' $val nga`y
function compareDates2(date1,dateformat1,date2,dateformat2,val){
	if(getDateFromFormat(date1,dateformat1)==0)
		return false;
	if(getDateFromFormat(date2,dateformat2)==0)
		return false;
	var time1 = Date.parse(date1);
	var time2 = Date.parse(date2);
	if( time2 <= (time1+((1000*60*60*24)*val)) ){
		return true
	}
	else
		return false
}

//************************************************************
//************************************************************
//************************************************************
//************************************************************
//************************************************************
function DateAdd(flg,n,nDate,fmt){
//  機能　　　　：指定日の過去または未来の日を求める関数
//  関数名　　　：DateAdd()
//  引数　　　　：flg     "y","m","d"      加算単位（文字属性）
//  　　　　　　：n      ｎ日後またはｎ日前（数値属性）前の時は−値とする
//  　　　　　　：nDate  指定日（文字属性：yyyy/m/d or yyyy/mm/dd）
//	　　　　：fmt    戻り値の形式 "yyyy/m/d" "yyyy/mm/dd" "yyyymmdd"
//  戻り値　　　：日付形式（yyyy/m/d）
//
//  呼出例　　　：DatedAdd("d",100,"","yyyy/m/d")  当日の10日後の日付を求める
//  　　　　　　：DatedAdd("d",-25,"2003/1/20","yyyymmdd") 2003/1/20の25日前の日付を求める
//
//  2005/07/20 12月の月末を求める処理修正
//

	if (nDate == ""){
		var wDate = new Date();
	}else{
		var wymd = nDate.split("/");
		if (wymd[1].length == 1){wymd[1] = "0" + wymd[1]};
		if (wymd[2].length == 1){wymd[2] = "0" + wymd[2]};
		if (ValidDate(wymd[0] + "/" + wymd[1] + "/" + wymd[2])){
			var wDate = new Date(nDate);
		}else{
			return "<FONT COLOR='red'>日付形式エラー(" + nDate + ")</FONT>";
		}
	}
	if (isNaN(n)){
		return "<FONT COLOR='red'>加算数値エラー(" + n + ")</FONT>";
	}
	if (fmt == "yyyy/m/d" || fmt == "yyyy/mm/dd" || fmt == "yyyymmdd"){
		wfmt = fmt;
	}else{
		wfmt = "yyyy/m/d";
	}
	switch (flg.toLowerCase()){
		case "d":
			var wY = wDate.getFullYear();
			var wM = wDate.getMonth() + 1;
			var wD = wDate.getDate();
			return DateDAdd(n,wY + "/" + wM + "/" + wD,wfmt);
			break;
		
		case "m":
			var tYear = wDate.getFullYear();
			var tMonth = wDate.getMonth() + 1 + n;
			if (tMonth >= 13){ 
				var value = Math.floor(parseFloat(tMonth / 12));
				tYear += value;
				if(tMonth == value * 12){
					tYear -= 1;
					tMonth = 12;
				}else{
					tMonth -= (12 * value);
				}
			}else{
				if (tMonth <= 0) {
				var value = Math.ceil(parseFloat(tMonth / 12)) - 1;
				tYear += value;
				tMonth += (12 * Math.abs(value));
				}
			}
			var tDate = wDate.getDate();
			if (tMonth == 2){
				if (tDate > 28){
					return DateDAdd(-1,tYear + "/3/1",wfmt)  
				}else{
					if (wfmt == "yyyy/m/d"){
						return tYear + "/" + tMonth + "/" + tDate;
					}else{
						if (tMonth < 10){tMonth = "0" + tMonth};
						if (tDate < 10){tDate = "0" + tDate};
						if(wfmt == "yyyy/mm/dd"){
							return tYear + "/" + tMonth + "/" + tDate;
						}else{
							return tYear + "" + tMonth + "" + tDate;
						}
					}
				}
			}else{
				if (tMonth == 4 || tMonth == 6 || tMonth == 9 || tMonth == 11){
					if (tDate == 31){
						tDate = 30;
					}
				}else{
					if (tMonth >= 13){
						tYear += 1;
						tMonth -= 12;
					}
				}
				if (wfmt == "yyyy/m/d"){
					return (tYear + "/" + tMonth + "/" + tDate);
				}else{
					if (tMonth < 10){tMonth = "0" + tMonth};
					if (tDate < 10){tDate = "0" + tDate};
					if (wfmt == "yyyy/mm/dd"){
						return (tYear + "/" + tMonth + "/" + tDate);
					}else{
						return (tYear + "" + tMonth * "" + tDate);
					}
				}
			}
			break;
		
		case "y":
			var tYear = wDate.getFullYear()+n;
			var tMonth = wDate.getMonth()+1;
			var tDate = wDate.getDate();
			if (tMonth == 2){
				if (tDate > 28){
					return DateDAdd(-1,tYear + "/3/1",wfmt)  
				}else{
					if (wfmt == "yyyy/m/d"){
						return (tYear + "/" + tMonth + "/" + tDate);
					}else{
						if (tMonth < 10){tMonth = "0" + tMonth};
							if (tDate < 10){tDate = "0" + tDate};
							if (wfmt == "yyyy/mm/dd"){
								return (tYear + "/" + tMonth + "/" + tDate);
							}else{
								return (tYear + "" + tMonth + "" + tDate);
							}
						}
				}
			}else{
				if (wfmt == "yyyy/m/d"){
					return (tYear + "/" + tMonth + "/" + tDate);
				}else{
					if (tMonth < 10){tMonth = "0" + tMonth};
					if (tDate < 10){tDate = "0" + tDate};
					if (wfmt == "yyyy/mm/dd"){
						return (tYear + "/" + tMonth + "/" + tDate);
					}else{
					   	return (tYear + "" + tMonth + "" + tDate);
					}
				}
			}
			break;
		
		default:
			return "<FONT COLOR='red'>加算単位エラー（" + flg + ")</FONT>";
			break;
	}
}

function EDate(nDate,fmt){
//  機能　　　　：指定日の月末日を求める
//  関数　　　　：EDate()
//  引数　　　　：指定日(文字形式：yyyy/m/d or yyyy/mm/dd）
//	　　　　：fmt 戻り値の形式 "yyyy/m/d" "yyyy/mm/dd" "yyyymmdd"
//  戻り値　　　：月末日(文字形式：yyyy/m/d）
//
//  2005/07/20 12月の月末を求める処理修正
//
	if (nDate == ""){
		var wDate = new Date();
	}else{
		var wymd = nDate.split("/");
		if (wymd[1].length == 1){wymd[1] = "0" + wymd[1]};
		if (wymd[2].length == 1){wymd[2] = "0" + wymd[2]};
		if (ValidDate(wymd[0] + "/" + wymd[1] + "/" + wymd[2])){
			var wDate = new Date(nDate);
		}else{
			return "<FONT COLOR='red'>日付形式エラー(" + nDate + ")</FONT>";
		}
	}
	if (fmt == "yyyy/m/d" || fmt == "yyyy/mm/dd" || fmt == "yyyymmdd"){
	    wfmt = fmt;
	}else{
		wfmt = "yyyy/m/d";
	}

	var tYear = wDate.getFullYear();
	var tMonth = wDate.getMonth() + 2;
	if (tMonth >= 13){
		tYear += 1;
		tMonth -= 12;
	}	

	return DateDAdd(-1,tYear + "/" + tMonth + "/1",wfmt);

}

function DateDAdd(n,nDate,fmt){
//  機能　　　　：指定日にｎ日を加算する
//  関数　　　　：DateDAdd()
//  引数　　　　：加算日数（過去日はマイナス数値)
//  　　　　　　：指定日(文字形式：yyyy/m/d or yyyy/mm/dd）
//	　　　　：fmt 戻り値の形式 "yyyy/m/d" "yyyy/mm/dd" "yyyymmdd"
//  戻り値　　　：加算日数した年月日(文字形式：yyyy/m/d）
//

	if (nDate == ""){
		var wDate = new Date();
	}else{
		var wymd = nDate.split("/");
		if (wymd[1].length == 1){wymd[1] = "0" + wymd[1]};
		if (wymd[2].length == 1){wymd[2] = "0" + wymd[2]};
		if (ValidDate(wymd[0] + "/" + wymd[1] + "/" + wymd[2])){
			var wDate = new Date(nDate);
		}else{
			return "<FONT COLOR='red'>日付形式エラー(" + nDate + ")</FONT>";
		}
	}
	if (fmt == "yyyy/m/d" || fmt == "yyyy/mm/dd" || fmt == "yyyymmdd"){
		wfmt = fmt;
	}else{
		wfmt = "yyyy/m/d";
	}

	var wdaysMS = n * 1000 * 60 * 60 * 24;
	var DateMS = wDate.getTime();
	DateMS += wdaysMS;
	wDate.setTime(DateMS);
	var tYear = wDate.getFullYear();
	var tMonth = wDate.getMonth() + 1;
	var tDate = wDate.getDate();

	if (wfmt == "yyyy/m/d"){
		return (tYear + "/" + tMonth + "/" + tDate);
	}else{
		if (tMonth < 10){tMonth = "0" + tMonth};
		if (tDate < 10){tDate = "0" + tDate};
		if (wfmt == "yyyy/mm/dd"){
			return (tYear + "/" + tMonth + "/" + tDate);
		}else{
			return (tYear + "" + tMonth + "" + tDate);
		}
	}
}

function DateDif(flg,nDateFM,nDateTO){
//  機能　　　　：指定日の間の万年数、万月数、日数を求める関数
//  関数名　　　：DateDif()
//  引数　　　　：flg      単位（文字属性） "y","m","d","ym"
//	                        "y":万年数　"m":万月数　"d":日数:
//	                        "ym":万年月数 ==> 例 1.01 : 1年1ヶ月　1.11 : 1年11ヶ月 
//  　　　　　　：nDateFM  指定日From（文字属性）
//  　　　　　　：nDateTO  指定日To   (文字形式）
//  戻り値　　　：日数
//
//  呼出例　　　：DateDif("d","","2003/10/1")  当日と2003/10/1の間の日数を求める
//  　　　　　　：DateDif("d","2003/1/20","") 2003/1/20との間の日数を求める
//  　　　　　　：DateDif("m","2003/1/20","") 2003/1/20との間の万月数を求める
//
	if (nDateFM == ""){
		var today = new Date();
		var wY = today.getFullYear();
		var wM = today.getMonth();
		var wD = today.getDate();
		var wDateFM = new Date(wY,wM,wD);
	}else{
		var wymd = nDateFM.split("/");
		if (wymd[1].length == 1){wymd[1] = "0" + wymd[1]};
		if (wymd[2].length == 1){wymd[2] = "0" + wymd[2]};
		if (ValidDate(wymd[0] + "/" + wymd[1] + "/" + wymd[2])){
			var wDateFM = new Date(nDateFM);
		}else{
			return "<FONT COLOR='red'>日付形式(FROM)エラー(" + nDateFM + ")</FONT>";
		}
	}
	if (nDateTO == ""){
		var today = new Date();
		var wY = today.getFullYear();
		var wM = today.getMonth();
		var wD = today.getDate();
		var wDateTO = new Date(wY,wM,wD);
	}else{
		var wymd = nDateTO.split("/");
		if (wymd[1].length == 1){wymd[1] = "0" + wymd[1]};
		if (wymd[2].length == 1){wymd[2] = "0" + wymd[2]};
		if (ValidDate(wymd[0] + "/" + wymd[1] + "/" + wymd[2])){
			var wDateTO = new Date(nDateTO);
		}else{
			return "<FONT COLOR='red'>日付形式(TO)エラー(" + nDateTO + ")</FONT>";
		}
	}
	if (wDateFM > wDateTO){
		return "<FONT COLOR='red'>日付のFrom〜Toの関連エラー</FONT>";
	}

	switch (flg.toLowerCase()){
		case "d":
			var wdaysFM = wDateFM.getTime();
			var wdaysTO = wDateTO.getTime();
			return (wdaysTO - wdaysFM) / (1000 * 60 * 60 * 24) 
			break;
       
		case "y":
			var wY1 = wDateFM.getFullYear();
			var wM1 = wDateFM.getMonth()+1;
			var wD1 = wDateFM.getDate();
			var wY2 = wDateTO.getFullYear();
			var wM2 = wDateTO.getMonth()+1;
			var wD2 = wDateTO.getDate();
			if (wY1 == wY2){
				tY = 0;
			}else{
				tY = wY2 - wY1;
			}
			if (wM1 > wM2){
				tY--;
				tM = wM2 + 12 - wM1;
			}
			return tY;
			break;
		
		case "m":
			var wY1 = wDateFM.getFullYear();
			var wM1 = wDateFM.getMonth()+1;
			var wD1 = wDateFM.getDate();
			var wY2 = wDateTO.getFullYear();
			var wM2 = wDateTO.getMonth()+1;
			var wD2 = wDateTO.getDate();
			tM = (wY2 * 12 + wM2) - (wY1 * 12 + wM1);
			if (wD1 > wD2){
				tM--;
			}
			return tM;
			break;
		
		case "ym":
			var wY1 = wDateFM.getFullYear();
			var wM1 = wDateFM.getMonth()+1;
			var wD1 = wDateFM.getDate();
			var wY2 = wDateTO.getFullYear();
			var wM2 = wDateTO.getMonth()+1;
			var wD2 = wDateTO.getDate();
			if (wY1 == wY2){
				tY = 0;
			}else{
				tY = wY2 - wY1;
			}
			if (wM1 > wM2){
				tY--;
				tM = wM2 + 12 - wM1;
			}else{
				tM = wM2 - wM1;
			}
			if (wD1 > wD2){
				if (tM == 0){
					tM = 11;
				}else{
					tM--;
    			}
			}
			if (tM < 10){tM = "0" + tM};
			return tY + "." + tM;
			break;
	}

}

function ValidDate(dateStr) {
// Checks for the following valid date formats:
// YYYY/MM/DD

var datePat = /^(\d{4})(\/)(\d{2})\2(\d{2})$/;
var DateArray = dateStr.match(datePat);

	if (DateArray == null) {
		return false;
	}

	wyear = dateStr.substr(0,4);
	wmonth = eval(dateStr.substr(5,2));
	wday = eval(dateStr.substr(8,2));

	if (mon_chk(wmonth)){
	}else{
		return false;
	}

	dd = daymonth(wyear,wmonth);
	if (wday > dd){
		return false;
	}
    
	return true;
}

/* 日付の範囲チェック */
function daymonth(year,month){
	day = new Array(31,28,31,30,31,30,31,31,30,31,30,31);
	if(month==2 && leapyear(year)) return 29;
	return day[month-1];
}
/* うるう年のチェック */
function leapyear(year){
	return year%4==0 && (year%100!=0 || year%400==0);
}

/* 月の範囲チェック */
function mon_chk(month){	
	if((month >= 1) && (month <= 12)) return true;
	return false;
}


function WorkdayAdd(n,date,yobi,saijitsu){
//  機能　　　　：指定日の過去または未来の日を稼働日で求める関数
//  関数名　　　：WorkdayAdd()
//  引数　　　　：n      ｎ日後またはｎ日前（数値属性）前の時は−値とする
//  　　　　　　：date   指定日（文字属性：yyyy/m/d or yyyy/mm/dd）省略時は当日
//  　　　　　　：yobi   休日を曜日で指定する
//	　　　　　　　　　　 0:日 1:月 2:火 3:水 4:木 5:金 6:土
//	　　　　　　：saijitsu 祭日を指定する　形式："yyyy/mm/dd" or "yyyy/m/d"
//  戻り値　　　：日付形式（yyyy/mm/dd）
//
//  呼出例　　　：WorkdayAdd(10,"","0,6","2003/07/20,2003/09/15,2003/11/3") 
//              当日の10日後の稼働日を求める。土日は休日、祭日あり
//
	if (n < 0){
		wn = -n;
	}else{
		wn = n;
	}
	wyb = yobi.split(",");
	wsa = saijitsu.split(",");
    
	for ( i=0;i<wsa.length;i++){
		wsa[i] = new Date(wsa[i]);
		wsa[i] = wsa[i].getTime();
	}
	var count=0;
	var flag=false;
	if (date == ""){
		var wkaisi = new Date();
		wky = wkaisi.getFullYear();
		wkm = wkaisi.getMonth();
		wkd = wkaisi.getDate();
		wkaisi = new Date(wky,wkm,wkd);
	}else{
		var wkaisi = new Date(date);
	}
	var EndDate = wkaisi.getTime();
	var kasan = 1000 * 60 * 60 * 24;
	if (n < 0) { kasan = kasan * -1};
	if (n == 0){
		var wyymmdd = new Date(EndDate);
		var wyear = wyymmdd.getFullYear();
		var wmonth = wyymmdd.getMonth()+1;
		if (wmonth < 10) { wmonth = "0" + wmonth};
		var wdate = wyymmdd.getDate();
		if (wdate < 10) { wdate = "0" + wdate};
		return wyear + "/" + wmonth + "/" + wdate;
	}else{
		for (i=1;flag=true;i++){
			EndDate = EndDate + kasan;
			if (saijitsu_check(EndDate)){
			}else{
				if (yasumi_check(EndDate)){
				}else{
					count++
					if (count == wn){
						flag = true;
						var wyymmdd = new Date(EndDate);
						var wyear = wyymmdd.getFullYear();
						var wmonth = wyymmdd.getMonth()+1;
						if (wmonth < 10) { wmonth = "0" + wmonth};
						var wdate = wyymmdd.getDate();
						if (wdate < 10) { wdate = "0" + wdate};
						return wyear + "/" + wmonth + "/" + wdate;
					}
				}
			}
		}
		return false;
	}
}

function saijitsu_check(date){
//
//	祭日チェック
//
//  　指定祭日の場合、true
//

	for (j=0; j<wsa.length; j++){
		if (date == wsa[j]){
			return true;
		}
	}
	return false;
}

function yasumi_check(date){
//
//	曜日指定の休日チェック
//
//  　指定曜日場合、true
//
	wymd = new Date(date);
	var yb = wymd.getDay();
	for (k=0; k<wyb.length; k++){
		if (yb == wyb[k]){
			return true;
		}
	}
	return false;
}

function NthYDate(date,N,W){
//
//   該当月の第ｎ何曜日の日付を求めるための準備
//
//		CallingSeq  NthYDate(date,n,y)
//
//				date:対象日 (文字列形式："yyyy/m/d" or "yyyy/mm/dd") 
//				n   :第ｎ週目
//				y   :曜日(0,1,2,3,4,5,6・・数値は日月火水木金土の意味)
//
//	使い方：(例)
//
//		当月の第２火曜日の日を求める場合
//			var today = new Date();
//			var yyyy = today.getFullYear();
//			var mm = today.getMonth()+1;
//			var dd = today.getDate();
//			var n = 2;
//			var y = 2;
//          var yobi = new Array("日","月","火","水","木","金","土");
//
//			document.write("当月度(" + yyyy + "年" + mm + "月)の第 " + n + " " + yobi[y] + "曜日は、" + NthYDate(yyyy + "/" + mm + "/" + dd,n,y) + "日です"); 
//

	var firstDayOfMonth = new Date(date);
	firstDayOfMonth.setDate(1);

	return 7*N - (firstDayOfMonth.getDay() + 6 - W) % 7;
}
//