api_contracts.class.php

<?php
/* Copyright (C) 2015   Jean-François Ferry     <jfefe@aternatik.fr>
 * Copyright (C) 2016   Laurent Destailleur   <eldy@users.sourceforge.net>
 * Copyright (C) 2018-2024  Frédéric France         <frederic.france@free.fr>
 * Copyright (C) 2025   MDW           <mdeweerd@users.noreply.github.com>
 *
 * 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.'/contrat/class/contrat.class.php';
require_once DOL_DOCUMENT_ROOT.'/societe/class/societe.class.php';
 
class Contracts extends DolibarrApi
{
  public static $FIELDS = array(
    'socid',
    'date_contrat',
    'commercial_signature_id',
    'commercial_suivi_id'
  );
 
  public $contract;
 
  public function __construct()
  {
    global $db, $conf;
    $this->db = $db;
    $this->contract = new Contrat($this->db);
  }
 
  public function get($id)
  {
    if (!DolibarrApiAccess::$user->hasRight('contrat', 'lire')) {
      throw new RestException(403);
    }
 
    $result = $this->contract->fetch($id);
    if (!$result) {
      throw new RestException(404, 'Contract not found');
    }
 
    if (!DolibarrApi::_checkAccessToResource('contrat', $this->contract->id)) {
      throw new RestException(403, 'Access to this contract is not allowed for login '.DolibarrApiAccess::$user->login);
    }
 
    $this->contract->fetchObjectLinked();
    return $this->_cleanObjectDatas($this->contract);
  }
 
  public function index($sortfield = "t.rowid", $sortorder = 'ASC', $limit = 100, $page = 0, $thirdparty_ids = '', $sqlfilters = '', $properties = '', $pagination_data = false)
  {
    global $db, $conf;
 
    if (!DolibarrApiAccess::$user->hasRight('contrat', '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') && !$socids) {
      $search_sale = DolibarrApiAccess::$user->id;
    }
 
    $sql = "SELECT t.rowid";
    $sql .= " FROM ".MAIN_DB_PREFIX."contrat AS t LEFT JOIN ".MAIN_DB_PREFIX."contrat_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
    $sql .= ' WHERE t.entity IN ('.getEntity('contrat').')';
    if ($socids) {
      $sql .= " AND t.fk_soc IN (".$this->db->sanitize($socids).")";
    }
    // 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);
      }
    }
 
    //this query will return total 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) {
      $num = $this->db->num_rows($result);
      $min = min($num, ($limit <= 0 ? $num : $limit));
      $i = 0;
      while ($i < $min) {
        $obj = $this->db->fetch_object($result);
        $contrat_static = new Contrat($this->db);
        if ($contrat_static->fetch($obj->rowid)) {
          $obj_ret[] = $this->_filterObjectProperties($this->_cleanObjectDatas($contrat_static), $properties);
        }
        $i++;
      }
    } else {
      throw new RestException(503, 'Error when retrieve contrat 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' => ceil((int) $total / $limit),
        'limit' => $limit
      ];
    }
 
    return $obj_ret;
  }
 
  public function post($request_data = null)
  {
    if (!DolibarrApiAccess::$user->hasRight('contrat', 'creer')) {
      throw new RestException(403, "Missing permission: Create/modify contracts/subscriptions");
    }
 
    $socid = (int) $request_data['socid'];
    $thirdpartytmp = new Societe($this->db);
    $thirdparty_result = $thirdpartytmp->fetch($socid);
    if ($thirdparty_result < 1) {
      throw new RestException(404, 'Thirdparty with id='.$socid.' not found or not allowed');
    }
    if (!DolibarrApi::_checkAccessToResource('societe', $thirdpartytmp->id)) {
      throw new RestException(404, 'Thirdparty with id='.$thirdpartytmp->id.' not found or not allowed');
    }
 
    // Check mandatory fields
    $result = $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->contract->context['caller'] = sanitizeVal($request_data['caller'], 'aZ09');
        continue;
      }
 
      $this->contract->$field = $this->_checkValForAPI($field, $value, $this->contract);
    }
    /*if (isset($request_data["lines"])) {
      $lines = array();
      foreach ($request_data["lines"] as $line) {
      array_push($lines, (object) $line);
      }
      $this->contract->lines = $lines;
    }*/
    if ($this->contract->create(DolibarrApiAccess::$user) < 0) {
      throw new RestException(500, "Error creating contract", array_merge(array($this->contract->error), $this->contract->errors));
    }
 
    return $this->contract->id;
  }
 
  public function getLines($id, $sortfield = "d.rowid", $sortorder = 'ASC', $limit = 100, $page = 0, $sqlfilters = '', $properties = '', $pagination_data = false)
  {
    if (!DolibarrApiAccess::$user->hasRight('contrat', 'lire')) {
      throw new RestException(403);
    }
 
    $result = $this->contract->fetch($id);
    if (!$result) {
      throw new RestException(404, 'Contract not found');
    }
 
    if (!DolibarrApi::_checkAccessToResource('contrat', $this->contract->id)) {
      throw new RestException(403, 'Access to this contract is not allowed for login '.DolibarrApiAccess::$user->login);
    }
 
    $obj_ret = [];
 
    $sql = "SELECT d.rowid";
    $sql .= " FROM ".$this->db->prefix()."contratdet AS d";
    $sql .= " LEFT JOIN ".$this->db->prefix()."contrat AS c ON (c.rowid = d.fk_contrat)";
    $sql .= " LEFT JOIN ".$this->db->prefix()."contratdet_extrafields AS ef ON (ef.fk_object = d.rowid)";
    $sql .= " WHERE d.fk_contrat = ".((int) $id);
    $sql .= ' AND c.entity IN ('.getEntity('contrat').')';
 
    if ($sqlfilters) {
      $errormessage = '';
      $sql .= forgeSQLFromUniversalSearchCriteria($sqlfilters, $errormessage);
      if ($errormessage) {
        throw new RestException(400, 'Error when validating parameter sqlfilters -> '.$errormessage);
      }
    }
 
    $sqlTotals = str_replace('SELECT d.rowid', 'SELECT count(d.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) {
      $num = $this->db->num_rows($result);
      $min = min($num, ($limit <= 0 ? $num : $limit));
      $i = 0;
      while ($i < $min) {
        $obj = $this->db->fetch_object($result);
        $contratdet_static = new ContratLigne($this->db);
        if ($contratdet_static->fetch($obj->rowid)) {
          $obj_ret[] = $this->_filterObjectProperties($this->_cleanObjectDatas($contratdet_static), $properties);
        }
        $i++;
      }
    } else {
      throw new RestException(503, 'Error when retrieve contratdet list : '.$this->db->lasterror());
    }
 
    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,
        'page_count' => ceil((int) $total / $limit),
        'limit' => $limit
      ];
    }
 
    return $obj_ret;
  }
 
  public function postLine($id, $request_data = null)
  {
    if (!DolibarrApiAccess::$user->hasRight('contrat', 'creer')) {
      throw new RestException(403);
    }
 
    $result = $this->contract->fetch($id);
    if (!$result) {
      throw new RestException(404, 'Contract not found');
    }
 
    if (!DolibarrApi::_checkAccessToResource('contrat', $this->contract->id)) {
      throw new RestException(403, 'Access to this contract is not allowed for login '.DolibarrApiAccess::$user->login);
    }
 
    $request_data = (object) $request_data;
 
    $request_data->desc = sanitizeVal($request_data->desc, 'restricthtml');
    $request_data->price_base_type = sanitizeVal($request_data->price_base_type);
 
    $updateRes = $this->contract->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->remise_percent,
      $request_data->date_start,
      $request_data->date_end,
      $request_data->price_base_type ? $request_data->price_base_type : 'HT',
      $request_data->subprice_excl_tax,
      $request_data->info_bits,
      $request_data->fk_fournprice,
      $request_data->pa_ht,
      $request_data->array_options,
      $request_data->fk_unit,
      $request_data->rang
    );
 
    if ($updateRes > 0) {
      return $updateRes;
    }
    return false;
  }
 
  public function putLine($id, $lineid, $request_data = null)
  {
    if (!DolibarrApiAccess::$user->hasRight('contrat', 'creer')) {
      throw new RestException(403);
    }
 
    $result = $this->contract->fetch($id);
    if (!$result) {
      throw new RestException(404, 'Contrat not found');
    }
 
    if (!DolibarrApi::_checkAccessToResource('contrat', $this->contract->id)) {
      throw new RestException(403, 'Access to this contract is not allowed for login '.DolibarrApiAccess::$user->login);
    }
 
    $request_data = (object) $request_data;
 
    $request_data->desc = sanitizeVal($request_data->desc, 'restricthtml');
    $request_data->price_base_type = sanitizeVal($request_data->price_base_type);
 
    $updateRes = $this->contract->updateline(
      $lineid,
      $request_data->desc,
      $request_data->subprice,
      $request_data->qty,
      $request_data->remise_percent,
      $request_data->date_start,
      $request_data->date_end,
      $request_data->tva_tx,
      $request_data->localtax1_tx,
      $request_data->localtax2_tx,
      $request_data->date_start_real,
      $request_data->date_end_real,
      $request_data->price_base_type ? $request_data->price_base_type : 'HT',
      $request_data->info_bits,
      $request_data->fk_fourn_price,
      $request_data->pa_ht,
      $request_data->array_options,
      $request_data->fk_unit
    );
 
    if ($updateRes > 0) {
      if (getDolGlobalInt('API_CONTRAT_PUTLINE_OUTPUT_LINE_ONLY')) {
        $result = new ContratLigne($this->db);
        $result->fetch($lineid);
        foreach (array(
          'array_languages',
          'contacts_ids',
          'linked_objects',
          'linkedObjectsIds',
          'actiontypecode',
          'module',
          'canvas',
          'user',
          'origin',
          'origin_id',
          'ref_ext',
          'status',
          'country_id',
          'country_code',
          'state_id',
          'region_id',
          'barcode_type',
          'barcode_type_coder',
          'mode_reglement_id',
          'cond_reglement_id',
          'demand_reason_id',
          'transport_mode_id',
          'shipping_method',
          'shipping_method_id',
          'model_pdf',
          'last_main_doc',
          'fk_bank',
          'fk_account',
          'lines',
          'name',
          'firstname',
          'lastname',
          'date_creation',
          'date_validation',
          'date_modification',
          'date_cloture',
          'user_author',
          'user_creation',
          'user_creation_id',
          'user_valid',
          'user_validation',
          'user_validation_id',
          'user_modification',
          'user_modification_id',
          'cond_reglement_supplier_id',
          'deposit_percent',
          'retained_warranty_fk_cond_reglement',
          'date_commande',
          'fk_user_creat',
          'fk_user_modif',
          'specimen',
          'fk_unit',
          'date_debut_prevue',
          'date_debut_reel',
          'date_fin_prevue',
          'date_fin_reel',
          'weight',
          'weight_units',
          'width',
          'width_units',
          'length',
          'length_units',
          'height',
          'height_units',
          'surface',
          'surface_units',
          'volume',
          'volume_units',
          'multilangs',
          'desc',
          'product',
          'fk_product_type',
          'warehouse_id',
          'totalpaid',
          'type',
          'libelle'
             ) as $fieldToUnset) {
          unset($result->{$fieldToUnset});
        }
      } else {
        $result = $this->get($id);
        unset($result->line);
      }
      return $this->_cleanObjectDatas($result);
    }
 
    return false;
  }
 
  public function activateLine($id, $lineid, $datestart, $dateend = null, $comment = null)
  {
    if (!DolibarrApiAccess::$user->hasRight('contrat', 'creer')) {
      throw new RestException(403);
    }
 
    $result = $this->contract->fetch($id);
    if (!$result) {
      throw new RestException(404, 'Contrat not found');
    }
 
    if (!DolibarrApi::_checkAccessToResource('contrat', $this->contract->id)) {
      throw new RestException(403, 'Access to this contract is not allowed for login '.DolibarrApiAccess::$user->login);
    }
 
    $updateRes = $this->contract->active_line(DolibarrApiAccess::$user, $lineid, (int) $datestart, $dateend, $comment);
 
    if ($updateRes > 0) {
      $result = $this->get($id);
      unset($result->line);
      return $this->_cleanObjectDatas($result);
    }
 
    return false;
  }
 
  public function unactivateLine($id, $lineid, $datestart, $comment = null)
  {
    if (!DolibarrApiAccess::$user->hasRight('contrat', 'creer')) {
      throw new RestException(403);
    }
 
    $result = $this->contract->fetch($id);
    if (!$result) {
      throw new RestException(404, 'Contrat not found');
    }
 
    if (!DolibarrApi::_checkAccessToResource('contrat', $this->contract->id)) {
      throw new RestException(403, 'Access to this contract is not allowed for login '.DolibarrApiAccess::$user->login);
    }
 
    $updateRes = $this->contract->close_line(DolibarrApiAccess::$user, $lineid, (int) $datestart, $comment);
 
    if ($updateRes > 0) {
      $result = $this->get($id);
      unset($result->line);
      return $this->_cleanObjectDatas($result);
    }
 
    return false;
  }
 
  public function deleteLine($id, $lineid)
  {
    if (!DolibarrApiAccess::$user->hasRight('contrat', 'creer')) {
      throw new RestException(403);
    }
 
    $result = $this->contract->fetch($id);
    if (!$result) {
      throw new RestException(404, 'Contrat not found');
    }
 
    if (!DolibarrApi::_checkAccessToResource('contrat', $this->contract->id)) {
      throw new RestException(403, 'Access to this contract is not allowed for login '.DolibarrApiAccess::$user->login);
    }
 
    // TODO Check the lineid $lineid is a line of object
 
    $updateRes = $this->contract->deleteLine($lineid, DolibarrApiAccess::$user);
    if ($updateRes > 0) {
      return $this->get($id);
    } else {
      throw new RestException(405, $this->contract->error);
    }
  }
 
  public function put($id, $request_data = null)
  {
    if (!DolibarrApiAccess::$user->hasRight('contrat', 'creer')) {
      throw new RestException(403);
    }
    $result = $this->contract->fetch($id);
    if (!$result) {
      throw new RestException(404, 'Contrat not found');
    }
 
    $old_socid = $this->contract->socid;
    $oldthirdpartytmp = new Societe($this->db);
    $old_thirdparty_result = $oldthirdpartytmp->fetch($old_socid);
    if ($old_thirdparty_result < 1) {
      throw new RestException(404, 'Thirdparty with id='.$old_socid.' not found or not allowed');
    }
    if (!DolibarrApi::_checkAccessToResource('societe', $old_socid)) {
      throw new RestException(403, 'Access to old thirdparty='.$old_socid.' is not allowed for login '.DolibarrApiAccess::$user->login);
    }
 
    if (!DolibarrApi::_checkAccessToResource('contrat', $this->contract->id)) {
      throw new RestException(403, 'Access to this contract is 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->contract->context['caller'] = sanitizeVal($request_data['caller'], 'aZ09');
        continue;
      }
      if ($field == 'array_options' && is_array($value)) {
        foreach ($value as $index => $val) {
          $this->contract->array_options[$index] = $this->_checkValForAPI($field, $val, $this->contract);
        }
        continue;
      }
 
      if ($field == 'socid') {
        $new_socid = (int) $value;
        $loopthirdpartytmp = new Societe($this->db);
        $new_thirdparty_result = $loopthirdpartytmp->fetch($new_socid);
        if ($new_thirdparty_result < 1) {
          throw new RestException(404, 'Thirdparty with id='.$new_socid.' not found or not allowed');
        }
        if (!DolibarrApi::_checkAccessToResource('societe', $new_socid)) {
          throw new RestException(403, 'Access to new thirdparty='.$new_socid.' is not allowed for login '.DolibarrApiAccess::$user->login);
        }
      }
 
      $this->contract->$field = $this->_checkValForAPI($field, $value, $this->contract);
    }
 
    if ($this->contract->update(DolibarrApiAccess::$user) > 0) {
      return $this->get($id);
    } else {
      throw new RestException(500, $this->contract->error);
    }
  }
 
  public function delete($id)
  {
    if (!DolibarrApiAccess::$user->hasRight('contrat', 'supprimer')) {
      throw new RestException(403, 'Missing permission: Delete contracts/subscriptions');
    }
    $result = $this->contract->fetch($id);
    if (!$result) {
      throw new RestException(404, 'Contract not found');
    }
 
    if (!DolibarrApi::_checkAccessToResource('contrat', $this->contract->id)) {
      throw new RestException(403, 'Access to this contract is not allowed for login '.DolibarrApiAccess::$user->login);
    }
 
    if (!$this->contract->delete(DolibarrApiAccess::$user)) {
      throw new RestException(500, 'Error when delete contract : '.$this->contract->error);
    }
 
    return array(
      'success' => array(
        'code' => 200,
        'message' => 'Contract deleted'
      )
    );
  }
 
  public function validate($id, $notrigger = 0)
  {
    if (!DolibarrApiAccess::$user->hasRight('contrat', 'creer')) {
      throw new RestException(403);
    }
    $result = $this->contract->fetch($id);
    if (!$result) {
      throw new RestException(404, 'Contract not found');
    }
 
    if (!DolibarrApi::_checkAccessToResource('contrat', $this->contract->id)) {
      throw new RestException(403, 'Access to this contract is not allowed for login '.DolibarrApiAccess::$user->login);
    }
 
    $result = $this->contract->validate(DolibarrApiAccess::$user, '', $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 Contract: '.$this->contract->error);
    }
 
    return array(
      'success' => array(
        'code' => 200,
        'message' => 'Contract validated (Ref='.$this->contract->ref.')'
      )
    );
  }
 
  public function close($id, $notrigger = 0)
  {
    if (!DolibarrApiAccess::$user->hasRight('contrat', 'creer')) {
      throw new RestException(403);
    }
    $result = $this->contract->fetch($id);
    if (!$result) {
      throw new RestException(404, 'Contract not found');
    }
 
    if (!DolibarrApi::_checkAccessToResource('contrat', $this->contract->id)) {
      throw new RestException(403, 'Access to this contract is not allowed for login '.DolibarrApiAccess::$user->login);
    }
 
    $result = $this->contract->closeAll(DolibarrApiAccess::$user, $notrigger);
    if ($result == 0) {
      throw new RestException(304, 'Error nothing done. May be object is already close');
    }
    if ($result < 0) {
      throw new RestException(500, 'Error when closing Contract: '.$this->contract->error);
    }
 
    return array(
      'success' => array(
        'code' => 200,
        'message' => 'Contract closed (Ref='.$this->contract->ref.'). All services were closed.'
      )
    );
  }
 
 
 
  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.PublicUnderscore
  protected function _cleanObjectDatas($object)
  {
    // phpcs:enable
    $object = parent::_cleanObjectDatas($object);
 
    unset($object->address);
    unset($object->civility_id);
 
    return $object;
  }
 
  private function _validate($data)
  {
    if ($data === null) {
      $data = array();
    }
    $contrat = array();
    foreach (Contracts::$FIELDS as $field) {
      if (!isset($data[$field])) {
        throw new RestException(400, "$field field missing");
      }
      $contrat[$field] = $data[$field];
    }
    return $contrat;
  }
}