<?PHP 
//*****************************************************************************
//* 
//* プログラム名：め〜るNiポン！V2
//* プログラムID：LIST3000.php
//* 機能        ：配信した情報を表示する
//* 
//*****************************************************************************
header("Content-type: text/html; charset=EUC-JP");

//***************************
//*　インクルードファイル
//***************************
include("./include/smarty.conf");
include("./include/jcode.phps");
include("./include/session_start.inc");
include("./include/SessionChk.inc");

//********** ヘッダー処理 **********//
include("./include/headr_data.inc");

//********** メイン処理 **********//
include("./include/dbcon.inc");

$o_smarty->assign('mail_id'    , $_POST["mail_id"]);

//表示項目を取得
$strSQL = "SELECT * FROM Mst_disp ORDER BY Mst_disp.Disp_id ASC";
$objRecSet = pg_exec($strSQL);
if($objRecSet==false){
		echo("SQL実行に失敗しました(SELECT)a");
		exit;
}
$strGroup = pg_result($objRecSet,1,"Disp_name");
$strKenmei = pg_result($objRecSet,2,"Disp_name");

//*****　メール配信情報　*****//
//*** 配信情報を取得 ***//
$strSQL  = "SELECT ";
$strSQL .= " * ";
$strSQL .= "FROM ";
$strSQL .= " mail_data ";
$strSQL .= "WHERE ";
$strSQL .= " mail_id = " . (int)$_POST["mail_id"];
$objRec = pg_exec($strSQL);
if($objRec==false){
		echo("SQL実行に失敗しました(SELECT)");
		exit;
}

$objData = pg_fetch_object($objRec, 0);
$angou_id     = $objData->angou_id;

$message_date = $objData->message_date;
$message_time = $objData->message_time;

if (trim($message_date)!=""){
		$Kaisai_Date  = substr($message_date,0,4)."年";
		$Kaisai_Date .= intval(substr($message_date,4,2))."月";
		$Kaisai_Date .= intval(substr($message_date,6,2))."日";
		if ($message_time!=""){
				$Kaisai_Date .= intval(substr($message_time,0,2)) . "時";
				$Kaisai_Date .= intval(substr($message_time,2,2)) . "分";
		}
}else{
		$Kaisai_Date = "未設定";
}

$subject_name = htmlspecialchars($objData->subject_name);
$contents     =  nl2br(htmlspecialchars($objData->contents));
$contentsSC   =  htmlspecialchars($objData->contents);
$admin_cd     = $objData->admin_cd;
$send_date    = $objData->send_date;
$send_alarm   = $objData->send_alarm;
switch ($objData->send_type) {
	case "0":	$send_type = "携帯／ＰＣ";	break;
	case "1":	$send_type = "携帯";	break;
	case "2":	$send_type = "ＰＣ";	break;
}
$int_send_type   = $objData->send_type;
$reserva_flg  = $objData->reserva_flg;
$reserva_date = $objData->reserva_date;
$reserva_time = $objData->reserva_time;

if($reserva_date!=""){
		$Send_Data  = substr($reserva_date,0,4)."年";
		$Send_Data .= substr($reserva_date,4,2)."月";
		$Send_Data .= substr($reserva_date,6,2)."日";
		$Send_Data .= substr($reserva_time,8,2)."時";
		$Send_Data .= substr($reserva_time,10,2)."分";
}else{
		if($reserva_flg!=1){
				$Send_Data  = substr($send_date,0,4)."年";
				$Send_Data .= substr($send_date,4,2)."月";
				$Send_Data .= substr($send_date,6,2)."日";
				$Send_Data .= substr($send_date,8,2)."時";
				$Send_Data .= substr($send_date,10,2)."分";
		}
}

$o_smarty->assign('message_date'  , $message_date);
$o_smarty->assign('message_time'  , $message_time);
$o_smarty->assign('Kaisai_Date'   , $Kaisai_Date);
$o_smarty->assign('subject_name'  , $subject_name);
$o_smarty->assign('contents'      , $contents);
$o_smarty->assign('send_type'     , $send_type);
$o_smarty->assign('int_send_type' , $int_send_type);
$o_smarty->assign('reserva_flg'   , $reserva_flg);
$o_smarty->assign('reserva_date'  , $reserva_date);
$o_smarty->assign('reserva_time'  , $reserva_time);
$o_smarty->assign('Send_Data'     , $Send_Data);

//***　アラーム　***
$Al_Set_Flg   = "";
$Al_Send_Flg  = "";
$Al_Send_Date = "";
$Al_Send_Time = "";

if ($send_alarm==1){
		//*　アラーム設定有　*//
		$Al_Set_Flg = "1";
		$strSQL  = "SELECT ";
		$strSQL .= " * ";
		$strSQL .= "FROM ";
		$strSQL .= " alarm_data ";
		$strSQL .= "WHERE ";
		$strSQL .= " mail_id  = " . (int)$_POST["mail_id"]." ";
		$objRec = pg_exec($strSQL);
		if($objRec==false){
				echo("SQL実行に失敗しました(SELECT)");
				exit;
		}
		$objData = pg_fetch_object($objRec, 0);
		$Al_Send_Flg = $objData->send_flg;
		$al_message_date = $objData->message_date;
		$al_message_time = $objData->message_time;
		$Al_Send_Date  = substr($al_message_date, 0, 4)."年 ";
		$Al_Send_Date .= substr($al_message_date, 4, 2)."月 ";
		$Al_Send_Date .= substr($al_message_date, 6, 2)."日";
		$Al_Send_Time  = substr($al_message_time, 0, 2)."時";
		$Al_Send_Time .= substr($al_message_time, 2, 2)."分に設定済み";

}else{
		//*　アラーム設定無　*//
		$Al_Send_flg  = "";
		$Al_Setflg    = "";
		$Al_Send_Date = "";
		$Al_Send_Time = "";

		if($Kaisai_Date=="未設定"){
			$Al_disable = "DISABLED";
		}else{
			$Al_disable = "";
		}
}
$o_smarty->assign('Al_Set_Flg'   , $Al_Set_Flg);
$o_smarty->assign('Al_Send_Flg'  , $Al_Send_Flg);
$o_smarty->assign('Al_Send_Date' , $Al_Send_Date);
$o_smarty->assign('Al_Send_Time' , $Al_Send_Time);
$o_smarty->assign('Al_disable'   , $Al_disable);


if ($Send_alarm==1){
	$intAlarm_flg= 1;
    $strSQL = "SELECT " .
    		  "alarm_data.Message_date, " .
    		  "alarm_data.Message_time, " .
    		  "alarm_data.send_flg, " .
    		  "alarm_data.answer_id " .
    		  "FROM alarm_data " .
    		  "WHERE alarm_data.Mail_id = " . (int)$_POST["mail_id"];
   
    $objRecSet2 = pg_exec($strSQL);
    if($objRecSet==false){
    	echo("SQL実行に失敗しました(SELECT)");
    	exit;
    }
    
    $Alarm_date = pg_result($objRecSet2,0,"Message_date");
    $Alarm_time = pg_result($objRecSet2,0,"Message_time");
    $Answer_ID = pg_result($objRecSet2,0,"answer_id");
    
}else{
	$strSysDate = date("YmdHi");

    if (strlen($strSysDate) == 10) {
    	$strSysDate = "20" . $strSysDate;
    }
    $strYear = substr($strSysDate, 0, 4);
    $strMonth = "";
	$strDate = "";
	$strHour = "";
	$strMinute ="";
	$Alarm_flg = 0;
	$Anser_ID = 0;
}
$strToday = substr($strSysDate, 0, 8);

//*** 再送情報を取得 ***
$Kidoku_FLG   = "";
$Kidoku_User = "";
$Kidoku_Date = "";
$Kidoku_Mode = "";

$strSQL  = "SELECT ";
$strSQL .= " * ";
$strSQL .= "FROM ";
$strSQL .= " kidok_data ";
$strSQL .= "WHERE ";
$strSQL .= " mail_id  = " . (int)$_POST["mail_id"]." ";
$strSQL .= "ORDER BY ";
$strSQL .= " check_id ASC ";
$objRec = pg_exec($strSQL);
if($objRec==false){
	echo("SQL実行に失敗しました(SELECT)");
	exit;
}
if(pg_numrows($objRec)!=0){
		$Kidoku_FLG   = "1";
		for($intI = 0; $intI < pg_numrows($objRec) ; $intI++){
				$objData = pg_fetch_object($objRec, $intI);
				switch ($objData->check_id) {
					case "0":
							$Kidoku_User = "未読者へ";
							break;
					case "99":
							if($Kidoku_User == ""){
									$Kidoku_User = "既読者へ";
							}else{	
									$Kidoku_User .= ":既読者へ";
							}
							break;
				}
				$Kidok_date = $objData->message_date;
				$Kidok_time = $objData->message_time;
				$Kidok_Send = $objData->send_flg;
		}

		$Kidoku_Date  = substr($Kidok_date,0,4)."年";
		$Kidoku_Date .= substr($Kidok_date,4,2)."月";
		$Kidoku_Date .= substr($Kidok_date,6,2)."日";
		$Kidoku_Date .= substr($Kidok_time,0,2)."時";
		$Kidoku_Date .= substr($Kidok_time,2,2)."分";

		if($Kidok_Send==1){
				$Kidoku_Mode = "送信済み";
		}else{
				$Kidoku_Mode = "設定済み";
		}

}else{
		$Kidoku_Mode = "未設定";
		if($Kaisai_Date=="未設定"){
			$Kidoku_disable = "DISABLED";
		}else{
			$Kidoku_disable = "";
		}

}

$o_smarty->assign('Kidoku_FLG'     , $Kidoku_FLG);
$o_smarty->assign('Kidoku_Date'    , $Kidoku_Date);
$o_smarty->assign('Kidoku_User'    , $Kidoku_User);
$o_smarty->assign('Kidoku_Mode'    , $Kidoku_Mode);
$o_smarty->assign('Kidoku_disable' , $Kidoku_disable);


//*** 回答期限取得 ***//
$strSQL  = "SELECT ";
$strSQL .= " * ";
$strSQL .= "FROM ";
$strSQL .= " res_time_tbl ";
$strSQL .= "WHERE ";
$strSQL .= " mail_id  = " . (int)$_POST["mail_id"]." AND ";
$strSQL .= " angou_id = '" . $angou_id."' ";
$objRec = pg_exec($strSQL);
if($objRec==false){
		echo("SQL実行に失敗しました(SELECT)");
		exit;
}
if(pg_numrows($objRec)!=0){
		$objData = pg_fetch_object($objRec, 0);
		$d1 = mktime (substr($objData->date,8,2), substr($objData->date,10,2) , 0 , substr($objData->date,4,2), substr($objData->date,6,2), substr($objData->date,0,4));
		$limit_date=date("Y年m月d日 H時i分",$d1)."まで";
}else{
		$strlimit_date="設定なし";
}

$o_smarty->assign('limit_date'  , $limit_date);

//*** 送信者 ***//
$strSQL  = "SELECT ";
$strSQL .= " * ";
$strSQL .= "FROM ";
$strSQL .= " syain_tbl ";
$strSQL .= "WHERE ";
$strSQL .= " syain_cd  = ".$admin_cd;
$objRec = pg_exec($strSQL);
if($objRec==false){
		echo("SQL実行に失敗しました(SELECT)");
		exit;
}
if(pg_numrows($objRec)!=0){
		$objData = pg_fetch_object($objRec, 0);
		$admin_name = $objData->name_kj_sei." ".$objData->name_kj_mei;
}else{
		$admin_name = "";
}

$o_smarty->assign('admin_name'  , $admin_name);

//*****　現在回答数取得　*****//
$strSQL  = "SELECT ";
$strSQL .= " (SELECT COUNT(*) FROM mail_info AS chk1 WHERE chk1.mail_id=M.mail_id AND chk1.check_flg = 100) AS not_cnt   ,";
$strSQL .= " (SELECT COUNT(*) FROM mail_info AS chk1 WHERE chk1.mail_id=M.mail_id AND chk1.check_flg = 0)   AS n_read_cnt,";
$strSQL .= " (SELECT COUNT(*) FROM mail_info AS chk1 WHERE chk1.mail_id=M.mail_id AND chk1.check_flg = 99)  AS read_cnt   ";
$strSQL .= "FROM ";
$strSQL .= " mail_info AS M ";
$strSQL .= "WHERE";
$strSQL .= " M.mail_id=".$_POST["mail_id"]." ";
$strSQL .= "GROUP BY ";
$strSQL .= " M.mail_id";
//echo $strSQL."<hr>";
$objCntRec = pg_exec($strSQL);
if($objCntRec==false){
		echo("SQL実行に失敗しました(SELECT)b");
		exit;
}
$objCntData = pg_fetch_object($objCntRec, 0);
$NOT_CNT    = $objCntData->not_cnt;
$N_READ_CNT = $objCntData->n_read_cnt;
$READ_CNT   = $objCntData->read_cnt;

if ($N_READ_CNT=="0"){
		$btnSheep = "disabled";
}

//***** 回答文言を取得 *****
$SYORI_MODE = 	"";
$strSQL = "SELECT * FROM answer_data WHERE mail_id = " . $_POST["mail_id"];
$objRec = pg_exec($strSQL);
if($objRec==false){
		echo("SQL実行に失敗しました(SELECT)d");
		exit;
}
if(pg_numrows($objRec)!=0){
		$objData = pg_fetch_object($objRec,0);

		$SYORI_MODE = $objData->name50_nm;

		for($intI = 1; $intI <= $objData->select_nm; $intI++){
				$idx = $intI-1;
				$ANS_LIST[$idx][0] = pg_result($objRec, 0, "name" . $intI . "_id");
				$ANS_LIST[$idx][1] = pg_result($objRec, 0, "name" . $intI . "_nm");

				$strSQL  = "SELECT ";
				$strSQL .= " COUNT(*) AS dt_cnt ";
				$strSQL .= "FROM ";
				$strSQL .= " mail_info2 ";
				$strSQL .= "WHERE";
				$strSQL .= " mail_id   = ".$_POST["mail_id"]." AND ";
				$strSQL .= " check_flg = ".$ANS_LIST[$idx][0];
				//echo $strSQL."<hr>";
				$objCntRec = pg_exec($strSQL);
				if($objCntRec==false){
						echo("SQL実行に失敗しました(SELECT)c");
						exit;
				}
				$objCntData = pg_fetch_object($objCntRec, 0);
				$ANS_LIST[$idx][2] = $objCntData->dt_cnt;
				
				//人
				$strSQL  = "SELECT";
				$strSQL .= " syain_tbl.name_kj_sei, ";
				$strSQL .= " syain_tbl.name_kj_mei  ";
				$strSQL .= "FROM ";
				$strSQL .= " mail_info2 ";
				$strSQL .= "JOIN ";
				$strSQL .= " syain_tbl ";
				$strSQL .= "ON ";
				$strSQL .= " syain_tbl.syain_cd = mail_info2.syain_cd ";
				$strSQL .= "WHERE ";
				$strSQL .= " mail_id = ".(int)$_POST["mail_id"]." AND ";
				$strSQL .= " check_flg = ".$ANS_LIST[$idx][0]." ";
				$strSQL .= "ORDER BY syain_tbl.syain_cd";
				$objMan = pg_exec($strSQL);
				if($objMan==false){
					echo("SQL実行に失敗しました(SELECT)c");
					exit;
				}

				$ANS_LIST[$idx][3] = "";
				if(pg_numrows($objMan) > 0){
					for($i=0;$i<pg_numrows($objMan);$i++){
							$objManData = pg_fetch_object($objMan, $i);
							if ($ANS_LIST[$idx][3] !=""){
									$ANS_LIST[$idx][3] .= "<br>";
							}
							$ANS_LIST[$idx][3] .= "【".$objManData->name_kj_sei." ".$objManData->name_kj_mei."】　";
					}
				}
				$ANS_LIST[$idx][4] = 0;
		}
}else{
	$ANS_LIST=array();
}

$o_smarty->assign('NOT_CNT'    , $NOT_CNT);
$o_smarty->assign('N_READ_CNT' , $N_READ_CNT);
$o_smarty->assign('READ_CNT'   , $READ_CNT);
$o_smarty->assign('btnSheep'   , $btnSheep);

//*****　ユーザー回答状況　*****//
$strSQL  = "SELECT ";
$strSQL .= " syain_tbl.syain_cd    , ";
$strSQL .= " syain_tbl.Name_kj_sei , ";
$strSQL .= " syain_tbl.Name_kj_mei , ";
$strSQL .= " mail_info.check_flg   , ";
$strSQL .= " mail_info.kousin      , ";
$strSQL .= " mail_info.comment     , ";
$strSQL .= " mail_send_tbl.send_flg  ";
$strSQL .= "FROM ";
$strSQL .= " mail_info    ,";
$strSQL .= " syain_tbl    ,";
$strSQL .= " mail_send_tbl ";
$strSQL .= "WHERE ";
$strSQL .= " mail_info.syain_cd     = syain_tbl.syain_cd         AND ";
$strSQL .= " mail_info.syain_cd     = mail_send_tbl.syain_cd     AND ";
$strSQL .= " mail_info.mail_id      = ".(int)$_POST["mail_id"]." AND ";
$strSQL .= " mail_send_tbl.mail_id  = ".(int)$_POST["mail_id"]." ";
$strSQL .= "GROUP BY ";
$strSQL .= " mail_info.mail_id     , ";
$strSQL .= " syain_tbl.syain_cd    , ";
$strSQL .= " syain_tbl.Name_kj_sei , ";
$strSQL .= " syain_tbl.Name_kj_mei , ";
$strSQL .= " syain_tbl.name_kn_sei , ";
$strSQL .= " syain_tbl.name_kn_mei , ";
$strSQL .= " mail_info.check_flg   , ";
$strSQL .= " mail_info.kousin      , ";
$strSQL .= " mail_info.comment     , ";
$strSQL .= " mail_send_tbl.send_flg  ";
$strSQL .= "ORDER BY ";
$strSQL .= " mail_info.check_flg   ASC, ";
$strSQL .= " (comment is null), mail_info.comment     ASC, ";
$strSQL .= " syain_tbl.name_kn_sei ASC, ";
$strSQL .= " syain_tbl.name_kn_mei ASC, ";
$strSQL .= " syain_tbl.Syain_cd    ASC  ";
//echo $strSQL;
$objRec = pg_exec($strSQL);
if($objRec==false){
		echo("SQL実行に失敗しました(SELECT)");
		exit;
}
$SendUser = "";
for ($intI = 0; $intI < pg_numrows($objRec); $intI++) {
		$objData = pg_fetch_object($objRec,$intI);
		$User_List[$intI][0] = $objData->syain_cd;
		$SendUser .= $User_List[$intI][0].",";
		$User_List[$intI][1] = $objData->name_kj_sei." ".$objData->name_kj_mei;

		//*** グループ情報 ***
		$User_List[$intI][2] = "";
		$strSQL  = "SELECT ";
		$strSQL .= " mst_group.group_name ";
		$strSQL .= "FROM ";
		$strSQL .= " group_info,";
		$strSQL .= " mst_group  ";
		$strSQL .= "WHERE ";
		$strSQL .= " group_info.group_id = mst_group.group_id AND ";
		$strSQL .= " group_info.syain_cd = ".$objData->syain_cd;
		$objGrpRec = pg_exec($strSQL);
		if($objGrpRec==false){
				echo("SQL実行に失敗しました(SELECT)");
				exit;
		}
		for($intJ = 0; $intJ < pg_numrows($objGrpRec) ; $intJ++) {
				$objGrpData = pg_fetch_object($objGrpRec, $intJ);
				if ($User_List[$intI][2]!=""){
						$User_List[$intI][2] .= "<br />";
				}
				$User_List[$intI][2] .= JcodeConvert($objGrpData->group_name, 1, 1);
		}

		switch ($objData->check_flg) {
			case "0":		
					$User_List[$intI][3] = "未読";	
					$User_List[$intI][8] = "color='red'";
					break;
			case "99":
					if ($SYORI_MODE=="QU"){
							$strSQL  = "SELECT ";
							$strSQL .= " * ";
							$strSQL .= "FROM ";
							$strSQL .= " mail_info2 ";
							$strSQL .= "WHERE";
							$strSQL .= " mail_id   = ".$_POST["mail_id"] ." AND ";
							$strSQL .= " syain_cd  = ".$objData->syain_cd."     ";
							//echo $strSQL."<hr>";
							$objAnsRec = pg_exec($strSQL);
							if($objAnsRec==false){
									echo("SQL実行に失敗しました(SELECT)c");
									exit;
							}
							if(pg_numrows($objAnsRec)!=0){
									for($intJ = 0; $intJ < pg_numrows($objAnsRec) ; $intJ++) {
											$objAnsData = pg_fetch_object($objAnsRec, $intJ);
											for($intK = 0; $intK < count($ANS_LIST) ; $intK++) {
													if ($objAnsData->check_flg==$ANS_LIST[$intK][0]){
															if ($User_List[$intI][3]!=""){
																		$User_List[$intI][3] .= "<br />";
															}
															if($objAnsData->check_flg != 1){
																	$User_List[$intI][3] .= $ANS_LIST[$intK][1];
															}else{
																	$User_List[$intI][3] .= $ANS_LIST[$intK][1];
															}
															break;
													}
											}
									}
									$User_List[$intI][8] = "#FFFFFF";
							}else{
									$User_List[$intI][3] = "既読";
									$User_List[$intI][8] = "color='orange'";
							}
					}else{
							$User_List[$intI][3] = "既読";
							$User_List[$intI][8] = "color='orange'";
					}
										break;
			case "100":	
					$User_List[$intI][3] = "アドレス未設定";
					$User_List[$intI][8] = "color='orange'";
					break;
			default:		$User_List[$intI][3] = $ANS_LIST[$objData->check_flg-1][1];
		}

		if ($objData->kousin!=""){
				$User_List[$intI][4]  = intval(substr($objData->kousin,0,4))."年";
				$User_List[$intI][4] .= intval(substr($objData->kousin,4,2))."月";
				$User_List[$intI][4] .= intval(substr($objData->kousin,6,2))."日";
				$User_List[$intI][4] .= intval(substr($objData->kousin,8,2))."時";
				$User_List[$intI][4] .= intval(substr($objData->kousin,10,2))."分";
				$User_List[$intI][5] = nl2br(htmlspecialchars($objData->comment));
		}else{
				$User_List[$intI][4] = "&nbsp;";
				$User_List[$intI][5] = "&nbsp;";
		}

		switch ($objData->send_flg) {
			case "0":	$User_List[$intI][6] = "携帯/PC";	break;
			case "1":	$User_List[$intI][6] = "携帯";	break;
			case "2":	$User_List[$intI][6] = "PC";	break;
			default	:	$User_List[$intI][6] = "-";
		}

		//社員コード
		$User_List[$intI][7] = $objData->syain_cd;

}
$o_smarty->assign('User_List'   , $User_List);

$o_smarty->assign('intGroupCount',   count($User_List));
$o_smarty->assign('PHP_POST_DB_FLG', (int)$PHP_POST_DB_FLG);
$o_smarty->assign('SendUser', $SendUser);

//*****　回答分布率計算　*****//
$Max_Ans_Cnt = $NOT_CNT+$N_READ_CNT;
for($intI = 0; $intI < count($ANS_LIST); $intI++){
		$Max_Ans_Cnt = $Max_Ans_Cnt+$ANS_LIST[$intI][2];
}

if ($Max_Ans_Cnt == 0){
	$NOT_Rate    = "0";
	$N_READ_Rate = "0";
	for($intI = 0; $intI < count($ANS_LIST); $intI++){
			$ANS_LIST[$intI][4] = "0";
	}
}else{
	$NOT_Rate    = round(($NOT_CNT/$Max_Ans_Cnt)*1000)/10;
	$N_READ_Rate = round(($N_READ_CNT/$Max_Ans_Cnt)*1000)/10;

	for($intI = 0; $intI < count($ANS_LIST); $intI++){
			$ANS_LIST[$intI][4] = round(($ANS_LIST[$intI][2]/$Max_Ans_Cnt)*1000)/10;
	}
}

$o_smarty->assign('NOT_Rate'   , $NOT_Rate);
$o_smarty->assign('N_READ_Rate', $N_READ_Rate);

$o_smarty->assign('ANS_LIST'   , $ANS_LIST);



$o_smarty->display('LIST3000.tpl');

?>