app = $app;
$this->db = $db;
$this->id_cab = Param::Int("CabID", 0);
$this->reg_name = $session->get('WEB_APP')['REG_NAME'];
}
public function brow_produk() {
$tcari = Param::Get("Cari_Produk");
$tsql = ''; $asql = [1];
if (!empty($tcari)) {
$tsql .= " AND Barcode_Nama LIKE ?";
$asql[] = '%' . $tcari . '%';
}
$obj = new Table($this->app);
$obj->set_table("vi_inv_produk", "*", "Aktif=?".$tsql, $asql);
$obj->add_field("InvID", "ID", "hid");
$obj->add_field("SatuanID", "ID", "hid");
$obj->add_field("VarianID", "ID", "hid");
$obj->add_field("Kode_SKU", "SKU", "c");
$obj->add_field("Kode_Barcode", "Barcode", "c");
$obj->add_field("Nama_Lengkap", "Nama Barang", "awr");
$obj->set_field_order("Kode_SKU", "A");
$obj->set_func_select("RepoStokMutasiJS.produk_select");
$this->app->json([ $obj->db_table("divBrowProduk") ]);
}
public function auto_produk() {
$tcari = Param::Get("Auto_Query", "");
$ajson['autodata'] = [];
$bcode = 0; $arec = [];
// Cari by SKU + Barcode
$_row = $this->db->fetchRow("SELECT P.InvID,P.Nama_Lengkap FROM (SELECT * FROM vi_inv_produk WHERE Aktif=1 AND (Kode_SKU=? OR Kode_Barcode=?)) P", [$tcari, $tcari]);
if ($_row) {
$bcode = 1;
$arec = $_row->getData();
}
if ($bcode === 1) {
$ajson['autodata'][] = ['value'=>$arec['InvID'], 'text'=>$arec['Nama_Lengkap'], 'data'=>0, 'bc'=>1];
} else {
$stat = $this->db->runQuery("SELECT P.InvID,P.Nama_Lengkap,P.Kode_SKU FROM (SELECT * FROM vi_inv_produk WHERE Barcode_Nama LIKE ? AND Aktif=1) P ORDER BY P.Nama_Produk,P.Qty LIMIT 50", ['%'.$tcari.'%']);
while ($row = $stat->fetch(SimplePdo::FETCH_ASSOC)) {
$ajson['autodata'][] = ['value'=>$row['InvID'], 'text'=>$row['Nama_Lengkap'], 'html'=>''.$row['Kode_SKU'].' '.$row['Nama_Lengkap'], 'data'=>0, 'bc'=>0];
}
}
$this->app->json($ajson);
}
public function scan_produk() {
$tcari = Param::Get("Cari_Produk", "");
$scandata = [ 'InvID'=>0, 'Nama_Produk'=>"" ];
// Cari by SKU + Barcode
// InvID : Nama_Produk
$_row = $this->db->fetchRow("SELECT P.InvID,P.Nama_Lengkap Nama_Produk FROM (SELECT * FROM vi_inv_produk WHERE Aktif=1 AND Barcode_Nama LIKE ?) P", ['%'.$tcari.'%']);
if ($_row) $scandata = array_merge($scandata, $_row->getData());
$this->app->json( $scandata );
}
private function prepare() {
$apre = [
'id_inv' => Param::Int("InvID", 0),
'tgl_from' => Param::Get("Tgl_From"),
'tgl_to' => Param::Get("Tgl_To"),
'Nama_Produk' => "",
'Qty' => 1,
'Satuan_Stok' => "",
'Satuan_Kemasan' => "",
];
$_produk = $this->db->fetchRow("SELECT Nama_Produk,Qty,Satuan_Stok,Nama_Satuan Satuan_Kemasan FROM vi_inv_produk WHERE InvID=? ORDER BY Qty LIMIT 1", [$apre['id_inv']]);
if ($_produk) $apre = array_merge($apre, $_produk->getData());
// 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']), $apre['id_inv']];
if ($this->id_cab > 0) {
$tsql .= " AND CabID=?";
array_push($asql, $this->id_cab);
}
$apre['query'] = $this->db->runQuery("SELECT D.Tgl_Ref,D.No_Ref,SUM(IF((D.Stok<0 OR D.NotaID=5 OR D.NotaID=6) AND D.NotaID<>3,-D.Stok,0)) Keluar,SUM(IF((D.Stok>0 OR D.NotaID=3) AND (D.NotaID<>5 AND D.NotaID<>6),D.Stok,0)) Masuk, IF(ISNULL(S.Nama_Sup),T.Nama_Member,CONCAT(S.Nama_Sup,IF(B.Data_Beli=1,'',' (Retur)'))) Nama,C.Kode_Cab FROM (SELECT No_Ref,Tgl_Ref,CabID,NotaID,SUM(Stok) Stok FROM inv_detail WHERE (Tgl_Ref BETWEEN ? AND ?) AND InvID=? AND Stok<>0".$tsql." GROUP BY No_Ref) D LEFT JOIN inv_beli B ON (B.No_Beli=D.No_Ref) LEFT JOIN inv_jual J ON (J.No_Jual=D.No_Ref) LEFT JOIN inv_opname O ON (O.No_Opname=D.No_Ref) LEFT JOIN para_supplier S ON (S.SupID=B.SupID) LEFT JOIN app_operator Q ON (Q.UserID=J.UserID) LEFT JOIN para_member T ON (T.MemberID=J.MemberID) LEFT JOIN para_cabang C ON (C.CabID=D.CabID) LEFT JOIN inv_nota N ON (D.NotaID=N.NotaID) GROUP BY D.No_Ref ORDER BY D.Tgl_Ref,N.Urut,D.No_Ref", $asql);
unset($asql[1]); $asql = array_values($asql);
$apre['stok'] = $this->db->fetchField("SELECT SUM(Stok) Stok FROM inv_detail WHERE Tgl_Refprepare();
$pre = new PrintHTML($this->app);
$pre->add_title([strtoupper($this->reg_name), "MUTASI STOK BARANG", "Periode : ".$apre['periode']]);
$pre->add_field("Tanggal",30,"C", "tgl_sql2str");
$pre->add_field("No. Nota",30,"L");
$pre->add_field("Nama Supplier / Member",80,"L");
$pre->add_field("Cabang",10,"L");
$pre->add_field("Masuk",20,"R");
$pre->add_field("Keluar",20,"R");
$pre->add_field("Stok",20,"R");
$pre->add_sub_title("Nama Barang : ".$apre['Nama_Produk']);
$pre->show_titles();
$pre->show_headers();
$tot_m = 0; $tot_k = 0;
$pre->add_span([ ["Stok Awal",4,"R,B"],["",1,"R,B"],["",1,"R,B"],[Invesa::Format_Stok($apre['stok'], $apre['Qty'], $apre['Satuan_Kemasan'], $apre['Satuan_Stok']),1,"R,B"] ]);
while ($row = $apre['query']->fetch(SimplePdo::FETCH_ASSOC)) {
$msk = $row['Masuk'];
$klr = $row['Keluar'];
$apre['stok'] += $msk - $klr;
$tot_m += $msk;
$tot_k += $klr;
$pre->add_row([ $row['Tgl_Ref'], $row['No_Ref'], $row['Nama'], $row['Kode_Cab'], ($msk===0?'':Invesa::Format_Stok($msk, $apre['Qty'], $apre['Satuan_Kemasan'], $apre['Satuan_Stok'])), ($klr===0?'':Invesa::Format_Stok($klr, $apre['Qty'], $apre['Satuan_Kemasan'], $apre['Satuan_Stok'])), Invesa::Format_Stok($apre['stok'], $apre['Qty'], $apre['Satuan_Kemasan'], $apre['Satuan_Stok']) ]);
}
$pre->add_span([ ["Stok Akhir",4,"R,B"],[Invesa::Format_Stok($tot_m, $apre['Qty'], $apre['Satuan_Kemasan'], $apre['Satuan_Stok']),1,"R,B"],[Invesa::Format_Stok($tot_k, $apre['Qty'], $apre['Satuan_Kemasan'], $apre['Satuan_Stok']),1,"R,B"],[Invesa::Format_Stok($apre['stok'], $apre['Qty'], $apre['Satuan_Kemasan'], $apre['Satuan_Stok']),1,"R,B"] ]);
$pre->add_stamp(1, true);
$pre->show();
}
public function excel() {
$apre = $this->prepare();
$xls = new Xlsx($this->app);
$xls->set_meta([
'title' => "Data Mutasi Stok Barang",
'desc' => "Export Data Mutasi Stok Barang"
]);
$xls->add_title([ $this->reg_name, "DATA MUTASI STOK BARANG", "Periode : ".$apre['periode'] ]);
$xls->add_field("Tanggal", 12, "@date");
$xls->add_field("No. Nota", 15, "@text");
$xls->add_field("Nama Supplier / Member", 40, "@text");
$xls->add_field("Cabang", 10, "@text");
$xls->add_field("Masuk", 15, "@");
$xls->add_field("Keluar", 15, "@");
$xls->add_field("Stok", 15, "@");
$xls->add_sheet("".str_replace("s/d","-",$apre['periode']));
$xls->add_sub_title("Nama Barang : ".$apre['Nama_Produk']);
$xls->show_titles();
$xls->show_headers();
$tot_m = 0; $tot_k = 0;
$xls->add_row_bold([ "", "", "Stok Awal", "", "", "", Invesa::Format_Stok($apre['stok'], $apre['Qty'], $apre['Satuan_Kemasan'], $apre['Satuan_Stok']) ]);
while ($row = $apre['query']->fetch(SimplePdo::FETCH_ASSOC)) {
$msk = $row['Masuk'];
$klr = $row['Keluar'];
$apre['stok'] += $msk - $klr;
$tot_m += $msk;
$tot_k += $klr;
$xls->add_row([ $row['Tgl_Ref'], $row['No_Ref'], $row['Nama'], $row['Kode_Cab'], ($msk===0?'':Invesa::Format_Stok($msk, $apre['Qty'], $apre['Satuan_Kemasan'], $apre['Satuan_Stok'])), ($klr===0?'':Invesa::Format_Stok($klr, $apre['Qty'], $apre['Satuan_Kemasan'], $apre['Satuan_Stok'])), Invesa::Format_Stok($apre['stok'], $apre['Qty'], $apre['Satuan_Kemasan'], $apre['Satuan_Stok']) ]);
}
$xls->add_row_bold([ "", "", "Stok Akhir", "", Invesa::Format_Stok($tot_m, $apre['Qty'], $apre['Satuan_Kemasan'], $apre['Satuan_Stok']), Invesa::Format_Stok($tot_k, $apre['Qty'], $apre['Satuan_Kemasan'], $apre['Satuan_Stok']), Invesa::Format_Stok($apre['stok'], $apre['Qty'], $apre['Satuan_Kemasan'], $apre['Satuan_Stok']) ]);
$xls->add_stamp(1, true);
$xls->download("Data Mutasi Stok Barang ".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"]);
$tproduk = $form->textauto("_", "Nama_Produk", ['value'=>0,'text'=>""], true, true, "nama barang");
$tfrom = $form->datebox("_", "Tgl_From", tgl_ymd(), true, false);
$tto = $form->datebox("_", "Tgl_To", tgl_ymd(), true, false);
$ajson['html'] = '
';
if (isMobile()) {
$ajson['html'] .= '';
}
$ajson['html'] .= '
';
$this->app->json($ajson);
}
}