//###############################################################
// 共通モジュール(日付セレクターの表示)
//     2002/10/01 新規                                 田中(統)
//     2003/01/31 一般化                               小中
//     2003/09/02 デェフォルト表示に年月日以外を指定可 
//                日付チェッカーの追加                 小中
//###############################################################

//----------------------------------------------------------------------
// SetDispDate: 日付の表示(初期)
// 引数の説明
//    form   ... フォーム名(省略不可)
//    ynam   ... 年選択フィールド又はフィールド番号(省略不可)
//    mnam   ... 月選択フィールド又はフィールド番号(省略不可)
//    dnam   ... 日選択フィールド又はフィールド番号(省略不可)
//    year   ... デフォルト表示年(省略可:省略時は現在の年)
//    month  ... デフォルト表示月(省略可:省略時は現在の月)
//    date   ... デフォルト表示日(省略可:省略時は現在の日)
//    past   ... 何年過去までを選択可能とするか(省略可:省略時は1)
//    future ... 何年未来までを選択可能とするか(省略可:省略時は1)
// 返値の説明
//    true  ... 常時
function SetDispDate(form,ynam,mnam,dnam,year,month,date,past,future)
{
	var defyear  = year;
	var defmonth = month;
	var defdate  = date;

	year = parseInt(year, 10);
	month = parseInt(month, 10);
	date = parseInt(date, 10);
	if(!isNaN(year))  {defyear  = '';}
	else              {year     = '';}
	if(!isNaN(month)) {defmonth = '';}
	else              {month    = '';}
	if(!isNaN(date))  {defdate  = '';}
	else              {date     = '';}

	if(year == "" || month == "" || date == "") {
		nowtime = GetNowDate();
		if(year == "")  {year = nowtime[1];}
		if(month == "") {month = nowtime[2];}
		if(date == "")  {date = nowtime[3];}
	}

	if(past == "")   {past = 1;}
	if(future == "") {future = 1;}

	if(ynam != '') {
		DefineYear(form, ynam, year, past, future);
		if(defyear == '') {AddDate(form, ynam, '    ', '');}
		else              {AddDate(form, ynam, defyear, 'default');}
	}
	if(mnam != '') {
		DefineMonth(form, mnam, month);
		if(defmonth == '') {AddDate(form, mnam, '  ', '');}
		else               {AddDate(form, mnam, defmonth, 'default');}
	}
	if(dnam != '') {
		DefineDate(form, dnam, year, month, date);
		if(defdate == '') {AddDate(form, dnam, '  ', '');}
		else              {AddDate(form, dnam, defdate, 'default');}
	}

	return true;
}

//----------------------------------------------------------------------
// ChangeDispDate: 日付の再表示(年月変更の場合)
// 引数の説明
//    form   ... フォーム名(省略不可)
//    ynam   ... 年選択フィールド又はフィールド番号(省略不可)
//    mnam   ... 月選択フィールド又はフィールド番号(省略不可)
//    dnam   ... 日選択フィールド又はフィールド番号(省略不可)
// 返値の説明
//    true  ... 常時
function ChangeDispDate(form,ynam,mnam,dnam)
{
	disptime = GetDispDate(form, ynam, mnam, dnam);
	var year  = parseInt(disptime[1], 10);
	var month = parseInt(disptime[2], 10);
	var date  = parseInt(disptime[3], 10);
	if(isNaN(year) || isNaN(month)) {
		if(!isNaN(date)) {AddDate(form, dnam, disptime[2], 'default');}
	}
	else {
		DefineDate(form, dnam, year, month, date);
		AddDate(form, dnam, '  ', '');
	}

	return true;
}

//----------------------------------------------------------------------
// CheckDate: 指定された日付が正しい日付けである事を確認
// 引数の説明
//    form   ... フォーム名(省略不可)
//    ynam   ... 年選択フィールド又はフィールド番号(省略不可)
//    mnam   ... 月選択フィールド又はフィールド番号(省略不可)
//    dnam   ... 日選択フィールド又はフィールド番号(省略不可)
//    msg    ... エラーメッセージキーワード(省略不可)
// 返値の説明
//    true  ... 正しい日付である
//    false ... 日付ではない
function CheckDate(form,ynam,mnam,dnam,msg)
{
	disptime = GetDispDate(form, ynam, mnam, dnam);
	var year  = parseInt(disptime[1], 10);
	var month = parseInt(disptime[2], 10);
	var date  = parseInt(disptime[3], 10);

	if(ynam != '' && isNaN(year)) {
		alert("Select any item in the Year field of " + msg + ".");
		document.forms[form].elements[ynam].focus();
		return false;
	}
	else if(mnam != '' && (isNaN(month) || month < 1 || month > 12)) {
		alert("Select any item in the Month field of " + msg + ".");
		document.forms[form].elements[mnam].focus();
		return false;
	}
	else if(dnam != '' && (isNaN(date) || date < 1 || date > 31)) {
		alert("Select any item in the Date field of " + msg + ".");
		document.forms[form].elements[dnam].focus();
		return false;
	}

	return true;
}

//----------------------------------------------------------------------
// CheckPastDate: 指定された日付が過去でない事を確認
// 引数の説明
//    form   ... フォーム名(省略不可)
//    ynam   ... 年選択フィールド又はフィールド番号(省略不可)
//    mnam   ... 月選択フィールド又はフィールド番号(省略不可)
//    dnam   ... 日選択フィールド又はフィールド番号(省略不可)
//    msg    ... エラーメッセージキーワード(省略不可)
// 返値の説明
//    true  ... 本日又は未来の日付である
//    false ... 過去の日付である
function CheckPastDate(form,ynam,mnam,dnam,msg)
{
	if(!CheckDate(form, ynam, mnam, dnam, msg)) {return false;}
	nowtime = GetNowDate();
	disptime = GetDispDate(form, ynam, mnam, dnam);

	if(ynam != '' && nowtime[1] > disptime[1]) {
		alert("The past date canot be selected in the " + msg + " field.");
		document.forms[form].elements[ynam].focus();
		return false;
	}
	else if(ynam != '' && mnam != '' && disptime[1] == nowtime[1] && nowtime[2] > disptime[2]) {
		alert("The past date canot be selected in the " + msg + " field.");
		document.forms[form].elements[mnam].focus();
		return false;
	}
	else if(ynam != '' && mnam != '' && dnam != '' && disptime[1] == nowtime[1] && disptime[2] == nowtime[2] && nowtime[3] > disptime[3]) {
		alert("The past date canot be selected in the " + msg + " field.");
		document.forms[form].elements[dnam].focus();
		return false;
	}

	return true;
}

//----------------------------------------------------------------------
// CheckFutureDate: 指定された日付が未来でない事を確認
// 引数の説明
//    form   ... フォーム名(省略不可)
//    ynam   ... 年選択フィールド又はフィールド番号(省略不可)
//    mnam   ... 月選択フィールド又はフィールド番号(省略不可)
//    dnam   ... 日選択フィールド又はフィールド番号(省略不可)
//    msg    ... エラーメッセージキーワード(省略不可)
// 返値の説明
//    true  ... 本日又は過去の日付である
//    false ... 未来の日付である
function CheckFutureDate(form,ynam,mnam,dnam,msg)
{
	if(!CheckDate(form, ynam, mnam, dnam, msg)) {return false;}
	nowtime = GetNowDate();
	disptime = GetDispDate(form, ynam, mnam, dnam);

	if(ynam != '' && disptime[1] > nowtime[1]) {
		alert("The future date canot be selected in the " + msg + " field.");
		document.forms[form].elements[ynam].focus();
		return false;
	}
	else if(ynam != '' && mnam != '' && disptime[1] == nowtime[1] && disptime[2] > nowtime[2]) {
		alert("The future date canot be selected in the " + msg + " field.");
		document.forms[form].elements[mnam].focus();
		return false;
	}
	else if(ynam != '' && mnam != '' && dnam != '' && disptime[1] == nowtime[1] && disptime[2] == nowtime[2] && disptime[3] > nowtime[3]) {
		alert("The future date canot be selected in the " + msg + " field.");
		document.forms[form].elements[dnam].focus();
		return false;
	}

	return true;
}

//----------------------------------------------------------------------
// CompareDate: 指定された2つの日付の大小関係を確認
// 引数の説明
//    form   ... フォーム名(省略不可)
//    ynam1  ... 比較元年選択フィールド又はフィールド番号(省略不可)
//    mnam1  ... 比較元月選択フィールド又はフィールド番号(省略不可)
//    dnam1  ... 比較元日選択フィールド又はフィールド番号(省略不可)
//    ynam2  ... 比較先年選択フィールド又はフィールド番号(省略不可)
//    mnam2  ... 比較先月選択フィールド又はフィールド番号(省略不可)
//    dnam2  ... 比較先日選択フィールド又はフィールド番号(省略不可)
// 返値の説明
//    eq    ... 比較元年月日は、比較先年月日と同じである。
//    lt    ... 比較元年月日は、比較先年月日よりも小さい。
//    gt    ... 比較元年月日は、比較先年月日よりも大きい。
//    false ... 正しく比較できない。
function CompareDate(form,ynam1,mnam1,dnam1,msg1,ynam2,mnam2,dnam2,msg2)
{
	if(!CheckDate(form, ynam1, mnam1, dnam1, msg1)) {return false;}
	if(!CheckDate(form, ynam2, mnam2, dnam2, msg2)) {return false;}

	var dispdate1 = GetDispDate(form, ynam1, mnam1, dnam1);
	var dispdate2 = GetDispDate(form, ynam2, mnam2, dnam2);

	var compdate1 = dispdate1[1] + dispdate1[2] + dispdate1[3];
	var compdate2 = dispdate2[1] + dispdate2[2] + dispdate2[3];

	if(compdate1.length != compdate2.length) {
		alert("Faild to check date fields. coz date format is not same.");
		return false;
	}

	compdate1 = parseInt(compdate1, 10);
	compdate2 = parseInt(compdate2, 10);

	if(compdate1 == compdate2)     {return 'eq';}
	else if(compdate1 < compdate2) {return 'lt';}
	else if(compdate1 > compdate2) {return 'gt';}

	return false;
}

//----------------------------------------------------------------------
// GetNowDate : 本日の日付を取得
// 引数の説明
//    無し
// 返値の説明
//    nowtime[1] ... 本日の年(西暦4桁)
//    nowtime[2] ... 本日の月(1〜12)
//    nowtime[3] ... 本日の月(1〜31)
function GetNowDate() 
{
        var now = new Date();
        var yr  = now.getYear();
        var mn  = now.getMonth() + 1;
        var dt  = now.getDate();
        var fyr = (yr < 1900) ? 1900 + yr : yr; 

	nowtime = new Array(3);
	nowtime[1] = fyr
	nowtime[2] = mn
	nowtime[3] = dt

	return(nowtime);
}

//----------------------------------------------------------------------
// Get1MonthAgoDate : 本日より1ケ月前の日付を取得
// 引数の説明
//    無し
// 返値の説明
//    one_m_ago_time[1] ... 本日より1ケ月前の年(西暦4桁)
//    one_m_ago_time[2] ... 本日より1ケ月前の月(1〜12)
//    one_m_ago_time[3] ... 本日より1ケ月前の月(1〜31)
function Get1MonthAgoDate() 
{
        var now = new Date();
        var yr  = now.getYear();
        var mn  = now.getMonth() + 1;
        var dt  = now.getDate();
        var fyr = (yr < 1900) ? 1900 + yr : yr; 

	//-----------------------
	//set year & month
	if (mn == 1){
		omat_yr = fyr -1;
		omat_mn = 12;
	}
	else {
		omat_yr = fyr;
		omat_mn = mn -1;
	}
	
	//-----------------------
	//set day
	if ( ( (mn == 12)||(mn == 10)||(mn == 7)||(mn == 5) ) && (dt == 31)){
		omat_dt = 30;	
	}
	else if( (mn == 3) && ( (dt == 29)||(dt == 30)||(dt == 31) ) ){
		omat_dt = 28;		
	}
	else {
		omat_dt = dt;
	}

	one_m_ago_time = new Array(3);

	one_m_ago_time[1] = omat_yr;
	one_m_ago_time[2] = omat_mn;
	one_m_ago_time[3] = omat_dt;

	return(one_m_ago_time);
}

//----------------------------------------------------------------------
// GetDispDate: 現在表示中の日付を取得
// 引数の説明
//    form   ... フォーム名(省略不可)
//    ynam   ... 年選択フィールド又はフィールド番号(省略不可)
//    mnam   ... 月選択フィールド又はフィールド番号(省略不可)
//    dnam   ... 日選択フィールド又はフィールド番号(省略不可)
// 返値の説明
//    disptime[1] ... 表示中の年(西暦4桁)
//    disptime[2] ... 表示中の月(1〜12)
//    disptime[3] ... 表示中の月(1〜31)
function GetDispDate(form,ynam,mnam,dnam)
{
	var disp_yr = '';
	var disp_mn = '';
	var disp_dt = '';

	if(ynam != '') {
		disp_yr = document.forms[form].elements[ynam].options[document.forms[form].elements[ynam].selectedIndex].value;
	}
	if(mnam != '') {
		disp_mn = document.forms[form].elements[mnam].options[document.forms[form].elements[mnam].selectedIndex].value;
	}
	if(dnam != '') {
		disp_dt = document.forms[form].elements[dnam].options[document.forms[form].elements[dnam].selectedIndex].value;
	}

	disptime = new Array(3);
	disptime[1] = disp_yr;
	disptime[2] = disp_mn;
	disptime[3] = disp_dt;

	return(disptime);
}

//----------------------------------------------------------------------
// DefineYear: 年領域を定義
//    form   ... フォーム名(省略不可)
//    ynam   ... 年選択フィールド又はフィールド番号(省略不可)
//    year   ... デフォルト表示年(省略可:省略時は現在の年)
//    past   ... 何年過去までを選択可能とするか(省略可:省略時は1)
//    future ... 何年未来までを選択可能とするか(省略可:省略時は1)
// 返値の説明
//    true  ... 常時
function DefineYear(form,ynam,year,past,future)
{
	if(year == "") {
		nowtime = GetNowDate();
		year = nowtime[1];
	}
	if(past == "")   {past = 1;}
	if(future == "") {future = 1;}

	year = parseInt(year, 10);
	past = parseInt(past, 10);
	future = parseInt(future, 10);

	document.forms[form].elements[ynam].options.length = past + future + 1;

	j = 0;
	for(i=(year-past); i<=(year+future); i++) {
		document.forms[form].elements[ynam].options[j].text  = i;
		document.forms[form].elements[ynam].options[j].value = i;
		if(year == i) {
			document.forms[form].elements[ynam].selectedIndex = j;
		}
		j++;
	}

	return true;
}

//----------------------------------------------------------------------
// DefineMonth: 月領域を定義
// 引数の説明
//    form   ... フォーム名(省略不可)
//    mnam   ... 月選択フィールド又はフィールド番号(省略不可)
//    month  ... デフォルト表示月(省略可:省略時は現在の月)
// 返値の説明
//    true  ... 常時
function DefineMonth(form,mnam,month)
{
	if(month == "") {
		nowtime = GetNowDate();
		month = nowtime[2];
	}

	document.forms[form].elements[mnam].options.length = 12;
	for(i=0; i<=11; i++){
		setmon = i + 1;
		if(setmon < 10) {setmon = "0" + setmon;}
		document.forms[form].elements[mnam].options[i].text  = setmon;
		document.forms[form].elements[mnam].options[i].value = setmon;
		if(parseInt(month, 10) == parseInt(setmon, 10)) {
			document.forms[form].elements[mnam].selectedIndex = i;
		}
	}

	return true;
}

//----------------------------------------------------------------------
// DefineDate: 日付領域を定義
// 引数の説明
//    form   ... フォーム名(省略不可)
//    dnam   ... 日選択フィールド又はフィールド番号(省略不可)
//    year   ... デフォルト表示年(省略可:省略時は現在の年)
//    month  ... デフォルト表示月(省略可:省略時は現在の月)
//    date   ... デフォルト表示日(省略可:省略時は現在の日)
// 返値の説明
//    true  ... 常時
function DefineDate(form,dnam,year,month,date)
{
	if(year == "" || month == "" || date == "") {
		nowtime = GetNowDate();
		if(year == "")  {year = nowtime[1];}
		if(month == "") {month = nowtime[2];}
		if(date == "")  {date = nowtime[3];}
	}

	if ((month == 4)||(month == 6)||(month == 9)||(month == 11)){
		days = 30;
	}
	else if (month == 2){
		days = 28;
		if((year%4)==0){
			days = 29;
			if((year%100)==0){
				days = 28;
				if((year%400)==0){
					days = 29;
				}
			}
		}
	}
	else{
		days = 31;
	}
	document.forms[form].elements[dnam].options.length = days;
	if (date > days){date = days;}
	for(i=0; i<=days-1; i++){
		setday = i + 1;
		if(setday < 10) {setday = "0" + setday;}
		document.forms[form].elements[dnam].options[i].text  = setday;
		document.forms[form].elements[dnam].options[i].value = setday;
		if(date == (i+1) || date == setday) {
			document.forms[form].elements[dnam].selectedIndex = i;
		}
	}

	return true;
}

//----------------------------------------------------------------------
// AddDate: 年月日以外の表示値を追加定義
//    form   ... フォーム名(省略不可)
//    nam    ... 選択フィールド又はフィールド番号(省略不可)
//    val    ... 表示値(省略可:省略時は値を設定しない)
//    def    ... 'default'指定時はデフォルト表示値とする。
// 返値の説明
//    true  ... 常時
function AddDate(form,nam,val,def)
{
	if(val != '') {
		j = document.forms[form].elements[nam].options.length;
		document.forms[form].elements[nam].options.length = j + 1;
		document.forms[form].elements[nam].options[j].text  = val;
		document.forms[form].elements[nam].options[j].value = val;
		if(def == 'default') {
			document.forms[form].elements[nam].selectedIndex = j;
		}
	}
	return true;
}