siaupheng/glamore
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

repo penerimaan pos: penambahan pengeluaran kas

Browse Source
This commit is contained in:
siaupheng
2026-02-12 16:15:22 +07:00
parent d58e8d5409
commit 3f3f74a5b4
3 changed files with 66 additions and 47 deletions
Download Patch File Download Diff File Expand all files Collapse all files
apps/php/repo/dana_pos.php
+12 -1
View File
@@ -84,7 +84,7 @@ if ( $data == "print-pos" ) {
$pre->add("Nama : ".$ainfo['Nama_User']);
$pre->add_empty();
$pre->add(array("Jumlah Penjualan Rp.",24), array(rupiah($tot_jual-$tot_diskon),16,"R"));
//$pre->add(array("Jumlah Pulsa & PPOB Rp.",24), array(rupiah($tot_pulsa),16,"R"));
//$pre->add(array("Jumlah PPOB Rp.",24), array(rupiah($tot_pulsa),16,"R"));
$pre->add(array("Jumlah Diskon Rp.",24), array(rupiah($tot_diskon),16,"R"));
if ($tot_potong>0) $pre->add(array("Jumlah Promo Rp.",24), array(rupiah($tot_potong),16,"R"));
$pre->add_line("-");
@@ -95,6 +95,17 @@ if ( $data == "print-pos" ) {
$pre->add_line("-");
}
$pre->add(array("TOTAL PENERIMAAN Rp.",24), array(rupiah($tot_dana),16,"R"));
// pengeluaran kas
$db->Query("SELECT K.*,P.Kode_TX FROM (SELECT * FROM gel_kas WHERE (Tgl_Kas BETWEEN '".$tglfrom."' AND '".$tglto."') AND Tipe_Kas='O'".$tsql." ORDER BY No_Kas) K LEFT JOIN para_tx_kas P ON (P.TXID=K.TXID) ORDER BY K.No_Kas");
if ($db->RecordCount()>0) {
$pre->add_empty();
$pre->addc("PENGELUARAN KAS");
}
while ($db->Next()) {
$pre->add([$db->Row("Kode_TX"),20], ["Rp.",4,"R"], [rupiah($db->Row("Jumlah")),16,"R"]);
$pre->add($db->Row("Ket"));
}
$pre->add_line("=");
$pre->add_stamp(1, true);
$pre->add_empty($_SESSION['__APP_INV']['PRINT_ROW']);