<?php

/*******************************************************************

    App. Name     : INVENTORY AND SALES SYSTEMS
    Module        : /apps/php/repo/beli.php
    Desc.         : PHP - Laporan Pembelian
    Created By    : Siau Pheng (siaupheng@3fonia.com).
    Created Date  : April 12th, 2011.
    Last Modified : October 10th, 2025.

    (c) 2011 - 2025, 3FONIA Software; WWW.3FONIA.COM.

*******************************************************************/

require_once(__DIR__."/../../../../../vendor/autoload.php");
require_once(__DIR__."/../func.iss.php");

use siaupheng\fonia3\DB\MySQL;
use siaupheng\fonia3\Web\Param;
use siaupheng\fonia3\Web\Form;
use siaupheng\fonia3\Data\SimpleXLS;

$db = $db ?? new MySQL();
$ajson = [];
$data = Param::Get("data");
$id_cab = Param::Get("CabID", 0);

if (in_array($data, ["print","export"])) {
    $tipe = Param::Get("Tipe", "R"); // R or D
    $id_sup = Param::Get("SupID", 0);
    $id_grup = Param::Get("Grup_InvID", 0);
    $tglfrom = Param::Get("Tgl_From");
    $tglto = Param::Get("Tgl_To");

    $nama_sup = ""; $nama_grup = "";
    if ($id_sup > 0) {
        $db->Query("SELECT CONCAT(Nama_Sup,' (',Kode_Sup,')') Nama FROM para_supplier WHERE SupID='".$id_sup."' LIMIT 1");
        if ($db->Next()) $nama_sup = $db->Row("Nama");
    }
    if ($id_grup > 0) {
        $db->Query("SELECT Nama_Grup Nama FROM inv_produk_grup WHERE Grup_InvID='".$id_grup."' LIMIT 1");
        if ($db->Next()) $nama_grup = $db->Row("Nama");
    }

    // generate report header
    $tglheader = $tglfrom;
    if ($tglfrom!==$tglto) $tglheader .= " S/D ".$tglto;
    $tglfrom = tgl_sql2str($tglfrom);
    $tglto = tgl_sql2str($tglto);

    $tsql = ($id_cab==0) ? "" : " AND CabID='".$id_cab."'";
    $tsql .= ($id_sup==0) ? "" : " AND SupID='".$id_sup."'";
    //id_grup ?

    if ($tipe=="R") {
        $db->Query("SELECT S.Nama_Sup,SUM(B.Total_Hutang+B.Total_Diskon+B.Total_Bulat) Total_Beli,SUM(B.Total_Diskon+B.Total_Bulat) Total_Diskon,SUM(B.Total_Hutang) Total FROM (SELECT * FROM inv_beli WHERE Data_Beli=1 AND (Tgl_Beli BETWEEN '".$tglfrom."' AND '".$tglto."')".$tsql.") B LEFT JOIN para_supplier S ON (B.SupID=S.SupID) GROUP BY B.SupID ORDER BY S.Nama_Sup");
    } else {
        $db->Query("SELECT B.*,DATE_FORMAT(B.Tgl_Beli,'%d-%m-%Y') Tgl_Beli2,S.Nama_Sup,B.Total_Beli-B.Total_Diskon Total FROM (SELECT * FROM inv_beli WHERE Data_Beli=1 AND (Tgl_Beli BETWEEN '".$tglfrom."' AND '".$tglto."')".$tsql.") B LEFT JOIN para_supplier S ON (B.SupID=S.SupID) ORDER BY B.No_Beli");
    }
}

if ( $data == "print" ) {
    Report_Header(($tipe=="R"?"REKAP":"DETAIL")." PEMBELIAN", "Periode : ".$tglheader);
    $pre = new \siaupheng\fonia3\Printer\PrintHTML();

    if ($tipe=="R") {
        $pre->add_field("No.",10,"C");
        $pre->add_field("Nama Supplier",50,"L");
        $pre->add_field("Sub. Total",20,"R","rupiah");
        $pre->add_field("Diskon",20,"R","rupiah");
        $pre->add_field("Total",20,"R","rupiah");

        if ($id_sup>0) $pre->add_span(array("Nama Supplier : ".$nama_sup,5,"L,B"));
        if ($id_grup>0) $pre->add_span(array("Grup Barang : ".$nama_grup,5,"L,B"));

        $tot_beli = 0; $tot_diskon = 0; $nomor = 0;
        while ($db->Next()) {
            //if ($db->RowFloat("Total", 0) == 0) continue;
            $tot_beli += $db->Row("Total_Beli");
            $tot_diskon += $db->Row("Total_Diskon");
            $pre->add_value(++$nomor, $db->Row("Nama_Sup"), $db->Row("Total_Beli"), $db->Row("Total_Diskon"), $db->Row("Total"));
        }
        $pre->add_span(array("GRAND TOTAL",2,"R,B"),array($tot_beli,1,"R,B","rupiah"),array($tot_diskon,1,"R,B","rupiah"),array($tot_beli-$tot_diskon,1,"R,B","rupiah"));

    } else {
        $pre->add_field("No. Nota",30,"C");
        $pre->add_field("Tgl. Nota",30,"C", "tgl_sql2str");
        $pre->add_field("No. Faktur",30,"L");
        $pre->add_field("Nama Supplier",50,"L");
        $pre->add_field("Sub. Total",20,"R","rupiah");
        $pre->add_field("Diskon",20,"R","rupiah");
        $pre->add_field("Total",30,"R","rupiah");

        if ($id_sup>0) $pre->add_span(array("Nama Supplier : ".$nama_sup,7,"L,B"));
        if ($id_grup>0) $pre->add_span(array("Grup Barang : ".$nama_grup,7,"L,B"));

        $tot_beli = 0; $tot_diskon = 0;
        while ($db->Next()) {
            //if ($db->RowFloat("Total", 0) == 0) continue;
            $tot_beli += $db->Row("Total_Beli");
            $tot_diskon += $db->Row("Total_Diskon");
            $pre->add_value($db->Row("No_Beli"), $db->Row("Tgl_Beli"), $db->Row("No_Faktur"), $db->Row("Nama_Sup"), $db->Row("Total_Beli"), $db->Row("Total_Diskon"), $db->Row("Total"));
        }
        $pre->add_span(array("GRAND TOTAL",4,"R,B"),array($tot_beli,1,"R,B","rupiah"),array($tot_diskon,1,"R,B","rupiah"),array($tot_beli-$tot_diskon,1,"R,B","rupiah"));
    }
    $pre->add_stamp(1, true);
    $pre->show();

} else if ( $data == "export" ) {
    $xls = new SimpleXLS([
        'title'=>"Data Pembelian",
        'desc'=>"Export Data Pembelian"
    ]);
    
    if ($tipe=="R") {
        $xls->add_header("<b>".$_SESSION['__WEB_APP']['REG_NAME']."</b>");
        $xls->add_header("<b>DATA REKAP PEMBELIAN</b>");
        $xls->add_header("Periode : ".$tglheader);
        
        $xls->add_field("No.", 5, "C");
        $xls->add_field("Nama Supplier", 25, "L");
        $xls->add_field("Sub. Total", 15, "R,N");
        $xls->add_field("Diskon", 15, "R,N");
        $xls->add_field("Total", 15, "R,N");
        $xls->add_sheet("".str_replace("S/D","-",$tglheader), true);

        if ($id_sup>0) $xls->add_span(array("Nama Supplier : ".$nama_sup,5,"L,B"));
        if ($id_grup>0) $xls->add_span(array("Grup Barang : ".$nama_grup,5,"L,B"));

        $tot_beli = 0; $tot_diskon = 0; $nomor = 0;
        while ($db->Next()) {
            if ($db->RowFloat("Total", 0) == 0) continue;
            $tot_beli += $db->Row("Total_Beli");
            $tot_diskon += $db->Row("Total_Diskon");
            $xls->add_value(++$nomor, $db->Row("Nama_Sup"), $db->Row("Total_Beli"), $db->Row("Total_Diskon"), $db->Row("Total"));
        }
        $xls->add_span(array("GRAND TOTAL",2,"R,B"),array($tot_beli,1,"R,B,N"),array($tot_diskon,1,"R,B,N"),array($tot_beli-$tot_diskon,1,"R,B,N"));

    } else {
        $xls->add_header("<b>".$_SESSION['__WEB_APP']['REG_NAME']."</b>");
        $xls->add_header("<b>DATA DETAIL PEMBELIAN</b>");
        $xls->add_header("Periode : ".$tglheader);

        $xls->add_field("No. Nota", 15, "C");
        $xls->add_field("Tgl. Nota", 12, "C", "tgl_sql2str");
        $xls->add_field("No. Faktur", 15, "L");
        $xls->add_field("Nama Supplier", 20, "L");
        $xls->add_field("Sub. Total", 15, "R,N");
        $xls->add_field("Diskon", 15, "R,N");
        $xls->add_field("Total", 15, "R,N");
        $xls->add_sheet("".str_replace("S/D","-",$tglheader), true);

        if ($id_sup>0) $xls->add_span(array("Nama Supplier : ".$nama_sup,7,"L,B"));
        if ($id_grup>0) $xls->add_span(array("Grup Barang : ".$nama_grup,7,"L,B"));

        $tot_beli = 0; $tot_diskon = 0;
        while ($db->Next()) {
            if ($db->RowFloat("Total", 0) == 0) continue;
            $tot_beli += $db->Row("Total_Beli");
            $tot_diskon += $db->Row("Total_Diskon");
            $xls->add_value($db->Row("No_Beli"), $db->Row("Tgl_Beli"), $db->Row("No_Faktur"), $db->Row("Nama_Sup"), $db->Row("Total_Beli"), $db->Row("Total_Diskon"), $db->Row("Total"));
        }
        $xls->add_span(array("GRAND TOTAL",4,"R,B"),array($tot_beli,1,"R,B,N"),array($tot_diskon,1,"R,B,N"),array($tot_beli-$tot_diskon,1,"R,B,N"));
    }
    $xls->add_stamp(1, true);
    $xls->send("Data Pembelian ".str_replace("S/D","-",$tglheader).".xlsx");
    unset($xls);

} else if ( $data == "default") {
    $form = new Form($db);
    $ttipe = $form->radio("_", "Tipe", "R", true, false, ["R"=>"Rekap","D"=>"Detail"]);
    $tcab = $form->option_db("_", "CabID", $id_cab, true, false, "para_cabang", ["CabID","Nama_Cab"], "Aktif=1 ORDER BY CabID", [0,"SEMUA CABANG"]);
    $tsup = $form->option_db("_", "SupID", 0, true, false, "para_supplier", ["SupID","Nama_Sup"], "Aktif=1 ORDER BY Nama_Sup", [0,"SEMUA SUPPLIER"]);
    $tgrup = $form->option_db("_", "Grup_InvID", 0, true, false, "inv_produk_grup", ["Grup_InvID","Nama_Grup"], "Aktif=1 ORDER BY Nama_Grup", [0,"SEMUA GRUP"]);
    $tfrom = $form->datebox("_", "Tgl_From", tgl_ymd(), true, false);
    $tto = $form->datebox("_", "Tgl_To", tgl_ymd(), true, false);
    echo '
    <div class="row mb-1">
        <label class="col-sm-4 col-lg-3 col-form-label" for="Tipe">Tipe Laporan</label>
        <div class="col col-form-label">'.$ttipe.'</div>
    </div>
    <div class="row mb-1">
        <label class="col-sm-4 col-lg-3 col-form-label" for="CabID">Nama Cabang</label>
        <div class="col">'.$tcab.'</div>
    </div>
    <div class="row mb-1">
        <label class="col-sm-4 col-lg-3 col-form-label" for="SupID">Nama Supplier</label>
        <div class="col">'.$tsup.'</div>
    </div>
    <div class="row mb-1">
        <label class="col-sm-4 col-lg-3 col-form-label" for="Grup_InvID">Grup Barang</label>
        <div class="col">'.$tgrup.'</div>
    </div>
    <div class="row mb-1">
        <label class="col-sm-4 col-lg-3 col-form-label" for="Tgl_From">Dari Tanggal</label>
        <div class="col-sm-6 col-lg-5">'.$tfrom.'</div>
    </div>
    <div class="row mb-1">
        <label class="col-sm-4 col-lg-3 col-form-label" for="Tgl_To">Sampai Tanggal</label>
        <div class="col-sm-6 col-lg-5">'.$tto.'</div>
    </div>';
}

?>