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

opname barang: bug stok sisa 2

Browse Source
This commit is contained in:
siaupheng
2026-02-27 11:54:28 +07:00
parent 6c0451f79e
commit feba2009a8
5 changed files with 73 additions and 87 deletions
Download Patch File Download Diff File Expand all files Collapse all files
apps/php/func.iss.php
+4 -4
View File
@@ -7,9 +7,9 @@
Desc. : PHP - Fungsi - Fungsi ISS
Created By : Siau Pheng ([email protected]).
Created Date : February 10th, 2012.
Last Modified : January 16th, 2019.
Last Modified : February 27th, 2026.
(c) 2012 - 2019, 3FONIA Software; WWW.3FONIA.COM.
(c) 2012 - 2026, 3FONIA Software; WWW.3FONIA.COM.
*******************************************************************/
@@ -123,8 +123,8 @@ function Produk_Update($no_ref = "", $supid = 0) {
$fdb->Query("SELECT *,CEIL((Harga_Beli-(Total_Diskon/Qty))/(Stok/Qty)) HPP FROM inv_detail WHERE No_Ref='".$no_ref."'");
while ($fdb->Next()) {
if ($fdb->RowFloat("Harga_Beli",0)>0) $tdb->Query("UPDATE inv_produk SET Harga_Beli='".$fdb->Row("HPP")."',Harga_Pokok=Harga_Beli+Harga_Tambah WHERE InvID='".$fdb->Row("InvID")."'");
$tdb->Query("INSERT IGNORE INTO inv_produk_sup SET InvID='".$fdb->Row("InvID")."',SupID='".$supid."',Aktif=1");
$tdb->Query("UPDATE inv_produk_sup SET Aktif=0 WHERE InvID='".$fdb->Row("InvID")."' AND SupID<>'".$supid."'");
$tdb->Query("UPDATE inv_produk_sup SET Aktif=0 WHERE InvID='".$fdb->Row("InvID")."'");
$tdb->Query("INSERT IGNORE INTO inv_produk_sup (InvID,SupID,Aktif) VALUES('".$fdb->Row("InvID")."','".$supid."',1)");
}
unset($tdb);
}