<?php
/**
 * by單台計算MI
 * @url /wms/mkt/pricereview_mi-api.php
 * @method POST
 * @return JSON
 * 
 * request
 * {
 *  "pa"
 * }
 * pa : 價審單序號,是否汰改
 * respons json
 * {
 *  "st" : "ok",
 *  "err" : ""
 * }
 **/
ob_start();
include "../header.php";
ob_end_clean();
$rarr = array('st' => 'ok', 'err' => '');

try {
    if (empty($_POST) || empty($_POST["pa"])) throw new \Exception("parameter empty");

    foreach ($_POST as $k => $v) {
        $$k = htmlspecialchars(stripslashes(trim($v)));
    }

    if (empty($pa)) throw new \Exception("parameter empty[2]");
    $opt = "";
    if (strpos($pa, ",")) list($id, $opt) = explode(",", $pa);
    else $id = $pa;

    $person2weight_arr = [ "6" => "450",
                           "8" => "550",
                           "9" => "600",
                          "10" => "700",
                          "11" => "750",
                          "12" => "800",
                          "13" => "900",
                          "15" => "1000",
                          "17" => "1150",
                          "20" => "1350",
                          "24" => "1600"];

    $elev_arr = $elev_opt_arr = $pv_arr = $opt_elev_arr = $mi_arr = [];
    $i = $weight = $elev_qty_all = 0;

    // 電梯項目
    $sql = "select note, item_qty, item_weight, item_op, item_spec, item_no from pricereview_item where mid = '$id' and item_group = 'A' order by item_no";
    $res = mysqli_query($link, $sql);
    while ($row = mysqli_fetch_row($res)) {
        if (!empty($row[0])) list($etype, $persons, $floors, $speed) = explode(",", $row[0]);
        else $etype = $persons = $floors = $speed = '';
        /*
        $item_qty = $row[1];    // 數量
        $item_weight = $row[2]; // 載重
        $item_op = $row[3];     // 開門方式
        $item_spec = $row[4];   // 電梯規格
        $item_no = $row[5];
        */
        $elev_arr[$row[5]]["item_qty"] = $row[1];
        $elev_arr[$row[5]]["item_weight"] = $row[2];
        $elev_arr[$row[5]]["item_op"] = $row[3];
        $elev_arr[$row[5]]["item_qty"] = $row[1];
        $elev_arr[$row[5]]["item_spec"] = $row[4];
        $elev_arr[$row[5]]["etype"] = $etype;
        $elev_arr[$row[5]]["persons"] = $persons;
        $elev_arr[$row[5]]["floors"] = $floors;
        $elev_arr[$row[5]]["speed"] = $speed;
        $elev_arr[$row[5]]["option"] = [];
        $elev_qty_all += $row[1];
    }
    mysqli_free_result($res);

    // 電梯所屬OPTION
    $opt_sel_id_arr = [];
    $sql  = "select id, price_id, item_spec, item_qty, option_relate_spec from pricereview_item where mid = '$id' and item_group = 'B'";
    $res = mysqli_query($link, $sql);
    while ($row = mysqli_fetch_row($res)) {
        $opt_elev_arr[$row[0]]["price_id"] = $row[1];
        $opt_elev_arr[$row[0]]["item_spec"] = $row[2];
        $opt_elev_arr[$row[0]]["item_qty"] = $row[3];
        $tmp_arr = explode(",", $row[4]);
        $opt_elev_arr[$row[0]]["elev_no"] = $tmp_arr;
        if (!empty($opt_elev_arr[$row[0]]["elev_no"][0])) {
            foreach ($tmp_arr as $v) {
                $elev_arr[$v]["option"][] = $row[0];
                $opt_sel_id_arr[] = $row[0];
            }
        }
        
        /*
        $pv_arr["price_id"] = $row[1];
        $pv_arr["item_spec"] = $row[2];
        $pv_arr["item_qty"] = $row[3];
        $pv_arr["elev_item_no"] = explode(",", $row[4]);

        $tmp_arr = explode(",", $row[4]);
        foreach ($tmp_arr as $v) {
            $elev_opt_arr[$v][] = $pv_arr;
        }
        */

    }
    mysqli_free_result($res);
    $opt_nosel_id_arr = array_diff(array_keys($opt_elev_arr), $opt_sel_id_arr);

    // 保固延長<->電梯項次
    $mn_arr = [];
    $sql  = "select id, item_spec, item_qty, option_relate_spec from pricereview_item where mid = '$id' and item_group = 'D'";
    $res = mysqli_query($link, $sql);
    while ($row = mysqli_fetch_row($res)) {
        $mn_arr[$row[0]]["item_spec"] = $row[1];
        $mn_arr[$row[0]]["item_qty"] = $row[2];
        $tmp_arr = explode(",", $row[3]);
        $mn_arr[$row[0]]["elev_no"] = $tmp_arr;
        foreach ($tmp_arr as $v) {
            $elev_arr[$v]["mn"][] = $row[0];
        }
    }
    mysqli_free_result($res);

    // 除外項目平均分到每台電梯
    $exarr = [];
    $ex_fee = $j = 0;
    $sql  = "select id, item_spec, item_price_bp from pricereview_item where mid = '$id' and item_group = 'E'";
    $res = mysqli_query($link, $sql);
    while ($row = mysqli_fetch_row($res)) {
        $exarr[$j][0] = $row[1];
        $exarr[$j][1] = round($row[2]/$elev_qty_all, 0);
        $ex_fee += $exarr[$j][1];
        $j++;
    }
    mysqli_free_result($res);

    // 拆梯&美容平均分到每台電梯
    $dismantle_fee = $dismantle_amt = $polishing_fee = $polishing_amt = 0;
    if ($opt == "R") {
        $sql3 = "select item_spec, item_qty, note from pricereview_item where mid = '$id' and item_group = 'C'";
        $res_i = mysqli_query($link, $sql3);
        while ($row_i = mysqli_fetch_assoc($res_i)) {
            $sql4  = "select min_floors, price, price_plus from dismantle_mi_option where spec = '".$row_i["item_spec"]."' ";
            $sql4 .= "and version_date = '2023-09-04'";
            $sql4 .= "and ($row_i[note] between min_floors and max_floors) ";
            $res_d = mysqli_query($link, $sql4);
            if ($row_d = mysqli_fetch_assoc($res_d)) {
                $dismantle_amt += ($row_d["price"] + $row_d["price_plus"]*($row_i["note"] - $row_d["min_floors"]))*$row_i["item_qty"];
                $polishing_amt += 3000*$row_i["note"];
            }
            mysqli_free_result($res_d);
        }
        mysqli_free_result($res_i);
    }
    $dismantle_fee = round($dismantle_amt/$elev_qty_all, 0);
    $polishing_fee = round($polishing_amt/$elev_qty_all, 0);

    //print_r($elev_arr);
    //print_r($opt_elev_arr);
    //print_r($opt_nosel_id_arr);
    //print_r($mn_arr);
    //print_r($ex_arr);exit;
    
    foreach ($elev_arr as $item_no => $v) {
        // 電梯MI
        $sql2  = "select o.*, r.* from elevator_mi_option o, elevator_quotation_rule r ";
        $sql2 .= "where o.quotation_no = r.quotation_no and o.elevator_type = '".$v['etype']."' ";
        $sql2 .= "and ($v[item_weight] between o.min_weight and o.max_weight) ";
        $sql2 .= "and ($v[floors] between o.min_floors and o.max_floors) ";
        $sql2 .= "and ($v[speed] between o.min_speed and o.max_speed) ";
        if ($v["etype"] == "MAQ100" || $v["etype"] == "MAP100") {
            $sql2 .= "and (o.model_no = '".$v["persons"]."') ";
        }
        $res_e = mysqli_query($link, $sql2);
        if ($row_e = mysqli_fetch_assoc($res_e)) {
            // 基准采购成本+±1停材料费+设计费+出口费用
            $part1 = $row_e["purchase_cost"]+($v["floors"]-$row_e["base_floor"])*$row_e["material_plus"]+$row_e["design"]*$row_e["design_hour"]+$row_e["export_fee"];
            // 利潤
            $profit = round($part1*$row_e["profit"]+$row_e["equip_profit"], 0);
            // 設備
            $equipment_ntd = round(($part1+$profit)*$row_e["equipment"], 0);
            // 報關+運輸
            $customs = round($equipment_ntd*$row_e["shipping"], 0)+$row_e["customs_shipping"];
            // 安裝基價
            $install_base = $row_e["install_price"]+$row_e["trial_price"]+$row_e["install_coef"]*$row_e["install_plus"]+$row_e["trial_coef"]*$row_e["trial_plus"];
            // 安裝成本
            $install_price = round($install_base+($row_e["install_plus"]+$row_e["trial_plus"])*($v["floors"]-$row_e["base_floor"]), 0);
            // 起吊+木箱+耗材
            $woods = $row_e["crane"]+$row_e["wooden_box"]+$row_e["consume"]+$row_e["consumables"];
            // MI
            $mi = $equipment_ntd+$customs+$row_e["unloading"]+$row_e["transport_site"]+$install_price+$row_e["free1y"]+$woods+$row_e["option_price"];

            /*
            $install_price = $row_e["install_price"] + $row_e["install_plus"]*($floors - $row_e["min_floors"]); // 安裝
            $trial_price = $row_e["trial_price"] + $row_e["trial_plus"]*($floors - $row_e["min_floors"]);       // 試車
            $extra_fee = round($row_e["install_price"]*$row_e["extra_rate"], 0);   // 預抓配合工程
            // 安裝成本
            $install_cost_total = $install_price + $trial_price + $extra_fee + $row_e["crane"] + $row_e["wooden_box"] + $row_e["consume"] + $row_e["consumables"];
            // 設計費
            $design_fee = $row_e["design"]*$row_e["design_hour"];
            // 利潤
            if (strpos($row_e["profit"], ".") !== false) {
                $profit_amt = round(($row_e["purchase_cost"] + ($floors - $row_e["base_floor"])*$row_e["material_plus"] + $design_fee + $row_e["export_fee"])*$row_e["profit"], 0);
            } else $profit_amt = $row_e["profit"];
            // 報價
            $quotation = $row_e["purchase_cost"] + ($floors - $row_e["base_floor"])*$row_e["material_plus"] + $design_fee + $row_e["export_fee"] + $profit_amt;
            // 設備折合台幣
            $equipment_ntd = round($quotation*$row_e["equipment"], 0);
            // 報關+運輸費
            if (strpos($row_e["shipping"], ".") !== false) {
                $shipping_fee = round($equipment_ntd*$row_e["shipping"], 0);
            } else $shipping_fee = $row_e["shipping"];
            // MI
            $mi = $equipment_ntd + $shipping_fee + $row_e["unloading"] + $row_e["transport_site"] + $install_cost_total + $row_e["free1y"] + $row_e["option_price"] + $row_e["weight_price"];
            */
            // 拆梯價格
            /*
            $dismantle_fee = $polishing_fee = 0;
            if ($opt == "R") {
                $sql3 = "select item_spec, item_qty, note from pricereview_item where mid = '$id' and item_group = 'C'";
                $res_i = mysqli_query($link, $sql3);
                while ($row_i = mysqli_fetch_assoc($res_i)) {
                    $sql4  = "select min_floors, price, price_plus from dismantle_mi_option where spec = '".$row_i["item_spec"]."' ";
                    $sql4 .= "and ($floors between min_floors and max_floors) ";
                    $sql4 .= "and version_date = '2023-09-04'";
                    $res_d = mysqli_query($link, $sql4);
                    if ($row_d = mysqli_fetch_assoc($res_d)) {
                         $dismantle_fee += ($row_d["price"] + $row_d["price_plus"]*($floors - $row_d["min_floors"]))*$row_i["item_qty"];
                         $polishing_fee += 3000*$row_i["note"];
                    }
                    mysqli_free_result($res_d);
                }
                mysqli_free_result($res_i);
            }
            */

            // Option價格
            $oparr = [];
            $option_fee = $j = 0;
            $todo_opt_arr = $v["option"];
            if (empty($todo_opt_arr)) $todo_opt_arr = $opt_nosel_id_arr;
            if (!empty($todo_opt_arr)) {
                foreach ($todo_opt_arr as $val) {
                    $sql4  = "select o.base_floor, o.base_floor_plus, o.price, r.equipment from option_mi o, elevator_quotation_rule r ";
                    $sql4 .= "where o.quotation_no = r.quotation_no and o.option_price_id = ".$opt_elev_arr[$val]["price_id"]." ";
                    $sql4 .= "and ($v[item_weight] between o.min_weight and o.max_weight) and o.open_kind = '".$v["item_op"]."'";
                    $res_om = mysqli_query($link, $sql4);
                    if ($row_om = mysqli_fetch_assoc($res_om)) {
                        $plus = ($v["floors"] > $row_om["base_floor"]) ? ($v["floors"] - $row_om["base_floor"])*$row_om["base_floor_plus"] : 0;
                        // 特例
                        if ($opt_elev_arr[$val]["price_id"] == "256" && ($v["floors"] < $row_om["base_floor"])) $row_om["price"] = 9815;
                        if ($opt_elev_arr[$val]["price_id"] == "266" && $v["floors"] >= 20) $plus += 44.8;    // 15层，14.6元/层（19层内，跳20层再追加44.8元）
                        // 含此option的電梯總台數
                        $myelev_qty = 0;
                        foreach ($opt_elev_arr[$val]["elev_no"] as $pval) {
                            $myelev_qty += $elev_arr[$pval]["item_qty"];
                        }
                        // 分配：OPTION數量除以電梯總台數
                        $option_amt = round(0+($row_om["price"]+$plus)*($opt_elev_arr[$val]["item_qty"]/$myelev_qty)*$row_om["equipment"], 0);
                        $option_fee += $option_amt;  // option總金額
                        
                        $oparr[$j][1] = $option_amt;
                    } else {
                        $oparr[$j][1] = 0;
                    }
                    $oparr[$j][0] = $opt_elev_arr[$val]["item_spec"];
                    $j++;
                }
            }

            // 保固延長
            $mnarr = [];
            $mn_fee = $j = 0;
            if (!empty($v["mn"][0])) {
                foreach ($v["mn"] as $val) {
                    $mn_amt = 0;
                    $mnarr[$j][0] = $mn_arr[$val]["item_spec"]."保養費";
                    $mnarr[$j][1] = $mn_amt;
                    $mn_fee += $mn_amt;
                    $j++;
                }
            }

            /*

            $sql3  = "select id, price_id, item_spec, item_qty from pricereview_item ";
            $sql3 .= "where mid = '$id' and item_group = 'B' and option_relate_spec like '".$item_no.",%' order by item_no";
            //echo $sql3;exit;
            $res_b = mysqli_query($link, $sql3);
            while ($row_b = mysqli_fetch_assoc($res_b)) {
                $sql4  = "select o.base_floor, o.base_floor_plus, o.price, r.equipment from option_mi o, elevator_quotation_rule r ";
                $sql4 .= "where o.quotation_no = r.quotation_no and o.option_price_id = ".$row_b["price_id"]." ";
                $sql4 .= "and ($item_weight between o.min_weight and o.max_weight) and o.open_kind = '$item_op'";
                $res_om = mysqli_query($link, $sql4);
                $row_om = mysqli_fetch_assoc($res_om);
                $plus = ($floors > $row_om["base_floor"]) ? ($floors - $row_om["base_floor"])*$row_om["base_floor_plus"] : 0;

                // 特例
                if ($row_b["price_id"] == "256" && ($floors < $row_om["base_floor"])) $row_om["price"] = 9815;
                if ($row_b["price_id"] == "266" && $floors >= 20) $plus += 44.8;    // 15层，14.6元/层（19层内，跳20层再追加44.8元）

                $option_amt = round(0+($row_om["price"]+$plus)*$row_b["item_qty"]*$row_om["equipment"], 0);
                $option_fee += $option_amt;  // option總金額
                $oparr[$j][0] = $row_b["item_spec"];
                $oparr[$j][1] = $option_amt;
                $j++;
                mysqli_free_result($res_om);
            }
            mysqli_free_result($res_b);
            */

            // 拆台數
            for ($n = 0; $n<$v["item_qty"]; $n++) {
                $mi_arr[$i][0] = $mi + $dismantle_fee + $polishing_fee + $option_fee + $ex_fee + $mn_fee;
                /*
                $mi_arr[$i][1] = $row_e["purchase_cost"];
                $mi_arr[$i][2] = $row_e["material_plus"];
                $mi_arr[$i][3] = $design_fee;
                $mi_arr[$i][4] = $row_e["export_fee"];
                $mi_arr[$i][5] = $profit_amt;
                $mi_arr[$i][6] = $quotation;
                */
                $mi_arr[$i][1] = 0+$equipment_ntd;
                $mi_arr[$i][2] = 0+$customs;
                $mi_arr[$i][3] = 0+$row_e["unloading"];
                $mi_arr[$i][4] = 0+$row_e["transport_site"];
                $mi_arr[$i][5] = 0+$install_price;
                $mi_arr[$i][6] = 0+$row_e["free1y"];
                $mi_arr[$i][7] = 0+$woods;
                $mi_arr[$i][8] = $row_e["equipment"];
                $mi_arr[$i][9] = 0+$row_e["option_price"];
                $mi_arr[$i][10] = 0+$dismantle_fee;
                $mi_arr[$i][11] = 0+$polishing_fee;
                $mi_arr[$i][12] = $mi_arr[$i][1]+$mi_arr[$i][2]+$mi_arr[$i][3]+$mi_arr[$i][4]+$mi_arr[$i][5]+$mi_arr[$i][6]+$mi_arr[$i][7]+$mi_arr[$i][9]+$mi_arr[$i][10]+$mi_arr[$i][11];
                $mi_arr[$i][13] = $option_fee+$ex_fee+$mn_fee;
                $mi_arr[$i][14] = $oparr;
                $mi_arr[$i][15] = 0+$ex_fee;
                $mi_arr[$i][16] = $exarr;
                $mi_arr[$i][17] = 0+$mn_fee;
                $mi_arr[$i][18] = $mnarr;
                $i++;
            }
        }
        mysqli_free_result($res_e);
    }

    $rarr["content"] = $mi_arr;
}catch(\Exception $e) {
    $rarr['st'] = 'err';
    $rarr['err'] = $e->getMessage();
}

echo json_encode($rarr, JSON_UNESCAPED_UNICODE);
exit;
?>