Query("SELECT * FROM ((SELECT Tgl_Kas,'Pengeluaran Kas' Ket,SUM(Jumlah) Jumlah FROM gel_kas WHERE Tipe_Kas='O' AND (Tgl_Kas BETWEEN '".$tglfrom."' AND '".$tglto."')".$tsql." GROUP BY Tgl_Kas) UNION ALL (SELECT Tgl_Bayar Tgl_Kas,'Pembayaran Supplier' Ket,SUM(Total_Bayar) Jumlah FROM inv_beli_lunas WHERE (Tgl_Bayar BETWEEN '".$tglfrom."' AND '".$tglto."')".$tsql." GROUP BY Tgl_Bayar)) A ORDER BY A.Tgl_Kas");
} else {
$db->Query("SELECT * FROM ((SELECT No_Kas,Tgl_Kas,Ket,Jumlah FROM gel_kas WHERE Tipe_Kas='O' AND (Tgl_Kas BETWEEN '".$tglfrom."' AND '".$tglto."')".$tsql.") UNION ALL (SELECT L.No_Beli No_Kas,L.Tgl_bayar Tgl_Kas,S.Nama_Sup Ket,L.Total_Bayar Jumlah FROM (SELECT * FROM inv_beli_lunas WHERE (Tgl_Bayar BETWEEN '".$tglfrom."' AND '".$tglto."')".$tsql.") L LEFT JOIN para_supplier S ON (S.SupID=L.SupID))) A ORDER BY A.No_Kas");
}
}
if ( $data == "print" ) {
Report_Header(($tipe=="R"?"REKAP":"DETAIL")." PENGELUARAN KAS", "Periode : ".$tglheader);
$pre = new \siaupheng\fonia3\Printer\PrintHTML();
if ($tipe=="R") {
$pre->add_field("No.",10,"C");
$pre->add_field("Tanggal",30,"C","sqltgl");
$pre->add_field("Keterangan",80,"L");
$pre->add_field("Jumlah",20,"R","rupiah");
$sub_tot = 0; $nomor = 0;
while ($db->Next()) {
$sub_tot += $db->Row("Jumlah");
$pre->add_value(++$nomor, $db->Row("Tgl_Kas"), $db->Row("Ket"), $db->Row("Jumlah"));
}
$pre->add_span(array("GRAND TOTAL",3,"R,B"),array($sub_tot,1,"R,B","rupiah"));
} else {
$pre->add_field("No. TX",30,"C");
$pre->add_field("Tanggal",30,"C","sqltgl");
$pre->add_field("Keterangan",150,"L");
$pre->add_field("Jumlah",30,"R","rupiah");
$sub_tot = 0;
while ($db->Next()) {
$sub_tot += $db->Row("Jumlah");
$pre->add_value($db->Row("No_Kas"), $db->Row("Tgl_Kas"), $db->Row("Ket"), $db->Row("Jumlah"));
}
$pre->add_span(array("GRAND TOTAL",3,"R,B"),array($sub_tot,1,"R,B","rupiah"));
}
$pre->add_stamp(1, true);
$pre->show();
} else if ( $data == "export" ) {
$xls = new SimpleXLS([
'title'=>"Data Pengeluaran Kas",
'desc'=>"Export Data Pengeluaran Kas"
]);
$xls->add_header("".$_SESSION['__WEB_APP']['REG_NAME']."");
$xls->add_header("DATA ".($tipe=="R"?"REKAP":"DETAIL")." PENGELUARAN KAS");
$xls->add_header("Periode : ".$tglheader);
if ($tipe=="R") {
$xls->add_field("No.", 5, "C");
$xls->add_field("Tanggal", 12, "C", "tgl_sql2str");
$xls->add_field("Keterangan", 50, "L");
$xls->add_field("Jumlah", 15, "R,N");
$xls->add_sheet("".str_replace("S/D","-",$tglheader), true);
$sub_tot = 0; $nomor = 0;
while ($db->Next()) {
$sub_tot += $db->Row("Jumlah");
$xls->add_value(++$nomor, $db->Row("Tgl_Kas"), $db->Row("Ket"), $db->Row("Jumlah"));
}
$xls->add_span(array("GRAND TOTAL",3,"R,B"),array($sub_tot,1,"R,B,N"));
} else {
$xls->add_field("No. TX", 15, "C");
$xls->add_field("Tanggal", 12, "C", "tgl_sql2str");
$xls->add_field("Keterangan", 50, "L");
$xls->add_field("Jumlah", 15, "R,N");
$xls->add_sheet("".str_replace("S/D","-",$tglheader), true);
$sub_tot = 0;
while ($db->Next()) {
$sub_tot += $db->Row("Jumlah");
$xls->add_value($db->Row("No_Kas"), $db->Row("Tgl_Kas"), $db->Row("Ket"), $db->Row("Jumlah"));
}
$xls->add_span(array("GRAND TOTAL",3,"R,B"),array($sub_tot,1,"R,B,N"));
}
$xls->add_stamp(1, true);
$xls->send("Data Pengeluaran Kas ".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"]);
$tfrom = $form->datebox("_", "Tgl_From", tgl_ymd(), true, false);
$tto = $form->datebox("_", "Tgl_To", tgl_ymd(), true, false);
echo '
';
}
?>