CIR006_m.php 10.2 KB
<?php 
//*****************************************************************************
//* 
//* プログラム名:回覧板(携帯電話)
//* プログラムID:CIR006_m.php
//* 機能        :作成処理
//* 作成者      :
//* 
//*****************************************************************************
header("Content-type: text/html; charset=Shift_JIS");

//*** 広告 ***//
include("include_m/Advertisement.inc");

//*** 広告 ***//
include("include_m/jcode.phps");

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

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

//*** 回覧板***
$strMenuSQL = "SELECT name FROM sub_menu_TBL WHERE url = 'CIR001.php'";
$rsRecset = pg_exec($strMenuSQL);
$PHP_TITLE_NAME=mb_convert_encoding(pg_result($rsRecset,0,"name"), "SJIS", "EUC-JP");

//入力チェック
if (strstr($D,"<")==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($D,">")==True){
		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($E,"<")==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($E,">")==True){
		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 ($F==1){
		if (count($H)==0){
				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;
		}
}

//回覧期限日付
$strSQLkigen = "select default_data from mst_default_data where data_no = 3"; 
$objReckigen = pg_exec($strSQLkigen);
if($objReckigen==false){
		echo("SQL実行に失敗しました(SELECT)");
		exit;
}
$objkigen = pg_fetch_object($objReckigen, 0);
$intKigen = (int)($objkigen->default_data);
if($intKigen >= 30){
		$intMth = $intKigen / 30;
		$kigen = date("Y/m/dH:i",mktime(((int)date("H") + 1),0,0,((int)date("m") + $intMth),(int)date("d"),(int)date("Y")));
}else{
		$kigen = date("Y/m/dH:i",mktime(((int)date("H") + 1),0,0,(int)date("m"),((int)date("d") + $intKigen),(int)date("Y")));			
}

$strDate_kigen=substr($kigen,0,10);
$strTime_kigen=substr($kigen,10,8);



//システム日付取得
$strDate= date("Y") . "/" . date("m") . "/" . date("d");
$strTime= date("H") . ":" . date("i") . ":" . date("s");

$D1=$D;
$E1=$E;
$D=mb_convert_encoding($D, "EUC-JP", "SJIS" );
$D = str_replace(chr(92), '',$D);

$E=mb_convert_encoding($E, "EUC-JP", "SJIS" );
$E = str_replace(chr(92), '',$E);

//タイトルNO作成
$strSQL="Select seq From kairan_tbl Order by seq DESC";
$objRecSet = pg_exec($strSQL);
if($objRecSet==false){
		echo("SQL実行に失敗しました(SELECT)");
		exit;
}
if (pg_numrows($objRecSet) > 0){
	$objseqNo = pg_fetch_object($objRecSet, 0);
	$intseqNo=($objseqNo->seq) +1;
}else{
	$intseqNo=1;
}

	
//社員リスト取得
if ($F==0){
		if ($G==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 =$G 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;
		}

		for ($intCnt = 0; $intCnt < pg_numrows($objRecSet); $intCnt++) {
				$objSyain_cd = pg_fetch_object($objRecSet, $intCnt);
				if ($intCnt==0){
						$strsel=trim($objSyain_cd->syain_cd);
				}else{
						$strsel=$strsel."/".trim($objSyain_cd->syain_cd);
				}
		}

}else{
		$strsel="/";
		for ($intCnt = 0; $intCnt < count($H); $intCnt++) {
				$strsel=$strsel.$H[$intCnt]."/";
		}
}

$str = substr($strsel,0,strlen($strsel)-1);
$str = str_replace("/"," ",$strsel);
$chars = preg_split('/ /', $str, -1, PREG_SPLIT_OFFSET_CAPTURE);

//回覧板送信(マスタ)
$strSQLIns = "Insert Into kairan_tbl " .
	 "(seq,date,time,syain_cd,syain_list,title,memo,filename,filename_jp,filename2,filename_jp2,filename3,filename_jp3,date_kigen,time_kigen) " .
	 "values (" .
			 "$intseqNo,'$strDate','$strTime','$PHP_SYAIN_CD','$strsel','".addslashes($D)."','".addslashes($E)."','','','','','','','$strDate_kigen','$strTime_kigen')";

$objRecIns = pg_exec($strSQLIns);
if($objRecIns==false){
	echo("SQL実行に失敗しました(Insert)");
	exit;
}

//名前取得
$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=mb_convert_encoding($objNmData->name_kj_sei, "SJIS", "EUC-JP")." ".mb_convert_encoding($objNmData->name_kj_mei, "SJIS", "EUC-JP");

for ($intCnt=0; $intCnt < (count($chars)); $intCnt++){
		$strStyain_cd=$chars[$intCnt][0];
		if ($strStyain_cd!=""){
				$strSQLpIns= "Insert Into pkairan_tbl (seq,syain_cd,read_flg,del_flg) values ($intseqNo,'$strStyain_cd',0,0)";
				$objRecpIns = pg_exec($strSQLpIns);
				if($objRecpIns==false){
						echo("SQL実行に失敗しました(INSERT)");
						exit;
				}

				//お知らせメール送信
				$strSQLsend="SELECT mail_address,keitai__address,send_flg1 FROM sendinfo_TBL Where syain_cd='$strStyain_cd'";
				$objSend = pg_exec($strSQLsend);
				if($objSend==false){
						echo("SQL実行に失敗しました(SELECT)");
						exit;
				}

				//お知らせ拒否時間取得
				$Mail_kyohi_flg = 0;
				$Mail_kyohi_time = "";
				$strSQL="SELECT no_alarm_time FROM mst_alarm WHERE syain_cd='$strStyain_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_sinsei_time_h=substr($strTime,0,2);
				$str_sinsei_time_i=substr($strTime,3,2);
				$str_sinsei_time=$str_sinsei_time_h.$str_sinsei_time_i;

				if (pg_numrows($objSend)>0){
						$objSendData = pg_fetch_object($objSend, 0);
						if ($objSendData->send_flg1==1){
								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))){
										//メール送信(PC)
										if ($objSendData->mail_address!=""){
												$mlfr = "From:e-gru@media-tek.co.jp";
												$mlto = $objSendData->mail_address;
												$mlsb = mb_convert_encoding("【E-グルPro】新着回覧板のお知らせ(".$D1.")", "EUC-JP", "SJIS" );
												$mlms = "【タイトル】".$D1."\n"."(".$strDate." ".$strTime." ".$strNameData.")\n".$E1;
												//20081028
												$mlms .= "\n\n※このメールは、送信専用メールアドレスから配信されています。\nご返信いただいても配信元へは届きませんのでご了承ください。";
												$mlms .= "\n\nコメントは下記よりログイン後、記入してください。\n".$UrlHead_PC;
												$mlms=mb_convert_encoding($mlms, "EUC-JP", "SJIS" );
												$mlsb = "=?iso-2022-jp?B?" . base64_encode(jcodeconvert(stripslashes($mlsb), 0, 3)) . "?=";
												$mlms = jcodeconvert($mlms,1,3);
												// メール送信
												$rcd = mail($mlto, $mlsb, $mlms, $mlfr);
												if($rcd == false){
													$Status = -1;
												}
										}

										//メール送信(携帯)
										if ($objSendData->keitai__address!=""){
												$mlfr = "From:e-gru@media-tek.co.jp";
												$mlto = $objSendData->keitai__address;
												$mlsb = mb_convert_encoding("【E-グルPro】新着回覧板のお知らせ(".$D1.")", "EUC-JP", "SJIS" );
												$mlms = "【タイトル】".$D1."\n"."(".$strDate." ".$strTime." ".$strNameData.")\n".$E1;
												//20081028
												$mlms .= "\n\n※このメールは、送信専用メールアドレスから配信されています。\nご返信いただいても配信元へは届きませんのでご了承ください。";
												$mlms .= "\n\n以下のアドレスよりログインしてください。\n".$UrlHead_MB."CIR001_m.php?P_SYAIN_CD=$strStyain_cd&P_FOLDER=$PHP_FOLDER&C=1t";
												$mlms=mb_convert_encoding($mlms, "EUC-JP", "SJIS" );
												$mlsb = "=?iso-2022-jp?B?".base64_encode(jcodeconvert(stripslashes($mlsb), 0, 3))."?=";
												$mlms = jcodeconvert($mlms,1,3);

												// メール送信
												$rcd = mail($mlto, $mlsb, $mlms, $mlfr);
												if($rcd == false){
														$Status = -1;
												}
										}
								}
						}
				}
		}
}

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

?>