- } else { // derivative 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);
- $this->cust_ref = $sodata["customer_ref"];
-//set_customer($customer_name, $customer_id, $currency, $discount)
-//* $this->customer_name = $sodata["name"];
-//* $this->customer_currency = $sodata["curr_code"];
-//* $this->Comments = $sodata["comments"];
- $this->delivery_address = $sodata["delivery_address"];
-// $this->location_name = $sodata["location_name"];
-// $this->document_date = sql2date($myrow["ord_date"]);
- }
- if (!$view && ($type!=11 || $this->trans_link!=0)) {
- $src_type = get_parent_type($type);
- $src_details = 0;
- if ($src_type==30) { // get src data from sales_orders
- $this->src_docs = array( $sodata['order_no']=>$sodata['version']);
- $srcdetails = get_sales_order_details($this->order_no);
- } else { // get src_data from debtor_trans
- $this->src_docs = get_customer_trans_version($src_type, get_parent_trans($type,$trans_no[0]));
- $srcdetails = get_customer_trans_details($src_type,array_keys($this->src_docs));
- }
- // calculate & save: qtys on other docs and free qtys on src doc
- $line_no = 0;
- for($line_no=0; $srcline = db_fetch($srcdetails); $line_no++) {
- $sign = 1; // $type==13 ? 1 : -1; // this is strange debtor_trans atavism
- $line = &$this->line_items[$line_no];
-
- $line->qty_old = $line->qty_dispatched = $line->quantity;
- $line->quantity += $sign*($srcline['quantity']-$srcline['qty_done']); // add free qty on src doc
- }
- } else {
- for($line_no=0; $line_no<count($this->line_items); $line_no++) {
- $line= &$this->line_items[$line_no];
- $line->qty_dispatched = $line->quantity;
+ $this->src_docs = get_customer_trans_version($src_type, array_values($srcnum));
+ }
+ // calculate & save: qtys on other docs and free qtys on src doc
+ $line_no = 0;
+ // 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];
+ 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++;
+ break;
+ }
+ }
+ }
+ //-------------------------------------------------------------------------
+ // Reading document into cart
+ //
+ function read($type, $trans_no = 0, $no_edit=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 (!$no_edit)
+ $this->set_parent_constraints($sodata, $trans_no[0]);