CMASA-MEMPAWAH/cmasa
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

first commit

Browse Source
This commit is contained in:
siaupheng
2026-10-29 13:34:31 +07:00
commit 45e4595c57
255 changed files with 35457 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files
app/Controller/Report/Beli/AnalisaController.php
+257
View File
@@ -0,0 +1,257 @@
<?php
/*******************************************************************
PHP Class : /Controller/Report/Beli/AnalisaController
Description : Laporan Analisa Pembelian
Created By : Siau Pheng ([email protected]).
Created Date : August 4th, 2013.
Last Modified : October 3rd, 2026.
(c) 3FONIA Software; WWW.3FONIA.COM.
*******************************************************************/
declare(strict_types=1);
namespace App\Controller\Report\Beli;
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 AnalisaController {
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 = [
'tipe' => Param::Get("Tipe", "V"), // V or R
'id_sup' => Param::Int("SupID", 0),
'id_grup' => Param::Int("Grup_InvID", 0),
'tgl_from' => Param::Get("Tgl_From"),
'tgl_to' => Param::Get("Tgl_To"),
];
$apre['Hari'] = tgl_range_hari($apre['tgl_from'], $apre['tgl_to'], true);
$apre['nama_sup'] = ($apre['id_sup'] > 0) ? ($this->db->fetchField("SELECT CONCAT(Nama_Sup,' (',Kode_Sup,')') Nama FROM para_supplier WHERE SupID=?", [$apre['id_sup']]) ?? '') : '';
$apre['nama_grup'] = ($apre['id_grup'] > 0) ? ($this->db->fetchField("SELECT Nama_Grup FROM inv_produk_grup WHERE Grup_InvID=?", [$apre['id_grup']]) ?? '') : '';
// generate report header
$apre['periode'] = $apre['tgl_from'] . ($apre['tgl_from'] !== $apre['tgl_to'] ? ' s/d '.$apre['tgl_to'] : '');
$tsql1 = ''; $tsql2 = ''; $asql = [tgl_sql2str($apre['tgl_from']), tgl_sql2str($apre['tgl_to'])];
if ($this->id_cab > 0) {
$tsql1 .= " AND CabID=?";
array_push($asql, $this->id_cab);
}
if ($apre['id_sup'] > 0) {
$tsql1 .= " AND No_Ref IN (SELECT No_Beli FROM inv_beli WHERE SupID=? AND (Tgl_Beli BETWEEN ? AND ?))";
array_push($asql, $apre['id_sup'], tgl_sql2str($apre['tgl_from']), tgl_sql2str($apre['tgl_to']));
}
if ($apre['id_grup'] > 0) {
$tsql2 .= " WHERE P.Grup_InvID=?";
array_push($asql, $apre['id_grup']);
}
if ($apre['tipe'] === "V") {
$apre['query'] = $this->db->runQuery("SELECT P.*,D.Volume FROM (SELECT InvID,SUM(Stok) Volume FROM inv_detail WHERE Stok>0 AND NotaID IN (3,4) AND (Tgl_Ref BETWEEN ? AND ?)".$tsql1." GROUP BY InvID) D LEFT JOIN vi_inv_produk2 P ON (D.InvID=P.InvID)".$tsql2." ORDER BY P.Nama_Produk", $asql);
} else {
$apre['query'] = $this->db->runQuery("SELECT P.*,D.Rupiah FROM (SELECT InvID,SUM(Qty*Harga_Beli) Rupiah FROM inv_detail WHERE Stok>0 AND NotaID IN (3,4) AND (Tgl_Ref BETWEEN ? AND ?)".$tsql1." GROUP BY InvID) D LEFT JOIN inv_produk P ON (D.InvID=P.InvID)".$tsql2." ORDER BY P.Nama_Produk", $asql);
}
return $apre;
}
public function print() {
$apre = $this->prepare();
$pre = new PrintHTML($this->app);
$pre->add_title([strtoupper($this->reg_name), "REKAP ".($apre['tipe']==="V"?"VOLUME":"RUPIAH")." PEMBELIAN", "Periode : ".$apre['periode']]);
if ($apre['tipe'] === "V") {
$pre->add_field("No.",10,"C");
$pre->add_field("Nama Barang",50,"L");
$pre->add_field("Jumlah",20,"R");
$pre->add_field("Mingguan",20,"R");
if ($apre['id_sup'] > 0) $pre->add_sub_title("Nama Supplier : ".$apre['nama_sup']);
if ($apre['id_grup'] > 0) $pre->add_sub_title("Grup Barang : ".$apre['nama_grup']);
$pre->show_titles();
$pre->show_headers();
$nomor = 0;
while ($row = $apre['query']->fetch(SimplePdo::FETCH_ASSOC)) {
$total = $row['Volume'] ?? 0;
$mg_total = $total / ($apre['Hari']/7);
$kali = $row['Qty'] ?? 0;
if ($kali > 0) {
$norm = floor($total / $kali);
$sisa = $total - ($norm * $kali);
$mg_norm = floor($mg_total / $kali);
$mg_sisa = $mg_total - ($mg_norm * $kali);
} else {
$norm = 0;
$sisa = $total;
$mg_norm = 0;
$mg_sisa = $mg_total;
}
$stok = rupiah($norm,0)." ".$row['Satuan_Normal'];
$mg_stok = rupiah($mg_norm,0)." ".$row['Satuan_Normal'];
if ($row['Satuan_Normal'] !== $row['Satuan_Stok']) {
$stok .= ", ".rupiah($sisa,0)." ".$row['Satuan_Stok'];
$mg_stok .= ", ".rupiah($mg_sisa,0)." ".$row['Satuan_Stok'];
}
$pre->add_row([ ++$nomor, $row['Nama_Produk'], $stok, $mg_stok ]);
}
} else {
$pre->add_field("No.",10,"C");
$pre->add_field("Nama Barang",50,"L");
$pre->add_field("Jumlah",20,"R","rupiah");
$pre->add_field("Mingguan",20,"R","rupiah");
if ($apre['id_sup'] > 0) $pre->add_sub_title("Nama Supplier : ".$apre['nama_sup']);
if ($apre['id_grup'] > 0) $pre->add_sub_title("Grup Barang : ".$apre['nama_grup']);
$pre->show_titles();
$pre->show_headers();
$nomor = 0; $tot_rup = 0; $tot_mg = 0;
while ($row = $apre['query']->fetch(SimplePdo::FETCH_ASSOC)) {
$mg_avg = ($row['Rupiah'] > 0) ? $row['Rupiah'] / ($apre['Hari'] / 7) : 0;
$tot_rup += $row['Rupiah'];
$tot_mg += $mg_avg;
$pre->add_row([ ++$nomor, $row['Nama_Produk'], $row['Rupiah'], $mg_avg ]);
}
$pre->add_span([ ["GRAND TOTAL",2,"R,B"],[$tot_rup,1,"R,B","rupiah"],[$tot_mg,1,"R,B","rupiah"] ]);
}
$pre->add_stamp(1, true);
$pre->show();
}
public function excel() {
$apre = $this->prepare();
$xls = new Xlsx($this->app);
$xls->set_meta([
'title' => "Data Analisa Pembelian",
'desc' => "Export Data Analisa Pembelian"
]);
$xls->add_title([ $this->reg_name, "DATA REKAP ".($apre['tipe']==="V"?"VOLUME":"RUPIAH")." PEMBELIAN", "Periode : ".$apre['periode'] ]);
if ($apre['tipe'] === "V") {
$xls->add_field("No.", 5, "@integer");
$xls->add_field("Nama Barang", 25, "@text");
$xls->add_field("Jumlah", 15, "#,##0.00");
$xls->add_field("Mingguan", 15, "#,##0.00");
$xls->add_sheet("".str_replace("s/d","-",$apre['periode']));
if ($apre['id_sup'] > 0) $xls->add_sub_title("Nama Supplier : ".$apre['nama_sup']);
if ($apre['id_grup'] > 0) $xls->add_sub_title("Grup Barang : ".$apre['nama_grup']);
$xls->show_titles();
$xls->show_headers();
$nomor = 0;
while ($row = $apre['query']->fetch(SimplePdo::FETCH_ASSOC)) {
$total = $row['Volume'] ?? 0;
$mg_total = $total / ($apre['Hari']/7);
$kali = $row['Qty'] ?? 0;
if ($kali > 0) {
$norm = floor($total / $kali);
$sisa = $total - ($norm * $kali);
$mg_norm = floor($mg_total / $kali);
$mg_sisa = $mg_total - ($mg_norm * $kali);
} else {
$norm = 0;
$sisa = $total;
$mg_norm = 0;
$mg_sisa = $mg_total;
}
$stok = rupiah($norm,0)." ".$row['Satuan_Normal'];
$mg_stok = rupiah($mg_norm,0)." ".$row['Satuan_Normal'];
if ($row['Satuan_Normal'] !== $row['Satuan_Stok']) {
$stok .= ", ".rupiah($sisa,0)." ".$row['Satuan_Stok'];
$mg_stok .= ", ".rupiah($mg_sisa,0)." ".$row['Satuan_Stok'];
}
$xls->add_row([ ++$nomor, $row['Nama_Produk'], $stok, $mg_stok ]);
}
} else {
$xls->add_field("No.", 5, "@integer");
$xls->add_field("Nama Barang", 20, "@text");
$xls->add_field("Jumlah", 15, "#,##0.00");
$xls->add_field("Mingguan", 15, "#,##0.00");
$xls->add_sheet("".str_replace("s/d","-",$apre['periode']));
if ($apre['id_sup'] > 0) $xls->add_sub_title("Nama Supplier : ".$apre['nama_sup']);
if ($apre['id_grup'] > 0) $xls->add_sub_title("Grup Barang : ".$apre['nama_grup']);
$xls->show_titles();
$xls->show_headers();
$nomor = 0; $tot_rup = 0; $tot_mg = 0;
while ($row = $apre['query']->fetch(SimplePdo::FETCH_ASSOC)) {
$mg_avg = ($row['Rupiah'] > 0) ? $row['Rupiah'] / ($apre['Hari'] / 7) : 0;
$tot_rup += $row['Rupiah'];
$tot_mg += $mg_avg;
$xls->add_row([ ++$nomor, $row['Nama_Produk'], $row['Rupiah'], $mg_avg ]);
}
$xls->add_row_bold([ "", "GRAND TOTAL", $tot_rup, $tot_mg ]);
}
$xls->add_stamp(1, true);
$xls->download("Data Pembelian ".str_replace("s/d","-",$apre['periode']).".xlsx");
unset($xls);
}
public function index() {
$form = new Form($this->app);
$ttipe = $form->radio("_", "Tipe", "V", true, false, ["V"=>"Volume","R"=>"Rupiah"]);
$tcab = $form->option_db("_", "CabID", $this->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);
$ajson['html'] = '
<div class="row mb-1">
<label class="col-sm-4 col-lg-3 col-form-label" for="Tipe">Tipe Laporan</label>
<div class="col">'.$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>';
$this->app->json($ajson);
}
}
app/Controller/Report/Beli/BeliController.php
+226
View File
@@ -0,0 +1,226 @@
<?php
/*******************************************************************
PHP Class : /Controller/Report/Beli/BeliController
Description : Laporan Pembelian
Created By : Siau Pheng ([email protected]).
Created Date : April 12th, 2011.
Last Modified : September 30th, 2026.
(c) 3FONIA Software; WWW.3FONIA.COM.
*******************************************************************/
declare(strict_types=1);
namespace App\Controller\Report\Beli;
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 BeliController {
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 = [
'tipe' => Param::Get("Tipe", "R"), // R or D
'id_sup' => Param::Int("SupID", 0),
'id_grup' => Param::Int("Grup_InvID", 0),
'tgl_from' => Param::Get("Tgl_From"),
'tgl_to' => Param::Get("Tgl_To"),
];
$apre['nama_sup'] = ($apre['id_sup'] > 0) ? ($this->db->fetchField("SELECT CONCAT(Nama_Sup,' (',Kode_Sup,')') Nama FROM para_supplier WHERE SupID=?", [$apre['id_sup']]) ?? '') : '';
$apre['nama_grup'] = ($apre['id_grup'] > 0) ? ($this->db->fetchField("SELECT Nama_Grup FROM inv_produk_grup WHERE Grup_InvID=?", [$apre['id_grup']]) ?? '') : '';
// generate report header
$apre['periode'] = $apre['tgl_from'] . ($apre['tgl_from'] !== $apre['tgl_to'] ? ' s/d '.$apre['tgl_to'] : '');
$tsql = ''; $asql = [tgl_sql2str($apre['tgl_from']), tgl_sql2str($apre['tgl_to'])];
if ($this->id_cab > 0) {
$tsql .= " AND CabID=?";
array_push($asql, $this->id_cab);
}
if ($apre['id_sup'] > 0) {
$tsql .= " AND SupID=?";
array_push($asql, $apre['id_sup']);
}
//id_grup ?
if ($apre['tipe'] === "R") {
$apre['query'] = $this->db->runQuery("SELECT S.Nama_Sup,SUM(B.Real_Beli+B.Real_Diskon) Total_Beli,SUM(B.Real_Diskon) Total_Diskon,SUM(B.Real_Beli) Total FROM (SELECT * FROM inv_beli WHERE Data_Beli=1 AND (Tgl_Beli BETWEEN ? AND ?)".$tsql.") B LEFT JOIN para_supplier S ON (B.SupID=S.SupID) GROUP BY B.SupID ORDER BY S.Nama_Sup", $asql);
} else {
$apre['query'] = $this->db->runQuery("SELECT B.*,S.Nama_Sup,B.Total_Beli-B.Total_Diskon Total FROM (SELECT * FROM inv_beli WHERE Data_Beli=1 AND (Tgl_Beli BETWEEN ? AND ?)".$tsql.") B LEFT JOIN para_supplier S ON (B.SupID=S.SupID) ORDER BY B.No_Beli", $asql);
}
return $apre;
}
public function print() {
$apre = $this->prepare();
$pre = new PrintHTML($this->app);
$pre->add_title([strtoupper($this->reg_name), ($apre['tipe']==="R"?"REKAP":"DETAIL")." PEMBELIAN", "Periode : ".$apre['periode']]);
if ($apre['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 ($apre['id_sup'] > 0) $pre->add_sub_title("Nama Supplier : ".$apre['nama_sup']);
if ($apre['id_grup'] > 0) $pre->add_sub_title("Grup Barang : ".$apre['nama_grup']);
$pre->show_titles();
$pre->show_headers();
$tot_beli = 0; $tot_diskon = 0; $nomor = 0;
while ($row = $apre['query']->fetch(SimplePdo::FETCH_ASSOC)) {
//if ($row['Total] === 0) continue;
$tot_beli += $row['Total_Beli'];
$tot_diskon += $row['Total_Diskon'];
$pre->add_row([ ++$nomor, $row['Nama_Sup'], $row['Total_Beli'], $row['Total_Diskon'], $row['Total'] ]);
}
$pre->add_span([ ["GRAND TOTAL",2,"R,B"],[$tot_beli,1,"R,B","rupiah"],[$tot_diskon,1,"R,B","rupiah"],[$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 ($apre['id_sup'] > 0) $pre->add_sub_title("Nama Supplier : ".$apre['nama_sup']);
if ($apre['id_grup'] > 0) $pre->add_sub_title("Grup Barang : ".$apre['nama_grup']);
$pre->show_titles();
$pre->show_headers();
$tot_beli = 0; $tot_diskon = 0;
while ($row = $apre['query']->fetch(SimplePdo::FETCH_ASSOC)) {
$tot_beli += $row['Total_Beli'];
$tot_diskon += $row['Total_Diskon'];
$pre->add_row([ $row['No_Beli'], $row['Tgl_Beli'], $row['No_Faktur'], $row['Nama_Sup'], $row['Total_Beli'], $row['Total_Diskon'], $row['Total'] ]);
}
$pre->add_span([ ["GRAND TOTAL",4,"R,B"],[$tot_beli,1,"R,B","rupiah"],[$tot_diskon,1,"R,B","rupiah"],[$tot_beli-$tot_diskon,1,"R,B","rupiah"] ]);
}
$pre->add_stamp(1, true);
$pre->show();
}
public function excel() {
$apre = $this->prepare();
$xls = new Xlsx($this->app);
$xls->set_meta([
'title' => "Data Pembelian",
'desc' => "Export Data Pembelian"
]);
$xls->add_title([ $this->reg_name, "DATA ".($apre['tipe']==="R"?"REKAP":"DETAIL")." PEMBELIAN", "Periode : ".$apre['periode'] ]);
if ($apre['tipe'] === "R") {
$xls->add_field("No.", 5, "@integer");
$xls->add_field("Nama Supplier", 25, "@text");
$xls->add_field("Sub. Total", 15, "#,##0.00");
$xls->add_field("Diskon", 15, "#,##0.00");
$xls->add_field("Total", 15, "#,##0.00");
$xls->add_sheet("".str_replace("s/d","-",$apre['periode']));
if ($apre['id_sup'] > 0) $xls->add_sub_title("Nama Supplier : ".$apre['nama_sup']);
if ($apre['id_grup'] > 0) $xls->add_sub_title("Grup Barang : ".$apre['nama_grup']);
$xls->show_titles();
$xls->show_headers();
$tot_beli = 0; $tot_diskon = 0; $nomor = 0;
while ($row = $apre['query']->fetch(SimplePdo::FETCH_ASSOC)) {
$tot_beli += $row['Total_Beli'];
$tot_diskon += $row['Total_Diskon'];
$xls->add_row([ ++$nomor, $row['Nama_Sup'], $row['Total_Beli'], $row['Total_Diskon'], $row['Total'] ]);
}
$xls->add_row_bold([ "", "GRAND TOTAL", $tot_beli, $tot_diskon, $tot_beli-$tot_diskon ]);
} else {
$xls->add_field("No. Nota", 15, "@");
$xls->add_field("Tgl. Nota", 12, "@date");
$xls->add_field("No. Faktur", 15, "@text");
$xls->add_field("Nama Supplier", 20, "@text");
$xls->add_field("Sub. Total", 15, "#,##0.00");
$xls->add_field("Diskon", 15, "#,##0.00");
$xls->add_field("Total", 15, "#,##0.00");
$xls->add_sheet("".str_replace("s/d","-",$apre['periode']));
if ($apre['id_sup'] > 0) $xls->add_sub_title("Nama Supplier : ".$apre['nama_sup']);
if ($apre['id_grup'] > 0) $xls->add_sub_title("Grup Barang : ".$apre['nama_grup']);
$xls->show_titles();
$xls->show_headers();
$tot_beli = 0; $tot_diskon = 0;
while ($row = $apre['query']->fetch(SimplePdo::FETCH_ASSOC)) {
$tot_beli += $row['Total_Beli'];
$tot_diskon += $row['Total_Diskon'];
$xls->add_row([ $row['No_Beli'], $row['Tgl_Beli'], $row['No_Faktur'], $row['Nama_Sup'], $row['Total_Beli'], $row['Total_Diskon'], $row['Total'] ]);
}
$xls->add_row_bold([ "", "", "", "GRAND TOTAL", $tot_beli, $tot_diskon, $tot_beli-$tot_diskon ]);
}
$xls->add_stamp(1, true);
$xls->download("Data Pembelian ".str_replace("s/d","-",$apre['periode']).".xlsx");
unset($xls);
}
public function index() {
$form = new Form($this->app);
$ttipe = $form->radio("_", "Tipe", "R", true, false, ["R"=>"Rekap","D"=>"Detail"]);
$tcab = $form->option_db("_", "CabID", $this->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);
$ajson['html'] = '
<div class="row mb-1">
<label class="col-sm-4 col-lg-3 col-form-label" for="Tipe">Tipe Laporan</label>
<div class="col">'.$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>';
$this->app->json($ajson);
}
}
app/Controller/Report/Beli/MutasiController.php
+160
View File
@@ -0,0 +1,160 @@
<?php
/*******************************************************************
PHP Class : /Controller/Report/Beli/MutasiController
Description : Laporan Mutasi Pembelian
Created By : Siau Pheng ([email protected]).
Created Date : April 3rd, 2013.
Last Modified : October 2nd, 2026.
(c) 3FONIA Software; WWW.3FONIA.COM.
*******************************************************************/
declare(strict_types=1);
namespace App\Controller\Report\Beli;
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 MutasiController {
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 = [
'id_sup' => Param::Int("SupID", 0),
'tgl_from' => Param::Get("Tgl_From"),
'tgl_to' => Param::Get("Tgl_To"),
];
$apre['nama_sup'] = ($apre['id_sup'] > 0) ? ($this->db->fetchField("SELECT CONCAT(Nama_Sup,' (',Kode_Sup,')') Nama FROM para_supplier WHERE SupID=?", [$apre['id_sup']]) ?? '') : '';
// generate report header
$apre['periode'] = $apre['tgl_from'] . ($apre['tgl_from'] !== $apre['tgl_to'] ? ' s/d '.$apre['tgl_to'] : '');
$tsql = ''; $asql = [$apre['id_sup']];
if ($this->id_cab > 0) {
$tsql .= " AND CabID=?";
array_push($asql, $this->id_cab);
}
$n_saldo = (float) $this->db->fetchField("SELECT SUM(Real_Beli) Total FROM inv_beli WHERE Data_Beli=1 AND SupID=?".$tsql." AND Tgl_Beli<?", array_merge($asql,[tgl_sql2str($apre['tgl_from'])])) ?? 0;
$n_bayar = (float) $this->db->fetchField("SELECT SUM(Total_Bayar+Total_Potong) Bayar FROM inv_beli_lunas WHERE No_Beli IN (SELECT No_Beli FROM inv_beli WHERE Data_Beli=1 AND SupID=?".$tsql.") AND Tgl_Bayar<?", array_merge($asql,[tgl_sql2str($apre['tgl_from'])])) ?? 0;
$n_saldo -= $n_bayar;
$apre['Saldo'] = $n_saldo;
$apre['query'] = $this->db->runQuery("(SELECT Tgl_Beli,SUM(Real_Beli) Total,0 Bayar FROM inv_beli WHERE Data_Beli=1 AND (Tgl_Beli BETWEEN ? AND ?) AND SupID=?".$tsql." GROUP BY Tgl_Beli) UNION ALL (SELECT Tgl_Bayar Tgl_Beli,0 Total,SUM(Total_Bayar+Total_Potong) Bayar FROM inv_beli_lunas WHERE No_Beli IN (SELECT No_Beli FROM inv_beli WHERE Data_Beli=1 AND SupID=?".$tsql.") AND (Tgl_Bayar BETWEEN ? AND ?) GROUP BY Tgl_Bayar) ORDER BY Tgl_Beli,Total DESC", array_merge([tgl_sql2str($apre['tgl_from']),tgl_sql2str($apre['tgl_to'])], $asql, $asql, [tgl_sql2str($apre['tgl_from']),tgl_sql2str($apre['tgl_to'])]));
return $apre;
}
public function print() {
$apre = $this->prepare();
$pre = new PrintHTML($this->app);
$pre->add_title([strtoupper($this->reg_name), "MUTASI PEMBELIAN", "Periode : ".$apre['periode']]);
$pre->add_field("Tanggal",10,"C","tgl_sql2str");
$pre->add_field("Nota / Bon",20,"R","rupiah");
$pre->add_field("Bayar",20,"R","rupiah");
$pre->add_field("Sisa",20,"R","rupiah");
$pre->add_sub_title("Nama Supplier : ".$apre['nama_sup']);
$pre->show_titles();
$pre->show_headers();
$tot_sub = 0; $tot_bayar = 0;
$pre->add_span([ ["Saldo Awal",1,"R,B"],["0",1,"R,B"],["0",1,"R,B"],[$apre['Saldo'],1,"R,B","rupiah"] ]);
while ($row = $apre['query']->fetch(SimplePdo::FETCH_ASSOC)) {
$tot_sub += $row['Total'];
$tot_bayar += $row['Bayar'];
$apre['Saldo'] += $row['Total'] - $row['Bayar'];
$pre->add_row([ $row['Tgl_Beli'], $row['Total'], $row['Bayar'], $apre['Saldo'] ]);
}
$pre->add_span([ ["Saldo Akhir",1,"R,B"],[$tot_sub,1,"R,B","rupiah"],[$tot_bayar,1,"R,B","rupiah"],[$apre['Saldo'],1,"R,B","rupiah"] ]);
$pre->add_stamp(1, true);
$pre->show();
}
public function excel() {
$apre = $this->prepare();
$xls = new Xlsx($this->app);
$xls->set_meta([
'title' => "Data Mutasi Pembelian",
'desc' => "Export Data Mutasi Pembelian"
]);
$xls->add_title([ $this->reg_name, "DATA MUTASI PEMBELIAN", "Periode : ".$apre['periode'] ]);
$xls->add_field("Tanggal", 12, "@date");
$xls->add_field("Nota / Bon", 15, "#,##0.00");
$xls->add_field("Bayar", 15, "#,##0.00");
$xls->add_field("Sisa", 15, "#,##0.00");
$xls->add_sheet("".str_replace("s/d","-",$apre['periode']));
$xls->add_sub_title("Nama Supplier : ".$apre['nama_sup']);
$xls->show_titles();
$xls->show_headers();
$tot_sub = 0; $tot_bayar = 0;
$xls->add_row_bold([ "Saldo Awal", 0, 0, $apre['Saldo'] ]);
while ($row = $apre['query']->fetch(SimplePdo::FETCH_ASSOC)) {
$tot_sub += $row['Total'];
$tot_bayar += $row['Bayar'];
$apre['Saldo'] += $row['Total'] - $row['Bayar'];
$xls->add_row([ $row['Tgl_Beli'], $row['Total'], $row['Bayar'], $apre['Saldo'] ]);
}
$xls->add_row_bold([ "Saldo Akhir", $tot_sub, $tot_bayar, $apre['Saldo'] ]);
$xls->add_stamp(1, true);
$xls->download("Data Mutasi Pembelian ".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"]);
$tsup = $form->option_db("_", "SupID", 0, true, false, "para_supplier", ["SupID","Nama_Sup"], "Aktif=1 ORDER BY Nama_Sup", [0,"&nbsp;"]);
$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="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="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);
}
}
app/Controller/Report/Beli/ReturController.php
+201
View File
@@ -0,0 +1,201 @@
<?php
/*******************************************************************
PHP Class : /Controller/Report/Beli/ReturController
Description : Laporan Retur Pembelian
Created By : Siau Pheng ([email protected]).
Created Date : April 12th, 2011.
Last Modified : October 2nd, 2026.
(c) 3FONIA Software; WWW.3FONIA.COM.
*******************************************************************/
declare(strict_types=1);
namespace App\Controller\Report\Beli;
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 ReturController {
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 = [
'tipe' => Param::Get("Tipe", "R"), // R or D
'id_sup' => Param::Int("SupID", 0),
'tgl_from' => Param::Get("Tgl_From"),
'tgl_to' => Param::Get("Tgl_To"),
];
$apre['nama_sup'] = ($apre['id_sup'] > 0) ? ($this->db->fetchField("SELECT CONCAT(Nama_Sup,' (',Kode_Sup,')') Nama FROM para_supplier WHERE SupID=?", [$apre['id_sup']]) ?? '') : '';
// generate report header
$apre['periode'] = $apre['tgl_from'] . ($apre['tgl_from'] !== $apre['tgl_to'] ? ' s/d '.$apre['tgl_to'] : '');
$tsql = ''; $asql = [tgl_sql2str($apre['tgl_from']), tgl_sql2str($apre['tgl_to'])];
if ($this->id_cab > 0) {
$tsql .= " AND CabID=?";
array_push($asql, $this->id_cab);
}
if ($apre['id_sup'] > 0) {
$tsql .= " AND SupID=?";
array_push($asql, $apre['id_sup']);
}
if ($apre['tipe'] === "R") {
$apre['query'] = $this->db->runQuery("SELECT B.*,S.Nama_Sup FROM (SELECT SupID,SUM(-Real_Beli) Total_Retur FROM inv_beli WHERE Data_Beli=0 AND (Tgl_Beli BETWEEN ? AND ?)".$tsql." GROUP BY SupID) B LEFT JOIN para_supplier S ON (B.SupID=S.SupID) ORDER BY S.Nama_Sup", $asql);
} else {
$apre['query'] = $this->db->runQuery("SELECT B.*,S.Nama_Sup,-B.Real_Beli Retur FROM (SELECT * FROM inv_beli WHERE Data_Beli=0 AND (Tgl_Beli BETWEEN ? AND ?)".$tsql.") B LEFT JOIN para_supplier S ON (B.SupID=S.SupID) ORDER BY B.No_Beli", $asql);
}
return $apre;
}
public function print() {
$apre = $this->prepare();
$pre = new PrintHTML($this->app);
$pre->add_title([strtoupper($this->reg_name), ($apre['tipe']==="R"?"REKAP":"DETAIL")." RETUR PEMBELIAN", "Periode : ".$apre['periode']]);
if ($apre['tipe'] === "R") {
$pre->add_field("No.",10,"C");
$pre->add_field("Nama Supplier",50,"L");
$pre->add_field("Total",20,"R","rupiah");
if ($apre['id_sup'] > 0) $pre->add_sub_title("Nama Supplier : ".$apre['nama_sup']);
$pre->show_titles();
$pre->show_headers();
$tot_retur = 0; $nomor = 0;
while ($row = $apre['query']->fetch(SimplePdo::FETCH_ASSOC)) {
$tot_retur += $row['Total_Retur'];
$pre->add_row([ ++$nomor, $row['Nama_Sup'], $row['Total_Retur'] ]);
}
$pre->add_span([ ["GRAND TOTAL",2,"R,B"],[$tot_retur,1,"R,B","rupiah"] ]);
} else {
$pre->add_field("No. Nota",30,"C");
$pre->add_field("Tgl. Nota",30,"C", "tgl_sql2str");
$pre->add_field("Nama Supplier",50,"L");
$pre->add_field("Total",30,"R","rupiah");
$pre->add_field("Catatan",50,"L");
if ($apre['id_sup'] > 0) $pre->add_sub_title("Nama Supplier : ".$apre['nama_sup']);
$pre->show_titles();
$pre->show_headers();
$tot_retur = 0;
while ($row = $apre['query']->fetch(SimplePdo::FETCH_ASSOC)) {
$tot_retur += $row['Retur'];
$pre->add_row([ $row['No_Beli'], $row['Tgl_Beli'], $row['Nama_Sup'], $row['Retur'], $row['No_Faktur'] ]);
}
$pre->add_span([ ["GRAND TOTAL",3,"R,B"],[$tot_retur,1,"R,B","rupiah"],["nbsp;",1,"L"] ]);
}
$pre->add_stamp(1, true);
$pre->show();
}
public function excel() {
$apre = $this->prepare();
$xls = new Xlsx($this->app);
$xls->set_meta([
'title' => "Data Retur Pembelian",
'desc' => "Export Data Retur Pembelian"
]);
$xls->add_title([ $this->reg_name, "DATA ".($apre['tipe']==="R"?"REKAP":"DETAIL")." RETUR PEMBELIAN", "Periode : ".$apre['periode'] ]);
if ($apre['tipe'] === "R") {
$xls->add_field("No.", 5, "@integer");
$xls->add_field("Nama Supplier", 25, "@text");
$xls->add_field("Total", 15, "#,##0.00");
$xls->add_sheet("".str_replace("s/d","-",$apre['periode']));
if ($apre['id_sup'] > 0) $xls->add_sub_title("Nama Supplier : ".$apre['nama_sup']);
$xls->show_titles();
$xls->show_headers();
$tot_retur = 0; $nomor = 0;
while ($row = $apre['query']->fetch(SimplePdo::FETCH_ASSOC)) {
$tot_retur += $row['Total_Retur'];
$xls->add_row([ ++$nomor, $row['Nama_Sup'], $row['Total_Retur'] ]);
}
$xls->add_row_bold([ "", "GRAND TOTAL", $tot_retur ]);
} else {
$xls->add_field("No. Nota", 15, "@");
$xls->add_field("Tgl. Nota", 12, "@date");
$xls->add_field("Nama Supplier", 20, "@text");
$xls->add_field("Total", 15, "#,##0.00");
$xls->add_field("Catatan", 25, "@text");
$xls->add_sheet("".str_replace("s/d","-",$apre['periode']));
if ($apre['id_sup'] > 0) $xls->add_sub_title("Nama Supplier : ".$apre['nama_sup']);
$xls->show_titles();
$xls->show_headers();
$tot_retur = 0;
while ($row = $apre['query']->fetch(SimplePdo::FETCH_ASSOC)) {
$tot_retur += $row['Retur'];
$xls->add_row([ $row['No_Beli'], $row['Tgl_Beli'], $row['Nama_Sup'], $row['Retur'], $row['No_Faktur'] ]);
}
$xls->add_row_bold([ "", "", "GRAND TOTAL", $tot_retur, "" ]);
}
$xls->add_stamp(1, true);
$xls->download("Data Retur Pembelian ".str_replace("s/d","-",$apre['periode']).".xlsx");
unset($xls);
}
public function index() {
$form = new Form($this->app);
$ttipe = $form->radio("_", "Tipe", "R", true, false, ["R"=>"Rekap","D"=>"Detail"]);
$tcab = $form->option_db("_", "CabID", $this->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"]);
$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="Tipe">Tipe Laporan</label>
<div class="col">'.$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="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);
}
}