X-Git-Url: https://delta.frontaccounting.com/gitweb/?a=blobdiff_plain;f=sales%2Fincludes%2Fdb%2Fsales_invoice_db.inc;h=cbafbccc9ef021064ace89e79f183888db6e85c6;hb=d907208297556310cc7c51fcb9086869c880ab2d;hp=49f9252f4808696fa57fe4ddd1a1c32a6d6454a6;hpb=d6ccc05f1d97979ee67c33451fdfd9cf5f124bb9;p=fa-stable.git diff --git a/sales/includes/db/sales_invoice_db.inc b/sales/includes/db/sales_invoice_db.inc index 49f9252f..cbafbccc 100644 --- a/sales/includes/db/sales_invoice_db.inc +++ b/sales/includes/db/sales_invoice_db.inc @@ -1,146 +1,224 @@ trans_no)==1) { - - $del = $cart->trans_no; - if(is_array($del)) $del = $del[0]; - $sql = 'UPDATE debtor_trans SET trans_link = ' . $del . - ' WHERE type=10 AND trans_no='.$invoice; - db_query($sql, 'Invoice link cannot be updated'); - - foreach($cart->line_items as $line) { - if($line->quantity!=$line->qty_dispatched) { - // this is partial invoice - return 1; - } - } - - } +/********************************************************************** + Copyright (C) FrontAccounting, LLC. + Released under the terms of the GNU General Public License, GPL, + as published by the Free Software Foundation, either version 3 + of the License, or (at your option) any later version. + This program is distributed in the hope that it will be useful, + but WITHOUT ANY WARRANTY; without even the implied warranty of + MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. + See the License here . +***********************************************************************/ +//----------------------------------------------------------------------------- +// Add or update Sales Invoice +// +function write_sales_invoice(&$invoice) +{ + global $Refs; - $sql = 'UPDATE debtor_trans SET trans_link = ' . $invoice . - ' WHERE type=13 AND ('; - - $deliveries = $cart->trans_no; - - foreach($deliveries as $key=>$del) - $deliveries[$key] = 'trans_no='.$del; - $sql .= implode(' OR ', $deliveries) . ')'; - - db_query($sql, 'Delivery links cannot be updated'); - return 0; // batch or complete invoice -} + $trans_no = $invoice->trans_no; + if (is_array($trans_no)) + $trans_no = key($trans_no); + + $date_ = $invoice->document_date; + $charge_shipping =$invoice->freight_cost; -function add_sales_invoice(&$cart, $date_, $due_date, $tax_group_id, - $charge_shipping, $location, $ship_via, $sales_type, $reference, $memo_) -{ begin_transaction(); - + + hook_db_prewrite($invoice, ST_SALESINVOICE); $company_data = get_company_prefs(); - - $branch_data = get_branch_accounts($cart->Branch); - - $cart_items_total = $cart->get_items_total_dispatch($tax_group_id); - - $delivery_no = $cart->trans_no; - if(is_array($delivery_no)) $delivery_no = 0; - - $tax_total = 0; - $taxes = $cart->get_taxes($tax_group_id, $charge_shipping); - foreach ($taxes as $taxitem) - $tax_total += $taxitem['Value']; - - /*Now insert the debtor_trans */ - $sales_order=$cart->order_no; - if(is_array($sales_order)) $sales_order = $sales_order[0]; // assume all crucial SO data are same for every delivery - - $invoice_no = add_customer_trans(10, $cart->customer_id, $cart->Branch, $date_, - $reference, $cart_items_total, 0, $tax_total, $charge_shipping, - $sales_type, $sales_order, $delivery_no, $ship_via, $due_date); - - set_invoice_links($cart,$invoice_no); - - // If balance of the order cancelled update sales order details quantity. - foreach ($cart->line_items as $delivery_line) + + $branch_data = get_branch_accounts($invoice->Branch); + + $customer = get_customer($invoice->customer_id); + + add_new_exchange_rate($customer['curr_code'], $date_, $invoice->ex_rate); + + // offer price values without freight costs + $items_total = $invoice->get_items_total_dispatch(); + $freight_tax = $invoice->get_shipping_tax(); + + if (!$invoice->is_prepaid()) + update_customer_trans_version(get_parent_type(ST_SALESINVOICE), $invoice->src_docs); + elseif (count($invoice->prepayments)) { // partial invoice + $last_payment = end($invoice->prepayments); + $gl_date = sql2date($last_payment['tran_date']); + } else { // final invoice + $gl_date = $invoice->document_date; + } + + $ov_gst = 0; + $taxes = $invoice->get_taxes(); // all taxes with freight_tax + $dec = user_price_dec(); + foreach ($taxes as $taxitem) { + $taxitem['Value'] = round2($taxitem['Value'], $dec); + $ov_gst += $taxitem['Value']; + } + + if($invoice->tax_included==0) { + $items_added_tax = $ov_gst-$freight_tax; + $freight_added_tax = $freight_tax; + } else { + $items_added_tax = 0; + $freight_added_tax = 0; + } + + /* Insert/update the debtor_trans */ + $sales_order = $invoice->order_no; + if (is_array($sales_order)) + $sales_order = $sales_order[0]; // assume all crucial SO data are same for every delivery + + if ($trans_no) { + $allocs = get_payments_for($trans_no, ST_SALESINVOICE, $invoice->customer_id); + delete_comments(ST_SALESINVOICE, $trans_no); + void_gl_trans(ST_SALESINVOICE, $trans_no, true); + void_trans_tax_details(ST_SALESINVOICE, $trans_no); + } else + $allocs = get_payments_for($invoice->order_no, ST_SALESORDER, $invoice->customer_id); + + if ($invoice->is_prepaid()) // selected prepayment is already in cart { + $allocs = $invoice->prepayments; + // values posted are reduced by prepaid_factor + $prepaid_factor = $invoice->prep_amount/$invoice->get_trans_total(); + } else { + $prepaid_factor = 1; + } + + // write_customer_trans have to be called after optional void_cust_allocations above + $invoice_no = write_customer_trans(ST_SALESINVOICE, $trans_no, $invoice->customer_id, + $invoice->Branch, $date_, $invoice->reference, $items_total, 0, + $items_added_tax, $invoice->freight_cost, $freight_added_tax, + $invoice->sales_type, $sales_order, $invoice->ship_via, + $invoice->due_date, 0, 0, $invoice->dimension_id, + $invoice->dimension2_id, $invoice->payment, $invoice->tax_included, $invoice->prep_amount); + + if ($trans_no == 0) { + $invoice->trans_no = array($invoice_no=>0); + } else + move_trans_attachments(ST_SALESINVOICE, $trans_no, $invoice_no); + + $total = 0; + // for prepayments use deferred income account if set + $sales_account = $invoice->is_prepaid() ? get_company_pref('deferred_income_act') : 0; + + foreach ($invoice->line_items as $line_no => $invoice_line) { + $qty = $invoice_line->qty_dispatched; + $line_taxfree_price = get_tax_free_price_for_item($invoice_line->stock_id, + $invoice_line->price * $qty, 0, $invoice->tax_included, + $invoice->tax_group_array); + + $line_tax = get_full_price_for_item($invoice_line->stock_id, + $invoice_line->price * $qty, 0, $invoice->tax_included, + $invoice->tax_group_array) - $line_taxfree_price; + + write_customer_trans_detail_item(ST_SALESINVOICE, $invoice_no, $invoice_line->stock_id, + $invoice_line->item_description, $invoice_line->qty_dispatched, + $invoice_line->line_price(), $qty ? $line_tax/$qty : 0, $invoice_line->discount_percent, + $invoice_line->standard_cost, $invoice_line->src_id, + $trans_no ? $invoice_line->id : 0); - if ($delivery_line->qty_dispatched != 0) + // Update delivery items for the quantity invoiced + if ($invoice_line->qty_old != $invoice_line->qty_dispatched) { - - $line_taxfree_price = $delivery_line->taxfree_price($tax_group_id); - $line_tax = $delivery_line->full_price() - $line_taxfree_price; - - // Now update delivery items for the quantity invoiced - invoice_delivery_item($delivery_line->id,$delivery_line->qty_dispatched); - - /* add invoice details and stock movements */ - - add_customer_trans_detail_item(10, $invoice_no, $delivery_line->stock_id, - $delivery_line->item_description, $location, $date_, - -$delivery_line->qty_dispatched, $line_taxfree_price, $line_tax, - $delivery_line->discount_percent, $reference, $delivery_line->standard_cost); - - $stock_gl_code = get_stock_gl_code($delivery_line->stock_id); - - if ($delivery_line->price != 0) - { + if ($invoice->is_prepaid()) + update_prepaid_so_line($invoice_line->src_id, $invoice_line->qty_dispatched-$invoice_line->qty_old); + else + update_parent_line(ST_SALESINVOICE, $invoice_line->src_id, ($invoice_line->qty_dispatched-$invoice_line->qty_old)); + } + if ($invoice_line->qty_dispatched != 0) { + $stock_gl_code = get_stock_gl_code($invoice_line->stock_id); + if ($invoice_line->line_price() != 0) { //Post sales transaction to GL credit sales - - add_gl_trans_customer(10, $invoice_no, $date_, $stock_gl_code["sales_account"], - $stock_gl_code["dimension_id"], $stock_gl_code["dimension2_id"], - (-$line_taxfree_price * $delivery_line->qty_dispatched), - $cart->customer_id, "The sales price GL posting could not be inserted"); - - if ($delivery_line->discount_percent != 0) - { - - add_gl_trans_customer(10, $invoice_no, $date_, - $branch_data["sales_discount_account"], $stock_gl_code["dimension_id"], - $stock_gl_code["dimension2_id"], - ($line_taxfree_price * $delivery_line->qty_dispatched * $delivery_line->discount_percent), - $cart->customer_id, "The sales discount GL posting could not be inserted"); - } /*end of if discount !=0 */ - } /*end of if sales integrated with debtors */ + // If there is a Branch Sales Account, then override with this, + // else take the Item Sales Account + if (!$invoice->is_prepaid()) + $sales_account = ($branch_data['sales_account'] != "" ? $branch_data['sales_account'] : $stock_gl_code['sales_account']); + // If there is a Customer Dimension, then override with this, + // else take the Item Dimension (if any) + $dim = ($invoice->dimension_id != $customer['dimension_id'] ? $invoice->dimension_id : + ($customer['dimension_id'] != 0 ? $customer["dimension_id"] : $stock_gl_code["dimension_id"])); + $dim2 = ($invoice->dimension2_id != $customer['dimension2_id'] ? $invoice->dimension2_id : + ($customer['dimension2_id'] != 0 ? $customer["dimension2_id"] : $stock_gl_code["dimension2_id"])); + $total += add_gl_trans_customer(ST_SALESINVOICE, $invoice_no, $date_, $sales_account, $dim, $dim2, + -$line_taxfree_price*$prepaid_factor, + $invoice->customer_id, "The sales price GL posting could not be inserted"); + + if ($invoice_line->discount_percent != 0) { + + $total += add_gl_trans_customer(ST_SALESINVOICE, $invoice_no, $date_, + $branch_data["sales_discount_account"], $dim, $dim2, + ($line_taxfree_price * $invoice_line->discount_percent)*$prepaid_factor, + $invoice->customer_id, "The sales discount GL posting could not be inserted"); + } /*end of if discount !=0 */ + } } /*quantity dispatched is more than 0 */ } /*end of delivery_line loop */ - /*Post debtors transaction to GL debit debtors, credit freight re-charged and credit sales */ - if (($cart_items_total + $charge_shipping + $tax_total) != 0) - { - add_gl_trans_customer(10, $invoice_no, $date_, $branch_data["receivables_account"], 0, 0, - ($cart_items_total + $charge_shipping + $tax_total), - $cart->customer_id, "The total debtor GL posting could not be inserted"); + if (($items_total + $charge_shipping) != 0) { + $total += add_gl_trans_customer(ST_SALESINVOICE, $invoice_no, $date_, $branch_data["receivables_account"], $invoice->dimension_id, $invoice->dimension2_id, + ($items_total + $charge_shipping + $items_added_tax + $freight_added_tax)*$prepaid_factor, + $invoice->customer_id, "The total debtor GL posting could not be inserted"); } + $to_allocate = ($items_total + $charge_shipping + $items_added_tax + $freight_added_tax); - if ($charge_shipping != 0) - { - add_gl_trans_customer(10, $invoice_no, $date_, $company_data["freight_act"], 0, 0, - (-$charge_shipping), $cart->customer_id, - "The freight GL posting could not be inserted"); + if ($charge_shipping != 0) { + $total += add_gl_trans_customer(ST_SALESINVOICE, $invoice_no, $date_, $company_data["freight_act"], $invoice->dimension_id, $invoice->dimension2_id, + -$invoice->get_tax_free_shipping()*$prepaid_factor, $invoice->customer_id, + "The freight GL posting could not be inserted"); } - - foreach ($taxes as $taxitem) - { - if ($taxitem['Value'] != 0) - { - add_customer_trans_tax_detail_item(10, $invoice_no, $taxitem['tax_type_id'], - $taxitem['rate'], $taxitem['included_in_price'], $taxitem['Value']); - - add_gl_trans_customer(10, $invoice_no, $date_, $taxitem['sales_gl_code'], 0, 0, - (-$taxitem['Value']), $cart->customer_id, - "A tax GL posting could not be inserted"); - } - } - - add_comments(10, $invoice_no, $date_, $memo_); - - add_forms_for_sys_type(10, $invoice_no, $location); - - references::save_last($reference, 10); - - commit_transaction(); - + // post all taxes + foreach ($taxes as $taxitem) { + if ($taxitem['Net'] != 0) { + $ex_rate = get_exchange_rate_from_home_currency(get_customer_currency($invoice->customer_id), $date_); + add_trans_tax_details(ST_SALESINVOICE, $invoice_no, $taxitem['tax_type_id'], + $taxitem['rate'], $invoice->tax_included, $prepaid_factor*$taxitem['Value'], + $taxitem['Net'], $ex_rate, $date_, $invoice->reference, TR_OUTPUT); + if (isset($taxitem['sales_gl_code']) && !empty($taxitem['sales_gl_code']) && $taxitem['Value'] != 0) + $total += add_gl_trans_customer(ST_SALESINVOICE, $invoice_no, $date_, $taxitem['sales_gl_code'], $invoice->dimension_id, $invoice->dimension2_id, + (-$taxitem['Value'])*$prepaid_factor, $invoice->customer_id, + "A tax GL posting could not be inserted"); + } + } + + /*Post a balance post if $total != 0 */ + add_gl_balance(ST_SALESINVOICE, $invoice_no, $date_, -$total, PT_CUSTOMER, $invoice->customer_id); + + add_comments(ST_SALESINVOICE, $invoice_no, $date_, $invoice->Comments); + + if ($trans_no == 0) { + $Refs->save(ST_SALESINVOICE, $invoice_no, $invoice->reference, null, $invoice->fixed_asset); + if ($invoice->payment_terms['cash_sale'] && $invoice->pos['pos_account']) { + $amount = $items_total + $items_added_tax + $invoice->freight_cost + + $freight_added_tax; + if ($amount != 0) { + // to use debtors.pmt_discount on cash sale: + // extend invoice entry page with final amount after discount + // and change line below. + $discount = 0; // $invoice->cash_discount*$amount; + $payment_info = $invoice->pos['pos_name'].' #'.$invoice_no; + if (!empty($invoice->payment_info)) + $payment_info .= ' ' . $invoice->payment_info; + $pmtno = write_customer_payment(0, $invoice->customer_id, + $invoice->Branch, $invoice->pos['pos_account'], $date_, + $Refs->get_next(ST_CUSTPAYMENT, null, array('customer' => $invoice->customer_id, + 'branch' => $invoice->Branch, 'date' => $date_)), + $amount-$discount, $discount, $payment_info, + 0,0,0,$invoice->dimension_id, $invoice->dimension2_id); + add_cust_allocation($amount, ST_CUSTPAYMENT, $pmtno, ST_SALESINVOICE, $invoice_no, $invoice->customer_id, $date_); + + update_debtor_trans_allocation(ST_SALESINVOICE, $invoice_no, $invoice->customer_id); + update_debtor_trans_allocation(ST_CUSTPAYMENT, $pmtno, $invoice->customer_id); + } + } + } + reallocate_payments($invoice_no, ST_SALESINVOICE, $date_, $to_allocate, $allocs, $invoice->customer_id); + hook_db_postwrite($invoice, ST_SALESINVOICE); + + commit_transaction(); + return $invoice_no; } @@ -149,51 +227,129 @@ function add_sales_invoice(&$cart, $date_, $due_date, $tax_group_id, function void_sales_invoice($type, $type_no) { begin_transaction(); - + + hook_db_prevoid($type, $type_no); void_bank_trans($type, $type_no, true); void_gl_trans($type, $type_no, true); - - // for invoices and credits related to invoices, - // reverse all the changes in the sales order - $items_result = get_customer_trans_details($type, $type_no); - - $delivery = get_customer_trans_link($type, $type_no); - - if ($delivery) + + // reverse all the changes in parent document(s) + $factor = get_cust_prepayment_invoice_factor($type_no); + if ($factor != 0) { - while ($row = db_fetch($items_result)) + $lines = get_customer_trans_details($type, $type_no); + while($line = db_fetch($lines)) { - invoice_delivery_item($row['id'], $row['quantity']); + update_prepaid_so_line($line['src_id'], -$factor*$line['quantity']); + } + } + else + { + $deliveries = get_sales_parent_numbers($type, $type_no); + + if ($deliveries !== 0) { + if ($type == ST_SALESINVOICE && count($deliveries) == 1 && get_reference(ST_CUSTDELIVERY, $deliveries[0]) == "auto") + { + $trans = get_customer_trans($deliveries[0], ST_CUSTDELIVERY); + void_sales_delivery(ST_CUSTDELIVERY, $deliveries[0], false); + $date_ = sql2date($trans['tran_date']); + add_audit_trail(ST_CUSTDELIVERY, $deliveries[0], $date_, _("Voided.")); + add_voided_entry(ST_CUSTDELIVERY, $deliveries[0], $date_, ""); + } + else + { + $srcdetails = get_sales_parent_lines($type, $type_no); + while ($row = db_fetch($srcdetails)) { + update_parent_line($type, $row['id'], -$row['quantity']); + } + } } } - // clear details after they've been reversed in the sales order void_customer_trans_details($type, $type_no); - - void_customer_trans_tax_details($type, $type_no); - + + void_stock_move($type, $type_no); // in case of credit note with return + + void_trans_tax_details($type, $type_no); + void_cust_allocations($type, $type_no); - + // do this last because other voidings can depend on it - especially voiding // DO NOT MOVE THIS ABOVE VOIDING or we can end up with trans with alloc < 0 - void_customer_trans($type, $type_no); - - commit_transaction(); + void_customer_trans($type, $type_no); + + commit_transaction(); } -//-------------------------------------------------------------------------------------------------- -function invoice_delivery_item($id, $qty_dispatched) +function is_cust_invoice_credited($trans_no) { - $sql = "UPDATE ".TB_PREF."debtor_trans_details "; + return db_num_rows(get_sales_child_lines(ST_SALESINVOICE, $trans_no)); +} - $sql .= "SET qty_done = qty_done - $qty_dispatched "; +function get_cust_prepayment_invoice_factor($trans_no) +{ + $sql = "SELECT IF(dt.prep_amount>0, dt.prep_amount/so.total ,0) + FROM ".TB_PREF."debtor_trans dt + LEFT JOIN ".TB_PREF."sales_orders so ON so.trans_type=".ST_SALESORDER." AND so.order_no=dt.order_ + WHERE dt.type=".ST_SALESINVOICE." AND trans_no=".db_escape($trans_no); + $row = db_fetch(db_query($sql, 'cannot retrieve prepaid invoice factor')); + return is_array($row) ? $row[0] : false; +} + +/* + Return yet not invoiced amount of prepayment invoice (or 0 if normal invoice) +*/ +function prepaid_invoice_remainder($order) +{ + $sql = "SELECT so.total - IFNULL(SUM(inv.prep_amount),0) FROM " + .TB_PREF."sales_orders so, + ".TB_PREF."debtor_trans inv, + ".TB_PREF."payment_terms pt + WHERE so.order_no=".db_escape($order) + ." AND so.trans_type=".ST_SALESORDER + ." AND inv.type=".ST_SALESINVOICE + ." AND inv.order_=so.order_no" + ." AND so.payment_terms=pt.terms_indicator" + ." AND inv.payment_terms=pt.terms_indicator" + ." AND pt.days_before_due = -1"; + + $result = db_fetch(db_query($sql, "cannot find final invoice value")); + return $result[0] ? $result[0] : 0; +} - $sql .= " WHERE id=$id"; -// AND debtor_trans_type = 13 -// AND debtor_trans_no = $delivery_no -// AND stock_id = '$stock_id'"; - db_query($sql, "The sales delivery detail record could not be updated"); +/* + Find oldest delivery date for sales invoice +*/ +function get_oldest_delivery_date($invoice_no) +{ + $sql = "SELECT MIN(trans.tran_date) + FROM + ".TB_PREF."debtor_trans_details del + LEFT JOIN ".TB_PREF."debtor_trans_details inv + ON inv.src_id=del.id + LEFT JOIN ".TB_PREF."debtor_trans trans + ON trans.type=".ST_CUSTDELIVERY." AND trans.trans_no = del.debtor_trans_no + WHERE + inv.debtor_trans_type=".ST_SALESINVOICE + ." AND inv.debtor_trans_no=".db_escape($invoice_no); + $res = db_query($sql, 'cannot find oldest delivery date'); + $date = db_fetch($res); + return $date[0]; } -?> \ No newline at end of file +/* + Find oldest payment date for sales invoice +*/ +function get_oldest_payment_date($invoice_no) +{ + $sql = "SELECT MIN(payment.tran_date) + FROM + ".TB_PREF."cust_allocations alloc, + ".TB_PREF."debtor_trans payment + WHERE + alloc.trans_type_to=".ST_SALESINVOICE." AND alloc.trans_no_to=".db_escape($invoice_no) + ." AND alloc.trans_type_from=payment.type AND alloc.trans_no_from=payment.trans_no"; + $res = db_query($sql, 'cannot find oldest delivery date'); + $date = db_fetch($res); + return $date[0]; +}