first commit
This commit is contained in:
@@ -0,0 +1,143 @@
|
||||
<?php
|
||||
|
||||
/*******************************************************************
|
||||
|
||||
PHP Class : /Controller/Report/Rekap/ModalController
|
||||
Description : Laporan Rekap Modal Harian
|
||||
Created By : Siau Pheng ([email protected]).
|
||||
Created Date : January 19th, 2013.
|
||||
Last Modified : October 10th, 2026.
|
||||
|
||||
(c) 3FONIA Software; WWW.3FONIA.COM.
|
||||
|
||||
*******************************************************************/
|
||||
|
||||
declare(strict_types=1);
|
||||
|
||||
namespace App\Controller\Report\Rekap;
|
||||
|
||||
use flight\Engine;
|
||||
use flight\database\SimplePdo;
|
||||
use flight\Session;
|
||||
use Webapp\Data\Xlsx;
|
||||
use Webapp\Printer\PrintHTML;
|
||||
use Webapp\Web\Form;
|
||||
use Webapp\Web\Param;
|
||||
|
||||
class ModalController {
|
||||
|
||||
private int $id_cab;
|
||||
private string $reg_name;
|
||||
protected Engine $app;
|
||||
protected SimplePdo $db;
|
||||
|
||||
public function __construct(Engine $app, SimplePdo $db, Session $session) {
|
||||
$this->app = $app;
|
||||
$this->db = $db;
|
||||
$this->id_cab = Param::Int("CabID", 0);
|
||||
$this->reg_name = $session->get('WEB_APP')['REG_NAME'];
|
||||
}
|
||||
|
||||
private function prepare() {
|
||||
$apre = [
|
||||
'tgl_from' => Param::Get("Tgl_From"),
|
||||
'tgl_to' => Param::Get("Tgl_To"),
|
||||
];
|
||||
|
||||
// generate report header
|
||||
$apre['periode'] = $apre['tgl_from'] . ($apre['tgl_from'] !== $apre['tgl_to'] ? ' s/d '.$apre['tgl_to'] : '');
|
||||
|
||||
$tsql = ''; $asql = [];
|
||||
if ($this->id_cab > 0) {
|
||||
$tsql .= " AND CabID=?";
|
||||
array_push($asql, $this->id_cab);
|
||||
}
|
||||
|
||||
$this->db->delete("rep_rekap_modal", "UserID=?", [$this->app->user()->id()]);
|
||||
$dtgl = $apre['tgl_from'];
|
||||
while ($dtgl <= $apre['tgl_to']) {
|
||||
$stok = $this->db->fetchField("SELECT SUM(D.Stok*P.Harga_Pokok) Stok FROM (SELECT * FROM inv_detail WHERE Tgl_Ref<=?".$tsql.") D LEFT JOIN inv_produk P ON (P.InvID=D.InvID)", array_merge([tgl_sql2str($dtgl)], $asql)) ?? 0;
|
||||
$piutang = $this->db->fetchField("SELECT SUM(Total_Jual-Total_Diskon-Total_Bayar-Total_Potong) Piutang FROM inv_jual WHERE Tgl_Jual<=? AND Tgl_Lunas>?".$tsql, array_merge([tgl_sql2str($dtgl), tgl_sql2str($dtgl)], $asql)) ?? 0;
|
||||
$hutang = $this->db->fetchField("SELECT SUM(Real_Beli) Hutang FROM inv_beli WHERE Tgl_Beli<=? AND (Lunas=0 OR (Lunas=1 AND Tgl_Lunas>?))".$tsql, array_merge([tgl_sql2str($dtgl), tgl_sql2str($dtgl)], $asql)) ?? 0;
|
||||
$this->db->runQuery("INSERT IGNORE INTO rep_rekap_modal (Tanggal,Stok,Piutang,Hutang,Jumlah,UserID) VALUES (?,?,?,?,?,?)", [tgl_sql2str($dtgl), $stok, $piutang, $hutang, $stok + $piutang - $hutang, $this->app->user()->id()]);
|
||||
$dtgl = tgl_operasi($dtgl, 1);
|
||||
}
|
||||
$apre['query'] = $this->db->runQuery("SELECT * FROM rep_rekap_modal WHERE UserID=? ORDER BY Tanggal ASC", [$this->app->user()->id()]);
|
||||
return $apre;
|
||||
}
|
||||
|
||||
public function print() {
|
||||
$apre = $this->prepare();
|
||||
|
||||
$pre = new PrintHTML($this->app);
|
||||
$pre->add_title([strtoupper($this->reg_name), "REKAP MODAL HARIAN", "Periode : ".$apre['periode']]);
|
||||
|
||||
$pre->add_field("Hari",10,"C");
|
||||
$pre->add_field("Tanggal",20,"C","sqltgl");
|
||||
$pre->add_field("Stok Barang",20,"R","rupiah");
|
||||
$pre->add_field("Piutang",20,"R","rupiah");
|
||||
$pre->add_field("Hutang",20,"R","rupiah");
|
||||
$pre->add_field("Jumlah",20,"R","rupiah");
|
||||
|
||||
$pre->show_titles();
|
||||
$pre->show_headers();
|
||||
|
||||
while ($row = $apre['query']->fetch(SimplePdo::FETCH_ASSOC)) {
|
||||
$pre->add_row([ tgl_hari(tgl_sql2str($row['Tanggal'])), $row['Tanggal'], $row['Stok'], $row['Piutang'], $row['Hutang'], $row['Jumlah'] ]);
|
||||
}
|
||||
|
||||
$pre->add_stamp(1, true);
|
||||
$pre->show();
|
||||
}
|
||||
|
||||
public function excel() {
|
||||
$apre = $this->prepare();
|
||||
$xls = new Xlsx($this->app);
|
||||
$xls->set_meta([
|
||||
'title' => "Data Rekap Modal Harian",
|
||||
'desc' => "Export Data Rekap Modal Harian"
|
||||
]);
|
||||
$xls->add_title([ $this->reg_name, "DATA REKAP MODAL HARIAN", "Periode : ".$apre['periode'] ]);
|
||||
|
||||
$xls->add_field("Hari", 15, "@");
|
||||
$xls->add_field("Tanggal", 12, "@date");
|
||||
$xls->add_field("Stok Barang", 15, "#,##0.00");
|
||||
$xls->add_field("Piutang", 15, "#,##0.00");
|
||||
$xls->add_field("Hutang", 15, "#,##0.00");
|
||||
$xls->add_field("Jumlah", 15, "#,##0.00");
|
||||
$xls->add_sheet("".str_replace("s/d","-",$apre['periode']));
|
||||
|
||||
$xls->show_titles();
|
||||
$xls->show_headers();
|
||||
|
||||
while ($row = $apre['query']->fetch(SimplePdo::FETCH_ASSOC)) {
|
||||
$xls->add_row([ tgl_hari(tgl_sql2str($row['Tanggal'])), $row['Tanggal'], $row['Stok'], $row['Piutang'], $row['Hutang'], $row['Jumlah'] ]);
|
||||
}
|
||||
|
||||
$xls->add_stamp(1, true);
|
||||
$xls->download("Data Rekap Modal Harian ".str_replace("s/d","-",$apre['periode']).".xlsx");
|
||||
unset($xls);
|
||||
}
|
||||
|
||||
public function index() {
|
||||
$form = new Form($this->app);
|
||||
$tcab = $form->option_db("_", "CabID", $this->id_cab, true, false, "para_cabang", ["CabID","Nama_Cab"], "Aktif=1 ORDER BY CabID", [0,"SEMUA CABANG"]);
|
||||
$tfrom = $form->datebox("_", "Tgl_From", tgl_ymd(), true, false);
|
||||
$tto = $form->datebox("_", "Tgl_To", tgl_ymd(), true, false);
|
||||
$ajson['html'] = '
|
||||
<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="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>';
|
||||
$this->app->json($ajson);
|
||||
}
|
||||
|
||||
}
|
||||
Reference in New Issue
Block a user