<?PHP 
//*****************************************************************************
//* プログラム名：借入金閲覧画面
//* プログラムID：BRR0500.php
//* 機能        ：借入金閲覧画面
//*****************************************************************************
header("Content-type: text/html; charset=EUC-JP");
include("./inc/session_start.inc");
include("./inc/SessionChk.inc");
include("./inc/dbcon.inc");
include('./inc/smarty.conf');
include("./inc/const.inc");
include("./inc/pagetitle.inc");
include("./inc/pagefooter.inc");
/*****************************
h->返済状況別
k->借入区分別
c->前年比較
*****************************/
$chgmode = $_POST["chgmode"];

/*******絞込み**********/
//返済リスト
$hseq = $_REQUEST["hseq"];
//区分リスト
$kseq = $_POST["kseq"];

//予定返済日
/*
$hensai_sd = $_POST["hensai_sd"];
$hensai_ed = $_POST["hensai_ed"];
if(intval($hensai_sd) == 0){
	$hensai_sd = 1;
}
if(intval($hensai_ed) == 0){
	$hensai_ed = 31;
}
*/
$lst_sd= "";
$lst_ed= "";
for($i=1;$i<=31;$i++){
	if(intval($hensai_sd) == $i){
		$lst_sd .= '<option value="'.$i.'" selected>'.$i.'</option>';
	}else{
		$lst_sd .= '<option value="'.$i.'">'.$i.'</option>';
	}
	if(intval($hensai_ed) == $i){
		$lst_ed .= '<option value="'.$i.'" selected>'.$i.'</option>';
	}else{
		$lst_ed .= '<option value="'.$i.'">'.$i.'</option>';
	}
}

//日付モード
/*
$kmode =  $_POST["kmode"];
$kmodeCHK = "";
if($kmode == "1"){
	//借入日
	$kmodeCHK[0] = "";
	$kmodeCHK[1] = "checked";
}else{
	//返済日
	$kmodeCHK[0] = "checked";
	$kmodeCHK[1] = "";
}
*/

//銀行リスト
$gseq = $_POST["gseq"];
/*********表示切替*************/
$yyyy = $_POST["yyyy"];
$mon = $_POST["mon"];
if($yyyy == ""){
	$yyyy = date("Y");
}
//月
if($mon == ""){
	$mon = date("m");
}
$mon_next = $_POST["mon_next"];
/********１ヶ月後************/
if($mon_next == ""){
	$mon_next = 0;
}
if($mon_next !== 0){
	$mon = $mon + $mon_next;
}
/**********１ヶ月前***********/
$mon_back = $_POST["mon_back"];
if($mon_back == ""){
	$mon_back = 0;
}
if($mon_back !== 0){
	$mon = $mon - $mon_back;
}
if($chgmode == "c"){
	$zyyyy = ($yyyy-1);
}

/******************************/
//借入区分のドロップリスト取得
	$kr_K = edit_kubun($kseq);
//返済状況のドロップリスト取得
	$lstH = edit_sts($hseq);

	$lst_ginko .= ginko_lst($gseq);	


/*************************************
借入区分
**************************************/
$kikan = $_POST["kikan"];
/************************
$START_YEAR　初回返済日
$START_MONTH　初回返済月
$START_MONEY　借入額
*************************/
	$strSQL = "select * from kariire_tbl JOIN mst_bank ON kariire_tbl.ginko_code = mst_bank.bank_id ";
	
//条件
	$arrWHERE = array();
	$strWHERE = "";
	$intWhCnt = 0;
	//借入先
	if($gseq <> ""){
		$arrWHERE[$intWhCnt] = "kariire_tbl.ginko_code = ".$gseq;
		$intWhCnt++;
	}
	//返済状況
	if($hseq == "1"){
		$arrWHERE[$intWhCnt] = "kansai_flg = 0";
		$intWhCnt++;
	}else if($hseq == "2"){
		$arrWHERE[$intWhCnt] = "kansai_flg = 1";
		$intWhCnt++;
	}
	//借入区分
	if($kseq == "1"){
		$arrWHERE[$intWhCnt] = "kariire_kubun = 0";
		$intWhCnt++;
	}else if($kseq == "2"){
		$arrWHERE[$intWhCnt] = "kariire_kubun = 1";
		$intWhCnt++;
	}

/*
	if($kmode == "1"){
		//借入日範囲
		$arrWHERE[$intWhCnt] = "cast(substr(kariire_date,7,2) as int8) >= ".$hensai_sd." and cast(substr(kariire_date,7,2) as int8) <= ".$hensai_ed;
		$intWhCnt++;
	}else{
		//返済予定日範囲
		$arrWHERE[$intWhCnt] = "hensai_date >= ".$hensai_sd." and hensai_date <= ".$hensai_ed;
		$intWhCnt++;
	}
*/
	
	if(count($arrWHERE) > 0){
		if(count($arrWHERE) == 1){
			$strWHERE = $arrWHERE[0];
		}else{
			$strWHERE = join(" AND ", $arrWHERE);
		}
		$strWHERE = " WHERE ".$strWHERE;
	}

	$strSQL = $strSQL.$strWHERE." ORDER BY mst_bank.disp_rank,kariire_date,kariire_seq ";
	$objRec = pg_exec($strSQL);
		if($objRec==false){
			echo("SQL実行に失敗しました(SELECT)");
			exit;
		}
	
	$DataNum = 0;	
	if(pg_numrows($objRec)>0){
		$DataNum = pg_numrows($objRec);	
		$START_MONEY_BRR="";
		$START_MONEY_BRR_TOTAL=0;
		$kinri="";
		for($i=0;$i<pg_numrows($objRec);$i++){
			$objData = pg_fetch_object($objRec, $i);
			$FIRST_YEAR[$i] = $objData->first_hensai;
			$FIRST_MONTH[$i] = $objData->first_month;
			$START_MONEY_BRR[$i] = number_format($objData->kariiregaku);
			$START_MONEY_BRR_TOTAL = $START_MONEY_BRR_TOTAL + $objData->kariiregaku;
			$kariiregaku[$i] = $objData->kariiregaku;
			//表示情報
			$hensai_count[$i] = $objData->hensai_count;
			$kariire_date[$i] = $objData->kariire_date;	
			$kariire_YMD[$i] = substr($kariire_date[$i],0,4)."/".substr($kariire_date[$i],4,2)."/".substr($kariire_date[$i],6,2);	

			$ginkoName[$i] = $objData->bank_name;	
			//借入年
			$date_year[$i] = mb_strcut($kariire_date,0,4);
			//借入月
			$date_month[$i] = mb_strcut($kariire_date,4,2);
			//借入日
			$date_day[$i] = mb_strcut($kariire_date,6,2);
			//日付まるごと取得
			$dete_kr = "<input type =".'"'.hidden.'"'."name =".'"date'.$i.'"'."value = ".'"'.$kariire_date[$i].'"'." >";
			$kData[$i] = $objData->kariire_seq;
			$tanpo[$i] = $objData->tanpo;
			$comment[$i] = $objData->comment;
			$kinri[$i] = $objData->interest_cost;	//金利
			$siharai[$i] = $objData->siharai_shubetu;	//支払い方法
			$kr_kubun[$i] = $objData->kariire_kubun;	//長期OR短期
			$kariiregaku[$i] = number_format($kariiregaku[$i]);
		}
	}else{
		$DataNum = 0;	
	}
//期間が空なら6ヶ月をデフォルトにする。
	if($kikan == ""){
		$kikan = "6";
	}
//フラグ
	$flg_y = 0;
	$flg_m = 0;
/***********************************
ラジオボタン
***********************************/
	$HensaiStyle="";
	for($i=0;$i<count($kData);$i++)
	{	
		if($i == 0){
			$kr_radio[$i] = "<input type=".'"radio"'." name=".'"kr_seq"'." value=".'"'.$kData[$i].'"'." checked onClick='btnShow(".$siharai[$i].")'>";
			if($siharai[$i] == 1){
				$HensaiStyle="style='display:none;'";
			}
		}else{
			$kr_radio[$i] = "<input type=".'"radio"'." name=".'"kr_seq"'." value=".'"'.$kData[$i].'"'." onClick='btnShow(".$siharai[$i].")'>";
		}
	}
//何ヶ月表示？
	$DISP_CNT = $kikan;
//年月配列
	$StartY = "";
	$StartM = "";
	for($i=0;$i<$DISP_CNT;$i++){
		$dataYM[$i][0] = date("Y", mktime(0, 0, 0, ($mon + $i), 1, $yyyy));
		$dataYM[$i][1] = date("m", mktime(0, 0, 0, ($mon + $i), 1, $yyyy));
		if($i == 0){
			$StartY = $dataYM[$i][0];
			$StartM = $dataYM[$i][1];
		}
/*************前年比**********/	
		if( $chgmode == "c"){
				$zdataYM[$i][0]=$zyyyy;
				$zdataYM[$i][1]=intval($mon) + $i;
				if($zdataYM[$i][1] > 12){
					$zdataYM[$i][0] = intval($zdataYM[$i][0]) + 1;
					$zdataYM[$i][1] = intval($mon) + $i - 12;
				}
		}
/*******************************/
	}
$kongetu = date("n");
$kotosi = date("Y");

//開始年月再設定！！
if($StartY != ""){
	$yyyy = $StartY;
	$mon = $StartM;
}
//借入本数の件数だけループ

$itotalHensai = "";
$totalHensai = "";
$itotalRisoku = "";
$totalRisoku = "";

//銀行コード同様コードを削除
for($i=0;$i<count($kData);$i++){
	//銀行リスト
	//残高
	$zan = $kariiregaku[$i];
	//flgを０に！！
	$flg = 0;
	$pData4Total = "";
	$pData4I = "";
	for($j=0;$j<count($dataYM);$j++){
			//表示されているデータ月と同様月のデータ取得
			$strSQL = "select * from plan_tbl WHERE kariire_seq = ".$kData[$i]."  AND hensai_year = ".$dataYM[$j][0]." AND hensai_month = ".$dataYM[$j][1];
			$strSQL .= " Order by plan_seq ASC";
			$objRec = pg_exec($strSQL);
			if($objRec==false){
				echo("SQL実行に失敗しました(SELECT)");
				exit;
			}
		if(pg_numrows($objRec) > 0){
			$objData = pg_fetch_object($objRec, 0);
			$pData[$i][$j][0] = $objData->plan_seq;
			$pData[$i][$j][1] = $objData->hensaigaku;
			$pData[$i][$j][2] = $objData->siharai_kinri;
			$total[$i][$j] = $objData->total;
			$pData[$i][$j][4] = $objData->zan;

			$pData4Il[$j] += $objData->zan;
			$itotalHensai[$j] += $pData[$i][$j][1];
			$itotalRisoku[$j] += $pData[$i][$j][2];

			//残高
			$pData[$i][$j][1] = number_format($pData[$i][$j][1]);
			$pData[$i][$j][2] = number_format($pData[$i][$j][2]);
			$pData[$i][$j][4] = number_format($pData[$i][$j][4]);
		}else{
			$pData[$i][$j][0] = "";
			$pData[$i][$j][1] = "";
			$pData[$i][$j][2] = "";
			$total[$i][$j] = "";
			$pData[$i][$j][4] = "";
			$pData[$i][$j][1] = "";
			$pData[$i][$j][2] = "";
			$pData[$i][$j][4] = "";
			$pData4Il[$j] += 0;
		}		
		$itotal[$j] += $total[$i][$j];
		$total[$i][$j] = number_format($total[$i][$j]);
		$itotalM[$j] = number_format($itotal[$j]);
		
		$totalHensai[$j] = number_format($itotalHensai[$j]);
		$totalRisoku[$j] = number_format($itotalRisoku[$j]);

		$pData4Total[$j] = number_format($pData4Il[$j]);
	}
	if($dataYM[0][0] == $kotosi && $dataYM[0][1] == $kongetu){
//2010.2.3 mtc)satotaka 完済フラグの条件修正
//		if($pData[$i][0][4] == 0){
//			if($kongetu >= $FIRST_MONTH[$i]){
		if($pData[$i][0][4] == 0 || $pData[$i][0][4] === ""){
			if( ($FIRST_YEAR[$i] == $kotosi && $FIRST_MONTH[$i] < $kongetu) || $FIRST_YEAR[$i] < $kotosi ){
				$strSQL2 = "UPDATE kariire_tbl SET kansai_flg = 1 WHERE kariire_seq =".$kData[$i];
				$objRec = pg_exec($strSQL2);
				if($objRec==false){
					echo("SQL実行に失敗しました(SELECT)");
					exit;
				}
			}
		}
	}
}
/*************前年比**********/	
if( $chgmode == "c"){
	for($i=0;$i<count($kData);$i++){
		for($j=0;$j<count($zdataYM);$j++){
			$strSQL = "select * from plan_tbl WHERE kariire_seq = ".$kData[$i]."  AND hensai_year = ".$zdataYM[$j][0]." AND hensai_month = ".$zdataYM[$j][1];
			$objRec = pg_exec($strSQL);
			if($objRec==false){
				echo("SQL実行に失敗しました(SELECT)");
				exit;
			}
			if(pg_numrows($objRec) > 0){
				$objData = pg_fetch_object($objRec, 0);
				$zpData[$i][$j][1] = $objData->hensaigaku;
				$zpData[$i][$j][4] = $objData->zan;
				$zpData[$i][$j][4] = number_format($zpData[$i][$j][4]);
			}
		}	
	}
}
//金額単位取得
$strSQL = "select start_unit from start_tbl";
$objRec = pg_exec($strSQL);
if($objRec==false){
	echo("SQL実行に失敗しました(SELECT)");
	exit;
}
if(pg_numrows($objRec)>0){
	$objData = pg_fetch_object($objRec, 0);
	$mUnit  = $objData->start_unit;
	switch ($mUnit) {
	    case 0:
	        $mUnitName = "円";
	        break;
	    case 1:
	        $mUnitName = "千円";
	        break;
	    case 2:
	        $mUnitName = "万円";
	        break;
	}
}else{
	$mUnitName  = "円";
}

//計算処理
//元金均等返済方式
//HTMLヘッダの書き出し
?>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.1//EN" "http://www.w3.org/TR/xhtml11/DTD/xhtml11.dtd"> 
<html>
<head>
	<meta http-equiv="Content-Type" content="text/html; charset=euc-jp">
	<meta http-equiv="content-style-type" content="text/css">
	<meta name="robots" content="noindex, nofollow">
	<script type="text/javascript" src="./js/BRR0500.js"></script>
	<script type="text/javascript" src="./js/BRR.js"></script>
	<title><?PHP  echo($PHP_SYSNAME); ?></title>
	<link type="text/css" href="./templates/css/BRR.css" rel="stylesheet" />
	<link rel="stylesheet" href="./templates/SIMmain.css" type="text/css" />
</head>
<?PHP 
//タイトル部分の表示
	dspTitle($PHP_SYSNAME, $PHP_GROUP_NAME, $PHP_BUMON_NAME, $PHP_USER_NAME,"http://www.f-mtclab.net/article/134360170.html#help0");
//メインHTML部分の表示
//[0]システムURL、[1]HP URL、[2]マニュアルURL、[3]MTC HP URL、[4]マスタメールアドレス、
//[5]借入先、[6]借入日、[7]借入額、[8]借入区分、[9]初回返済日、[10]予定返済日、
//[11]借入利率[12]返済回数[13]支払い種別[14]端数処理区分[15]担保内容[16]コメント
$o_smarty->assign('DEFARR_BRR',$DEFARR_BRR);
$o_smarty->assign('PHP_SYSNAME',$PHP_SYSNAME);
$o_smarty->assign('PHP_GROUP_NAME',$PHP_GROUP_NAME);
$o_smarty->assign('PHP_USER_NAME',$PHP_USER_NAME);
$o_smarty->assign('lstY',$lstY);
$o_smarty->assign('kr_K',$kr_K);//借入区分
$o_smarty->assign('lstH',$lstH);//返済区分
$o_smarty->assign('lstM',$lstM);
$o_smarty->assign('lstK',$lstK);
$o_smarty->assign('mon',$mon);
$o_smarty->assign('yyyy',$yyyy);
$o_smarty->assign('mUnitName',$mUnitName);
$o_smarty->assign('START_MONEY_BRR',$START_MONEY_BRR);
$o_smarty->assign('START_MONEY_BRR_TOTAL',number_format($START_MONEY_BRR_TOTAL));
$o_smarty->assign('DISP_CNT',$DISP_CNT);
$o_smarty->assign('chousei',$chousei);
$o_smarty->assign('shikin',$shikin);
$o_smarty->assign('dspshikin',$dspshikin);
$o_smarty->assign('sUnitName',$sUnitName);
$o_smarty->assign('dataYM',$dataYM);
/**********前年比*******/
$o_smarty->assign('zdataYM',$zdataYM);
$o_smarty->assign('zpData',$zpData);
$o_smarty->assign('chgmode',$chgmode);
/***********************/
/******担保、コメント**********/
$o_smarty->assign('tanpo',$tanpo);
$o_smarty->assign('comment',$comment);
//日付
$o_smarty->assign('kariire_YMD',$kariire_YMD);//借入日
$o_smarty->assign('ginkoName',$ginkoName);
$o_smarty->assign('dete_kr',$dete_kr);
$o_smarty->assign('dete_year',$dete_year);
$o_smarty->assign('dete_month',$dete_month);
$o_smarty->assign('dete_day',$dete_day);
//銀行
$o_smarty->assign('lst_ginko',$lst_ginko);

$o_smarty->assign('kData',$kData);
$o_smarty->assign('pData',$pData);
$o_smarty->assign('total',$total);
$o_smarty->assign('itotal',$itotal);
$o_smarty->assign('itotalM',$itotalM);
$o_smarty->assign('dsphensai',$dsphensai);//月額返済額合計

$o_smarty->assign('kr_kubun',$kr_kubun);//借入区分
$o_smarty->assign('kinri',$kinri);//借入利率（金利）
$o_smarty->assign('hensai_count',$hensai_count);//返済回数
$o_smarty->assign('hensai',$hensai);//月あたりの返済額
$o_smarty->assign('kr_radio',$kr_radio);//ラジオボタン

$o_smarty->assign('lst_sd',$lst_sd);
$o_smarty->assign('lst_ed',$lst_ed);
$o_smarty->assign('kmodeCHK',$kmodeCHK);

$o_smarty->assign('totalHensai',$totalHensai);
$o_smarty->assign('totalRisoku',$totalRisoku);

$o_smarty->assign('SIM_cboYaer',$_POST["SIM_cboYaer"]);
$o_smarty->assign('SIM_cboMon',$_POST["SIM_cboMon"]);
$o_smarty->assign('SIM_cboKikan',$_POST["SIM_cboKikan"]);

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

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

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

$o_smarty->display('BRR0500.tpl');
//フッタ部分の表示
	dspFooter($DEFARR_BRR[1], $DEFARR_BRR[3],"http://www.f-mtclab.net/article/134360170.html#help0");
/*****関数********/
function edit_kubun($prm){
	$kr_st = array("",1,2);
	$kr_stNameArr =array("全て表示","長期借入金","短期借入金");
	$ret = "";
	for($i=0;$i<count($kr_st);$i++){
		if($kr_st[$i] == $prm){
			$ret .= "<option value='".$kr_st[$i]."' selected>".$kr_stNameArr[$i]."</option>";
		}else{
			$ret .= "<option value='".$kr_st[$i]."'>".$kr_stNameArr[$i]."</option>";
		}
	}
	return $ret;
}
function edit_sts($prm){
/***************************
返済状況SELECTION
****************************/
//0->全て表示　1->返済中のみ表示　2->返済済み表示
	$hen_st = array("",1,2);
	$hen_stNameArr =array("全て表示","返済中のみ表示","完済のみ表示");
	$ret = "";
	for($i=0;$i<count($hen_st);$i++){
		if($hen_st[$i] == $prm){
			$ret .= "<option value='".$hen_st[$i]."' selected>".$hen_stNameArr[$i]."</option>";
		}else{
			$ret .= "<option value='".$hen_st[$i]."'>".$hen_stNameArr[$i]."</option>";
		}
	}
	return $ret;
}
/**********************************************
		銀行コード
***********************************************/
function ginko_lst($prm){
	$ret = "";
	$flg = 0;
	$strSQL = "select * from mst_bank ORDER BY disp_rank ASC";
	$objRec = pg_exec($strSQL);
	if($objRec==false){
		echo("SQL実行に失敗しました(SELECT)");
		exit;
	}
	$ret .= "<option value=".'"'.'" selected>選択してください'."</option>";
	if(pg_numrows($objRec)>0){
		
		for($i=0;$i<pg_numrows($objRec);$i++){
			$objData = pg_fetch_object($objRec, $i);
			$name[$i]  = $objData->bank_name;
			$code[$i]  = $objData->bank_id;
			if($code[$i]==$prm){
				$ret .= "<option value=".'"'.$code[$i].'" selected>'.$name[$i]."</option>";
			}else{
				$ret .= "<option value=".'"'.$code[$i].'">'.$name[$i]."</option>";
			}
		}
		return $ret;
	}
}

?>