/*******************************************************************************
*	 All Rights reserved,Copyright (c) K-Opticom
********************************************************************************
*＜プログラム内容＞
*	システム名		：eo顧客基幹システム
*	モジュール名	：JSYejbECCM011B010TPDA
*	ソースファイル名：JSYejbECCM011B010TPDA.java
*	作成者			：EK918550
*	日付			：2020年05月25日
*＜機能概要＞
*	マスタ一覧照会テンプレートDBアクセス部品です。
*＜修正履歴＞
*	バージョン	修正日		修正者		修正内容
*	ｖ50.00.00	2020/05/25	FJ			新規作成
*	ｖ52.00.00	2021/01/12	FJ)西川		ANK-3975-00-00_【eo】照査前画面への転送電話項目追加
*
********************************************************************************/

package eo.ejb.cbs.sqlf;

import com.fujitsu.futurity.model.base.CAANMsg;
import com.fujitsu.futurity.model.base.CAANSQLFacility;
import com.fujitsu.futurity.model.base.CAANRuntimeException;
import com.fujitsu.futurity.model.base.CAANJDBCUtil;
import com.fujitsu.futurity.model.base.CAANSchemaInfo;
import com.fujitsu.futurity.model.ejb.common.JSYejbConnection;
import com.fujitsu.futurity.model.ejb.common.JSYejbLog;
import com.fujitsu.futurity.model.ejb.common.StatusCodes;
import com.fujitsu.futurity.model.ejb.common.fw.TemplateDBAccessHandler;
import com.fujitsu.futurity.model.ejb.common.fw.AgentDispatchContext;

import java.sql.Connection;
import java.sql.PreparedStatement;
import java.sql.ResultSet;
import java.sql.SQLException;
import java.util.ArrayList;

import eo.ejb.cbs.cbsmsg.ECCM011B010CBSMsg;
import eo.ejb.cbs.cbsmsg.ECCM011B010CBSMsg1List;
import eo.ejb.common.JCCModelCommon;

/**
*
*  テンプレートDBアクセス部品　ECCM011B010_SQLF<br>
*  入力された項目からSQL文を動的に組み立て、<br>
*  検索結果をCBSMsgにセットします。<br>
*/
public class JSYejbECCM011B010TPDA extends CAANSQLFacility implements TemplateDBAccessHandler{
	/** 世代登録年月日 */
	private static final String GENE_ADD_DTM = "GENE_ADD_DTM";
	/** 予約適用年月日 */
	private static final String RSV_APLY_YMD = "RSV_APLY_YMD";
	/** 無効フラグ */
	private static final String MK_FLG = "MK_FLG";
	/** サブクエリー用エイリアス */
	private static final String SUB_QERY = "SUBQ";
	/** 適用開始日判定用文字 */
	private static final String PREFIX_TSTAYMD = "TSTAYMD";
	/** 適用終了日判定用文字 */
	private static final String PREFIX_TENDYMD = "TENDYMD";

	/**
	 * コンストラクタ
	 */
	public JSYejbECCM011B010TPDA()	{
	}

	/**
	*   ECCM011B010_SQLF<br>
	*   @param inMsg    入力値の格納されたCBSMsg <br>
	*   @return void
	*/
	@SuppressWarnings("unchecked")
	public void invoke(CAANMsg inMsg,AgentDispatchContext inContext){

		// コネクション
		Connection con1 = null;

		// プリペアステートメント
		PreparedStatement pstmt = null;

		// リザルトセット
		ResultSet rsltQuery = null;

		/********************
		 * SQL文の作成
		 ********************/
		String tableName = "";
		Object[][] contents = new Object[0][0];
		String schima_id = inMsg.getString(ECCM011B010CBSMsg.SCHIMA_ID);
		ArrayList<String> paramList = new ArrayList<String>();
		String[] columns = new String[0];

		// スキーマIDから必要な情報を取得する。
		try {
			Class tblClass = Class.forName("eo.ejb.cbm.entity." + inMsg.getString(ECCM011B010CBSMsg.SCHIMA_ID) + "ETMsg");
			tableName = (String)tblClass.getDeclaredMethod("getTableName").invoke(null);
			contents = (Object[][])tblClass.getDeclaredMethod("getSchemaContents").invoke(null);
			// スキーマの命名規則でマスタとされていないものに関してはパラメータエラーとする
			if ("_M_".equals(tableName.indexOf(2, 3)))
			{
				throw new IllegalArgumentException();
			}
			// 取得カラム
			columns = getRequestColumns(contents, inMsg.getString(ECCM011B010CBSMsg.YOUKYU_COLUM_NO));
		}
		catch (Exception e)
		{
			inMsg.set(ECCM011B010CBSMsg.STATUS, StatusCodes.FIND_DB_ERR);
			throw new CAANRuntimeException(e);
		}

		try{
			//コネクション取得
			con1 = JSYejbConnection.getConnection(tableName);

			// SQL文_基本部1
			StringBuffer sql_Buff = new StringBuffer();
			sql_Buff.append(" SELECT ");

			// カラムの定義
			StringBuffer col_Buff = new StringBuffer();
			for (String col : columns)
			{
				if (col_Buff.length() == 0)
				{
					col_Buff.append(schima_id + "." + col);
				}
				else
				{
					col_Buff.append("|| ',' || " + schima_id + "." + col);
				}
			}
			sql_Buff.append(col_Buff); // 返却項目を設定

			// テーブル定義
			sql_Buff.append(" FROM " + tableName + " " + schima_id );

			// SQL文_個別部1
			if ( "1".equals( inMsg.getObject(ECCM011B010CBSMsg.FUNC_CODE).toString() ) ) {
				sql_Buff.append(" WHERE ")
						.append(schima_id + "." + MK_FLG + " = '0' ");	// 無効フラグはデフォルトで条件に追加

				boolean isRsvAplyYmd = containsColumn(contents, RSV_APLY_YMD);
				boolean isGeneAddDtm = containsColumn(contents, GENE_ADD_DTM);
				String tstaymd = getColumnEndWith(contents, PREFIX_TSTAYMD);
				String tendymd = getColumnEndWith(contents, PREFIX_TENDYMD);
				String[] praimaryKeyList = getPramaryKeys(contents);

				// 世代登録年月日が存在する場合、カレントと未来予約を検索する。
				if (isGeneAddDtm)
				{
//					sql_Buff.append(" AND (" + getCurrentCondition(isRsvAplyYmd, schima_id) + ") ")
//							.append(" = ( SELECT MAX(" +getCurrentCondition(isRsvAplyYmd, SUB_QERY) + ") ")
					sql_Buff.append(" AND ((" + getCurrentCondition(isRsvAplyYmd, schima_id) + ") ")
							.append(" >= ( SELECT MAX(" +getCurrentCondition(isRsvAplyYmd, SUB_QERY) + ") ")
							.append(" FROM " + tableName + " " + SUB_QERY)
							.append(" WHERE ")
							.append(SUB_QERY + "." + MK_FLG + " = '0' ");

					// キー指定
					for (String key : praimaryKeyList)
					{
						sql_Buff.append(" AND " + SUB_QERY + "." + key + " = " + schima_id + "." + key);
					}

					// 予約適用年月日（サブクエリー）
					if (isRsvAplyYmd)
					{
						sql_Buff.append(" AND " + SUB_QERY + "." + RSV_APLY_YMD + " <=  ?");
						paramList.add(JCCModelCommon.getOpeDate(inMsg, null));
					}
					// 適用開始／終了日の自動判定
					if (tstaymd != null && tendymd != null)
					{
						sql_Buff.append(" AND ? BETWEEN " + SUB_QERY + "." + tstaymd + " AND " + SUB_QERY + "." + tendymd);
						paramList.add(JCCModelCommon.getOpeDate(inMsg, null));
					}
					sql_Buff.append(") ");

					// 予約適用年月日（本体）
					if (isRsvAplyYmd)
					{
						// 終了日の自動判定
						if (tstaymd != null && tendymd != null)
						{
							// 予約適用年月日が存在する場合、予約適用年月日が未来日
							sql_Buff.append(" OR ( " + schima_id + "." + RSV_APLY_YMD + " >  ? ");
							paramList.add(JCCModelCommon.getOpeDate(inMsg, null));

							// 適用開始日
							sql_Buff.append(" AND " + schima_id + "." + tstaymd + " > ? ");
							paramList.add(JCCModelCommon.getOpeDate(inMsg, null));

							// 適用終了日
							sql_Buff.append(" AND " + schima_id + "." + tendymd + " > ? )) ");
							paramList.add(JCCModelCommon.getOpeDate(inMsg, null));
						}
						else
						{
							// 予約適用年月日が存在する場合、予約適用年月日が未来日
							sql_Buff.append(" OR  " + schima_id + "." + RSV_APLY_YMD + " >  ? )");
							paramList.add(JCCModelCommon.getOpeDate(inMsg, null));
						}
					}
					else
					{
						// 終了日の自動判定
						if (tstaymd != null && tendymd != null)
						{
							// 適用開始日
							sql_Buff.append(" OR ( " + schima_id + "." + tstaymd + " > ? ");
							paramList.add(JCCModelCommon.getOpeDate(inMsg, null));

							// 適用終了日
							sql_Buff.append(" AND " + schima_id + "." + tendymd + " > ? )) ");
							paramList.add(JCCModelCommon.getOpeDate(inMsg, null));
						}
					}
				}

				// 終了日の自動判定
				if (tendymd != null)
				{
					// 適用終了日
					sql_Buff.append(" AND " + schima_id + "." + tendymd + " >= ? ");
					paramList.add(JCCModelCommon.getOpeDate(inMsg, null));
				}
				// 個別条件を追加する
				if (!inMsg.isNull(ECCM011B010CBSMsg.CONDITION))
				{
					sql_Buff.append(" AND " + inMsg.getString(ECCM011B010CBSMsg.CONDITION));
				}
				// 配列カラムを追加する
				if (!inMsg.isNull(ECCM011B010CBSMsg.SORT_COLUMN_CODE))
				{
					sql_Buff.append(" ORDER BY " + inMsg.getLong(ECCM011B010CBSMsg.SORT_COLUMN_CODE));
				}
			}

			//prepareStatementにSQL文をセット
			pstmt = con1.prepareStatement(sql_Buff.toString());

			//ログ出力(SQL文の出力)
			JSYejbLog.outlog(inContext, JSYejbLog.DBACCESS, this.getClass(), sql_Buff);

			// 動的パラメータを指定
			int index = 0;
			for (String param : paramList)
			{
				CAANJDBCUtil.setParam(pstmt, ++index, param);
			}

			// ResultSetの取得
			rsltQuery = pstmt.executeQuery();

			// ECCM011B010CBSMsgの明細にセットする項目
			String[] msgKeyList1 = {
					  ECCM011B010CBSMsg1List.RECORD
			};
			// 明細に処理結果(ResultSet)をマッピング
			CAANMsg[] outMsg1 = mapMessageList(rsltQuery,msgKeyList1,"eo.ejb.cbs.cbsmsg.ECCM011B010CBSMsg1List",0);
			// inMsg(CBSMsg)に明細をセット
			inMsg.set("ECCM011B010CBSMsg1List", outMsg1);

		} catch(SQLException e) {
			inMsg.set(ECCM011B010CBSMsg.STATUS, StatusCodes.FIND_DB_ERR);
			throw new CAANRuntimeException(e);
		} finally {
			// 資源の解放
			try{
				if(rsltQuery != null){
					rsltQuery.close();
				}
				if(pstmt != null){
					pstmt.close();
				}
				if(con1 != null){
					closeConnection(con1);
				}
			}catch(SQLException e){
				inMsg.set(ECCM011B010CBSMsg.STATUS, StatusCodes.FIND_DB_ERR);
				throw new CAANRuntimeException(e);
			}
		}
	}

	/**
	 * 指定したDB項目が存在するか確認する
	 * <b>
	 * @param contents	スキーマ情報
	 * @param column	項目名
	 * @return	true:項目名が含まれる	false:項目名が含まれない
	 */
	private boolean containsColumn(Object[][] contents, String column)
	{
		if (column == null) return false;

		for (Object[] info : contents)
		{
			if (info.length >= 3 && info[2] != null)
			{
				if (column.equals(info[2]))
				{
					return true;
				}
			}
		}
		return false;
	}

	/**
	 * DB項目の接尾辞で終わる項目を返す。
	 * <b>
	 * @param contents	スキーマ情報
	 * @param column	項目名
	 * @return	最初に見つかった接尾辞で終わった項目名
	 */
	private String getColumnEndWith(Object[][] contents, String column)
	{
		if (column == null) return null;

		for (Object[] info : contents)
		{
			if (info.length >= 3 && info[2] != null)
			{
				String name = info[2].toString();
				if (name.endsWith(column))
				{
					return name;
				}
			}
		}
		return null;
	}

	/**
	 * プライマリキー情報を返す。但し、世代登録年月日時分秒（GENE_ADD_DTM）は除く。
	 * @param contents	スキーマ情報
	 * @return プライマリキー項目名の配列
	 */
	private String[] getPramaryKeys(Object[][] contents)
	{
		ArrayList<String> work = new ArrayList<String>();

		for (Object[] info : contents)
		{
			if (info.length >= 4 && info[3] != null)
			{
				// キーかつ世代登録年月日時分秒以外
				if (CAANSchemaInfo.PRIMARYKEY.equals(info[3]) && !GENE_ADD_DTM.equals(info[2]))
				{
					work.add(info[2].toString());
				}
			}
		}
		return work.toArray(new String[0]);
	}

	/**
	 * No指定されたDB項目名を返す。
	 * <b>
	 * @param contents	スキーマ情報
	 * @param columStrList	項目Noをカンマ区切りで指定※項目Noは0始まりとする。
	 * @return	項目名の配列
	 */
	private String[] getRequestColumns(Object[][] contents, String columStrList)
	{
		// 全てのカラムを順番に取得する。
		ArrayList<String> work = new ArrayList<String>();

		for (Object[] info : contents)
		{
			if (info.length >= 3 && info[2] != null)
			{
				work.add((String)info[2]);
			}
		}
		// 指定位置のデータを取得
		String[] colNoList = columStrList.split(",");
		ArrayList<String> r = new ArrayList<String>();
		for (String colno : colNoList)
		{
			try {
				r.add(work.get(Integer.parseInt(colno)));
			}
			catch (NumberFormatException e)
			{

			}
		}
		return r.toArray(new String[0]);
	}

	/**
	 * カレント条件を返す。（但し、項目名のみ）
	 * <b>
	 * @param hasRsvAplyYmd		予約適用年月日が存在するかを示すフラグ
	 * @param tblAlias	テーブルエイリアス
	 * @return	条件文字列
	 */
	private String getCurrentCondition(boolean hasRsvAplyYmd, String tblAlias)
	{
		StringBuffer b = new StringBuffer();
		if (hasRsvAplyYmd)
		{
			b.append(tblAlias + "." + RSV_APLY_YMD + " || ");
		}
		b.append(tblAlias + "." + GENE_ADD_DTM );
		return b.toString();
	}
}