0) {
$db->Query("SELECT Nama_Cab FROM para_cabang WHERE CabID='".$id_cab1."' LIMIT 1");
if ($db->Next()) $nama_cab1 = $db->Row("Nama_Cab");
}
if ($id_cab2>0) {
$db->Query("SELECT Nama_Cab FROM para_cabang WHERE CabID='".$id_cab2."' LIMIT 1");
if ($db->Next()) $nama_cab2 = $db->Row("Nama_Cab");
}
// generate report header
$tglheader = $tglfrom;
if ($tglfrom!==$tglto) $tglheader .= " S/D ".$tglto;
$tglfrom = tgl_sql2str($tglfrom);
$tglto = tgl_sql2str($tglto);
$tsql = ($id_cab1==0) ? "" : " AND Dari_CabID='".$id_cab1."'";
$tsql .= ($id_cab2==0) ? "" : " AND Ke_CabID='".$id_cab2."'";
if ($tipe=="R") {
$db->Query("SELECT M.*,C1.Nama_Cab Nama1,C2.Nama_Cab Nama2 FROM (SELECT * FROM inv_mutasi WHERE (Tgl_Mutasi BETWEEN '".$tglfrom."' AND '".$tglto."')".$tsql.") M LEFT JOIN para_cabang C1 ON (M.Dari_CabID=C1.CabID) LEFT JOIN para_cabang C2 ON (M.Ke_CabID=C2.CabID) ORDER BY M.Tgl_Mutasi,M.No_Mutasi");
} else {
}
}
if ( $data == "print" ) {
Report_Header(($tipe=="R"?"REKAP":"DETAIL")." MUTASI STOK CABANG", "Periode : ".$tglheader);
$pre = new \siaupheng\fonia3\Printer\PrintHTML();
if ($tipe=="R") {
$pre->add_field("Tgl. Mutasi",30,"C","sqltgl");
$pre->add_field("No. Mutasi",30,"C");
$pre->add_field("Dari Cabang",20,"L");
$pre->add_field("Ke Cabang",20,"L");
$pre->add_field("Total",20,"R","rupiah");
$pre->add_field("Catatan",50,"L");
if ($id_cab1>0) $pre->add_span(array("Dari Cabang : ".$nama_cab1,6,"L,B"));
if ($id_cab2>0) $pre->add_span(array("Ke Cabang : ".$nama_cab2,6,"L,B"));
$tot_mutasi = 0;
while ($db->Next()) {
$tot_mutasi += $db->Row("Total_Mutasi");
$pre->add_value($db->Row("Tgl_Mutasi"), $db->Row("No_Mutasi"), $db->Row("Nama1"), $db->Row("Nama2"), $db->Row("Total_Mutasi"), $db->Row("Catatan"));
}
$pre->add_span(array("GRAND TOTAL",4,"R,B"),array($tot_mutasi,1,"R,B","rupiah"),["",1,"L,B"]);
} else {
}
$pre->add_stamp(1, true);
$pre->show();
} else if ( $data == "export" ) {
$xls = new SimpleXLS([
'title'=>"Data Mutasi Stok Cabang",
'desc'=>"Export Data Mutasi Stok Cabang"
]);
if ($tipe=="R") {
$xls->add_header("".$_SESSION['__WEB_APP']['REG_NAME']."");
$xls->add_header("DATA REKAP MUTASI STOK CABANG");
$xls->add_header("Periode : ".$tglheader);
$xls->add_field("Tgl. Mutasi", 12, "C", "sqltgl");
$xls->add_field("No. Mutasi", 15, "C");
$xls->add_field("Dari Cabang", 20, "L");
$xls->add_field("Ke Cabang", 20, "L");
$xls->add_field("Total", 15, "R,N");
$xls->add_field("Catatan", 25, "L");
$xls->add_sheet("".str_replace("S/D","-",$tglheader), true);
$tot_mutasi = 0;
while ($db->Next()) {
$tot_mutasi += $db->Row("Total_Mutasi");
$xls->add_value($db->Row("Tgl_Mutasi"), $db->Row("No_Mutasi"), $db->Row("Nama1"), $db->Row("Nama2"), $db->Row("Total_Mutasi"), $db->Row("Catatan"));
}
$xls->add_span(array("GRAND TOTAL",4,"R,B"),array($tot_mutasi,1,"R,B,N"),["",1,"L,B"]);
} else {
}
$xls->add_stamp(1, true);
$xls->send("Data Mutasi Stok Cabang ".str_replace("S/D","-",$tglheader).".xlsx");
unset($xls);
} else if ( $data == "default") {
$form = new Form($db);
$tcab1 = $form->option_db("_", "Cab1ID", $id_cab, true, false, "para_cabang", ["CabID","Nama_Cab"], "Aktif=1 ORDER BY CabID", [0,"SEMUA CABANG"]);
$tcab2 = $form->option_db("_", "Cab2ID", $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);
echo '
';
}
?>