<?php
/**
 * Created by PhpStorm.
 * User: weizongsong
 * Date: 2019-04-12
 * Time: 22:34
 */

namespace App\Http\Controllers\Admin;

use App\Customer;
use App\Libs\AlipayF2F;
use App\Models\AdminAreaLink;
use App\Models\Area;
use App\Models\Balance;
use App\Models\Bed;
use App\Models\FactorItems;
use App\Models\OrderItems;
use App\Models\Orders;
use App\Models\Paramedic;
use App\Models\Product;
use App\Models\ProductItems;
use App\Models\Project;
use App\Models\Recharge;
use App\Models\Refund;
use App\Scopes\AdminProjectScope;
use Carbon\Carbon;
use Illuminate\Http\Request;
use Illuminate\Support\Facades\Auth;
use Illuminate\Support\Facades\DB;
use PhpOffice\PhpSpreadsheet\Spreadsheet;
use PhpOffice\PhpSpreadsheet\Writer\Xlsx;
use Spatie\Permission\Models\Role;

class StatisticsController extends CommonController
{
    public $bladePath = "admin.statistics";
    public $urlPrefix = "admin/statistics";
    public $modelName = "数据统计";
    public $noProjects = "用户名下没有可以管理的项目";

    public function _checkProjects()
    {
        $projects = (new Project())->adminProject()->orderBy("id", "desc")->get();
        view()->share(compact("projects"));
        return $projects;
    }

    public function getYears()
    {
        $start_year = config("start_year");
        $years = [];
        for ($i = date("Y"); $i >= $start_year; $i--) {
            $years[] = $i;
        }
        view()->share(compact("years"));
    }

    public function _getMonths()
    {
        $months = [];
        for ($i = 1; $i <= 12; $i++) {
            $mm = $i < 10 ? "0" . $i : $i;
            $months[] = (date("Y") - 2) . "-" . $mm;
        }
        for ($i = 1; $i <= 12; $i++) {
            $mm = $i < 10 ? "0" . $i : $i;
            $months[] = (date("Y") - 1) . "-" . $mm;
        }
        for ($i = 1; $i <= 12; $i++) {
            $mm = $i < 10 ? "0" . $i : $i;
            $months[] = date("Y") . "-" . $mm;
        }

        view()->share(compact("months"));
        return $months;
    }

    public function _getMonthData()
    {
        $projects = $this->_checkProjects();
        $project_id = request()->project_id ?? $projects->first()->id;
        $project = $projects->keyBy("id")->toArray()["{$project_id}"];

        $month = request()->month ?? date("Y-m");
        $months = $this->_getMonths();

        DB::enableQueryLog();
        $paramedics = (new Paramedic())->withoutGlobalScope(AdminProjectScope::class)->where(function ($query) use ($project_id, $month) {
            $order_item_paramedic_ids = (new OrderItems())
                ->whereRaw("(DATE_FORMAT(`service_date`,'%Y-%m') = '{$month}' or DATE_FORMAT(`paid_at`,'%Y-%m') = '{$month}')")
                ->whereHas("order", function ($query) use ($project_id) {
                    $query->where("project_id", $project_id);
                })->pluck("paramedic_id")->toArray();
            $query->where("project_id", $project_id)->orWhereIn("id", $order_item_paramedic_ids);
        })->with(["orderItems" => function ($query) use ($month, $project_id) {
            $query->whereRaw("(DATE_FORMAT(`service_date`,'%Y-%m') = '{$month}' or DATE_FORMAT(`paid_at`,'%Y-%m') = '{$month}')")
                ->where("total", ">", 0)
                ->whereHas("order", function ($query) use ($project_id) {
                    $query->where("project_id", $project_id);
                })
                ->with(["order", "product", "productItem", "productParamedicLevel", "paramedic" => function ($query) {
                    $query->withoutGlobalScope(AdminProjectScope::class);
                }, "bed", "room", "building", "area"])
                ->orderBy("id");
        }])->get();

        $allItems = collect();
        foreach ($paramedics as $paramedic) {
            foreach ($paramedic->orderItems as $orderItem) {
                if ($orderItem->paid_at) {
                    $paid_at_this_month = Carbon::parse($orderItem->paid_at)->isSameMonth($month) ? true : false;
                } else {
                    $paid_at_this_month = false;
                }

                if (Carbon::parse($orderItem->service_date)->isSameMonth($month)) {
                    $orderItem->service_date_in_this_month = $orderItem->service_date;
                } else {
                    $orderItem->service_date_in_this_month = OrderItems::PREV_MONTH;
                }

                $orderItem->paid_at_this_month = $paid_at_this_month;
                $orderItem = $orderItem->calculateFee();
            }
            $paramedic->originalOrderItems = $paramedic->orderItems;
            $allItems = $allItems->concat($paramedic->orderItems);
            $paramedic->orderItems = $paramedic->orderItems->groupBy("service_date_in_this_month");
        }

        $days = date("t", strtotime($month));
        $dates = [];
        for ($i = 1; $i <= $days; $i++) {
            $dd = $i < 10 ? "0" . $i : $i;
            $dates[] = $dd;
        }
        $dates[] = OrderItems::PREV_MONTH;

        view()->share(compact("projects", "project_id", "month", "months", "dates", "paramedics", "allItems"));
        return compact("projects", "project_id", "month", "months", "dates", "paramedics", "allItems");
    }

    public function salary(Request $request)
    {
        $projects = $this->_checkProjects();
        if (!$projects->count()) {
            return $this->error($this->noProjects);
        }
        $this->_getMonthData();
        $laravel_duration = microtime(true) - LARAVEL_START;

        return view($this->urlPrefix . "/salary", compact("laravel_duration"));
    }

    public function overview(Request $request)
    {
        $projects = $this->_checkProjects();
        if (!$projects->count()) {
            return $this->error($this->noProjects);
        }
        $project_id = request()->project_id ?? $projects->first()->id;
        $project = Project::find($project_id);

        $month = request()->month ?? date("Y-m");
        $months = $this->_getMonths();

        $start_timestamp = strtotime($month);
        $end_timestamp = strtotime("+1 month", strtotime($month));
        //根据项目获取相关数据
        $prev_month_balance = Balance::whereRaw("UNIX_TIMESTAMP(`created_at`) < " . $start_timestamp)
            ->whereHas("order", function ($query) use ($project_id) {
                $query->where("project_id", $project_id);
            })->sum("money");
        $this_month_balance = Balance::whereRaw("UNIX_TIMESTAMP(`created_at`) < " . $end_timestamp)
            ->whereHas("order", function ($query) use ($project_id) {
                $query->where("project_id", $project_id);
            })->sum("money");
        $this_month_balances = Balance::whereRaw("UNIX_TIMESTAMP(`created_at`) >= " . $start_timestamp . " and UNIX_TIMESTAMP(`created_at`) < " . $end_timestamp)
            ->whereHas("order", function ($query) use ($project_id) {
                $query->where("project_id", $project_id);
            })->get();

        return view($this->urlPrefix . "/overview", compact("project_id", "month", "project", "prev_month_balance", "this_month_balance", "this_month_balances"));
    }

    public function syncOrderItems(Request $request)
    {
        DB::enableQueryLog();
        //采用指定订单号
        $model = OrderItems::whereHas("order", function ($query) {
            $query->whereIn("serial", ["20240101000016", "20240103000044", "20240103000055", "20240103000068", "20240104000010", "20240104000011", "20240104000012", "20240104000035", "20240104000040", "20240105000009", "20240105000042", "20240105000049", "20240105000051", "20240105000063", "20240105000064", "20231212000051", "20240104000023", "20240104000033", "20240104000036", "20240104000049", "20240104000059", "20240104000060", "20240105000043", "20240105000045", "20240105000048", "20240105000065", "20240105000066", "20240101000024", "20240104000007", "20240104000030", "20240104000034", "20240104000044", "20240104000065"]);
        })->where("factors", "not like", "%所在科室%");
        //采用指定订单号结束

        if ($request->last_id) {
            $model = $model->where("id", ">", $request->last_id);
        }
        $orderItems = $model->with("order")->limit(50)->get();

        if (!$orderItems->count()) {
            dd("已处理完毕");
        }

        DB::beginTransaction();
        try {
            foreach ($orderItems as $orderItem) {
                $factors = json_decode($orderItem->factors, true);
                $parent_factors = json_decode($orderItem->order->factors, true);

                if (!in_array("所在科室", collect($factors)->pluck("factor_name")->toArray())
                    && in_array("所在科室", collect($parent_factors)->pluck("factor_name")->toArray())) {
                    $add = collect($parent_factors)->keyBy("factor_name")["所在科室"];
                    $factors[] = $add;
                    $orderItem->update([
                        "factors" => json_encode($factors, JSON_UNESCAPED_UNICODE)
                    ]);
                }
            }
            DB::commit();
            return $this->success("处理成功一批，正在跳转到下一批！", url($this->urlPrefix . "/salary/sync-order-items?month={$request->month}&last_id=" . $orderItems->last()->id));
        } catch (\Exception $exception) {
            DB::rollBack();
            dd($exception->getMessage());
        }
    }

    public function finance(Request $request)
    {
        $projects = $this->_checkProjects();
        if (!$projects->count()) {
            return $this->error($this->noProjects);
        }

        $project_id = request()->project_id ?? $projects->first()->id;
        $project = $projects->keyBy("id")->toArray()["{$project_id}"];

        $month = request()->month ?? date("Y-m");
        $months = $this->_getMonths();


        // 判断是否护士长
        $userId = auth()->id();
        $roleId = Role::where('name', 'like', '%护士长%')->where('guard_name', 'admin')->value('id');
        $hushizhang = DB::table('model_has_roles')->where('role_id', $roleId)
            ->where('model_type', 'App\Admin')
            ->where('model_id', $userId)
            ->count();
        // 获取这个护士长病区的订单
        $user = auth()->user();
        $areaId = AdminAreaLink::where('project_id', $project_id)->where('admin_id', $user->id)->pluck('area_id');
        $bedList = Bed::whereIn('area_id', $areaId)->pluck('id');
        $orderIds = Orders::whereIn('bed_id', $bedList)->pluck('id');


        $recharges = Recharge::with(["manager", "order", "patient"])
            ->where(function ($query) use ($hushizhang, $orderIds) {
                if ($hushizhang) {
                    $query->whereIn('order_id', $orderIds);
                }
            })
            ->withCount("refunds")
            ->whereNotNull("paid_at")
            ->whereRaw("DATE_FORMAT(`paid_at`,'%Y-%m') = '{$month}'")
            ->whereHas("order", function ($query) use ($project_id) {
                $query->where("project_id", $project_id);
            })
            ->get();
        $recharges_sum = $recharges->sum('money');

        $refunds = Refund::whereNotNull("paid_at")
            ->where(function ($query) use ($hushizhang, $orderIds) {
                if ($hushizhang) {
                    $query->whereIn('order_id', $orderIds);
                }
            })
            ->whereRaw("DATE_FORMAT(`paid_at`,'%Y-%m') = '{$month}'")
            ->whereHas("order", function ($query) use ($project_id) {
                $query->where("project_id", $project_id);
            })
            ->get();
        $refunds_sum = $refunds->sum('money');
        return view($this->bladePath . ".finance", compact("recharges_sum", "refunds_sum", "recharges", "refunds", "projects", "project_id", "months", "month"));
    }

    public function memberBalanceByDate(Request $request)
    {
        $projects = $this->_checkProjects();
        if (!$projects->count()) {
            return $this->error($this->noProjects);
        }
        $project_id = request()->project_id ?? $projects->first()->id;
        $before_date = $request->before_date ?: date("Y-m-d");
        $before_datetime = strtotime($before_date . " 23:59:59");

        DB::enableQueryLog();
        $customers = (new Customer())
            ->whereNull("deleted_at")
            ->with([
                "patients" => function ($query) use ($before_datetime) {
                    $query->whereRaw("UNIX_TIMESTAMP(`created_at`) <= {$before_datetime}")->orderBy("id", "desc");
                },
//                "oneBalance" => function ($query) use ($before_datetime) {
//                    $query->whereRaw("UNIX_TIMESTAMP(`created_at`) <= {$before_datetime}")->orderBy("id", "desc");
//                }
            ])
//            ->whereHas("oneBalance", function ($query) use ($before_datetime) {
//                $query->whereRaw("UNIX_TIMESTAMP(`created_at`) <= {$before_datetime}")->where("balance", ">", 0)->orderBy("id", "desc");
//            })
            ->whereHas("orders", function ($query) use ($before_datetime, $project_id) {
                $query
//                    ->whereRaw("UNIX_TIMESTAMP(`created_at`) <= {$before_datetime}")
                    ->where("project_id", $project_id);
            })
            ->get();

        $laravel_duration = microtime(true) - LARAVEL_START;
        return view($this->bladePath . ".customer-balance", compact("customers", "before_datetime", "project_id", "laravel_duration"));
    }

    public function fixMonthLastDayCheckout(Request $request)
    {
        $day = $request->day;
        if (!$day) {
            dd("日期不正确");
        }
        DB::enableQueryLog();
        $orders = Orders::whereIn("serial", ["20201130000003", "20201130000005", "20201128000004", "20201126000006", "20201127000005", "20201126000003", "20201130000004", "20201127000008", "20201130000001", "20201126000008"])->get();
        $orderItems = OrderItems::with(["balance", "order"])
            ->whereNotNull("paid_at")
            ->whereRaw("UNIX_TIMESTAMP(`paid_at`) > " . strtotime("2020-12-01"))
            ->whereRaw("UNIX_TIMESTAMP(`paid_at`) < " . strtotime("2020-12-04"))
            ->whereIn("order_id", $orders->pluck("id")->toArray())
            ->limit(100)->get();
        try {
            foreach ($orderItems as $orderItem) {
                $new_paid_at = "{$day} 22:00:01";
                $orderItem->update([
                    "paid_at" => $new_paid_at
                ]);
                $orderItem->balance->update([
                    "created_at" => $new_paid_at,
                    "remark" => "本条经过时间校准处理。原始创建时间为：" . $orderItem->balance->created_at
                ]);
            }
            DB::commit();
            dd("处理完毕");
        } catch (\Exception $exception) {
            DB::rollBack();
            dd($exception->getMessage());
        }
    }

    public function fixBalanceOrderId()
    {
        $balances = Balance::whereNull("order_id")->with("belongs")->limit("100")->get();
        if (!$balances->count()) {
            return $this->success("处理完毕", url($this->urlPrefix . "/overview"));
        }
        foreach ($balances as $balance) {
            $balance->timestamps = false;
            $balance->update([
                "order_id" => $balance->belongs->order_id
            ]);
        }

        return $this->success("处理完毕" . $balances->count() . "条数据，正在进入下一批数据。", url($this->urlPrefix . "/finance/fix-balance-order-id?timer=" . time()));
    }

    public function manualQueryRecharge($id)
    {
        $recharge = Recharge::find($id);
        $res = (new AlipayF2F())->manualQuery($recharge);
        dd($res);
    }

    public function huli(Request $request)
    {
        $projects = (new StatisticsController())->_checkProjects();
        $defaultProjectsId = ($projects[0]->id) ?? '';
        $project_id = $request->get('project_id', $defaultProjectsId);
        $month = request()->month ?? date("Y-m");

        $userId = auth()->id();
        // 判断是否护士长
        $roleId = Role::where('name', 'like', '%护士长%')->where('guard_name', 'admin')->value('id');
        $hushizhang = DB::table('model_has_roles')->where('role_id', $roleId)
            ->where('model_type', 'App\Admin')
            ->where('model_id', $userId)->count();
        $areaId = [];
        if ($hushizhang) {
            $user = auth()->user();
            $areaId = AdminAreaLink::where(function ($qeury) use ($project_id) {
                if ($project_id) {
                    $qeury->where('project_id', $project_id);
                }
            })->where('admin_id', $user->id)->pluck('area_id');
        }
        $data = Area::where('project_id', $project_id)->with('project', 'building')->where(function ($query) use ($areaId) {
            if ($areaId) {
                $query->whereIn('id', $areaId);
            }
        })->paginate(40);
        $data->appends($request->all())->render();

        $product = Product::where('project_id', $project_id)->first();
        $productItem = ProductItems::where('product_id', $product->id)->get();
        $factor = FactorItems::where('factor_id', $product->statistic_factor_id)->get();
        $sumOrderTotal = 0;
        foreach ($data as $item) {
            // 获取所有床位id
            $bedIds = Bed::where('area_id', $item->id)->pluck('id');
            // 总和
            $item->order_total = OrderItems::whereIn('product_item_id', $productItem->pluck('id'))
                ->whereIn("bed_id", $bedIds)
                ->where('paid_at', 'like', '%' . $month . '%')
                ->sum('total');
            $sumOrderTotal += $item->order_total;
            // 子项
            $item->lies = $this->getLies($bedIds, $productItem, $factor, $month);
        }
        // 获取所有列
        $lie = [];
        if (isset($data[0]->lies)) {
            $lie = array_column($data[0]->lies, 'name');
        }
        $months = $this->_getMonths();

        return view($this->bladePath . ".huli", compact("sumOrderTotal", "data", "month", "lie", "projects", "project_id"));
    }

    /**
     * 获取动态列
     */
    public function getLies($bedIds, $productItem, $factor, $month)
    {
        $list = [];
        foreach ($productItem as $item) {
            foreach ($factor as $factor_item) {
                $total = OrderItems::where('product_item_id', $item->id)
                    ->whereIn("bed_id", $bedIds)
                    ->whereRaw("factors like '%\"factor_item_id\": $factor_item->id%'")
                    ->where('paid_at', 'like', '%' . $month . '%')
                    ->sum('total');
                $list [] = [
                    'name' => $item->price + $factor_item->price . '元/天',
                    'total_price' => $item->price + $factor_item->price,
                    'product_item_id' => $item->id,
                    'factor_item_id' => $factor_item->id,
                    'total' => $total
                ];
            }
        }
        return $list;
    }

    /**
     * 床位统计
     * @return \Illuminate\Contracts\Foundation\Application|\Illuminate\Contracts\View\Factory|\Illuminate\View\View
     */
    public function bed()
    {
        $is_export = \request('is_export', 0);
        $projects = $this->_checkProjects();
        if (!$projects->count()) {
            return $this->error($this->noProjects);
        }
        $project_id = request()->project_id ?? $projects->first()->id;
        $project = Project::find($project_id);

        $month = request()->month ?? date("Y-m");
        $months = $this->_getMonths();
        // 当月天数
        $days = date('t', strtotime($month));
        $area = Area::withCount('beds')->where('project_id', $project_id)->get();
        $beds = Bed::whereIn('area_id', $area->pluck('id'))->where('project_id', $project_id)->get();
        $totalBed = $beds->count();
        // 订单总数
        $orderTotal = Orders::where('project_id', $project_id)
            ->where('created_at', 'like', '%' . $month . '%')
            ->whereIn('bed_id', $beds->pluck('id'))
            ->count();
        foreach ($area as $item) {
            // 床位占比
            $item->bed_rate = 0;
            if ($totalBed) {
                $item->bed_rate = round($item->beds_count / $totalBed, 4) * 100;
            }
            // 订单数
            $bedsIdTemp = Bed::where('area_id', $item->id)->where('project_id', $project_id)->pluck('id');
            $item->order_total = OrderItems::where('created_at', 'like', '%' . $month . '%')
                ->where('total', '>', 0)
                ->whereIn('bed_id', $bedsIdTemp)
                ->count();
            $item->rate = 0;
            if ($bedsIdTemp->count()) {
                // 配比
                $item->rate = round($item->order_total / ($days * $bedsIdTemp->count()), 4) * 100;
            }
        }

        // 导出
        if ($is_export) {
            $area = $area->toArray();
            $spreadsheet = new Spreadsheet();
            $sheet = $spreadsheet->getActiveSheet();
            $sheet->setCellValue('A1', '病区');
            $sheet->setCellValue('B1', '床位数量');
            $sheet->setCellValue('C1', '床位占比');
            $sheet->setCellValue('D1', '陪护人天');
            $sheet->setCellValue('E1', '陪护率');

            $count = count($area);  //计算有多少条数据
            for ($i = 2; $i <= $count + 1; $i++) {
                $sheet->setCellValue('A' . $i, $area[$i - 2]['name']);
                $sheet->setCellValue('B' . $i, $area[$i - 2]['beds_count']);
                $sheet->setCellValue('C' . $i, $area[$i - 2]['bed_rate']);
                $sheet->setCellValue('D' . $i, $area[$i - 2]['order_total']);
                $sheet->setCellValue('E' . $i, $area[$i - 2]['rate']);
            }
            header('Content-Type: application/vnd.ms-excel');
            header('Content-Disposition: attachment;filename="' . $project->name . '_' . date('YmdHis') . '.xlsx"');
            header('Cache-Control: max-age=0');
            $writer = new Xlsx($spreadsheet);
            $writer->save('php://output');
            exit;
        }
        return view($this->bladePath . ".bed", compact("area", "orderTotal", "totalBed", "project", "project_id", "month", "projects"));
    }

    /**
     * 收入统计
     * @return \Illuminate\Contracts\Foundation\Application|\Illuminate\Contracts\View\Factory|\Illuminate\View\View
     */
    public function income()
    {
        $is_export = \request('is_export', 0);
        $projects = $this->_checkProjects();
        if (!$projects->count()) {
            return $this->error($this->noProjects);
        }
        $project_id = request()->project_id ?? $projects->first()->id;
        $project = Project::find($project_id);

        $month = request()->month ?? date("Y-m");
        $months = $this->_getMonths();
        // 当月天数
        $days = date('t', strtotime($month));
        $areaList = Area::withCount('beds')->where('project_id', $project_id)->get();
        // 合计
        $total['order_total'] = $total['shouxufei'] = $total['zengshishui'] = $total['shijishouru'] = $total['guanlifei'] = 0;
        $area = [];
        foreach ($areaList as $item) {
            $beds = Bed::where('area_id', $item->id)->where('project_id', $project_id)->get();
            $orderTotal = OrderItems::where('paid_at', 'like', '%' . $month . '%')
                ->whereIn('bed_id', $beds->pluck('id'))
                ->sum("total");
            $item->order_total = $orderTotal;
            $item->shouxufei = round($orderTotal * 0.006, 2);
            $item->zengshishui = round($orderTotal * 0.06, 2);
            $item->shijishouru = round($orderTotal - $item->shouxufei - $item->zengshishui, 2);
            $item->guanlifei = round($item->shijishouru * 0.06, 2);
            if (!empty($item->order_total)) {
                $area[] = $item;
            }
            // 合计
            $total['order_total'] += $item->order_total;
            $total['shouxufei'] += $item->shouxufei;
            $total['zengshishui'] += $item->zengshishui;
            $total['shijishouru'] += $item->shijishouru;
            $total['guanlifei'] += $item->guanlifei;
        }
        $refund['order_total'] = abs(Balance::where('created_at', 'like', '%' . $month . '%')
            ->where('belongs_type', 'App\Models\Refund')
            ->whereHas("order", function ($query) use ($project_id) {
                $query->where("project_id", $project_id);
            })->sum("money"));
        $refund['shijishouru'] = $refund['order_total'];
        $refund['guanlifei'] = round($refund['order_total'] * 0.06, 2);
        // 总计
        $zongji['order_total'] = $total['order_total'] - $refund['order_total'];
        $zongji['shouxufei'] = $total['shouxufei'] * 2;
        $zongji['zengshishui'] = $total['zengshishui'] * 2;
        $zongji['shijishouru'] = $total['shijishouru'] - $refund['shijishouru'];
        $zongji['guanlifei'] = $total['guanlifei'] - $refund['guanlifei'];

        $admin = Auth::guard("admin")->user();
        return view($this->bladePath . ".income", compact("admin", "zongji", "refund", "total", "area", "project", "project_id", "month", "projects"));
    }

}