<?php 
//*****************************************************************************
//* 
//* プログラム名：営業日報
//* プログラムID：RPT005.php
//* 機能        ：営業日報登録/更新処理
//* 作成者      ：
//* 
//*****************************************************************************
header("Content-type: text/html; charset=EUC-JP");

//***************************
//*　インクルードファイル
//***************************
include("./include/session_start.inc");
include("./include/SessionChk.inc");
include("./include/url_get.inc");
include("./include/dbcon.inc");				//ＤＢ接続
include("./include/jcode.phps");

$strSQLseq  = "";
$objRecseq  = "null";
$strSQLIns  = "";
$objRecIns  = "null";
$strSQLtori = "";
$objRectori = "null";
$strSQLUp   = "";
$objRecUp   = "null";


//***営業日報タイトル名取得***
$strMenuSQL = "SELECT name FROM sub_menu_TBL WHERE url = 'RPT001.php'";
$rsRecset = pg_exec($strMenuSQL);
if (pg_numrows($rsRecset)>0){
	$PHP_TITLE_NAME[8]=pg_result($rsRecset,0,"name");
}

//***お知らせメール文字コード処理***
mb_language('Japanese');
mb_internal_encoding('EUC-JP');

//***報告者氏名取得***
$strSQLNm="SELECT name_kj_sei,name_kj_mei FROM syain_tbl Where syain_cd='$PHP_SYAIN_CD'";
$objNm = pg_exec($strSQLNm);
if($objNm==false){
	echo("SQL実行に失敗しました(SELECT)");
	exit;
}
$objNmData = pg_fetch_object($objNm, 0);
$strNameData=$objNmData->name_kj_sei." ".$objNmData->name_kj_mei;

//既読チェック処理
if ($bumon_cd==0){
	$strSQL="Select Distinct syozoku_tbl.syain_cd From syozoku_tbl,syain_tbl Where syozoku_tbl.syain_cd = syain_tbl.syain_cd and syain_tbl.del_flg=true ";

}else{
	$strSQL="Select Distinct syozoku_tbl.syain_cd From syozoku_tbl,syain_tbl ".
					" Where syozoku_cd =$bumon_cd and syozoku_tbl.syain_cd = syain_tbl.syain_cd and syain_tbl.del_flg=true ";
}
$objRecSet = pg_exec($strSQL);
if($objRecSet==false){
	echo("SQL実行に失敗しました(SELECT)");
	exit;
}

//訪問時間編集
$strDate=$visit_y ."/". $visit_m ."/". $visit_d;

if ($visit_h!=""){
	if ($visit_min==""){
		$visit_min="00";
	}
	$strTime=$visit_h.":".$visit_min;
}else{
	$strTime="";
}
if ($visit_e_h!=""){
	if ($visit_e_min==""){
		$visit_e_min="00";
	}
	$str_e_Time=$visit_e_h.":".$visit_e_min;
}else{
	$str_e_Time="";
}

if (substr($strsel,0,1) !="/"){
	$strsel="/".$strsel;
}

if (empty($re_seq)){
	//シーケンスNO作成
	$strSQLseq="Select seq From eigyo_memo_tbl Order by seq DESC";
	$objRecseq = pg_exec($strSQLseq);
	if($objRecseq==false){
		echo("SQL実行に失敗しました(SELECT)");
		exit;
	}
	if (pg_numrows($objRecseq) > 0){
		$objseqNo = pg_fetch_object($objRecseq, 0);
		$intseqNo=($objseqNo->seq) +1;
	}else{
		$intseqNo=1;
	}

	//訪問先
	if ($Sel_Visit==""){
		$Visit_name=$Visit_input;
		$tori_code=0;
	}else{
		//取引先名取得
		$strSQLtori="Select tori_name From torihiki_TBL Where seq= $Sel_Visit";
		$objRectori = pg_exec($strSQLtori);
		if($objRectori==false){
			echo("SQL実行に失敗しました(SELECT)");
			exit;
		}
		$objtorihiki = pg_fetch_object($objRectori, 0);
		$Visit_name=$objtorihiki->tori_name;
		$tori_code=$Sel_Visit;
	}

	//*** データ登録 ***//
	$strSQLIns = "Insert Into eigyo_memo_tbl " .
							 "(seq,date,time,time_e,tori_code,tori_name,syain_cd,syain_list,charge,visit_purpose,memo,subject,bikou,bumon_cd,update) " .
							 "values (" .
							 "$intseqNo,'$strDate','$strTime','$str_e_Time',$tori_code,'".addslashes($Visit_name)."','$PHP_SYAIN_CD','$strsel','".addslashes($charge)."','".addslashes($Purpose)."','".addslashes($memo)."','".addslashes($Subject)."','".addslashes($Note)."',$bumon_cd,'".date("YmdHis")."')";
	$objRecIns = pg_exec($strSQLIns);
	if($objRecIns==false){
		echo("SQL実行に失敗しました(INSERT)");
		exit;
	}

	//*** ファイルアップロード ***//
	$strTempPath="./temp/".$PHP_FOLDER_NAME."/RPT/";
	for($intI=1;$intI<6;$intI++){
		if ($_FILES["upFile".$intI]["name"] !=""){
			$upfile_name     = $intseqNo."-0-".$intI;
			$upfile_name_jp = $_FILES["upFile".$intI]["name"];
			$UpLoad_File     = $strTempPath.$upfile_name;
			move_uploaded_file($_FILES["upFile".$intI]["tmp_name"] , $UpLoad_File);

			$strSQL  = "INSERT INTO common_file_tbl ";
			$strSQL .= " (";
			$strSQL .= "  type, ";
			$strSQL .= "  seq1, ";
			$strSQL .= "  seq2, ";
			$strSQL .= "  seq3, ";
			$strSQL .= "  seq4, ";
			$strSQL .= "  seq5, ";
			$strSQL .= "  file_seq, ";
			$strSQL .= "  file_name, ";
			$strSQL .= "  file_name_org, ";
			$strSQL .= "  file_comm, ";
			$strSQL .= "  file_yobi1, ";
			$strSQL .= "  file_yobi2, ";
			$strSQL .= "  file_yobi3 ";
			$strSQL .= " )";
			$strSQL .= " VALUES(";
			$strSQL .= "  'RPT', ";
			$strSQL .= "  ".$intseqNo.", ";
			$strSQL .= "  0, ";
			$strSQL .= "  0, ";
			$strSQL .= "  0, ";
			$strSQL .= "  0, ";
			$strSQL .= "  ".$intI.", ";
			$strSQL .= "  '".$upfile_name."', ";
			$strSQL .= "  '".$upfile_name_jp."', ";
			$strSQL .= "  '', ";
			$strSQL .= "  '', ";
			$strSQL .= "  '', ";
			$strSQL .= "  '' ";
			$strSQL .= " )";
			$objRec = pg_exec($strSQL);
			if($objRec == false){
				echo("SQL実行に失敗しました(INSERT)");
				exit;
			}
		}
	}

	//*** 既読テーブル作成 ***//
	for ($intCnt = 0; $intCnt < pg_numrows($objRecSet) ; $intCnt++) {
		$objData = pg_fetch_object($objRecSet, $intCnt);
		$strSyain_cd=trim($objData->syain_cd);
		if($strSyain_cd ==$PHP_SYAIN_CD){
			//***作成者***//
			$strSQLp = "Insert Into peigyou_tbl (seq,syain_cd,read_flg) values ($intseqNo,'$strSyain_cd',1)";
			$objRecp = pg_exec($strSQLp);
			if($objRecp==false){
				echo("SQL実行に失敗しました(INSERT)");
				exit;
			}
		}else{
			//***作成者以外***//
			$strSQLp = "Insert Into peigyou_tbl (seq,syain_cd,read_flg) values ($intseqNo,'$strSyain_cd',0)";
			$objRecp = pg_exec($strSQLp);
			if($objRecp==false){
				echo("SQL実行に失敗しました(INSERT)");
				exit;
			}

			//メール送信処理
			mail_send("1",$strSyain_cd,$strNameData,$Visit_name,$strDate,$strTime,$UrlHead_PC,$UrlHead_MB,$PHP_TITLE_NAME[8],$PHP_FOLDER_NAME);
		}
	}
	$intGmflg=1;
}else{
	//シーケンスNOが存在する場合（更新）
	//訪問先
	if ($Visit==1){
		$Visit_name=$Visit_input;
		$tori_code=0;
	}else{
		//取引先名取得
		$strSQLtori="Select tori_name From torihiki_TBL Where seq= $Sel_Visit";
		$objRectori = pg_exec($strSQLtori);
		if($objRectori==false){
			echo("SQL実行に失敗しました(SELECT)");
			exit;
		}
		$objtorihiki = pg_fetch_object($objRectori, 0);
		$Visit_name=$objtorihiki->tori_name;
		$tori_code=$Sel_Visit;
	}
	//アップデート
	$strSQLUp  = "UPDATE eigyo_memo_tbl SET " ;
	$strSQLUp .= "date          = '$strDate',";
	$strSQLUp .= "time          = '$strTime',";
	$strSQLUp .= "time_e        = '$str_e_Time',";
	$strSQLUp .= "tori_code     = '$tori_code',";
	$strSQLUp .= "tori_name     = '".addslashes($Visit_name)."', ";
	$strSQLUp .= "syain_cd      = '$PHP_SYAIN_CD',";
	$strSQLUp .= "syain_list    = '$strsel',";
	$strSQLUp .= "visit_purpose = '".addslashes($Purpose)."',";
	$strSQLUp .= "charge        = '".addslashes($charge)."',";
	$strSQLUp .= "memo          = '".addslashes($memo)."',";
	$strSQLUp .= "subject       = '".addslashes($Subject)."',";
	$strSQLUp .= "bikou         = '".addslashes($Note)."',";
	$strSQLUp .= "bumon_cd      = $bumon_cd,";
	$strSQLUp .= "update        = '".date("YmdHis")."' ";
	$strSQLUp .= "WHERE seq = $re_seq";
	$objRecUp = pg_exec($strSQLUp);
	if($objRecUp==false){
		echo("SQL実行に失敗しました(UPDATE)");
		exit;
	}

	//*** ファイルアップロード ***//
	$strTempPath="./temp/".$PHP_FOLDER_NAME."/RPT/";

	for($intI=1;$intI<6;$intI++){
		//* 削除処理
		if($_POST["delF".$intI] == "1"){
			$strSQL  = "SELECT * FROM common_file_tbl ";
			$strSQL .= "WHERE ";
			$strSQL .= " type ='RPT' AND ";
			$strSQL .= " seq1 = ".$re_seq." AND ";
			$strSQL .= " seq2 = 0 AND ";
			$strSQL .= " seq3 = 0 AND ";
			$strSQL .= " seq4 = 0 AND ";
			$strSQL .= " seq5 = 0 AND ";
			$strSQL .= " file_seq =".$intI." ";
			$objRec = pg_exec($strSQL);
			if($objRec == false){
					echo("SQL実行に失敗しました(SELECT)");
					exit;
			}
			if (pg_numrows($objRec) > 0){
				$objData = pg_fetch_object($objRec, 0);
				$filePath = $strTempPath.($objData->file_name);
				if(file_exists($filePath)){
					unlink($filePath);  
				}
				$strSQL  = "DELETE FROM common_file_tbl ";
				$strSQL .= "WHERE ";
				$strSQL .= " type ='RPT' AND ";
				$strSQL .= " seq1 = ".$re_seq." AND ";
				$strSQL .= " seq2 = 0 AND ";
				$strSQL .= " seq3 = 0 AND ";
				$strSQL .= " seq4 = 0 AND ";
				$strSQL .= " seq5 = 0 AND ";
				$strSQL .= " file_seq =".$intI." ";
				$objRecD = pg_exec($strSQL);
				if($objRecD == false){
					echo("SQL実行に失敗しました(DELETE)");
					exit;
				}
			}
		}

		//* アップロード処理
		if ($_FILES["upFile".$intI]["name"] !=""){
			$upfile_name     = $re_seq."-0-".$intI;
			$upfile_name_jp = $_FILES["upFile".$intI]["name"];
			$UpLoad_File     = $strTempPath.$upfile_name;
			move_uploaded_file($_FILES["upFile".$intI]["tmp_name"] , $UpLoad_File);

			$strSQL  = "INSERT INTO common_file_tbl ";
			$strSQL .= " (";
			$strSQL .= "  type, ";
			$strSQL .= "  seq1, ";
			$strSQL .= "  seq2, ";
			$strSQL .= "  seq3, ";
			$strSQL .= "  seq4, ";
			$strSQL .= "  seq5, ";
			$strSQL .= "  file_seq, ";
			$strSQL .= "  file_name, ";
			$strSQL .= "  file_name_org, ";
			$strSQL .= "  file_comm, ";
			$strSQL .= "  file_yobi1, ";
			$strSQL .= "  file_yobi2, ";
			$strSQL .= "  file_yobi3 ";
			$strSQL .= " )";
			$strSQL .= " VALUES(";
			$strSQL .= "  'RPT', ";
			$strSQL .= "  ".$re_seq.", ";
			$strSQL .= "  0, ";
			$strSQL .= "  0, ";
			$strSQL .= "  0, ";
			$strSQL .= "  0, ";
			$strSQL .= "  ".$intI.", ";
			$strSQL .= "  '".$upfile_name."', ";
			$strSQL .= "  '".$upfile_name_jp."', ";
			$strSQL .= "  '', ";
			$strSQL .= "  '', ";
			$strSQL .= "  '', ";
			$strSQL .= "  '' ";
			$strSQL .= " )";
			$objRec = pg_exec($strSQL);
			if($objRec == false){
				echo("SQL実行に失敗しました(INSERT)");
				exit;
			}
		}
	}

	//*** 既読テーブル処理 ***//
	$strSQL = "Delete FROM peigyou_tbl WHERE seq = $re_seq";
	$objRec = pg_exec($strSQL);
	if($objRec==false){
		echo("SQL実行に失敗しました(Delete)");
		exit;
	}

	for ($intCnt = 0; $intCnt < pg_numrows($objRecSet) ; $intCnt++) {
		$objData = pg_fetch_object($objRecSet, $intCnt);
		$strSyain_cd=trim($objData->syain_cd);
		$strSQLp = "Insert Into peigyou_tbl (seq,syain_cd,read_flg) values ($re_seq,'$strSyain_cd',0)";
		$objRecp = pg_exec($strSQLp);
		if($objRecp==false){
			echo("SQL実行に失敗しました(INSERT)");
			exit;
		}

		//メール送信処理
		mail_send("2",$strSyain_cd,$strNameData,$Visit_name,$strDate,$strTime,$UrlHead_PC,$UrlHead_MB,$PHP_TITLE_NAME[8],$PHP_FOLDER_NAME);

	}
}

//メール送信処理
function  mail_send($syori_flg,$strSyain_cd,$strNameData,$Visit_name,$strDate,$strTime,$UrlHead_PC,$UrlHead_MB,$PHP_TITLE,$PHP_FOLDER_NAME){
	//営業日報お知らせフラグ取得
	$eigyou_flg=="";
	$strSQL="SELECT * FROM kojin_data_tbl WHERE seq=11 AND syain_cd='$strSyain_cd'";
	$objFlg = pg_exec($strSQL);
	if($objFlg==false){
		echo("SQL実行に失敗しました(SELECT)");
		exit;
	}
	if (pg_numrows($objFlg) > 0){
		$objFlgData=pg_fetch_object($objFlg, 0);
		$eigyou_flg=$objFlgData->memo;
	}

		//20170112　サーバ移行時にmedia-tek.co.jpへメールが飛ばない対応
		$mlfr = "e-gru@media-tek.co.jp";

	if ($eigyou_flg==1){
		//***メールヘッダー処理***
		$Headers  = "Date: ".$GMT_RFC."\n";
		$Headers .= "From: e-gru@media-tek.co.jp\n";
		//20131009
		//$Headers .= "Subject: $MailSubject\n";
		$Headers .= "MIME-Version: 1.0\n";
		$Headers .= "X-Mailer: PHP/".phpversion()."\n";
		$Headers .= "Content-type: text/plain; charset=ISO-2022-JP\n";
		$Headers .= "Content-Transfer-Encoding: 7bit";


		//営業日報お知らせメール取得
		$mail_address   = "";
		$keitai__address = "";
		$strSQLsend="SELECT mail_address,keitai__address FROM sendinfo_TBL Where syain_cd='$strSyain_cd'";
		$objSend = pg_exec($strSQLsend);
		if($objSend==false){
			echo("SQL実行に失敗しました(SELECT)");
			exit;
		}
		if (pg_numrows($objSend)>0){
			$objSendData = pg_fetch_object($objSend, 0);
			$mail_address   = $objSendData->mail_address;
			$keitai__address = $objSendData->keitai__address;
		}

		///お知らせ拒否時間取得
		$Mail_kyohi_flg = 0;
		$Mail_kyohi_time = "";
		$strSQL="SELECT no_alarm_time FROM mst_alarm WHERE syain_cd='$strSyain_cd'";
		$objData = pg_exec($strSQL);
		if($objData==false){
			echo("SQL実行に失敗しました(SELECT)");
			exit;
		}
		if (pg_numrows($objData) > 0){
			$objRec =pg_fetch_object($objData, 0);
			$Mail_kyohi_time=$objRec->no_alarm_time;
			if ($Mail_kyohi_time != ""){
				//拒否時間分割
				$Mail_kyohi_start_time=substr($Mail_kyohi_time,0,4);
				$Mail_kyohi_end_time=substr($Mail_kyohi_time,4,7);
				$Mail_kyohi_flg=1;
			}
		}

		//拒否時間判定
		if($Mail_kyohi_start_time > $Mail_kyohi_end_time){
			$Mail_kyohi_start_time1=$Mail_kyohi_start_time;
			$Mail_kyohi_end_time1="2400";
			$Mail_kyohi_start_time2="0000";
			$Mail_kyohi_end_time2=$Mail_kyohi_end_time;
		}else{
			$Mail_kyohi_start_time1=$Mail_kyohi_start_time;
			$Mail_kyohi_end_time1=$Mail_kyohi_end_time;
			$Mail_kyohi_start_time2=$Mail_kyohi_start_time;
			$Mail_kyohi_end_time2=$Mail_kyohi_end_time;
		}

		//処理時間時間編集
		$str_sys_Time= date("H") . ":" . date("i") ;
		$str_sinsei_time_h=substr($str_sys_Time,0,2);
		$str_sinsei_time_i=substr($str_sys_Time,3,2);
		$str_sinsei_time=$str_sinsei_time_h.$str_sinsei_time_i;

		if(($Mail_kyohi_flg == 0) || (($str_sinsei_time < $Mail_kyohi_start_time1) || ($str_sinsei_time > $Mail_kyohi_end_time1)) 
			&& (($str_sinsei_time < $Mail_kyohi_start_time2) || ($str_sinsei_time > $Mail_kyohi_end_time2))){

			//***お知らせメールタイトル名 ***
			if ($syori_flg == "1"){
				$MailSubject = "【E-gruPro】新着　".$PHP_TITLE."のお知らせ";
			}else{
				$MailSubject = "【E-gruPro】更新　".$PHP_TITLE."のお知らせ";
			}
			$mlsb = "=?iso-2022-jp?B?" .base64_encode(mb_convert_encoding(stripslashes($MailSubject), "JIS", "EUC-JP")). "?=";


			//PC版
			if ($mail_address != ""){
				//本文作成
				$MailBody = "【報 告 者】".$strNameData."\n";
				$MailBody.= "【訪 問 先】".$Visit_name."\n";
				$MailBody.= "【作成日時】".$strDate."　".$strTime."\n";
				//20081023　追加
				$MailBody.= "\n※このメールは、送信専用メールアドレスから配信されています。\nご返信いただいても配信元へは届きませんのでご了承ください。\n";
				$MailBody.= "\n下記よりログイン後、閲覧確認してください。\n";
				$MailBody.= $UrlHead_PC."index.php";
				$mlms = mb_convert_encoding(stripslashes($MailBody), "JIS", "EUC-JP");

				//メール配信処理
				//20170112　サーバ移行時にmedia-tek.co.jpへメールが飛ばない対応
				//$rcd = mail($mail_address, $MailSubject, $mlms, $Headers);
				$rcd = mail($mail_address, $mlsb, $mlms, $Headers, "-f".$mlfr);
				if($rcd == false){
					$Status = -1;
				}
			}

			//携帯電話版
			if ($keitai__address!=""){
				//本文作成
				$MailBody = "【報 告 者】".$strNameData."\n";
				$MailBody.= "【訪 問 先】".$Visit_name."\n";
				$MailBody.= "【作成日時】".$strDate."　".$strTime."\n";
				//20081023　追加
				$MailBody.= "\n※このメールは、送信専用メールアドレスから配信されています。\nご返信いただいても配信元へは届きませんのでご了承ください。\n";
				$MailBody.= "\n下記よりログイン後、閲覧確認してください。\n";
				$MailBody.= $UrlHead_MB."index_m.php?P_SYAIN_CD=$strSyain_cd&P_FOLDER=$PHP_FOLDER_NAME&C=1";
				$mlms = mb_convert_encoding(stripslashes($MailBody), "JIS", "EUC-JP");
				//メール配信処理
				//20170112　サーバ移行時にmedia-tek.co.jpへメールが飛ばない対応
				//$rcd = mail($keitai__address, $MailSubject, $mlms, $Headers);
				$rcd = mail($keitai__address, $mlsb, $mlms, $Headers, "-f".$mlfr);
				if($rcd == false){
					$Status = -1;
				}
			}
		}
	}
}

?>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<HTML>
<HEAD>
<META http-equiv="Content-Type" content="text/html; charset=EUC-JP">
<META http-equiv="Content-Style-Type" content="text/css">
<link rel="stylesheet" type="text/css" href="basefont.css">
<TITLE></TITLE>
<SCRIPT LANGUAGE="JAVASCRIPT">
<!--

function load_screen(){
	document.e_gru.action = "RPT001.php";
	document.e_gru.method="POST";
	document.e_gru.submit();
	return false;
}

-->
</SCRIPT>
</HEAD>
<BODY onLoad="return load_screen();">
<form name="e_gru">
</form>
</BODY>
</HTML>