<?php

namespace Modules\PatientFinance\Services;

use Illuminate\Http\Request;
use Illuminate\Support\Facades\Session;
use DB;
use Streamline\Models\Patient;
use Streamline\Models\PatientEpisode;
use Streamline\Models\Services;
use Streamline\Models\ChartOfAccount;
use Streamline\Models\TrackReceipt;
use Streamline\Models\OrderedSundry;
use Modules\PatientFinance\Services\DepositHelpers;

class SundriesDeposit
{
    public function store_payment(Request $request)
    {
        $patient_id = $request->patient_id;
        $episode_id = $request->episode_id;
        $sundry_ids_array = explode(",", $request->sundry_ids);
        $order_ids_array = explode(",", $request->order_ids);
        $sundry_subtotals_array = $request->sundry_subtotal;
        $sundry_amounts_array = $request->sundry_amount;
        $sundry_quantity_array = $request->quantity;
        $tag_id = 5;

        // update the track_receipt table to include created receipt
        $track_receipts = new TrackReceipt;
        $track_receipts->created_by = auth()->user()->id;
        $track_receipts->reason = 'Sundries';
        $track_receipts->save();
        $receipt_number = sprintf("%04u", $track_receipts->id);

        // update the chart of accounts balance for each sundry item
        for ($i = 0; $i < count($sundry_ids_array); $i++) {
            $sundry_account = get_name($sundry_ids_array[$i], "id", "account_id", "sundries");
            $account_balance = get_name($sundry_account, "id", "balance", "chart_of_accounts");
            //removed and set it to reduce sundries at payment only 

            $sundry = \Streamline\Models\Sundry::withTrashed()->find($sundry_ids_array[$i]);
            $current_stock = $sundry->pharmacy_stock;
            $new_stock = $current_stock - $sundry_quantity_array[$i];
            $sundry->pharmacy_stock = $new_stock;
            $sundry->update();
            /**** batch tracking */
            $auto_calculated_batches_used = get_lab_batches_to_use_based_on_needed_quantity($sundry_ids_array[$i],2,$sundry_quantity_array[$i],'pharmacy_stock');
            foreach ($auto_calculated_batches_used as $batch_number => $batch_qty) {
                reduce_batch_item_stock(2,$sundry_ids_array[$i],$batch_number,'sundries','pharmacy_stock',$batch_qty,'ordered_sundries','Sundries',$order_ids_array[0],$patient_id);
                // reduce_batch_item_from_pharmacy(2, $sundry_ids_array[$i], $batch_number, $batch_qty, "ordered_sundries", null, $patient_id);
            }
            /*** end batch tracking logic **/


            $new_balance = $account_balance + $sundry_subtotals_array[$i];
            ChartOfAccount::where(['id' => $sundry_account])->update(['balance' => $new_balance]);
        }

        // check if donor discounts have been applied using null and insert into table
        if ($request->donor_discount) {
            DepositHelpers::donor_discount_details($patient_id, $episode_id, $receipt_number, $request->patient_discount_amount, $request->donor_to_pay, $request->hospital_to_pay_selected_discount, $request->donor_discount, $request->donor_id, $tag_id);
        }

        // add patient to debtors if balance is more than 0
        if ($request->balance > 0) {
            DepositHelpers::debt($patient_id, $episode_id, $request->balance, $receipt_number, $tag_id);
        }

        // register one off discount
        if ($request->one_off_discount > 0) {
            DepositHelpers::patient_one_off_discount($patient_id, $episode_id, $request->one_off_discount, $tag_id, $request->one_off_discount_memo, $receipt_number);
        }

        // patient category discount flag
        $discount_status = 0;

        // check if patient has a discount amount more than zero and pay later is not available to them
        // this discount amount is represented as hospital to pay general
        if ($request->hospital_to_pay_general_discount > 0) {
            // change discount status
            $discount_status = 1;

            // add to discounts table
            DepositHelpers::discount($request->hospital_to_pay_general_discount, $patient_id, $episode_id, $receipt_number, 'Sundries');
        }

        // is_invoice flag for receipt purposes. Default is 0 for no
        $is_invoice = 0;

        // check if patient category is of type pay later to generate invoice for that category or to add to normal service payments table
        if ($request->pay_later == 1) {
            // change invoice flag to show that it is an invoice
            $is_invoice = 1;
            // create a new invoice
            DepositHelpers::patient_category_invoice(
                $request->patient_category_id, $patient_id, $episode_id,
                implode(',', $sundry_subtotals_array),
                implode(',', $sundry_ids_array), $receipt_number, $tag_id,
                implode(',', $sundry_quantity_array),
                $request->patient_category_to_pay, date('Y-m-d'), implode(",", $order_ids_array)
            );

            // for co-payment people with some cash
            if ($request->patient_to_pay > 0) {
                DepositHelpers::sundries_payment(
                    $patient_id, $episode_id,
                    implode(',', $sundry_ids_array),
                    implode(',', $sundry_quantity_array),
                    implode(',', $sundry_amounts_array),
                    implode(',', $sundry_subtotals_array),
                    $discount_status, $receipt_number, $request->patient_to_pay, implode(",", $order_ids_array), $request->wallets_amount
                );
            }
        } else {
            // create a new sundries payment record
            DepositHelpers::sundries_payment(
                $patient_id, $episode_id,
                implode(',', $sundry_ids_array),
                implode(',', $sundry_quantity_array),
                implode(',', $sundry_amounts_array),
                implode(',', $sundry_subtotals_array),
                $discount_status, $receipt_number, $request->patient_to_pay, implode(",", $order_ids_array), $request->wallets_amount
            );
        }

        // update the payment status for the ordered ids to paid
        for ($i = 0; $i < count($order_ids_array); $i++) {
            OrderedSundry::where(['id' => $order_ids_array[$i]])->update(['payment_status' => 1]);
        }

        return $is_invoice . "," . $receipt_number;
    }
}