TEL005_m.php 9.95 KB
<?php 
//*****************************************************************************
//* 
//* プログラム名:電話連絡メモ(携帯電話)
//* プログラムID:TEL005_m.php
//* 機能        :登録処理
//* 作成者      :
//* 
//*****************************************************************************

	header("Content-type: text/html; charset=Shift_JIS");

	//*** 共通処理 ***//
	include("include_m/CommonProcess.inc");

	//*** URL取得処理 ***//
	include("include_m/CommonUrlGet.inc");

	//*** 電話連絡***
	$strMenuSQL = "SELECT name FROM sub_menu_TBL WHERE url = 'TEL001.php'";
	$rsRecset = pg_exec($strMenuSQL);
	$PHP_TITLE_NAME=mb_convert_encoding(pg_result($rsRecset,0,"name"), "SJIS", "EUC-JP");

	if ($intsts=="登録"){
		//***** 入力チェック処理 *****//
		//** 日付正当性チェック **//
		//** 開始日
		if (($Tel_m == 4) || ($Tel_m == 6) || ($Tel_m == 9) || ($Tel_m == 11)) {
			if ($Tel_d == 31){
				echo '<HTML>';
				echo '<HEAD>';
				echo '<META http-equiv="Content-Type" content="text/html; charset=Shift_JIS">';
				echo '<TITLE>E-グルPro('.$PHP_TITLE_NAME.')</TITLE>';
				echo '</HEAD>';
				echo '<BODY>';
				echo '<form>';
				echo "入力エラー<br>伝言日付を正しく入力してください。<br>戻るボタンで戻り再入力してください。";
				echo "</form>";
				echo "</BODY>";
				echo "</HTML>";
				exit;
			}
		}
		if ($Tel_m == 2){
			if ($Tel_d == 31) {
				echo '<HTML>';
				echo '<HEAD>';
				echo '<META http-equiv="Content-Type" content="text/html; charset=Shift_JIS">';
				echo '<TITLE>E-グルPro('.$PHP_TITLE_NAME.')</TITLE>';
				echo '</HEAD>';
				echo '<BODY>';
				echo '<form>';
				echo "入力エラー<br>伝言日付を正しく入力してください。<br>戻るボタンで戻り再入力してください。";
				echo "</form>";
				echo "</BODY>";
				echo "</HTML>";
				exit;
			}
			if ($Tel_d == 30) {
				echo '<HTML>';
				echo '<HEAD>';
				echo '<META http-equiv="Content-Type" content="text/html; charset=Shift_JIS">';
				echo '<TITLE>E-グルPro('.$PHP_TITLE_NAME.')</TITLE>';
				echo '</HEAD>';
				echo '<BODY>';
				echo '<form>';
				echo "入力エラー<br>伝言日付を正しく入力してください。<br>戻るボタンで戻り再入力してください。";
				echo "</form>";
				echo "</BODY>";
				echo "</HTML>";
				exit;
			}
			if ($Tel_d == 29) {
				$intData1 = $Tel_y % 4;
				$intData2 = $Tel_y % 100;
				$intData3 = $Tel_y % 400;
				if ((($intData1 == 0) && ($intData2 != 0)) || ($intData3 == 0)){
				}else{
					echo '<HTML>';
					echo '<HEAD>';
					echo '<META http-equiv="Content-Type" content="text/html; charset=Shift_JIS">';
					echo '<TITLE>E-グルPro('.$PHP_TITLE_NAME.')</TITLE>';
					echo '</HEAD>';
					echo '<BODY>';
					echo '<form>';
					echo "入力エラー<br>伝言日付を正しく入力してください。<br>戻るボタンで戻り再入力してください。";
					echo "</form>";
					echo "</BODY>";
					echo "</HTML>";
					exit;
				}
			}
		}
		//** 時間正当性チェック **//
		if (($Tel_h=="") && ($Tel_min!="")) {
				echo '<HTML>';
				echo '<HEAD>';
				echo '<META http-equiv="Content-Type" content="text/html; charset=Shift_JIS">';
				echo '<TITLE>E-グルPro('.$PHP_TITLE_NAME.')</TITLE>';
				echo '</HEAD>';
				echo '<BODY>';
				echo '<form>';
				echo "入力エラー<br>伝言時間が不正です<br>戻るボタンで戻り再入力してください。";
				echo "</form>";
				echo "</BODY>";
				echo "</HTML>";
				exit;
		}

		//** メッセージチェック **//
		if ($Memo==""){
				echo '<HTML>';
				echo '<HEAD>';
				echo '<META http-equiv="Content-Type" content="text/html; charset=Shift_JIS">';
				echo '<TITLE>E-グルPro('.$PHP_TITLE_NAME.')</TITLE>';
				echo '</HEAD>';
				echo '<BODY>';
				echo '<form>';
				echo "入力エラー<br>メッセージは必須入力です<br>戻るボタンで戻り再入力してください。";
				echo "</form>";
				echo "</BODY>";
				echo "</HTML>";
				exit;
		}
		if (strstr($Memo,"<")==True){
				echo '<HTML>';
				echo '<HEAD>';
				echo '<META http-equiv="Content-Type" content="text/html; charset=Shift_JIS">';
				echo '<TITLE>E-グルPro('.$PHP_TITLE_NAME.')</TITLE>';
				echo '</HEAD>';
				echo '<BODY>';
				echo '<form>';
				echo "入力エラー<br>予約目的に不正な文字『<』が使用されています。<br>戻るボタンで戻り再入力してください。";
				echo "</form>";
				echo "</BODY>";
				echo "</HTML>";
				exit;
		}
		if (strstr($Memo,">")==True){
				echo '<HTML>';
				echo '<HEAD>';
				echo '<META http-equiv="Content-Type" content="text/html; charset=Shift_JIS">';
				echo '<TITLE>E-グルPro('.$PHP_TITLE_NAME.')</TITLE>';
				echo '</HEAD>';
				echo '<BODY>';
				echo '<form>';
				echo "入力エラー<br>予約目的に不正な文字『>』が使用されています。<br>戻るボタンで戻り再入力してください。";
				echo "</form>";
				echo "</BODY>";
				echo "</HTML>";
				exit;
		}

		//日付
		$strData=mb_convert_encoding($Tel_y."/".$Tel_m."/".$Tel_d, "EUC-JP", "SJIS" );

		//時間
		if ($Tel_h != ""){
			if ($Tel_min==""){
				$Tel_min="00";
			}
			$strTime=mb_convert_encoding($Tel_h.":".$Tel_min, "EUC-JP", "SJIS" );;
		}else{
			$strTime="";
		}

		//伝言宛先
		$Request=mb_convert_encoding( $Request, "EUC-JP", "SJIS" );

		//メッセージ
		$Memo=mb_convert_encoding( $Memo, "EUC-JP", "SJIS" );
		$Memo = str_replace(chr(92), '',$Memo);


		//電話番号
		$strTel=mb_convert_encoding( $telno1."-".$telno2."-".$telno3, "EUC-JP", "SJIS" );

		//FAX番号
		$strFax=mb_convert_encoding( $fax1."-".$fax2."-".$fax3, "EUC-JP", "SJIS" );

		//e−Mail
		$strMail=mb_convert_encoding( $mail1."@".$mail2, "EUC-JP", "SJIS" );


		//シーケンスNo作成
		$strSQLseq="Select seq From telmemo_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;
		}

		//作成者用を登録
		$strSQLIns = "Insert Into telmemo_tbl " .
			 "(seq,date,time,from_code,to_code,fromperson,msgmode,msgtype,message,tel,fax,e_mail,read_flg) " .
			 "values (" .
					 "$intseqNo,'$strData','$strTime','$PHP_SYAIN_CD','$to_code','".addslashes($Request)."',$msg_mode,$MsgType,'".addslashes($Memo)."','".addslashes ($strTel)."','".addslashes($strFax)."','".addslashes($strMail)."',0)";
		$objRecIns = pg_exec($strSQLIns);
		if($objRecIns==false){
			echo("SQL実行に失敗しました(INSERT)");
		exit;
		}

		//メール配信
		//送信先取得
		$strSQL="Select e_mail From tel_trans_tbl Where syain_cd='$to_code'";
		$objRec = pg_exec($strSQL);
		if($objRec==false){
				echo("SQL実行に失敗しました(SELECT)");
				exit;
		}

		//転送用メールアドレスが設定されている場合
		if (pg_numrows($objRec) > O){
				$obj_S = pg_fetch_object($objRec, 0);
				//送信元のメールアドレスの取得
				$strSQL="Select mail_addr From syain_tbl Where syain_cd='$PHP_SYAIN_CD'";
				$objRec = pg_exec($strSQL);
				if($objRec==false){
						echo("SQL実行に失敗しました(SELECT)");
						exit;
				}
				$obj_J = pg_fetch_object($objRec, 0);
			
				//2007/12/21 mtc yoshimura[edit start]
				//メールアドレスが設定されていない場合は、E-グルProからメール送信を行う。
				$strFwMail = "";
				if ($obj_J->mail_addr == "@" || $obj_J->mail_addr == "")
				{
					$strFwMail = "e-gru-pro@media-tek.co.jp";
				}
				else
				{
					$strFwMail = $obj_J->mail_addr;
				}
				//2007/12/21 mtc yoshimura[edit end]

			//メール内容を取得
			//伝言内容
			switch ($msg_mode) {
			case 1:
				$msg_mode = "【電話】";
				break;
			case 2:
				$msg_mode = "【来客】";
				break;
			case 3:
				$msg_mode = "【その他】";
				break;
			case 4:
				$msg_mode = "【返信】";
				break;
			} 
			
			switch ($MsgType) {
			case 1:
				$msgtype = "内容:電話があったことをお伝えください";
				break;
			case 2:
				$msgtype = "内容:またかけ直します";
				break;
			case 3:
				$msgtype = "内容:折り返しの連絡をお願いします";
				break;
			case 4:
				$msgtype = "内容:ご伝言をお願いします";
				break;
			case 5:
				$msgtype = "内容:来社されました";
				break;
			case 6:
				$msgtype = "内容:その他";
				break;
			case 7:
				$msgtype = "内容:メッセージ返信";
				break;
			}
			
			mb_language('Japanese');
			mb_internal_encoding('EUC-JP');
			//$headers ="From:$obj_J->mail_addr.\r\n";
			$headers ="From:$strFwMail.\r\n";
			$mail_subject=mb_convert_encoding("電話メモ"."(".$strName.")", "EUC-JP", "SJIS" );
			$strHead=mb_convert_encoding($msg_mode."\n".$msgtype."\n", "EUC-JP", "SJIS" );
			if ($Request != ""){
				$strHead=$strHead . mb_convert_encoding("依頼主:", "EUC-JP", "SJIS" ).mb_convert_kana($Request,"K") ."\n";
			}
			
			if (trim($strTel)!="--"){
				$strHead=$strHead."Tel:".$strTel ."\n";
			}
			if (trim($strFax)!="--"){
				$strHead=$strHead."Fax:".$strFax ."\n";
			}
			if (trim($strMail)!="@"){
				$strHead=$strHead."Mail:".$strMail."\n";
			}

			if (trim($Memo != "")){
				$strMemo=mb_convert_kana($Memo,"K");
			}
			//20081025 追加
			if ($strFwMail == "e-gru-pro@media-tek.co.jp")
			{
				$strURL=$strURL.mb_convert_encoding("\n\n※このメールは、送信専用メールアドレスから配信されています。\nご返信いただいても配信元へは届きませんのでご了承ください。\n", "EUC-JP", "SJIS" );
			}

			$strURL=$strURL.mb_convert_encoding("\n確認する場合は以下のURLをクリック\n", "EUC-JP", "SJIS" );
			$strURL=$strURL.$UrlHead_TEL."TEL006.php?seq=$intseqNo&PHP_DB_NAME=$PHP_DB_NAME&P_FOLDER=$P_FOLDER";
			$strHonbun=$strHead.$strMemo.$strURL;
			if (strlen($strHonbun)>480){
				$strSet=$strHead;
				$intSendCnt=1;
				for ($ii=0;$ii<mb_strlen($strMemo); $ii++) {
					$strSet .= mb_substr($strMemo,$ii,1);
					if (strlen($strSet) >= 480){
						mb_send_mail($obj_S->e_mail,$mail_subject."(分割".$intSendCnt.")",$strSet,$headers);
						$strSet="";
						$intSendCnt=$intSendCnt+1;
					}
				}
				if ($strSet!=""){
					if (strlen($strSet.$strURL)>=480){
						mb_send_mail($obj_S->e_mail,$mail_subject."(分割".$intSendCnt.")",$strSet,$headers);
						$intSendCnt=$intSendCnt+1;
						mb_send_mail($obj_S->e_mail,$mail_subject."(分割".$intSendCnt.")",$strURL,$headers);
					}else{
						mb_send_mail($obj_S->e_mail,$mail_subject."(分割".$intSendCnt.")",$strSet.$strURL,$headers);
					}
				}
			}else{
				mb_send_mail($obj_S->e_mail,$mail_subject,$strHonbun,$headers);
			}
		}
}

header("Location: ./TEL006_m.php?$PHP_Argument");