sales/includes/db/sales_order_db.inc

   1 <?php
   2 /**********************************************************************
   3     Copyright (C) FrontAccounting, LLC.
   4         Released under the terms of the GNU General Public License, GPL,
   5         as published by the Free Software Foundation, either version 3
   6         of the License, or (at your option) any later version.
   7     This program is distributed in the hope that it will be useful,
   8     but WITHOUT ANY WARRANTY; without even the implied warranty of
   9     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
  10     See the License here <http://www.gnu.org/licenses/gpl-3.0.html>.
  11 ***********************************************************************/
  12 //----------------------------------------------------------------------------------------
  13 function add_sales_order(&$order)
  14 {
  15         global $loc_notification, $path_to_root, $Refs;
  16
  17         begin_transaction();
  18
  19         $order_no = get_next_trans_no($order->trans_type);
  20         $del_date = date2sql($order->due_date);
  21         $order_type = 0; // this is default on new order
  22         $sql = "INSERT INTO ".TB_PREF."sales_orders (order_no, type, debtor_no, trans_type, branch_code, customer_ref, reference, comments, ord_date,
  23                 order_type, ship_via, deliver_to, delivery_address, contact_phone,
  24                 contact_email, freight_cost, from_stk_loc, delivery_date)
  25                 VALUES (" .db_escape($order_no) . "," .db_escape($order_type) . "," . db_escape($order->customer_id) .
  26                  ", " .db_escape($order->trans_type) . "," .db_escape($order->Branch) . ", ".
  27                         db_escape($order->cust_ref) .",".
  28                         db_escape($order->reference) .",".
  29                         db_escape($order->Comments) .",'" .
  30                         date2sql($order->document_date) . "', " .
  31                         db_escape($order->sales_type) . ", " .
  32                         db_escape($order->ship_via)."," .
  33                         db_escape($order->deliver_to) . "," .
  34                         db_escape($order->delivery_address) . ", " .
  35                         db_escape($order->phone) . ", " .
  36                         db_escape($order->email) . ", " .
  37                         db_escape($order->freight_cost) .", " .
  38                         db_escape($order->Location) .", " .
  39                         db_escape($del_date) . ")";
  40
  41         db_query($sql, "order Cannot be Added");
  42
  43         $order->trans_no = array($order_no=>0);
  44
  45         if ($loc_notification == 1)
  46         {
  47                 include_once($path_to_root . "/inventory/includes/inventory_db.inc");
  48                 $st_ids = array();
  49                 $st_names = array();
  50                 $st_num = array();
  51                 $st_reorder = array();
  52         }
  53         foreach ($order->line_items as $line)
  54         {
  55                 if ($loc_notification == 1 && is_inventory_item($line->stock_id))
  56                 {
  57                         $sql = "SELECT ".TB_PREF."loc_stock.*, ".TB_PREF."locations.location_name, ".TB_PREF."locations.email
  58                                 FROM ".TB_PREF."loc_stock, ".TB_PREF."locations
  59                                 WHERE ".TB_PREF."loc_stock.loc_code=".TB_PREF."locations.loc_code
  60                                 AND ".TB_PREF."loc_stock.stock_id = '" . $line->stock_id . "'
  61                                 AND ".TB_PREF."loc_stock.loc_code = '" . $order->Location . "'";
  62                         $res = db_query($sql,"a location could not be retreived");
  63                         $loc = db_fetch($res);
  64                         if ($loc['email'] != "")
  65                         {
  66                                 $qoh = get_qoh_on_date($line->stock_id, $order->Location);
  67                                 $qoh -= get_demand_qty($line->stock_id, $order->Location);
  68                                 $qoh -= get_demand_asm_qty($line->stock_id, $order->Location);
  69                                 $qoh -= $line->quantity;
  70                                 if ($qoh < $loc['reorder_level'])
  71                                 {
  72                                         $st_ids[] = $line->stock_id;
  73                                         $st_names[] = $line->item_description;
  74                                         $st_num[] = $qoh - $loc['reorder_level'];
  75                                         $st_reorder[] = $loc['reorder_level'];
  76                                 }
  77                         }
  78                 }
  79
  80                 $sql = "INSERT INTO ".TB_PREF."sales_order_details (order_no, trans_type, stk_code, description, unit_price, quantity, discount_percent) VALUES (";
  81                 $sql .= $order_no . ",".$order->trans_type .
  82                                 ",".db_escape($line->stock_id).", "
  83                                 .db_escape($line->item_description).", $line->price,
  84                                 $line->quantity,
  85                                 $line->discount_percent)";
  86                 db_query($sql, "order Details Cannot be Added");
  87
  88         } /* inserted line items into sales order details */
  89
  90         add_audit_trail($order->trans_type, $order_no, $order->document_date);
  91         $Refs->save($order->trans_type, $order_no, $order->reference);
  92         commit_transaction();
  93
  94         if ($loc_notification == 1 && count($st_ids) > 0)
  95         {
  96                 require_once($path_to_root . "/reporting/includes/class.mail.inc");
  97                 $company = get_company_prefs();
  98                 $mail = new email($company['coy_name'], $company['email']);
  99                 $from = $company['coy_name'] . " <" . $company['email'] . ">";
 100                 $to = $loc['location_name'] . " <" . $loc['email'] . ">";
 101                 $subject = _("Stocks below Re-Order Level at " . $loc['location_name']);
 102                 $msg = "\n";
 103                 for ($i = 0; $i < count($st_ids); $i++)
 104                         $msg .= $st_ids[$i] . " " . $st_names[$i] . ", " . _("Re-Order Level") . ": " . $st_reorder[$i] . ", " . _("Below") . ": " . $st_num[$i] . "\n";
 105                 $msg .= "\n" . _("Please reorder") . "\n\n";
 106                 $msg .= $company['coy_name'];
 107                 $mail->to($to);
 108                 $mail->subject($subject);
 109                 $mail->text($msg);
 110                 $ret = $mail->send();
 111         }
 112         return $order_no;
 113 }
 114
 115 //----------------------------------------------------------------------------------------
 116
 117 function delete_sales_order($order_no, $trans_type)
 118 {
 119         begin_transaction();
 120
 121         $sql = "DELETE FROM ".TB_PREF."sales_orders WHERE order_no=" . db_escape($order_no)
 122                 . " AND trans_type=".db_escape($trans_type);
 123
 124         db_query($sql, "order Header Delete");
 125
 126         $sql = "DELETE FROM ".TB_PREF."sales_order_details WHERE order_no ="
 127                 .db_escape($order_no) . " AND trans_type=".db_escape($trans_type);
 128         db_query($sql, "order Detail Delete");
 129
 130         delete_reference($trans_type, $order_no);
 131
 132         add_audit_trail($trans_type, $order_no, Today(), _("Deleted."));
 133         commit_transaction();
 134 }
 135
 136 //----------------------------------------------------------------------------------------
 137 // Mark changes in sales_order_details
 138 //
 139 function update_sales_order_version($order)
 140 {
 141   foreach ($order as $so_num => $so_ver) {
 142   $sql= 'UPDATE '.TB_PREF.'sales_orders SET version=version+1 WHERE order_no='. $so_num.
 143         ' AND version='.$so_ver . " AND trans_type=30";
 144   db_query($sql, 'Concurrent editing conflict while sales order update');
 145   }
 146 }
 147
 148 //----------------------------------------------------------------------------------------
 149
 150 function update_sales_order($order)
 151 {
 152         global $loc_notification, $path_to_root, $Refs;
 153
 154         $del_date = date2sql($order->due_date);
 155         $ord_date = date2sql($order->document_date);
 156         $order_no =  key($order->trans_no);
 157         $version= current($order->trans_no);
 158
 159         begin_transaction();
 160
 161         $sql = "UPDATE ".TB_PREF."sales_orders SET type =".db_escape($order->so_type)." ,
 162                 debtor_no = " . db_escape($order->customer_id) . ",
 163                 branch_code = " . db_escape($order->Branch) . ",
 164                 customer_ref = ". db_escape($order->cust_ref) .",
 165                 reference = ". db_escape($order->reference) .",
 166                 comments = ". db_escape($order->Comments) .",
 167                 ord_date = " . db_escape($ord_date) . ",
 168                 order_type = " .db_escape($order->sales_type) . ",
 169                 ship_via = " . db_escape($order->ship_via) .",
 170                 deliver_to = " . db_escape($order->deliver_to) . ",
 171                 delivery_address = " . db_escape($order->delivery_address) . ",
 172                 contact_phone = " .db_escape($order->phone) . ",
 173                 contact_email = " .db_escape($order->email) . ",
 174                 freight_cost = " .db_escape($order->freight_cost) .",
 175                 from_stk_loc = " .db_escape($order->Location) .",
 176                 delivery_date = " .db_escape($del_date). ",
 177                 version = ".($version+1)."
 178          WHERE order_no=" . $order_no ."
 179          AND trans_type=".$order->trans_type." AND version=".$version;
 180         db_query($sql, "order Cannot be Updated, this can be concurrent edition conflict");
 181
 182         $sql = "DELETE FROM ".TB_PREF."sales_order_details WHERE order_no =" . $order_no . " AND trans_type=".$order->trans_type;
 183
 184         db_query($sql, "Old order Cannot be Deleted");
 185
 186         if ($loc_notification == 1)
 187         {
 188                 include_once($path_to_root . "/inventory/includes/inventory_db.inc");
 189                 $st_ids = array();
 190                 $st_names = array();
 191                 $st_num = array();
 192                 $st_reorder = array();
 193         }
 194         foreach ($order->line_items as $line)
 195         {
 196                 if ($loc_notification == 1 && is_inventory_item($line->stock_id))
 197                 {
 198                         $sql = "SELECT ".TB_PREF."loc_stock.*, "
 199                                   .TB_PREF."locations.location_name, "
 200                                   .TB_PREF."locations.email
 201                                 FROM ".TB_PREF."loc_stock, "
 202                                   .TB_PREF."locations
 203                                 WHERE ".TB_PREF."loc_stock.loc_code=".TB_PREF."locations.loc_code
 204                                  AND ".TB_PREF."loc_stock.stock_id = ".db_escape($line->stock_id)."
 205                                  AND ".TB_PREF."loc_stock.loc_code = ".db_escape($order->Location);
 206                         $res = db_query($sql,"a location could not be retreived");
 207                         $loc = db_fetch($res);
 208                         if ($loc['email'] != "")
 209                         {
 210                                 $qoh = get_qoh_on_date($line->stock_id, $order->Location);
 211                                 $qoh -= get_demand_qty($line->stock_id, $order->Location);
 212                                 $qoh -= get_demand_asm_qty($line->stock_id, $order->Location);
 213                                 $qoh -= $line->quantity;
 214                                 if ($qoh < $loc['reorder_level'])
 215                                 {
 216                                         $st_ids[] = $line->stock_id;
 217                                         $st_names[] = $line->item_description;
 218                                         $st_num[] = $qoh - $loc['reorder_level'];
 219                                         $st_reorder[] = $loc['reorder_level'];
 220                                 }
 221                         }
 222                 }
 223                 $sql = "INSERT INTO ".TB_PREF."sales_order_details
 224                  (id, order_no, trans_type, stk_code,  description, unit_price, quantity,
 225                   discount_percent, qty_sent)
 226                  VALUES (";
 227                 $sql .= db_escape($line->id ? $line->id : 0) . ","
 228                   .$order_no . ",".$order->trans_type.","
 229                   .db_escape($line->stock_id) . ","
 230                   .db_escape($line->item_description) . ", "
 231                   .db_escape($line->price) . ", "
 232                   .db_escape($line->quantity) . ", "
 233                   .db_escape($line->discount_percent) . ", "
 234                   .db_escape($line->qty_done) ." )";
 235
 236                 db_query($sql, "Old order Cannot be Inserted");
 237
 238         } /* inserted line items into sales order details */
 239
 240         add_audit_trail($order->trans_type, $order_no, $order->document_date, _("Updated."));
 241         $Refs->delete($order->trans_type, $order_no);
 242         $Refs->save($order->trans_type, $order_no, $order->reference);
 243         commit_transaction();
 244         if ($loc_notification == 1 && count($st_ids) > 0)
 245         {
 246                 require_once($path_to_root . "/reporting/includes/class.mail.inc");
 247                 $company = get_company_prefs();
 248                 $mail = new email($company['coy_name'], $company['email']);
 249                 $from = $company['coy_name'] . " <" . $company['email'] . ">";
 250                 $to = $loc['location_name'] . " <" . $loc['email'] . ">";
 251                 $subject = _("Stocks below Re-Order Level at " . $loc['location_name']);
 252                 $msg = "\n";
 253                 for ($i = 0; $i < count($st_ids); $i++)
 254                         $msg .= $st_ids[$i] . " " . $st_names[$i] . ", "
 255                           . _("Re-Order Level") . ": " . $st_reorder[$i] . ", "
 256                           . _("Below") . ": " . $st_num[$i] . "\n";
 257                 $msg .= "\n" . _("Please reorder") . "\n\n";
 258                 $msg .= $company['coy_name'];
 259                 $mail->to($to);
 260                 $mail->subject($subject);
 261                 $mail->text($msg);
 262                 $ret = $mail->send();
 263         }
 264 }
 265
 266 //----------------------------------------------------------------------------------------
 267
 268 function get_sales_order_header($order_no, $trans_type)
 269 {
 270         $sql = "SELECT ".TB_PREF."sales_orders.*, "
 271           .TB_PREF."debtors_master.name, "
 272           .TB_PREF."debtors_master.curr_code, "
 273           .TB_PREF."debtors_master.email AS master_email, "
 274           .TB_PREF."locations.location_name, "
 275           .TB_PREF."debtors_master.payment_terms, "
 276           .TB_PREF."debtors_master.discount, "
 277           .TB_PREF."sales_types.sales_type, "
 278           .TB_PREF."sales_types.id AS sales_type_id, "
 279           .TB_PREF."sales_types.tax_included, "
 280           .TB_PREF."shippers.shipper_name, "
 281           .TB_PREF."tax_groups.name AS tax_group_name , "
 282           .TB_PREF."tax_groups.id AS tax_group_id
 283         FROM ".TB_PREF."sales_orders, "
 284           .TB_PREF."debtors_master, "
 285           .TB_PREF."sales_types, "
 286           .TB_PREF."tax_groups, "
 287           .TB_PREF."cust_branch, "
 288           .TB_PREF."locations, "
 289           .TB_PREF."shippers
 290         WHERE ".TB_PREF."sales_orders.order_type=".TB_PREF."sales_types.id
 291                 AND ".TB_PREF."cust_branch.branch_code = ".TB_PREF."sales_orders.branch_code
 292                 AND ".TB_PREF."cust_branch.tax_group_id = ".TB_PREF."tax_groups.id
 293                 AND ".TB_PREF."sales_orders.debtor_no = ".TB_PREF."debtors_master.debtor_no
 294                 AND ".TB_PREF."locations.loc_code = ".TB_PREF."sales_orders.from_stk_loc
 295                 AND ".TB_PREF."shippers.shipper_id = ".TB_PREF."sales_orders.ship_via
 296                 AND ".TB_PREF."sales_orders.trans_type = " . db_escape($trans_type) ."
 297                 AND ".TB_PREF."sales_orders.order_no = " . db_escape($order_no );
 298
 299         $result = db_query($sql, "order Retreival");
 300
 301         $num = db_num_rows($result);
 302         if ($num > 1)
 303         {
 304                 display_db_error("FATAL : sales order query returned a duplicate - " . db_num_rows($result), $sql, true);
 305         }
 306         else if ($num == 1)
 307         {
 308                 return db_fetch($result);
 309         }
 310         else
 311                 display_db_error("FATAL : sales order return nothing - " . db_num_rows($result), $sql, true);
 312
 313 }
 314
 315 //----------------------------------------------------------------------------------------
 316
 317 function get_sales_order_details($order_no, $trans_type) {
 318         $sql = "SELECT id, stk_code, unit_price, "
 319                 .TB_PREF."sales_order_details.description,"
 320                 .TB_PREF."sales_order_details.quantity,
 321                   discount_percent,
 322                   qty_sent as qty_done, "
 323                 .TB_PREF."stock_master.units,
 324                 ".TB_PREF."stock_master.material_cost + "
 325                         .TB_PREF."stock_master.labour_cost + "
 326                         .TB_PREF."stock_master.overhead_cost AS standard_cost
 327         FROM ".TB_PREF."sales_order_details, ".TB_PREF."stock_master
 328         WHERE ".TB_PREF."sales_order_details.stk_code = ".TB_PREF."stock_master.stock_id
 329         AND order_no =" . db_escape($order_no)
 330                 ." AND trans_type = " . db_escape($trans_type) . " ORDER BY id";
 331
 332         return db_query($sql, "Retreive order Line Items");
 333 }
 334 //----------------------------------------------------------------------------------------
 335
 336 function read_sales_order($order_no, &$order, $trans_type)
 337 {
 338         $myrow = get_sales_order_header($order_no, $trans_type);
 339
 340         $order->trans_type = $myrow['trans_type'];
 341         $order->so_type =  $myrow["type"];
 342         $order->trans_no = array($order_no=> $myrow["version"]);
 343
 344         $order->set_customer($myrow["debtor_no"], $myrow["name"],
 345           $myrow["curr_code"], $myrow["discount"]);
 346
 347         $order->set_branch($myrow["branch_code"], $myrow["tax_group_id"],
 348           $myrow["tax_group_name"], $myrow["contact_phone"], $myrow["contact_email"]);
 349
 350         $order->set_sales_type($myrow["sales_type_id"], $myrow["sales_type"],
 351             $myrow["tax_included"], 0); // no default price calculations on edit
 352
 353         $order->set_location($myrow["from_stk_loc"], $myrow["location_name"]);
 354
 355         $order->set_delivery($myrow["ship_via"], $myrow["deliver_to"],
 356           $myrow["delivery_address"], $myrow["freight_cost"]);
 357
 358         $order->cust_ref = $myrow["customer_ref"];
 359         $order->sales_type =$myrow["order_type"];
 360         $order->reference = $myrow["reference"];
 361         $order->Comments = $myrow["comments"];
 362         $order->due_date = sql2date($myrow["delivery_date"]);
 363         $order->document_date = sql2date($myrow["ord_date"]);
 364
 365         $result = get_sales_order_details($order_no, $order->trans_type);
 366         if (db_num_rows($result) > 0)
 367         {
 368                 $line_no=0;
 369                 while ($myrow = db_fetch($result))
 370                 {
 371                         $order->add_to_cart($line_no,$myrow["stk_code"],$myrow["quantity"],
 372                                 $myrow["unit_price"], $myrow["discount_percent"],
 373                                 $myrow["qty_done"], $myrow["standard_cost"], $myrow["description"], $myrow["id"] );
 374                 $line_no++;
 375                 }
 376         }
 377
 378         return true;
 379 }
 380
 381 //----------------------------------------------------------------------------------------
 382
 383 function sales_order_has_deliveries($order_no)
 384 {
 385         $sql = "SELECT SUM(qty_sent) FROM ".TB_PREF.
 386         "sales_order_details WHERE order_no=".db_escape($order_no)
 387         ." AND trans_type=".ST_SALESORDER."";
 388
 389         $result = db_query($sql, "could not query for sales order usage");
 390
 391         $row = db_fetch_row($result);
 392
 393         return ($row[0] > 0);
 394 }
 395
 396 //----------------------------------------------------------------------------------------
 397
 398 function close_sales_order($order_no)
 399 {
 400         // set the quantity of each item to the already sent quantity. this will mark item as closed.
 401         $sql = "UPDATE ".TB_PREF."sales_order_details
 402                 SET quantity = qty_sent WHERE order_no = ".db_escape($order_no)
 403                 ." AND trans_type=".ST_SALESORDER."";
 404
 405         db_query($sql, "The sales order detail record could not be updated");
 406 }
 407
 408 //---------------------------------------------------------------------------------------------------------------
 409
 410 function get_invoice_duedate($debtorno, $invdate)
 411 {
 412         if (!is_date($invdate))
 413         {
 414                 return new_doc_date();
 415         }
 416         $sql = "SELECT ".TB_PREF."debtors_master.debtor_no, ".TB_PREF."debtors_master.payment_terms, ".TB_PREF."payment_terms.* FROM ".TB_PREF."debtors_master,
 417                 ".TB_PREF."payment_terms WHERE ".TB_PREF."debtors_master.payment_terms = ".TB_PREF."payment_terms.terms_indicator AND
 418                 ".TB_PREF."debtors_master.debtor_no = ".db_escape($debtorno);
 419
 420         $result = db_query($sql,"The customer details could not be retrieved");
 421         $myrow = db_fetch($result);
 422
 423         if (db_num_rows($result) == 0)
 424                 return $invdate;
 425         if ($myrow['day_in_following_month'] > 0)
 426                 $duedate = add_days(end_month($invdate), $myrow['day_in_following_month']);
 427         else
 428                 $duedate = add_days($invdate, $myrow['days_before_due']);
 429         return $duedate;
 430 }
 431
 432 function get_customer_to_order($customer_id) {
 433
 434         // Now check to ensure this account is not on hold */
 435         $sql = "SELECT ".TB_PREF."debtors_master.name, "
 436                   .TB_PREF."debtors_master.address, "
 437                   .TB_PREF."credit_status.dissallow_invoices, "
 438                   .TB_PREF."debtors_master.sales_type AS salestype, "
 439                   .TB_PREF."debtors_master.dimension_id, "
 440                   .TB_PREF."debtors_master.dimension2_id, "
 441                   .TB_PREF."sales_types.sales_type, "
 442                   .TB_PREF."sales_types.tax_included, "
 443                   .TB_PREF."sales_types.factor, "
 444                   .TB_PREF."debtors_master.curr_code, "
 445                   .TB_PREF."debtors_master.discount,"
 446                   .TB_PREF."debtors_master.pymt_discount
 447                 FROM ".TB_PREF."debtors_master, "
 448                   .TB_PREF."credit_status, "
 449                   .TB_PREF."sales_types
 450                 WHERE ".TB_PREF."debtors_master.sales_type="
 451                   .TB_PREF."sales_types.id
 452                 AND ".TB_PREF."debtors_master.credit_status=".TB_PREF."credit_status.id
 453                 AND ".TB_PREF."debtors_master.debtor_no = ".db_escape($customer_id);
 454
 455         $result =db_query($sql,"Customer Record Retreive");
 456         return  db_fetch($result);
 457 }
 458
 459 function get_branch_to_order($customer_id, $branch_id) {
 460
 461         // the branch was also selected from the customer selection so default the delivery details from the customer branches table cust_branch. The order process will ask for branch details later anyway
 462                 $sql = "SELECT ".TB_PREF."cust_branch.br_name, "
 463                         .TB_PREF."cust_branch.br_address, "
 464                         .TB_PREF."cust_branch.br_post_address, "
 465                         .TB_PREF."cust_branch.phone, "
 466                         .TB_PREF."cust_branch.email,
 467                           default_location, location_name, default_ship_via, "
 468                         .TB_PREF."tax_groups.name AS tax_group_name, "
 469                         .TB_PREF."tax_groups.id AS tax_group_id
 470                         FROM ".TB_PREF."cust_branch, "
 471                           .TB_PREF."tax_groups, "
 472                           .TB_PREF."locations
 473                         WHERE ".TB_PREF."cust_branch.tax_group_id = ".TB_PREF."tax_groups.id
 474                                 AND ".TB_PREF."locations.loc_code=default_location
 475                                 AND ".TB_PREF."cust_branch.branch_code=".db_escape($branch_id)."
 476                                 AND ".TB_PREF."cust_branch.debtor_no = ".db_escape($customer_id);
 477
 478             return db_query($sql,"Customer Branch Record Retreive");
 479 }
 480 ?>