ADR901.php 5.88 KB
<?php 
//*****************************************************************************
//* 
//* プログラム名:アドレス帳
//* プログラムID:ADR901.php
//* 機能        :CSVファイルにデータを吐き出す
//* 作成者      :
//*****************************************************************************

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


//**** DB接続 ****//
include("./include/dbcon.inc");

$filename = "取引先アドレス帳".date("Y").date("m").date("d").".csv";
//20090115 文字コード修正
//$filename = mb_convert_encoding($filename,"SJIS", "auto");

$Agent = getenv( "HTTP_USER_AGENT" );
/*201310対応
if( ereg( "MSIE", $Agent ) ){ 
		$filename = JcodeConvert($filename, 1, 2);
} elseif( ereg( "Firefox", $Agent ) ) {
} elseif( ereg( "Safari", $Agent ) ) {
} else {
	$filename = JcodeConvert($filename, 1, 2);
}
*/
if( preg_match( "/MSIE/", $Agent ) ){ 
		$filename = JcodeConvert($filename, 1, 2);
} elseif( preg_match( "/Chrome/", $Agent ) ) {
		$filename = JcodeConvert($filename, 1, 2);
} elseif( preg_match( "/Firefox/", $Agent ) ) {
} elseif( preg_match( "/Safari/", $Agent ) ) {
} else {
	$filename = JcodeConvert($filename, 1, 2);
}


Header("Content-Disposition: attachment; filename=\"$filename\"");
Header("Content-Type: text/csv");

//*** 取引先情報 ***//
//部門
$tori_group = (int)$bumon;

//アドレス帳カナ検索
if ($add_search ==1){
		$str_add="ア%/イ%/ウ%/エ%/オ%";
}elseif($add_search ==2){
		$str_add="カ%/キ%/ク%/ケ%/コ%/ガ%/ギ%/グ%/ゲ%/ゴ%";
}elseif($add_search ==3){
		$str_add="サ%/シ%/ス%/セ%/ソ%/ザ%/ジ%/ズ%/ゼ%/ゾ%";
}elseif($add_search ==4){
		$str_add="タ%/チ%/ツ%/テ%/ト%/ダ%/ヂ%/ヅ%/デ%/ド%";
}elseif($add_search ==5){
		$str_add="ナ%/ニ%/ヌ%/ネ%/ノ%";
}elseif($add_search ==6){
		$str_add="ハ%/ヒ%/フ%/ヘ%/ホ%/バ%/ビ%/ブ%/ベ%/ボ%/パ%/ピ%/プ%/ペ%/ポ%";
}elseif($add_search ==7){
		$str_add="マ%/ミ%/ム%/メ%/モ%";
}elseif($add_search ==8){
		$str_add="ヤ%/ユ%/ヨ%";
}elseif($add_search ==9){
		$str_add="ラ%/リ%/ル%/レ%/ロ%";
}elseif($add_search ==10){
		$str_add="ワ%/ヲ%/ン%";
}else{
		$str_add="";
}
if ($str_add!=""){
		$str_add=" and ((tori_name_kn Like '".str_replace("/","') or (tori_name_kn Like '",$str_add)."'))";
}

$strSQL="SELECT * FROM torihiki_tbl WHERE tori_group=$tori_group AND del_flg=true ".$str_add." ORDER BY tori_name_kn,seq ";
$objRec = pg_exec($strSQL);
if($objRec==false){
		echo("SQL実行に失敗しました(SELECT)");
		exit;
}

for ($intI = 0; $intI < pg_numrows($objRec); $intI++){
		$objData = pg_fetch_object($objRec, $intI);
		
		//会社名
		$strWk = $objData->tori_name;
		echo "\"".mb_convert_encoding($strWk,"SJIS", "auto")."\",";

		//会社名(フリガナ)
		$strWk = $objData->tori_name_kn;
		echo "\"".mb_convert_encoding($strWk,"SJIS", "auto")."\",";

		//代表者名(漢字)
		$strWk = $objData->toridai_name__kj_sei." ".$objData->toridai_name__kj_mei;
		echo "\"".mb_convert_encoding($strWk,"SJIS", "auto")."\",";

		//代表者名(フリガナ)
		$strWk = $objData->toridai_name__kn_sei." ".$objData->toridai_name__kn_mei;
		echo "\"".mb_convert_encoding($strWk,"SJIS", "auto")."\",";

		//グループ
		//資本金 
		$strWk = $objData->tori_sihonkin;
		echo "\"".mb_convert_encoding($strWk,"SJIS", "auto")."\",";

		//ホームページ
		$strWk = $objData->tori_hp_adr;
		echo "\"".mb_convert_encoding($strWk,"SJIS", "auto")."\",";

		//メールアドレス
		$strWk = $objData->tori_email;
		echo "\"".mb_convert_encoding($strWk,"SJIS", "auto")."\",";

		//メモ
		$strWk = $objData->tori_memo;
		echo "\"".mb_convert_encoding($strWk,"SJIS", "auto")."\",";

		//〒
		$strWk = $objData->tori_yubin_no;
		echo "\"".mb_convert_encoding($strWk,"SJIS", "auto")."\",";

		//県
		$strWk = $objData->addr_pref;
		echo "\"".mb_convert_encoding($strWk,"SJIS", "auto")."\",";

		//(市区郡)
		$strWk = $objData->addr_city;
		echo "\"".mb_convert_encoding($strWk,"SJIS", "auto")."\",";

		//(町名、番地)
		$strWk = $objData->addr_banti;
		echo "\"".mb_convert_encoding($strWk,"SJIS", "auto")."\",";

		//(マンション・アパート名)
		$strWk = $objData->addr_apart;
		echo "\"".mb_convert_encoding($strWk,"SJIS", "auto")."\",";

		//電話番号
		$strWk = $objData->tel_no;
		echo "\"".mb_convert_encoding($strWk,"SJIS", "auto")."\",";

		//FAX番号 
		$strWk = $objData->fax_no;
		echo "\"".mb_convert_encoding($strWk,"SJIS", "auto")."\","."\n";

		$strSQL = "SELECT * FROM tantou_tbl WHERE seq = ".$objData->seq;
		$objToriRec = pg_exec($strSQL);
		if ($objToriRec == false){
				echo "データの取得に失敗しました。";
				exit;
		}
		for ($intJ = 0; $intJ < pg_numrows($objToriRec); $intJ++){
				$objToriData = pg_fetch_object($objToriRec, $intJ);

				$strWk = "  【担当者】";
				echo "\"".mb_convert_encoding($strWk,"SJIS", "auto")."\",";

				//担当者名(漢字)
				$strWk = $objToriData->last_name_j." ".$objToriData->first_name_j;
				echo "\"".mb_convert_encoding($strWk,"SJIS", "auto")."\",";

				//担当者名(フリガナ)
				$strWk = $objToriData->last_name_e." ".$objToriData->first_name_e;
				echo "\"".mb_convert_encoding($strWk,"SJIS", "auto")."\",";

				//所属部門
				$strWk = $objToriData->busyo;
				echo "\"".mb_convert_encoding($strWk,"SJIS", "auto")."\",";

				//役職
				$strWk = $objToriData->yaku;
				echo "\"".mb_convert_encoding($strWk,"SJIS", "auto")."\",";

				//性別
				if ($objToriData->sex=='t'){
						$strWk = "男性";
				}else{
						$strWk = "女性";
				}
				echo "\"".mb_convert_encoding($strWk,"SJIS", "auto")."\",";

				//メールアドレス
				$strWk = $objToriData->email;
				echo "\"".mb_convert_encoding($strWk,"SJIS", "auto")."\",";

				//メモ
				$strWk = $objToriData->memo;
				echo "\"".mb_convert_encoding($strWk,"SJIS", "auto")."\",";

				//電話番号
				$strWk = $objToriData->phone;
				echo "\"".mb_convert_encoding($strWk,"SJIS", "auto")."\",";

				//携帯電話番号
				$strWk = $objToriData->handy;
				echo "\"".mb_convert_encoding($strWk,"SJIS", "auto")."\""."\n";

		}
}

?>