X-Git-Url: https://delta.frontaccounting.com/gitweb/?a=blobdiff_plain;f=sales%2Fincludes%2Fdb%2Fpayment_db.inc;h=c960dd33b471a8aad029e15f2f382898c5c4e654;hb=b6af4ea4c99734cfd051395289107bbba5a405e9;hp=b5755857280fc36b16fd6dc58459b52db0b43937;hpb=da8311619dd73feae101d246a1957b972e00cbd2;p=fa-stable.git

diff --git a/sales/includes/db/payment_db.inc b/sales/includes/db/payment_db.inc
index b5755857..c960dd33 100644
--- a/sales/includes/db/payment_db.inc
+++ b/sales/includes/db/payment_db.inc
@@ -1,63 +1,70 @@
 <?php
-
-function add_customer_payment($customer_id, $branch_id, $bank_account, $date_, $receipt_type, $ref, 
-	$amount, $discount, $memo_)
+/*
+  Write/update customer payment.
+*/
+function write_customer_payment($trans_no, $customer_id, $branch_id, $bank_account,
+	$date_, $ref, $amount, $discount, $memo_, $rate=0)
 {
 	begin_transaction();
-   
+
 	$company_record = get_company_prefs();
-   
-	$payment_no = add_customer_trans(systypes::cust_payment(), $customer_id, $branch_id, $date_, 
-    	$ref, -($amount), -($discount));          	     	
-        	
+
+	$payment_no = write_customer_trans(12, $trans_no, $customer_id, $branch_id, 
+		$date_, $ref, $amount, $discount, 0, 0, 0, 0, 0, 0, 0, "", 0, $rate);
+
+	$bank_gl_account = get_bank_gl_account($bank_account);
+
+	if ($trans_no != 0) {
+	  delete_comments(12, $trans_no);
+	  void_bank_trans(12, $trans_no, true);
+	  void_gl_trans(12, $trans_no, true);
+	  void_cust_allocations(12, $trans_no, $date_);
+	}
+	$total = 0;
 	/* Bank account entry first */
-	add_gl_trans_customer(systypes::cust_payment(), $payment_no, $date_, 
-		$bank_account, 0, 0, $amount,  $customer_id,
-		"Cannot insert a GL transaction for the bank account debit");
-							
-	if ($branch_id != reserved_words::get_any_numeric()) 
-	{
+	$total += add_gl_trans_customer(12, $payment_no, $date_,
+		$bank_gl_account, 0, 0, $amount,  $customer_id,
+		"Cannot insert a GL transaction for the bank account debit", $rate);
+
+	if ($branch_id != reserved_words::get_any_numeric()) {
+
 		$branch_data = get_branch_accounts($branch_id);
 
 		$debtors_account = $branch_data["receivables_account"];
-		$discount_account = $branch_data["payment_discount_account"];		
-		
-	} 
-	else 
-	{
+		$discount_account = $branch_data["payment_discount_account"];
+
+	} else {
 		$debtors_account = $company_record["debtors_act"];
 		$discount_account = $company_record["default_prompt_payment_act"];
 	}
-	
-	if (($discount + $amount) != 0)
-	{
+
+	if (($discount + $amount) != 0)	{
 		/* Now Credit Debtors account with receipts + discounts */
-		add_gl_trans_customer(systypes::cust_payment(), $payment_no, $date_, 
+		$total += add_gl_trans_customer(12, $payment_no, $date_,
 			$debtors_account, 0, 0, -($discount + $amount), $customer_id,
-			"Cannot insert a GL transaction for the debtors account credit");		
-	}    	
-	
-	if ($discount != 0)
-	{
+			"Cannot insert a GL transaction for the debtors account credit", $rate);
+	}
+	if ($discount != 0)	{
 		/* Now Debit discount account with discounts allowed*/
-		add_gl_trans_customer(systypes::cust_payment(), $payment_no, $date_, 
+		$total += add_gl_trans_customer(12, $payment_no, $date_,
 			$discount_account, 0, 0, $discount, $customer_id,
-			"Cannot insert a GL transaction for the payment discount debit");
+			"Cannot insert a GL transaction for the payment discount debit", $rate);
 	}
-	
+
+	/*Post a balance post if $total != 0 */
+	add_gl_balance(12, $payment_no, $date_, -$total, payment_person_types::customer(), $customer_id);	
+
 	/*now enter the bank_trans entry */
-	add_bank_trans(systypes::cust_payment(), $payment_no, $bank_account, $ref, 
-		$date_, $receipt_type, $amount, payment_person_types::customer(), $customer_id,
-		get_customer_currency($customer_id));	 
-						
-	add_comments(systypes::cust_payment(), $payment_no, $date_, $memo_);						
-						
-	add_forms_for_sys_type(systypes::cust_payment(), $payment_no, payment_person_types::customer(), $customer_id);	
-	
-	references::save_last($ref, systypes::cust_payment());					  
+	add_bank_trans(12, $payment_no, $bank_account, $ref,
+		$date_, $amount, payment_person_types::customer(), $customer_id,
+		get_customer_currency($customer_id));
+
+	add_comments(12, $payment_no, $date_, $memo_);
+
+	references::save_last($ref, 12);
 
 	commit_transaction();
-	
+
 	return $payment_no;
 }
 
@@ -66,13 +73,13 @@ function add_customer_payment($customer_id, $branch_id, $bank_account, $date_, $
 function void_customer_payment($type, $type_no)
 {
 	begin_transaction();
-	
+
 	void_bank_trans($type, $type_no, true);
 	void_gl_trans($type, $type_no, true);
 	void_cust_allocations($type, $type_no);
 	void_customer_trans($type, $type_no);
-	
-	commit_transaction();			
+
+	commit_transaction();
 }