Query("SELECT B.*,DATE_FORMAT(B.Tgl_Beli,'%d-%m-%Y') Tgl_Beli2,DATE_FORMAT(B.Tgl_JT,'%d-%m-%Y') Tgl_JT2,S.Nama_Sup,S.Alamat_Sup,S.No_NPWP,B.Total_Beli-B.Total_Diskon Jumlah FROM (SELECT * FROM inv_beli WHERE No_Beli='".$nota."' LIMIT 1) B LEFT JOIN para_supplier S ON (S.SupID=B.SupID)");
if ($db->Next()) $ainfo = $db->AllRow();
$ainfo['Alamat_Sup'] = str_replace("\n", " ", $ainfo['Alamat_Sup']);
$db->Query("SELECT D.*,P.Nama_Produk,S.Nama_Satuan,R.Nama_Rasa FROM (SELECT InvID,RasaID,SatuanID,Harga_Pokok,SUM(Qty) Qty,SUM(Qty*Harga_Pokok) Jumlah,SUM(Total_Diskon) Total_Diskon FROM inv_detail WHERE No_Ref='".$nota."' GROUP BY InvID,RasaID,SatuanID,Harga_Pokok) D LEFT JOIN inv_produk P ON (P.InvID=D.InvID) LEFT JOIN para_satuan S ON (S.SatuanID=D.SatuanID) LEFT JOIN para_rasa R ON (R.RasaID=D.RasaID) ORDER BY P.Nama_Produk");
//if ($db->RecordCount()==0) return;
// menampilkan judul dibagian atas laporan
$kop = '
FAKTUR PEMBELIAN
';
$kop .= '';
$kop .= '| '.$_SESSION['__WEB_APP']['REG_NAME'].' | Terima Dari Yth. : |
';
$kop .= '| Telp. '.$_SESSION['__WEB_APP']['REG_PHONE'].' | '.$ainfo['Nama_Sup'].' |
';
$kop .= '| Fax. '.$_SESSION['__WEB_APP']['REG_FAX'].' | '.$ainfo['Alamat_Sup'].' |
';
$kop .= '| | '.$ainfo['No_NPWP'].' |
';
$kop .= '
';
$kop .= '';
$kop .= '| No. Nota | '.$ainfo['No_Beli'].' | Tanggal | '.$ainfo['Tgl_Beli2'].' |
';
$kop .= '| No. Faktur | '.$ainfo['No_Faktur'].' | Jatuh Tempo | '.$ainfo['Tgl_JT2'].' |
';
$kop .= '
';
$header = '| No. | Nama Produk | Qty | Satuan | Harga @ | Total |
';
$_line = '| %s | %s | %s | %s | %s | %s |
';
$_bline = '| | %s | %s |
';
$body = ""; $no_urut = 1;
while ($db->Next()) {
$body .= sprintf($_line, $no_urut++, $db->Row("Nama_Produk").(($db->Row("Nama_Rasa"))?" (".$db->Row("Nama_Rasa").")":""), rupiah2($db->Row("Qty")), $db->Row("Nama_Satuan"), rupiah($db->Row("Harga_Pokok")), rupiah($db->Row("Jumlah")));
}
if ($no_urut <= $baris_faktur) {
$no_urut--;
for ($x=$baris_faktur; $x>fmod($no_urut, $baris_faktur); $x--) {
$body .= sprintf($_line, " ", " ", " "," ", " ", " ");
}
}
$body .= sprintf($_bline, "Sub. Total Rp.", rupiah($ainfo['Total_Beli']));
$body .= sprintf($_bline, "Diskon Rp.", rupiah($ainfo['Total_Diskon']));
$body .= sprintf($_bline, "Total Rp.", rupiah($ainfo['Jumlah']));
$body .= '
';
$body .= '';
echo '' . $kop . $header . $body . '
';
}
function nota_jual($db, $nota="") {
if (trim($nota)=="") return;
$baris_faktur = 8;
$ainfo = [];
$db->Query("SELECT J.*,DATE_FORMAT(J.Tgl_Jual,'%d-%m-%Y') Tgl_Jual2,DATE_FORMAT(J.Tgl_JT,'%d-%m-%Y') Tgl_JT2,O.Nama_Outlet,O.Alamat_Outlet,O.No_NPWP,O.No_NIK,O.Nama_NPWP,O.Alamat_NPWP,S.Kode_Pegawai Kode_Sales,S.Nama_Pegawai Nama_Sales,J.Total_Jual-J.Total_Diskon Jumlah FROM (SELECT * FROM inv_jual WHERE No_Jual='".$nota."' LIMIT 1) J LEFT JOIN para_outlet O ON (O.OutletID=J.OutletID) LEFT JOIN para_pegawai S ON (J.SalesID=S.PegID)");
if ($db->Next()) $ainfo = $db->AllRow();
$ainfo['Alamat_Outlet'] = str_replace("\n", " ", $ainfo['Alamat_Outlet']);
$ainfo['Alamat_NPWP'] = str_replace("\n", " ", $ainfo['Alamat_NPWP']);
$ainfo['No_NPWP'] = ($ainfo['No_NPWP']==0) ? "NIK : ".$ainfo['No_NIK'] : "NPWP : ".$ainfo['No_NPWP'];
$db->Query("SELECT SUM(-Qty*Harga_Jual) Total_Jual,SUM(Total_Diskon) Total_Diskon,SUM((-Qty*Harga_Jual)-Total_Diskon) Jumlah FROM inv_detail WHERE No_Ref='".$nota."' AND Qty<>0 AND InvID IN (".$_SESSION['__APP_IAS']['PRODUK_EX'].")");
if ($db->Next()) {
$ainfo['Total_Jual'] -= $db->RowFloat("Total_Jual", 0);
$ainfo['Total_Diskon'] -= $db->RowFloat("Total_Diskon", 0);
$ainfo['Jumlah'] -= $db->RowFloat("Jumlah", 0);
}
$db->Query("SELECT D.*,P.Nama_Produk,S.Nama_Satuan,R.Nama_Rasa FROM (SELECT InvID,RasaID,SatuanID,Harga_Jual,SUM(Total_Diskon) Total_Diskon,SUM(-Qty) Qty,SUM((-Qty*Harga_Jual)-Total_Diskon) Jumlah FROM inv_detail WHERE No_Ref='".$nota."' AND Qty<>0 AND InvID NOT IN(".$_SESSION['__APP_IAS']['PRODUK_EX'].") GROUP BY InvID,RasaID,SatuanID,Harga_Jual) D LEFT JOIN inv_produk P ON (P.InvID=D.InvID) LEFT JOIN para_satuan S ON (D.SatuanID=S.SatuanID) LEFT JOIN para_rasa R ON (R.RasaID=D.RasaID) ORDER BY P.Nama_Produk");
// menampilkan judul dibagian atas laporan
$kop = 'FAKTUR PENJUALAN
';
$kop .= '';
if ($ainfo['Nama_Outlet']==$ainfo['Nama_NPWP'] && $ainfo['Alamat_Outlet']==$ainfo['Alamat_NPWP']) {
$kop .= '| '.$_SESSION['__WEB_APP']['REG_NAME'].' | Kepada Yth. : |
';
$kop .= '| Telp. '.$_SESSION['__WEB_APP']['REG_PHONE'].' | '.$ainfo['Nama_Outlet'].' |
';
$kop .= '| Fax. '.$_SESSION['__WEB_APP']['REG_FAX'].' | '.$ainfo['Alamat_Outlet'].' |
';
} else {
$kop .= '| '.$_SESSION['__WEB_APP']['REG_NAME'].' | Kepada Yth. : | Dikirim Ke : |
';
$kop .= '| Telp. '.$_SESSION['__WEB_APP']['REG_PHONE'].' | '.$ainfo['Nama_NPWP'].' | '.$ainfo['Nama_Outlet'].' |
';
$kop .= '| Fax. '.$_SESSION['__WEB_APP']['REG_FAX'].' | '.$ainfo['Alamat_NPWP'].' | '.$ainfo['Alamat_Outlet'].' '.$ainfo['Kota_Outlet'].' |
';
}
$kop .= '| | '.$ainfo['No_NPWP'].' |
';
$kop .= '
';
$kop .= '';
$kop .= '| No. Faktur | '.$ainfo['No_Jual'].' | Tanggal | '.$ainfo['Tgl_Jual2'].' |
';
$kop .= '| Sales | '.$ainfo['Nama_Sales'].($ainfo['Kode_Sales']==""?"":" (".$ainfo['Kode_Sales'].")").' | Jatuh Tempo | '.$ainfo['Tgl_JT2'].' |
';
$kop .= '
';
$header = '| No. | Nama Produk | Qty | Satuan | Harga @ | Diskon | Total |
';
$_line = '| %s | %s | %s | %s | %s | %s | %s |
';
$_bline = '| | %s | %s |
';
$body = ""; $no_urut = 1;
while ($db->Next()) {
if ($db->Row("Qty", 0)==0) continue;
$body .= sprintf($_line, $no_urut++, $db->Row("Nama_Produk").(($db->Row("Nama_Rasa"))?" (".$db->Row("Nama_Rasa").")":""), rupiah2($db->Row("Qty")), $db->Row("Nama_Satuan"), rupiah($db->Row("Harga_Jual")), rupiah($db->Row("Total_Diskon")), rupiah($db->Row("Jumlah")));
}
if ($no_urut <= $baris_faktur) {
$no_urut--;
for ($x=$baris_faktur; $x>fmod($no_urut, $baris_faktur); $x--) {
$body .= sprintf($_line, " ", " ", " "," ", " ", " ", " ");
}
}
$body .= sprintf($_bline, "Sub. Total Rp.", rupiah($ainfo['Total_Jual']));
$body .= sprintf($_bline, "Diskon Rp.", rupiah($ainfo['Total_Diskon']));
$body .= sprintf($_bline, "Total Rp.", rupiah($ainfo['Jumlah']));
$body .= '
';
$body .= '';
echo '' . $kop . $header . $body . '
';
}
function nota_retur_beli($db, $nota="") {//
if (trim($nota)=="") return;
$baris_faktur = 8;
$ainfo = [];
$db->Query("SELECT R.*,DATE_FORMAT(R.Tgl_Beli,'%d-%m-%Y') Tgl_Beli2,S.Nama_Sup,S.Alamat_Sup,R.Total_Beli Jumlah FROM (SELECT * FROM inv_beli WHERE No_Beli='".$nota."' LIMIT 1) R LEFT JOIN para_supplier S ON (S.SupID=R.SupID)");
if ($db->Next()) $ainfo = $db->AllRow();
$ainfo['Alamat_Sup'] = str_replace("\n", "
", $ainfo['Alamat_Sup']);
$db->Query("SELECT D.*,P.Nama_Produk,S.Nama_Satuan,R.Nama_Rasa FROM (SELECT InvID,RasaID,SatuanID,Harga_Pokok,SUM(-Qty) Qty,SUM(-Qty*Harga_Pokok) Jumlah FROM inv_detail WHERE No_Ref='".$nota."' GROUP BY InvID,RasaID,SatuanID,Harga_Pokok) D LEFT JOIN inv_produk P ON (P.InvID=D.InvID) LEFT JOIN para_satuan S ON (S.SatuanID=D.SatuanID) LEFT JOIN para_rasa R ON (R.RasaID=D.RasaID) ORDER BY P.Nama_Produk");
//if ($db->RecordCount()==0) return;
// menampilkan judul dibagian atas laporan
$kop = 'RETUR PEMBELIAN
';
$kop .= '';
$header = '| No. | Nama Produk | Qty | Satuan | Harga @ | Total |
';
$_line = '| %s | %s | %s | %s | %s | %s |
';
$_bline = '| | %s | %s |
';
$body = ""; $no_urut = 1;
while ($db->Next()) {
$body .= sprintf($_line, $no_urut++, $db->Row("Nama_Produk").(($db->Row("Nama_Rasa"))?" (".$db->Row("Nama_Rasa").")":""), rupiah2($db->Row("Qty")), $db->Row("Nama_Satuan"), rupiah($db->Row("Harga_Pokok")), rupiah($db->Row("Jumlah")));
}
if ($no_urut <= $baris_faktur) {
$no_urut--;
for ($x=$baris_faktur; $x>fmod($no_urut, $baris_faktur); $x--) {
$body .= sprintf($_line, " ", " ", " "," ", " ", " ");
}
}
$body .= sprintf($_bline, "Total Rp.", rupiah($ainfo['Jumlah']));
$body .= '';
echo '' . $kop . $header . $body . '
';
}
function nota_retur_jual($db, $nota="") {//
if (trim($nota)=="") return;
$baris_faktur = 8;
$ainfo = [];
$db->Query("SELECT R.*,DATE_FORMAT(R.Tgl_Jual,'%d-%m-%Y') Tgl_Jual2,O.Nama_Outlet,O.Alamat_Outlet,-R.Total_Jual Jumlah FROM (SELECT * FROM inv_jual WHERE No_Jual='".$nota."' LIMIT 1) R LEFT JOIN para_outlet O ON (O.OutletID=R.OutletID)");
if ($db->Next()) $ainfo = $db->AllRow();
$ainfo['Alamat_Outlet'] = str_replace("\n", "
", $ainfo['Alamat_Outlet']);
$db->Query("SELECT D.*,P.Nama_Produk,S.Nama_Satuan,R.Nama_Rasa FROM (SELECT InvID,RasaID,SatuanID,Harga_Jual,SUM(Qty) Qty,SUM(Qty*Harga_Jual) Jumlah FROM inv_detail WHERE No_Ref='".$nota."' GROUP BY InvID,RasaID,SatuanID,Harga_Jual) D LEFT JOIN inv_produk P ON (P.InvID=D.InvID) LEFT JOIN para_satuan S ON (S.SatuanID=D.SatuanID) LEFT JOIN para_rasa R ON (R.RasaID=D.RasaID) ORDER BY P.Nama_Produk");
//if ($db->RecordCount()==0) return;
// menampilkan judul dibagian atas laporan
$kop = 'RETUR PENJUALAN
';
$kop .= '';
$header = '| No. | Nama Produk | Qty | Satuan | Harga @ | Total |
';
$_line = '| %s | %s | %s | %s | %s | %s |
';
$_bline = '| | %s | %s |
';
$body = ""; $no_urut = 1;
while ($db->Next()) {
$body .= sprintf($_line, $no_urut++, $db->Row("Nama_Produk").(($db->Row("Nama_Rasa"))?" (".$db->Row("Nama_Rasa").")":""), rupiah2($db->Row("Qty")), $db->Row("Nama_Satuan"), rupiah($db->Row("Harga_Jual")), rupiah($db->Row("Jumlah")));
}
if ($no_urut <= $baris_faktur) {
$no_urut--;
for ($x=$baris_faktur; $x>fmod($no_urut, $baris_faktur); $x--) {
$body .= sprintf($_line, " ", " ", " "," ", " ", " ");
}
}
$body .= sprintf($_bline, "Total Rp.", rupiah($ainfo['Jumlah']));
$body .= '';
echo '' . $kop . $header . $body . '
';
}
function nota_do_produk($db, $nota="", $w_catat=0) {
if (trim($nota)=="") return;
$asatuan = []; $ainfo = [];
$db->Query("SELECT Kode_Satuan FROM para_satuan ORDER BY Urut");//todo: hilangkan nomor urut
while ($db->Next()) $asatuan[$db->Row("Kode_Satuan")] = 0;
$db->Query("SELECT DO.No_DO,DO.Catatan,DATE_FORMAT(DO.Tgl_DO,'%d-%m-%Y') Tgl_DO2,M.Nama_Mobil,S.Nama_Pegawai Nama_Supir,Nama_Picker(DO.A_Picker) Nama_Picker FROM (SELECT * FROM inv_jual_do WHERE No_DO='".$nota."') DO LEFT JOIN para_mobil M ON (DO.MobilID=M.MobilID) LEFT JOIN para_pegawai S ON (DO.SupirID=S.PegID)");
if ($db->Next()) $ainfo = $db->AllRow();
$db->Query("SELECT P.Kode_Produk,R.Kode_Rasa,S.Kode_Satuan,D.Qty,P.Grup_InvID Grup FROM (SELECT InvID,RasaID,SatuanID,SUM(-Qty) Qty FROM inv_detail WHERE No_Ref IN (SELECT No_Jual FROM inv_jual WHERE No_DO='".$nota."') GROUP BY InvID,RasaID,SatuanID) D LEFT JOIN inv_produk P ON (D.InvID=P.InvID) LEFT JOIN para_rasa R ON (D.RasaID=R.RasaID) LEFT JOIN para_satuan S ON (D.SatuanID=S.SatuanID) ORDER BY P.Pajak DESC,P.Grup_InvID,D.InvID");
// menampilkan judul dibagian atas laporan
$kop = ''.$_SESSION['__WEB_APP']['REG_NAME'].'
DELIVERY ORDER (DO)
';
$kop .= '';
$header = '| No. | Produk | Jumlah | Satuan | Kembali | Total |
';
$_line = '| %s | %s | %s | %s | %s | %s |
';
$_bline = '| %s | %s | %s |
';
$body = $kop.$header; $no_urut = 1; $sub_jenis = 0;
while ($db->Next()) {
$mark = "";
if ($db->Row("Grup")==$_SESSION['__APP_IAS']['GRUP_PRODUK_KEMASAN']) $mark = " *)";
if ($db->Row("Grup")==$_SESSION['__APP_IAS']['GRUP_PRODUK_HADIAH']) $mark = " ***";
if ($db->Row("Grup")<>$_SESSION['__APP_IAS']['GRUP_PRODUK_KEMASAN'] && $db->Row("Grup")<>$_SESSION['__APP_IAS']['GRUP_PRODUK_HADIAH']) {
$asatuan[$db->Row("Kode_Satuan")] += $db->Row("Qty");
$sub_jenis++;
}
$body .= sprintf($_line, $no_urut++, $db->Row("Kode_Produk").(($db->Row("Kode_Rasa"))?" (".$db->Row("Kode_Rasa").")":"").$mark, rupiah2($db->Row("Qty")), $db->Row("Kode_Satuan"), "", "");
}
$ket_produk = "";
foreach ($asatuan as $key => $val) {
if ($val > 0) $ket_produk .= " / ".rupiah2($val)." ".strtoupper($key);
}
$ket_produk = substr($ket_produk, 3);
$body .= sprintf($_bline, $sub_jenis." ITEM PRODUK (".$ket_produk.")", "", "");
$t_catat = ($w_catat==1 && $ainfo['Catatan']<>"") ? ''.nl2br($ainfo['Catatan']).'.' : ' ';
$body .= '
';
echo '' . $body . '
';
}
function nota_do_faktur($db, $nota = "", $w_catat=0) {
if (trim($nota)=="") return;
$ainfo = [];
$db->Query("SELECT DO.No_DO,DO.Catatan,DATE_FORMAT(DO.Tgl_DO,'%d-%m-%Y') Tgl_DO2,M.Nama_Mobil,S.Nama_Pegawai Nama_Supir,Nama_Picker(DO.A_Picker) Nama_Picker FROM (SELECT * FROM inv_jual_do WHERE No_DO='".$nota."') DO LEFT JOIN para_mobil M ON (DO.MobilID=M.MobilID) LEFT JOIN para_pegawai S ON (DO.SupirID=S.PegID)");
if ($db->Next()) $ainfo = $db->AllRow();
$db->Query("SELECT J.*,DATE_FORMAT(J.Tgl_Jual,'%d-%m-%Y') Tgl_Jual2,J.Total_Jual-J.Total_Diskon Total_Nota,O.Nama_Outlet,S.Nama_Pegawai FROM (SELECT * FROM inv_jual WHERE No_DO='".$nota."') J LEFT JOIN para_outlet O ON (J.OutletID=O.OutletID) LEFT JOIN para_pegawai S ON (J.SalesID=S.PegID) ORDER BY J.No_Jual");
// menampilkan judul dibagian atas laporan
$kop = ''.$_SESSION['__WEB_APP']['REG_NAME'].'
DELIVERY ORDER (DO)
';
$kop .= '';
$header = '| No. | No. Faktur | Tgl. Faktur | Nama Outlet | Jumlah | Sales |
';
$_line = '| %s | %s | %s | %s | %s | %s |
';
$_bline = '| %s | %s | %s |
';
$body = $kop.$header; $no_urut = 1; $tot_nota = 0;
while ($db->Next()) {
$body .= sprintf($_line, $no_urut++, $db->Row("No_Jual"), $db->Row("Tgl_Jual2"), $db->Row("Nama_Outlet"), rupiah2($db->Row("Total_Nota")), $db->Row("Nama_Pegawai"));
$tot_nota += $db->Row("Total_Nota");
}
$body .= sprintf($_bline, "Total Delivery Order", rupiah2($tot_nota), "");
//$t_catat = ($w_catat==1 && $ainfo['Catatan']<>"") ? 'Catatan : '.$ainfo['Catatan'].'.' : ' ';
$t_catat = ' ';
$body .= '
';
echo '' . $body . '
';
}
function nota_dt($db, $nota = "", $w_lunas = 0) {
if (trim($nota)=="") return;
$ainfo = [];
$db->Query("SELECT T.*,DATE_FORMAT(T.Tgl_Tagih,'%d-%m-%Y') Tgl_Tagih2,S.Kode_Pegawai Kode_Sales,S.Nama_Pegawai Nama_Sales FROM (SELECT * FROM inv_jual_tagih WHERE No_Tagih='".$nota."' LIMIT 1) T LEFT JOIN para_pegawai S ON (T.SalesID=S.PegID)");
if ($db->Next()) $ainfo = $db->AllRow();
$tsql = ($w_lunas == 0) ? " AND Lunas=0" : "";
$db->Query("SELECT J.*,DATE_FORMAT(J.Tgl_Jual,'%d-%m-%Y') Tgl_Jual2,DATE_FORMAT(J.Tgl_JT,'%d-%m-%Y') Tgl_JT2,O.Nama_Outlet,J.Total_Jual-J.Total_Diskon Total_Faktur,IFNULL(B.Bayar_Lalu,0) Bayar_Lalu,IFNULL(B.Bayar_Ini,0) Bayar_Ini,J.Total_Jual-J.Total_Diskon-IFNULL(B.Bayar_Lalu,0)-IFNULL(B.Bayar_Ini,0) Total_Sisa FROM (SELECT * FROM inv_jual WHERE No_Jual IN (SELECT No_Jual FROM inv_jual_tagih_detail WHERE No_Tagih='".$ainfo['No_Tagih']."')".$tsql.") J LEFT JOIN (SELECT No_Jual,SUM(IF(Tgl_Bayar<'".$ainfo['Tgl_Tagih']."',Total_Bayar+Total_Potong,0)) Bayar_Lalu,SUM(IF(Tgl_Bayar='".$ainfo['Tgl_Tagih']."',Total_Bayar+Total_Potong,0)) Bayar_Ini FROM inv_jual_lunas WHERE No_Jual IN (SELECT No_Jual FROM inv_jual_tagih_detail WHERE No_Tagih='".$ainfo['No_Tagih']."') GROUP BY No_Jual) B ON (B.No_Jual=J.No_Jual) LEFT JOIN para_outlet O ON (O.OutletID=J.OutletID) ORDER BY O.Nama_Outlet, J.Tgl_Jual");
//if ($db->RecordCount()==0) return;
// menampilkan judul dibagian atas laporan
$kop = ''.$_SESSION['__WEB_APP']['REG_NAME'].'
DAFTAR TAGIHAN OUTLET
';
$kop .= '';
$header = '| No. | Nama Outlet | No. Nota | Tgl. Nota | Total Nota | Setoran | Pembayaran | Sisa Nota |
';
$_line = '| %s | %s | %s | %s | %s | %s | %s | %s |
';
$_bline = '| %s | %s |
';
$body = ""; $no_urut = 1; $tot_tag = 0;
while ($db->Next()) {
$body .= sprintf($_line, $no_urut++, $db->Row("Nama_Outlet"), $db->Row("No_Jual"), $db->Row("Tgl_Jual2"), rupiah($db->Row("Total_Faktur")), rupiah($db->Row("Bayar_Lalu")), rupiah($db->Row("Bayar_Ini")), rupiah($db->Row("Total_Sisa")));
$tot_tag += $db->RowFloat("Total_Sisa", 0);
}
$body .= sprintf($_bline, "Total Tagihan Rp.", rupiah($tot_tag), "");
$body .= '
';
echo '' . $kop . $header . $body . '
';
}
function nota_biaya($db, $nota = "") {
if (trim($nota)=="") return;
$baris_faktur = 6;
$ainfo = [];
$db->Query("SELECT B.*,DATE_FORMAT(B.Tgl_Biaya,'%d-%m-%Y') Tgl_Biaya2,(B.Jumlah_DPP+B.Jumlah_PPN) Jumlah,S.Nama_Sup,S.Alamat_Sup,S.Kota_Sup FROM (SELECT * FROM biaya_pajak WHERE No_Biaya='".$nota."') B LEFT JOIN para_supplier S ON (S.SupID=B.SupID)");
if ($db->Next()) $ainfo = $db->AllRow();
$ainfo['Alamat_Sup'] = str_replace("\n", "
", $ainfo['Alamat_Sup']);
$db->Query("SELECT *,(Qty*Harga_Jual) Jumlah FROM biaya_pajak_detail WHERE No_Biaya='".$nota."' ORDER BY ID");
//if ($db->RecordCount()==0) return;
// menampilkan judul dibagian atas laporan
$kop = 'INVOICE
Nomor : '.$ainfo['No_Biaya'].'
';
$kop .= '';
$header = '| No. | Uraian | Qty | Harga @ | Jumlah |
';
$_line = '| %s | %s | %s | %s | %s |
';
$_bline = '| | %s | %s |
';
$body = ""; $no_urut = 1;
while ($db->Next()) {
$body .= sprintf($_line, $no_urut++, $db->Row("Uraian_Biaya"), rupiah2($db->Row("Qty")), rupiah($db->Row("Harga_Jual")), rupiah($db->Row("Jumlah")));
}
if ($no_urut <= $baris_faktur) {
$no_urut--;
for ($x=$baris_faktur; $x>fmod($no_urut, $baris_faktur); $x--) {
$body .= sprintf($_line, " ", " ", " "," ", " ");
}
}
$body .= sprintf($_bline, "Total (Dasar Pengenaan Pajak) Rp.", rupiah($ainfo['Jumlah_DPP']));
$body .= sprintf($_bline, "PPN (11% x Dasar Pengenaan Pajak) Rp.", rupiah($ainfo['Jumlah_PPN']));
//$body .= sprintf($_bline, "PPN (".(($ainfo['Tgl_Biaya'] >= $_SESSION['__APP_IAS']['PPN_TGL']) ? $_SESSION['__APP_IAS']['PPN_STRING'] : "11")."% x Dasar Pengenaan Pajak) Rp.", rupiah($ainfo['Jumlah_PPN']));
$body .= sprintf($_bline, "Grand Total Rp.", rupiah($ainfo['Jumlah']));
$body .= '';
echo '' . $kop . $header . $body . '
';
}
function nota_mdo($db, $nota="") {
if (trim($nota)=="") return;
$asatuan = []; $ainfo = []; $baris_faktur = 25;
$db->Query("SELECT Kode_Satuan FROM para_satuan ORDER BY Urut");//todo: hilangkan nomor urut
while ($db->Next()) $asatuan[$db->Row("Kode_Satuan")] = 0;
$db->Query("SELECT DO.No_MDO,DO.Catatan,DATE_FORMAT(DO.Tgl_MDO,'%d-%m-%Y') Tgl_MDO2,S.Nama_Pegawai Nama_Supir FROM (SELECT * FROM manual_do WHERE No_MDO='".$nota."') DO LEFT JOIN para_pegawai S ON (DO.SupirID=S.PegID)");
if ($db->Next()) $ainfo = $db->AllRow();
$db->Query("SELECT P.Kode_Produk,R.Kode_Rasa,S.Kode_Satuan,D.Muat,D.Kembali,D.Terantar FROM (SELECT *,(Muat-Kembali) Terantar FROM manual_do_detail WHERE No_MDO='".$nota."') D LEFT JOIN inv_produk P ON (D.InvID=P.InvID) LEFT JOIN para_rasa R ON (D.RasaID=R.RasaID) LEFT JOIN para_satuan S ON (D.SatuanID=S.SatuanID) ORDER BY D.ID");
$jml_hal = ceil($db->RecordCount() / $baris_faktur);
// menampilkan judul dibagian atas laporan
$kop = ''.$_SESSION['__WEB_APP']['REG_NAME'].'
DELIVERY ORDER (DO)
';
$kop .= '';
$header = '| No. | Produk | Satuan | Muat | Kembali | Terantar |
';
$_line = '| %s | %s | %s | %s | %s | %s |
';
$_bline = '| %s | %s | %s |
';
$body = '
';
$body .= $kop.$header; $no_urut = 1; $hal = 1; $sub_jenis = 0;
while ($db->Next()) {
if (fmod(($no_urut-1), $baris_faktur) == 0 && $no_urut > $baris_faktur) {
//footer
$body .= '
';
$body .= '................ page break ................
';
//header
$body .= $kop.$header;
$hal++;
}
//if ($db->Row("Grup")<>$_SESSION['__APP_IAS']['GRUP_PRODUK_KEMASAN'] && $db->Row("Grup")<>$_SESSION['__APP_IAS']['GRUP_PRODUK_HADIAH']) {
$asatuan[$db->Row("Kode_Satuan")] += $db->RowFloat("Terantar");
$sub_jenis++;
//}
$body .= sprintf($_line, $no_urut++, $db->Row("Kode_Produk").(($db->Row("Kode_Rasa"))?" (".$db->Row("Kode_Rasa").")":""), $db->Row("Kode_Satuan"), rupiah($db->Row("Muat")), ($db->RowFloat("Kembali")>0?rupiah($db->Row("Kembali")):""), ($db->RowFloat("Kembali")>0?rupiah($db->Row("Terantar")):""));
}
$ket_produk = "";
foreach ($asatuan as $key => $val) {
if ($val > 0) $ket_produk .= " / ".rupiah($val)." ".strtoupper($key);
}
$ket_produk = substr($ket_produk, 3);
$body .= sprintf($_bline, $sub_jenis." ITEM PRODUK (".$ket_produk.")", "", "");
$body .= '';
echo '' . $body . '
';
}
$db = (is_resource($db)) ? $db : new MySQL();
$data = Param::Get("data");
$nomor = Param::Get("Nomor_Cetak");
$w_catatan = Param::Get("Cetak_Catatan");
$w_lunas = Param::Get("Cetak_Lunas");
if ( $data == "beli" ) {
nota_beli($db, $nomor);
} else if ( $data == "jual" ) {
nota_jual($db, $nomor);
} else if ( $data == "retur-beli" ) {
nota_retur_beli($db, $nomor);
} else if ( $data == "retur-jual" ) {
nota_retur_jual($db, $nomor);
} else if ( $data == "do-produk" ) {
nota_do_produk($db, $nomor, $w_catatan);
} else if ( $data == "do-faktur" ) {
nota_do_faktur($db, $nomor, $w_catatan);
} else if ( $data == "tagih" ) {
nota_dt($db, $nomor, $w_lunas);
} else if ( $data == "biaya" ) {
nota_biaya($db, $nomor);
} else if ( $data == "mdo" ) {
nota_mdo($db, $nomor);
} else if ( $data == "default") {}
?>