api_supplier_orders.class.php

<?php
/* Copyright (C) 2015   Jean-François Ferry     <jfefe@aternatik.fr>
 * Copyright (C) 2016   Laurent Destailleur     <eldy@users.sourceforge.net>
 * Copyright (C) 2025   MDW         <mdeweerd@users.noreply.github.com>
 * Copyright (C) 2025       Frédéric France         <frederic.france@free.fr>
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License 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
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program. If not, see <https://www.gnu.org/licenses/>.
 */
 
use Luracast\Restler\RestException;
 
require_once DOL_DOCUMENT_ROOT.'/fourn/class/fournisseur.commande.class.php';
 
class SupplierOrders extends DolibarrApi
{
  public static $FIELDS = array(
    'socid'
  );
 
  public $order;
 
  public function __construct()
  {
    global $db, $conf;
    $this->db = $db;
    $this->order = new CommandeFournisseur($this->db);
  }
 
  public function get($id)
  {
    if (!DolibarrApiAccess::$user->hasRight("fournisseur", "commande", "lire")) {
      throw new RestException(403);
    }
 
    $result = $this->order->fetch($id);
    if (!$result) {
      throw new RestException(404, 'Supplier order not found');
    }
 
    if (!DolibarrApi::_checkAccessToResource('fournisseur', $this->order->id, 'commande_fournisseur', 'commande')) {
      throw new RestException(403, 'Access not allowed for login '.DolibarrApiAccess::$user->login);
    }
 
    $this->order->fetchObjectLinked();
    return $this->_cleanObjectDatas($this->order);
  }
 
  public function index($sortfield = "t.rowid", $sortorder = 'ASC', $limit = 100, $page = 0, $thirdparty_ids = '', $product_ids = '', $status = '', $sqlfilters = '', $sqlfilterlines = '', $properties = '', $pagination_data = false)
  {
    if (!DolibarrApiAccess::$user->hasRight("fournisseur", "commande", "lire")) {
      throw new RestException(403);
    }
 
    $obj_ret = array();
 
    // case of external user, $thirdparty_ids param is ignored and replaced by user's socid
    $socids = DolibarrApiAccess::$user->socid ?: $thirdparty_ids;
 
    // If the internal user must only see his customers, force searching by him
    $search_sale = 0;
    if (!DolibarrApiAccess::$user->hasRight("societe", "client", "voir") && !empty($socids)) {
      $search_sale = DolibarrApiAccess::$user->id;
    }
 
    $sql = "SELECT t.rowid";
    $sql .= " FROM ".MAIN_DB_PREFIX."commande_fournisseur AS t";
    $sql .= " LEFT JOIN ".MAIN_DB_PREFIX."commande_fournisseur_extrafields AS ef ON (ef.fk_object = t.rowid)"; // Modification VMR Global Solutions to include extrafields as search parameters in the API GET call, so we will be able to filter on extrafields
    if (!empty($product_ids)) {
      $sql .= ", ".MAIN_DB_PREFIX."commande_fournisseurdet as cd"; // We need this table joined to the select in order to filter by product
    }
    $sql .= ' WHERE t.entity IN ('.getEntity('supplier_order').')';
    if (!empty($product_ids)) {
      $sql .= " AND cd.fk_commande = t.rowid AND cd.fk_product IN (".$this->db->sanitize($product_ids).")";
    }
    if ($socids) {
      $sql .= " AND t.fk_soc IN (".$this->db->sanitize($socids).")";
    }
    // Filter by status
    if ($status == 'draft') {
      $sql .= " AND t.fk_statut IN (0)";
    }
    if ($status == 'validated') {
      $sql .= " AND t.fk_statut IN (1)";
    }
    if ($status == 'approved') {
      $sql .= " AND t.fk_statut IN (2)";
    }
    if ($status == 'running') {
      $sql .= " AND t.fk_statut IN (3)";
    }
    if ($status == 'received_start') {
      $sql .= " AND t.fk_statut IN (4)";
    }
    if ($status == 'received_end') {
      $sql .= " AND t.fk_statut IN (5)";
    }
    if ($status == 'cancelled') {
      $sql .= " AND t.fk_statut IN (6,7)";
    }
    if ($status == 'refused') {
      $sql .= " AND t.fk_statut IN (9)";
    }
    // Search on sale representative
    if ($search_sale && $search_sale != '-1') {
      if ($search_sale == -2) {
        $sql .= " AND NOT EXISTS (SELECT sc.fk_soc FROM ".MAIN_DB_PREFIX."societe_commerciaux as sc WHERE sc.fk_soc = t.fk_soc)";
      } elseif ($search_sale > 0) {
        $sql .= " AND EXISTS (SELECT sc.fk_soc FROM ".MAIN_DB_PREFIX."societe_commerciaux as sc WHERE sc.fk_soc = t.fk_soc AND sc.fk_user = ".((int) $search_sale).")";
      }
    }
    // Add sql filters
    if ($sqlfilters) {
      $errormessage = '';
      $sql .= forgeSQLFromUniversalSearchCriteria($sqlfilters, $errormessage);
      if ($errormessage) {
        throw new RestException(400, 'Error when validating parameter sqlfilters -> '.$errormessage);
      }
    }
    // Add sql filters for lines
    if ($sqlfilterlines) {
      $errormessage = '';
      $sql .= " AND EXISTS (SELECT tl.rowid FROM ".MAIN_DB_PREFIX."commande_fournisseurdet AS tl WHERE tl.fk_commande = t.rowid";
      $sql .= forgeSQLFromUniversalSearchCriteria($sqlfilterlines, $errormessage);
      $sql .= ")";
      if ($errormessage) {
        throw new RestException(400, 'Error when validating parameter sqlfilterlines -> '.$errormessage);
      }
    }
 
    //this query will return total supplier orders with the filters given
    $sqlTotals = str_replace('SELECT t.rowid', 'SELECT count(t.rowid) as total', $sql);
 
    $sql .= $this->db->order($sortfield, $sortorder);
    if ($limit) {
      if ($page < 0) {
        $page = 0;
      }
      $offset = $limit * $page;
 
      $sql .= $this->db->plimit($limit + 1, $offset);
    }
 
    $result = $this->db->query($sql);
    if ($result) {
      $i = 0;
      $num = $this->db->num_rows($result);
      $min = min($num, ($limit <= 0 ? $num : $limit));
      while ($i < $min) {
        $obj = $this->db->fetch_object($result);
        $order_static = new CommandeFournisseur($this->db);
        if ($order_static->fetch($obj->rowid)) {
          $obj_ret[] = $this->_filterObjectProperties($this->_cleanObjectDatas($order_static), $properties);
        }
        $i++;
      }
    } else {
      throw new RestException(503, 'Error when retrieve supplier order list : '.$this->db->lasterror());
    }
 
    //if $pagination_data is true the response will contain element data with all values and element pagination with pagination data(total,page,limit)
    if ($pagination_data) {
      $totalsResult = $this->db->query($sqlTotals);
      $total = $this->db->fetch_object($totalsResult)->total;
 
      $tmp = $obj_ret;
      $obj_ret = [];
 
      $obj_ret['data'] = $tmp;
      $obj_ret['pagination'] = [
        'total' => (int) $total,
        'page' => $page, //count starts from 0
        'page_count' => (int) ceil((int) $total / $limit),
        'limit' => $limit
      ];
    }
 
    return $obj_ret;
  }
 
  public function post($request_data = null)
  {
    if (!DolibarrApiAccess::$user->hasRight("fournisseur", "commande", "creer") && !DolibarrApiAccess::$user->hasRight("supplier_order", "creer")) {
      throw new RestException(403, "Insufficiant rights");
    }
 
    if (!is_array($request_data)) {
      $request_data = array();
    }
 
    // Check mandatory fields (not using output, only possible exception is important)
    $this->_validate($request_data);
 
    foreach ($request_data as $field => $value) {
      if ($field === 'caller') {
        // Add a mention of caller so on trigger called after action, we can filter to avoid a loop if we try to sync back again with the caller
        $this->order->context['caller'] = sanitizeVal($request_data['caller'], 'aZ09');
        continue;
      }
 
      $this->order->$field = $this->_checkValForAPI($field, $value, $this->order);
    }
    if (!array_keys($request_data, 'date')) {
      $this->order->date = dol_now();
    }
    /* We keep lines as an array
     if (isset($request_data["lines"])) {
      $lines = array();
      foreach ($request_data["lines"] as $line) {
        array_push($lines, (object) $line);
      }
      $this->order->lines = $lines;
    }*/
 
    if ($this->order->create(DolibarrApiAccess::$user) < 0) {
      throw new RestException(500, "Error creating order", array_merge(array($this->order->error), $this->order->errors));
    }
    return $this->order->id;
  }
 
  public function put($id, $request_data = null)
  {
    if (!DolibarrApiAccess::$user->hasRight("fournisseur", "commande", "creer") && !DolibarrApiAccess::$user->hasRight("supplier_order", "creer")) {
      throw new RestException(403);
    }
 
    $result = $this->order->fetch($id);
    if (!$result) {
      throw new RestException(404, 'Supplier order not found');
    }
 
    if (!DolibarrApi::_checkAccessToResource('fournisseur', $this->order->id, 'commande_fournisseur', 'commande')) {
      throw new RestException(403, 'Access not allowed for login '.DolibarrApiAccess::$user->login);
    }
 
    foreach ($request_data as $field => $value) {
      if ($field == 'id') {
        continue;
      }
      if ($field === 'caller') {
        // Add a mention of caller so on trigger called after action, we can filter to avoid a loop if we try to sync back again with the caller
        $this->order->context['caller'] = sanitizeVal($request_data['caller'], 'aZ09');
        continue;
      }
      if ($field == 'array_options' && is_array($value)) {
        foreach ($value as $index => $val) {
          $this->order->array_options[$index] = $this->_checkValForAPI($field, $val, $this->order);
        }
        continue;
      }
 
      $this->order->$field = $this->_checkValForAPI($field, $value, $this->order);
    }
 
    if ($this->order->update(DolibarrApiAccess::$user)) {
      return $this->get($id);
    }
 
    return false;
  }
 
  public function postLine($id, $request_data = null)
  {
    if (!DolibarrApiAccess::$user->hasRight('fournisseur', 'commande', 'creer')) {
      throw new RestException(403);
    }
 
    $result = $this->order->fetch($id);
    if (!$result) {
      throw new RestException(404, 'Supplier order not found');
    }
 
    if (!DolibarrApi::_checkAccessToResource('fournisseur', $this->order->id, 'commande_fournisseur', 'commande')) {
      throw new RestException(403, 'Access not allowed for login '.DolibarrApiAccess::$user->login);
    }
 
    $request_data = (object) $request_data;
 
    $request_data->desc = sanitizeVal($request_data->desc, 'restricthtml');
 
    $updateRes = $this->order->addline(
      $request_data->desc,
      $request_data->subprice,
      $request_data->qty,
      $request_data->tva_tx,
      $request_data->localtax1_tx,
      $request_data->localtax2_tx,
      $request_data->fk_product,
      $request_data->fk_prod_fourn_price,
      $request_data->ref_fourn,
      $request_data->remise_percent,
      $request_data->price_base_type ? $request_data->price_base_type : 'HT',
      $request_data->pu_ttc,
      $request_data->product_type,
      $request_data->info_bits,
      $request_data->notrigger,
      $request_data->date_start,
      $request_data->date_end,
      $request_data->array_options,
      $request_data->fk_unit,
      $request_data->multicurrency_subprice,
      $request_data->origin,
      $request_data->origin_id,
      $request_data->rang,
      $request_data->special_code
    );
 
    if ($updateRes > 0) {
      return $updateRes;
    } else {
      throw new RestException(400, $this->order->error);
    }
  }
 
  public function getContacts($id, $source, $type = '')
  {
    if (!DolibarrApiAccess::$user->hasRight("fournisseur", "commande", "lire")) {
      throw new RestException(403);
    }
 
    $result = $this->order->fetch($id);
    if (!$result) {
      throw new RestException(404, 'Supplier order not found');
    }
 
    if (!DolibarrApi::_checkAccessToResource('fournisseur', $this->order->id, 'commande_fournisseur', 'commande')) {
      throw new RestException(403, 'Access not allowed for login '.DolibarrApiAccess::$user->login);
    }
    $contacts = array();
 
    if ($source == 'all' || $source == 'external') {
      $tmpContacts = $this->order->liste_contact(-1, 'external', 0, $type);
      $contacts = array_merge($contacts, $tmpContacts);
    }
 
    if ($source == 'all' || $source == 'internal') {
      $tmpContacts = $this->order->liste_contact(-1, 'internal', 0, $type);
      $contacts = array_merge($contacts, $tmpContacts);
    }
 
    return $contacts;
  }
 
  public function postContact($id, $contactid, $type, $source)
  {
    if (!DolibarrApiAccess::$user->hasRight("fournisseur", "commande", "creer")) {
      throw new RestException(403);
    }
 
    $result = $this->order->fetch($id);
    if (!$result) {
      throw new RestException(404, 'Supplier order not found');
    }
 
    if (!DolibarrApi::_checkAccessToResource('fournisseur', $this->order->id, 'commande_fournisseur', 'commande')) {
      throw new RestException(403, 'Access not allowed for login '.DolibarrApiAccess::$user->login);
    }
 
    $result = $this->order->add_contact($contactid, $type, $source);
 
    if ($result < 0) {
      throw new RestException(500, 'Error when added the contact');
    }
 
    if ($result == 0) {
      throw new RestException(304, 'contact already added');
    }
 
    return array(
      'success' => array(
        'code' => 200,
        'message' => 'Contact linked to the order'
      )
    );
  }
 
  public function deleteContact($id, $contactid, $type, $source)
  {
    if (!DolibarrApiAccess::$user->hasRight("fournisseur", "commande", "creer")) {
      throw new RestException(403);
    }
 
    $result = $this->order->fetch($id);
    if (!$result) {
      throw new RestException(404, 'Supplier order not found');
    }
 
    if (!DolibarrApi::_checkAccessToResource('fournisseur', $this->order->id, 'commande_fournisseur', 'commande')) {
      throw new RestException(403, 'Access not allowed for login '.DolibarrApiAccess::$user->login);
    }
 
    $contacts = $this->order->liste_contact(-1, $source, 0, $type);
 
    $contactToUnlink = 0;
    foreach ($contacts as $contact) {
      if ($contact['id'] == $contactid && $contact['code'] == $type) {
        $contactToUnlink = $contact['rowid'];
        break;
      }
    }
 
    if ($contactToUnlink == 0) {
      throw new RestException(404, 'Linked contact not found');
    }
 
    $result = $this->order->delete_contact($contact['rowid']);
 
    if (!$result) {
      throw new RestException(500, 'Error when deleted the contact');
    }
 
    return array(
      'success' => array(
        'code' => 200,
        'message' => 'Contact unlinked from supplier order'
      )
    );
  }
 
  public function delete($id)
  {
    if (!DolibarrApiAccess::$user->hasRight("fournisseur", "commande", "supprimer")) {
      throw new RestException(403);
    }
    $result = $this->order->fetch($id);
    if (!$result) {
      throw new RestException(404, 'Supplier order not found');
    }
 
    if (!DolibarrApi::_checkAccessToResource('fournisseur', $this->order->id, 'commande_fournisseur', 'commande')) {
      throw new RestException(403, 'Access not allowed for login '.DolibarrApiAccess::$user->login);
    }
 
    if ($this->order->delete(DolibarrApiAccess::$user) < 0) {
      throw new RestException(500, 'Error when deleting order');
    }
 
    return array(
      'success' => array(
        'code' => 200,
        'message' => 'Supplier order deleted'
      )
    );
  }
 
 
  public function validate($id, $idwarehouse = 0, $notrigger = 0)
  {
    if (!DolibarrApiAccess::$user->hasRight("fournisseur", "commande", "creer") && !DolibarrApiAccess::$user->hasRight("supplier_order", "creer")) {
      throw new RestException(403);
    }
    $result = $this->order->fetch($id);
    if (!$result) {
      throw new RestException(404, 'Order not found');
    }
 
    if (!DolibarrApi::_checkAccessToResource('fournisseur', $this->order->id, 'commande_fournisseur', 'commande')) {
      throw new RestException(403, 'Access not allowed for login '.DolibarrApiAccess::$user->login);
    }
 
    $result = $this->order->valid(DolibarrApiAccess::$user, $idwarehouse, $notrigger);
    if ($result == 0) {
      throw new RestException(304, 'Error nothing done. May be object is already validated');
    }
    if ($result < 0) {
      throw new RestException(500, 'Error when validating Order: '.$this->order->error);
    }
 
    return array(
      'success' => array(
        'code' => 200,
        'message' => 'Order validated (Ref='.$this->order->ref.')'
      )
    );
  }
 
  public function approve($id, $idwarehouse = 0, $secondlevel = 0)
  {
    if (!DolibarrApiAccess::$user->hasRight("fournisseur", "commande", "creer") && !DolibarrApiAccess::$user->hasRight("supplier_order", "creer")) {
      throw new RestException(403);
    }
    $result = $this->order->fetch($id);
    if (!$result) {
      throw new RestException(404, 'Order not found');
    }
 
    if (!DolibarrApi::_checkAccessToResource('fournisseur', $this->order->id, 'commande_fournisseur', 'commande')) {
      throw new RestException(403, 'Access not allowed for login '.DolibarrApiAccess::$user->login);
    }
 
    $result = $this->order->approve(DolibarrApiAccess::$user, $idwarehouse, $secondlevel);
    if ($result == 0) {
      throw new RestException(304, 'Error nothing done. May be object is already approved');
    }
    if ($result < 0) {
      throw new RestException(500, 'Error when approve Order: '.$this->order->error);
    }
 
    return array(
      'success' => array(
        'code' => 200,
        'message' => 'Order approved (Ref='.$this->order->ref.')'
      )
    );
  }
 
 
  public function makeOrder($id, $date, $method, $comment = '')
  {
    if (!DolibarrApiAccess::$user->hasRight("fournisseur", "commande", "creer") && !DolibarrApiAccess::$user->hasRight("supplier_order", "creer")) {
      throw new RestException(403);
    }
    $result = $this->order->fetch($id);
    if (!$result) {
      throw new RestException(404, 'Order not found');
    }
 
    if (!DolibarrApi::_checkAccessToResource('fournisseur', $this->order->id, 'commande_fournisseur', 'commande')) {
      throw new RestException(403, 'Access not allowed for login '.DolibarrApiAccess::$user->login);
    }
 
    $result = $this->order->commande(DolibarrApiAccess::$user, $date, $method, $comment);
    if ($result == 0) {
      throw new RestException(304, 'Error nothing done. May be object is already sent');
    }
    if ($result < 0) {
      throw new RestException(500, 'Error when sending Order: '.$this->order->error);
    }
 
    return array(
      'success' => array(
        'code' => 200,
        'message' => 'Order sent (Ref='.$this->order->ref.')'
      )
    );
  }
 
  public function receiveOrder($id, $closeopenorder, $comment, $lines)
  {
    if (!DolibarrApiAccess::$user->hasRight("fournisseur", "commande", "creer") && !DolibarrApiAccess::$user->hasRight("supplier_order", "creer")) {
      throw new RestException(403);
    }
    $result = $this->order->fetch($id);
    if (!$result) {
      throw new RestException(404, 'Order not found');
    }
 
    if (!DolibarrApi::_checkAccessToResource('fournisseur', $this->order->id, 'commande_fournisseur', 'commande')) {
      throw new RestException(403, 'Access not allowed for login '.DolibarrApiAccess::$user->login);
    }
 
    foreach ($lines as $line) {
      $lineObj = (object) $line;
 
      $result = $this->order->dispatchProduct(
        DolibarrApiAccess::$user,
        $lineObj->fk_product,
        $lineObj->qty,
        $lineObj->warehouse,
        $lineObj->price,
        $lineObj->comment,
        $lineObj->eatby,
        $lineObj->sellby,
        $lineObj->batch,
        (int) $lineObj->id,
        $lineObj->notrigger
      );
 
      if ($result < 0) {
        throw new RestException(500, 'Error dispatch order line '.$lineObj->id.': '.$this->order->error);
      }
    }
 
    $result = $this->order->calcAndSetStatusDispatch(DolibarrApiAccess::$user, $closeopenorder, $comment);
 
    if ($result == 0) {
      throw new RestException(304, 'Error nothing done. May be object is already dispatched');
    }
    if ($result < 0) {
      throw new RestException(500, 'Error when receivce order: '.$this->order->error);
    }
 
    return array(
      'success' => array(
        'code' => 200,
        'message' => 'Order received (Ref='.$this->order->ref.')'
      )
    );
  }
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.PublicUnderscore
  protected function _cleanObjectDatas($object)
  {
    // phpcs:enable
    $object = parent::_cleanObjectDatas($object);
 
    unset($object->rowid);
    unset($object->barcode_type);
    unset($object->barcode_type_code);
    unset($object->barcode_type_label);
    unset($object->barcode_type_coder);
 
    return $object;
  }
 
  private function _validate($data)
  {
    if ($data === null) {
      $data = array();
    }
    $order = array();
    foreach (SupplierOrders::$FIELDS as $field) {
      if (!isset($data[$field])) {
        throw new RestException(400, "$field field missing");
      }
      $order[$field] = $data[$field];
    }
    return $order;
  }
}