+ var $tax_group_array = null; // saves db queries
+ var $price_factor; // ditto for price calculations
+
+ var $pos; // user assigned POS
+ var $cash_account;
+ var $account_name;
+ var $cash_discount; // not used as of FA 2.1
+ var $dimension_id;
+ var $dimension2_id;
+ var $payment;
+ var $payment_terms; // cached payment terms
+ var $credit;
+
+ //-------------------------------------------------------------------------
+ //
+ // $trans_no==0 => open new/direct document
+ // $trans_no!=0 && $no_edit==false => update with parent constarints for reedition
+ // $trans_no!=0 && $no_edit==true => read only: for view, or later child doc entry
+ //
+ function Cart($type, $trans_no=0, $prep_child=false) {
+ /*Constructor function initialises a new shopping cart */
+ $this->line_items = array();
+ $this->sales_type = "";
+ if ($type == ST_SALESQUOTE)
+ $this->trans_type = $type;
+ else
+ $this->trans_type = ST_SALESORDER;
+ $this->dimension_id = 0;
+ $this->dimension2_id = 0;
+ $this->pos = get_sales_point(user_pos());
+ $this->read($type, $trans_no, $prep_child);
+ $this->cart_id = uniqid('');
+ }
+
+ //
+ // Prepare cart to new child document entry, just after initial parent doc read.
+ //
+ function prepare_child()
+ {
+ global $Refs;
+
+ $type = get_child_type($this->trans_type);
+
+ $this->trans_type = $type;
+ $this->reference = $Refs->get_next($this->trans_type);
+ $this->document_date = new_doc_date();
+
+ for($line_no = 0; $line_no < count($this->line_items); $line_no++) {
+ $line = &$this->line_items[$line_no];
+ $line->src_id = $line->id; // save src line ids for update
+ $line->qty_dispatched = $type == ST_CUSTCREDIT ? '0' : $line->quantity - $line->qty_done;
+ $line->qty_old = 0;
+ }
+ unset($line);
+
+ if ($type == ST_CUSTDELIVERY) {
+ $this->order_no = key($this->trans_no);
+ $cust = get_customer($this->customer_id);
+ $this->dimension_id = $cust['dimension_id'];
+ $this->dimension2_id = $cust['dimension2_id'];
+ }
+ if ($type == ST_SALESINVOICE) {
+ $this->due_date = get_invoice_duedate($this->payment, $this->document_date);
+ }
+
+ if ($type == ST_CUSTCREDIT)
+ $this->src_date = $this->document_date;
+
+ $this->src_docs = $this->trans_no;
+ $this->trans_no = 0;
+ }
+
+ //
+ // Prepares transaction for reedition updating with parent transaction data
+ //
+ function set_parent_constraints($sodata, $src_no) {
+
+ $srcdetails = get_sales_parent_lines($this->trans_type, $src_no);
+ $src_type = get_parent_type($this->trans_type);
+
+ // calculate & save: qtys on other docs and free qtys on src doc
+ $line_no = 0; $src_docs = array();
+ // Loop speed optimisation below depends on fact
+ // that child line_items contains subset of parent lines in _the_same_ order !
+ while (($line_no < count($this->line_items)) && ($srcline = db_fetch($srcdetails))) {
+ $line = &$this->line_items[$line_no];
+ $src_docs[] = $src_type == ST_SALESORDER ? $srcline['order_no'] : $srcline['debtor_trans_no'];
+ if ($srcline['id'] == $line->src_id) {
+ if ($this->trans_type == ST_SALESINVOICE)
+ $line->src_no = $srcline['debtor_trans_no'];
+ $line->qty_old = $line->qty_dispatched = $line->quantity;
+ $line->quantity += $srcline['quantity'] -
+ ($src_type==ST_SALESORDER ? $srcline['qty_sent'] : $srcline['qty_done']); // add free qty on src doc
+ $line_no++;
+ }
+ }
+
+ if ($src_type == ST_SALESORDER || $src_type == 0) {
+ $this->src_docs = array( $sodata['order_no']=>$sodata['version']);
+ } else {
+ // get src_data from debtor_trans
+ $this->src_docs = get_customer_trans_version($src_type, array_unique($src_docs));
+ }
+ }
+ //-------------------------------------------------------------------------
+ // Reading document into cart
+ //
+ function read($type, $trans_no=0, $prep_child=false) {
+
+ global $SysPrefs, $Refs;
+
+ if (!is_array($trans_no)) $trans_no = array($trans_no);
+
+ if ($trans_no[0]) { // read old transaction
+ if ($type == ST_SALESORDER || $type == ST_SALESQUOTE) { // sales order || sales quotation
+ read_sales_order($trans_no[0], $this, $type);
+ } else { // other type of sales transaction
+ read_sales_trans($type, $trans_no, $this);
+ if ($this->order_no) { // free hand credit notes have no order_no
+ $sodata = get_sales_order_header($this->order_no, ST_SALESORDER);
+ $this->cust_ref = $sodata["customer_ref"];
+ // currently currency is hard linked to debtor account
+ // $this->customer_currency = $sodata["curr_code"];
+ $this->delivery_to = $sodata["deliver_to"];
+ $this->delivery_address = $sodata["delivery_address"];
+ // child transaction reedition - update with parent info unless it is freehand
+ if (!$prep_child) // this is read for view/reedition
+ $this->set_parent_constraints($sodata, $trans_no[0]);
+ }
+ }
+ // convert document into child and prepare qtys for entry
+ if ($prep_child)
+ $this->prepare_child();
+
+ } else { // new document
+ $this->trans_type = $type;
+ $this->trans_no = 0;
+ $this->customer_currency = get_company_currency();
+ // set new sales document defaults here
+ if (get_global_customer() != ALL_TEXT)
+ $this->customer_id = get_global_customer();
+ else
+ $this->customer_id = '';
+ $this->document_date = new_doc_date();
+ if (!is_date_in_fiscalyear($this->document_date))
+ $this->document_date = end_fiscalyear();
+ $this->reference = $Refs->get_next($this->trans_type);
+ if ($type != ST_SALESORDER && $type != ST_SALESQUOTE) // Added 2.1 Joe Hunt 2008-11-12
+ {
+ $dim = get_company_pref('use_dimension');
+ if ($dim > 0)
+ {
+ if ($this->customer_id == '')
+ $this->dimension_id = 0;
+ else
+ {
+ $cust = get_customer($this->customer_id);
+ $this->dimension_id = $cust['dimension_id'];
+ }
+ if ($dim > 1)
+ {
+ if ($this->customer_id == '')
+ $this->dimension2_id = 0;
+ else
+ $this->dimension2_id = $cust['dimension2_id'];
+ }
+ }
+ }
+ if ($type == ST_SALESINVOICE) {
+ $this->due_date =
+ get_invoice_duedate($this->payment, $this->document_date);
+ } else
+ $this->due_date =
+ add_days($this->document_date, $SysPrefs->default_delivery_required_by());
+ }
+ $this->credit = get_current_cust_credit($this->customer_id);
+ }
+
+ //-------------------------------------------------------------------------
+ // Writing new/modified sales document to database.
+ // Makes parent documents for direct delivery/invoice by recurent call.
+ // $policy - 0 or 1: writeoff/return for IV, back order/cancel for DN
+ function write($policy=0) {
+ begin_transaction(); // prevents partial database changes in case of direct delivery/invoice
+ if (count($this->src_docs) == 0 && ($this->trans_type == ST_SALESINVOICE || $this->trans_type == ST_CUSTDELIVERY)) {
+ // this is direct document - first add parent
+ $ref = $this->reference;
+ $date = $this->document_date;
+ $due_date = $this->due_date;
+ $this->trans_type = get_parent_type($this->trans_type);
+
+ $this->reference = 'auto';
+ $trans_no = $this->write(1);
+
+ // re-read parent document converting it to child
+ $this->read($this->trans_type, $trans_no, true);
+ $this->document_date = $date;
+ $this->reference = $ref;
+ $this->due_date = $due_date;
+ }
+ $this->reference = @html_entity_decode($this->reference, ENT_QUOTES);
+ $this->Comments = @html_entity_decode($this->Comments, ENT_QUOTES);
+ foreach($this->line_items as $lineno => $line) {
+ $this->line_items[$lineno]->stock_id = @html_entity_decode($line->stock_id, ENT_QUOTES);
+ $this->line_items[$lineno]->item_description = @html_entity_decode($line->item_description, ENT_QUOTES);
+ }
+ switch($this->trans_type) {
+ case ST_SALESINVOICE:
+ $ret = write_sales_invoice($this); break;
+ case ST_CUSTCREDIT:
+ $ret = write_credit_note($this, $policy); break;
+ case ST_CUSTDELIVERY:
+ $ret = write_sales_delivery($this, $policy); break;
+ case ST_SALESORDER:
+ case ST_SALESQUOTE:
+ if ($this->trans_no==0) // new document
+ $ret = add_sales_order($this);
+ else
+ $ret = update_sales_order($this);
+ }