<?php

require_once('ConnectDB.class.php');

define('DB_TYPE', 'mysql');
define('DB_USER', 'root');
define('DB_PASSWORD', 'mSNIB3zuts');
define('DB_NAME', 'ttt_jmedb');
define('DB_DSN', DB_TYPE.'://'.DB_USER.':'.DB_PASSWORD.'@localhost/'.DB_NAME);

$db = &new ConnectDB(DB_DSN);

echo "<pre>\n";
if($db->connect()) {
  $sql = "SELECT `99ksa2`. * , `資金繰り評価`, `売上高`, `売上総利益`, `受取利息配当金`, `支払利息`, `経常利益`, ";
  $sql.= "`営業キャッシュフロー当期`, `営業キャッシュフロー前期`, `固定資産当期`, `流動負債`, `固定負債`, ";
  $sql.= "`利益剰余金`, `自己資本`, `総資本当期`, `総資本前期`, `純支払利息比率` , `負債回転期間X2` , ";
  $sql.= "`総資本売上総利益率X3` , `売上高経常利益率X4` , `自己資本対固定資産比率` , `自己資本比率X6` , ";
  $sql.= "`営業キャッシュフローX7` , `利益剰余金X8`,`審査基準日`,`更新日`,`新旧区分`, ";
  $sql.= "`支払利息`,`有利子負債`,`完工高対象`,`完工高以前`,`営業利益`,`キャッシュ・フロー`,`当期純利益`,";
  $sql.= "`受取利息配当金`,`総資本当期`,`支払勘定`,`自己資本`,`受取勘定`,`未成工事支出金`,`未成工事受入金`";
  $sql.= "FROM `99ksa2`";
  $sql.= "LEFT JOIN `00index` ON `99ksa2`.`ID` = `00index`.`ID`";
  $sql.= "LEFT JOIN `00last_alm` ON `99ksa2`.`ID` = `00last_alm`.`ID`";
  $sql.= "LEFT JOIN `93update` ON `ver`=RIGHT(`HDER`,2);";
  
  if($db->load($sql)) {
    $record = $db->getRecord();
    
    /* ヘッダー出力 */
    echo "no\tID\t資金繰り評価\tJME値\t総合評価\t売上高\t売上総利益\t受取利息配当金\t支払利息\t経常利益\t";
    echo "営業キャッシュフロー当期\t営業キャッシュフロー前期\t固定資産\t流動負債\t固定負債\t";
    echo "利益剰余金\t自己資本\t総資本当期\t総資本前期\t純支払利息比率X1\t負債回転期間X2\t総資本売上総利益率X3\t";
    echo "売上高経常利益率X4\t自己資本対固定資産比率X5\t自己資本比率X6\t営業キャッシュフローX7\t利益剰余金X8\t";
    echo "審査基準日\t更新日\t新旧区分\n";
    
    require_once 'JMEScore.class.php';
    require_once 'funcComments.php';
    
    foreach($record as $rec) {
        /* JME値オブジェクト生成 */
        $jmev = new JMEScore();
        
        /* 演算用科目 */
        $v['売上高'] = $rec['売上高'] != null ? $rec['売上高'] : 0;
        $v['営業利益'] = $rec['営業利益'] != null ? $rec['営業利益'] : 0;
        $v['受取利息配当金'] = $rec['受取利息配当金'] != null ? $rec['受取利息配当金'] : 0;
        $v['支払利息'] = $rec['支払利息'] != null ? $rec['支払利息'] : 0;
        $v['当期純利益'] = $rec['当期純利益'] != null ? $rec['当期純利益'] : 0;
        
        $v['受取勘定'] = $rec['受取勘定'] != null ? $rec['受取勘定'] : 0;
        $v['未成工事支出金'] = $rec['未成工事支出金'] != null ? $rec['未成工事支出金'] : 0;
        $v['支払勘定'] = $rec['支払勘定'] != null ? $rec['支払勘定'] : 0;
        $v['未成工事受入金'] = $rec['未成工事受入金'] != null ? $rec['未成工事受入金'] : 0;
        $v['自己資本'] = $rec['自己資本'] != null ? $rec['自己資本'] : 0;
        $v['総資本当期'] = $rec['総資本当期'] != null ? $rec['総資本当期'] : 0;
        $v['有利子負債'] = $rec['有利子負債'] != null ? $rec['有利子負債'] : 0;
        $v['キャッシュ・フロー'] = $rec['キャッシュ・フロー'] != null ? $rec['キャッシュ・フロー'] : 0;
        
        $v['完工高対象'] = $rec['完工高対象'] != null ? $rec['完工高対象'] : 0;
        $v['完工高以前'] = $rec['完工高以前'] != null ? $rec['完工高以前'] : 0;
        
        /* スコア計算 */
        $rs01 = $jmev->set_score01($v['支払利息'], $v['有利子負債']);
        $rs02 = $jmev->set_score02($v['完工高対象'], $v['完工高以前']);
        $rs03 = $jmev->set_score03($v['営業利益'], $v['キャッシュ・フロー'], $v['当期純利益'], $v['有利子負債']);
        $rs04 = $jmev->set_score04($v['有利子負債'], $v['売上高']);
        $rs05 = $jmev->set_score05($v['支払利息'], $v['受取利息配当金'], $v['売上高']);
        $rs06 = $jmev->set_score06($v['有利子負債'], $v['総資本当期']);
        $rs07 = $jmev->set_score07($v['支払勘定'], $v['完工高対象']);
        $rs08 = $jmev->set_score08($v['受取利息配当金'], $v['支払利息'], $v['完工高対象']);
        $rs09 = $jmev->set_score09($v['自己資本'], $v['総資本当期']);
        $rs10 = $jmev->set_score10($v['支払利息'], $v['受取利息配当金'], $v['完工高対象']);
        $rs11 = $jmev->set_score11($v['総資本当期'], $v['自己資本']);
        $rs12 = $jmev->set_score12($v['有利子負債'], $v['自己資本']);
        $rs13 = $jmev->set_score13($v['受取勘定'], $v['未成工事支出金'], $v['未成工事受入金'], $v['自己資本']);
        $rs   = round($jmev->get_score(),1);
        
        /* 総合評価算出 */
        $tcm = cmTotal(array(
            'JME値'=>$rs,
            'ALARM値'=>$rec['資金繰り評価']
            )
        );
        
        /* NULL出力処理 */
        $rec['資金繰り評価'] = $rec['資金繰り評価'] != null ? $rec['資金繰り評価'] : "NULL";
        $rs = $rs != null ? $rs : "NULL";
        $tcm['score'] = $tcm['score'] != '　' ? $tcm['score'] : "NULL";
        $rec['売上高'] = $rec['売上高'] != null ? $rec['売上高'] : "NULL";
        $rec['純支払利息比率'] = $rec['純支払利息比率'] != null ? $rec['純支払利息比率'] : "NULL";
        $rec['負債回転期間X2'] = $rec['負債回転期間X2'] != null ? $rec['負債回転期間X2'] : "NULL";
        $rec['総資本売上総利益率X3'] = $rec['総資本売上総利益率X3'] != null ? $rec['総資本売上総利益率X3'] : "NULL";
        $rec['売上高経常利益率X4'] = $rec['売上高経常利益率X4'] != null ? $rec['売上高経常利益率X4'] : "NULL";
        $rec['自己資本対固定資産比率'] = $rec['自己資本対固定資産比率'] != null ? $rec['自己資本対固定資産比率'] : "NULL";
        $rec['自己資本比率X6'] = $rec['自己資本比率X6'] != null ? $rec['自己資本比率X6'] : "NULL";
        $rec['営業キャッシュフローX7'] = $rec['営業キャッシュフローX7'] != null ? $rec['営業キャッシュフローX7'] : "NULL";
        $rec['利益剰余金X8'] = $rec['利益剰余金X8'] != null ? $rec['利益剰余金X8'] : "NULL";
        $rec['審査基準日'] = $rec['審査基準日'] != null ? $rec['審査基準日'] : "NULL";
        $rec['更新日'] = $rec['更新日'] != null ? $rec['更新日'] : "NULL";
        $rec['新旧区分'] = $rec['新旧区分'] != null ? $rec['新旧区分'] : "NULL";
        
        //echo $rec['ID']."\t".$rs."\n";
        echo $rec['no']."\t";
        echo $rec['ID']."\t";
        echo $rec['資金繰り評価']."\t";
        echo $rs."\t";
        echo $tcm['score']."\t";
        echo $rec['売上高']."\t";
        echo $rec['売上総利益']."\t";
        echo $rec['受取利息配当金']."\t";
        echo $rec['支払利息']."\t";
        echo $rec['経常利益']."\t";
        echo $rec['営業キャッシュフロー当期']."\t";
        echo $rec['営業キャッシュフロー前期']."\t";
        echo $rec['固定資産当期']."\t";
        echo $rec['流動負債']."\t";
        echo $rec['固定負債']."\t";
        echo $rec['利益剰余金']."\t";
        echo $rec['自己資本']."\t";
        echo $rec['総資本当期']."\t";
        echo $rec['総資本前期']."\t";
        echo $rec['純支払利息比率']."\t";
        echo $rec['負債回転期間X2']."\t";
        echo $rec['総資本売上総利益率X3']."\t";
        echo $rec['売上高経常利益率X4']."\t";
        echo $rec['自己資本対固定資産比率']."\t";
        echo $rec['自己資本比率X6']."\t";
        echo $rec['営業キャッシュフローX7']."\t";
        echo $rec['利益剰余金X8']."\t";
        echo $rec['審査基準日']."\t";
        echo $rec['更新日']."\t";
        echo $rec['新旧区分']."\n";
    }
    
    
  } else {
    $err = $db->getError();
    echo "Error: ${err}\n";
  }
  $db->close();
} else {
  $err = $db->getError();
  echo "Error: ${err}\n";
}
echo "</pre>\n";
exit();
?>
