X-Git-Url: https://delta.frontaccounting.com/gitweb/?a=blobdiff_plain;f=purchasing%2Fincludes%2Fdb%2Fsupp_trans_db.inc;h=d87e1a9379585205520df1dfbbf0874c845c37a4;hb=a2bd6e80fbe669ca10c3936bb5373994fe8e4918;hp=d5dc75193d5dfe5b23c56d10026fb4efc55ba52f;hpb=771285712c6554832851ade47b4808c14aa7eea5;p=fa-stable.git

diff --git a/purchasing/includes/db/supp_trans_db.inc b/purchasing/includes/db/supp_trans_db.inc
index d5dc7519..d87e1a93 100644
--- a/purchasing/includes/db/supp_trans_db.inc
+++ b/purchasing/includes/db/supp_trans_db.inc
@@ -43,7 +43,8 @@ function write_supp_trans($type, $trans_no, $supplier_id, $date_, $due_date, $re
 		$err_msg = "Cannot insert a supplier transaction record";
 
 	db_query($sql, $err_msg);
-	add_audit_trail($type, $trans_no, $date_);
+	if ($type != ST_JOURNAL && $type != ST_BANKDEPOSIT && $type != ST_BANKPAYMENT) 
+		add_audit_trail($type, $trans_no, $date_);
 
 	return $trans_no;
 }
@@ -131,7 +132,7 @@ function get_supp_payment_before($supplier_id, $date)
 	. TB_PREF . "bank_trans,"
 	. TB_PREF . "bank_accounts "
 	. "WHERE "
-	. TB_PREF . "supp_trans.supplier_id=" . $supplier_id . " "
+	. TB_PREF . "supp_trans.supplier_id='" . $supplier_id . "' "
 	. "AND " . TB_PREF . "supp_trans.tran_date<'" . $date . "' "
 	. "AND " . TB_PREF . "supp_trans.type=" . ST_SUPPAYMENT . " "
 	. "AND " . TB_PREF . "supp_trans.trans_no=" . TB_PREF . "bank_trans.trans_no "
@@ -224,14 +225,16 @@ function get_sql_for_supplier_inquiry($filter, $after_date, $to_date, $supplier_
     	trans.tran_date, 
 		trans.due_date,
 		supplier.curr_code, 
-    	(trans.ov_amount + trans.ov_gst  + trans.ov_discount) AS TotalAmount, 
+    	(trans.ov_amount + trans.ov_gst  + trans.ov_discount) AS TotalAmount,
+
+    	IF (trans.type=".ST_SUPPINVOICE." OR trans.type=".ST_BANKDEPOSIT."
+  	OR (trans.type=".ST_JOURNAL." AND (trans.ov_amount + trans.ov_gst + trans.ov_discount)>0), 1, -1)*
+    		(ABS(trans.ov_amount + trans.ov_gst + trans.ov_discount) - trans.alloc) Balance,
 		trans.alloc AS Allocated,
 		((trans.type = ".ST_SUPPINVOICE." OR trans.type = ".ST_SUPPCREDIT.") AND trans.due_date < '" . date2sql(Today()) . "') AS OverDue,
     	(ABS(trans.ov_amount + trans.ov_gst  + trans.ov_discount) - trans.alloc <= ".FLOAT_COMP_DELTA.") AS Settled
     	FROM ".TB_PREF."supp_trans as trans, ".TB_PREF."suppliers as supplier
     	WHERE supplier.supplier_id = trans.supplier_id
-     	AND trans.tran_date >= '$date_after'
-    	AND trans.tran_date <= '$date_to'
 		AND trans.ov_amount != 0";	// exclude voided transactions
 
 	$sql2 = "SELECT ".ST_SUPPRECEIVE." as type, 
@@ -242,15 +245,23 @@ function get_sql_for_supplier_inquiry($filter, $after_date, $to_date, $supplier_
     	delivery_date as tran_date, 
 		'' as due_date,
 		supplier.curr_code, 
+		0 as Balance, 
     	'' AS TotalAmount,
 		'' AS Allocated,
 		0 as OverDue,
     	1 as Settled
     	FROM ".TB_PREF."grn_batch as trans, ".TB_PREF."suppliers as supplier, ".TB_PREF."purch_orders as po
     	WHERE supplier.supplier_id = trans.supplier_id
-    	AND trans.purch_order_no = po.order_no
-     	AND trans.delivery_date >= '$date_after'
-    	AND trans.delivery_date <= '$date_to'";
+    	AND trans.purch_order_no = po.order_no";
+
+	if ($filter == '2')
+		$sql .= " AND ABS(trans.ov_amount + trans.ov_gst + trans.ov_discount) - trans.alloc>".FLOAT_COMP_DELTA;
+	else {
+		$sql .= " AND trans.tran_date >= '$date_after'
+			AND trans.tran_date <= '$date_to'";
+		$sql2 .= " AND trans.delivery_date >= '$date_after'
+            AND trans.delivery_date <= '$date_to'";
+	}
 
    	if ($supplier_id != ALL_TEXT) {
    		$sql .= " AND trans.supplier_id = ".db_escape($supplier_id);
@@ -260,7 +271,7 @@ function get_sql_for_supplier_inquiry($filter, $after_date, $to_date, $supplier_
 	{
 			$sql = $sql2;
 	} 
-	elseif (!isset($filter) || $filter == ALL_TEXT || $filter == '6') {
+	elseif (!isset($filter) || $filter == ALL_TEXT) {
 		$sql = "SELECT * FROM (($sql) UNION ($sql2)) as tr WHERE 1";
    	}
 
@@ -270,10 +281,6 @@ function get_sql_for_supplier_inquiry($filter, $after_date, $to_date, $supplier_
    		{
    			$sql .= " AND (trans.type = ".ST_SUPPINVOICE." OR trans.type = ".ST_BANKDEPOSIT.")";
    		} 
-   		elseif (($filter == '2')) 
-   		{
-   			$sql .= " AND trans.type = ".ST_SUPPINVOICE." ";
-   		} 
    		elseif ($filter == '3') 
    		{
 			$sql .= " AND (trans.type = ".ST_SUPPAYMENT." OR trans.type = ".ST_BANKPAYMENT.") ";
@@ -282,6 +289,10 @@ function get_sql_for_supplier_inquiry($filter, $after_date, $to_date, $supplier_
    		{
 			$sql .= " AND trans.type = ".ST_SUPPCREDIT."  ";
    		}
+   		elseif (($filter == '7')) 
+   		{
+			$sql .= " AND trans.type = ".ST_JOURNAL."  ";
+   		}
 
    		if (($filter == '2') || ($filter == '5')) 
    		{