dolibarr  9.0.0
mod_project_simple.php
Go to the documentation of this file.
1 <?php
2 /* Copyright (C) 2010-2012 Regis Houssin <regis.houssin@inodbox.com>
3  * Copyright (C) 2010 Laurent Destailleur <eldy@users.sourceforge.net>
4  *
5  * This program is free software; you can redistribute it and/or modify
6  * it under the terms of the GNU General Public License as published by
7  * the Free Software Foundation; either version 3 of the License, or
8  * (at your option) any later version.
9  *
10  * This program is distributed in the hope that it will be useful,
11  * but WITHOUT ANY WARRANTY; without even the implied warranty of
12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13  * GNU General Public License for more details.
14  *
15  * You should have received a copy of the GNU General Public License
16  * along with this program. If not, see <http://www.gnu.org/licenses/>.
17  * or see http://www.gnu.org/
18  */
19 
26 require_once DOL_DOCUMENT_ROOT .'/core/modules/project/modules_project.php';
27 
28 
33 {
38  public $version = 'dolibarr'; // 'development', 'experimental', 'dolibarr'
39 
40  public $prefix='PJ';
41 
45  public $error='';
46 
52  public $nom='Simple';
53 
57  public $name='Simple';
58 
59 
65  function info()
66  {
67  global $langs;
68  return $langs->trans("SimpleNumRefModelDesc",$this->prefix);
69  }
70 
71 
77  function getExample()
78  {
79  return $this->prefix."0501-0001";
80  }
81 
82 
88  function canBeActivated()
89  {
90  global $conf,$langs,$db;
91 
92  $coyymm=''; $max='';
93 
94  $posindice=8;
95  $sql = "SELECT MAX(CAST(SUBSTRING(ref FROM ".$posindice.") AS SIGNED)) as max";
96  $sql.= " FROM ".MAIN_DB_PREFIX."projet";
97  $sql.= " WHERE ref LIKE '".$db->escape($this->prefix)."____-%'";
98  $sql.= " AND entity = ".$conf->entity;
99  $resql=$db->query($sql);
100  if ($resql)
101  {
102  $row = $db->fetch_row($resql);
103  if ($row) { $coyymm = substr($row[0],0,6); $max=$row[0]; }
104  }
105  if (! $coyymm || preg_match('/'.$this->prefix.'[0-9][0-9][0-9][0-9]/i',$coyymm))
106  {
107  return true;
108  }
109  else
110  {
111  $langs->load("errors");
112  $this->error=$langs->trans('ErrorNumRefModel',$max);
113  return false;
114  }
115  }
116 
117 
125  function getNextValue($objsoc, $project)
126  {
127  global $db,$conf;
128 
129  // D'abord on recupere la valeur max
130  $posindice=8;
131  $sql = "SELECT MAX(CAST(SUBSTRING(ref FROM ".$posindice.") AS SIGNED)) as max";
132  $sql.= " FROM ".MAIN_DB_PREFIX."projet";
133  $sql.= " WHERE ref LIKE '".$db->escape($this->prefix)."____-%'";
134  $sql.= " AND entity = ".$conf->entity;
135 
136  $resql=$db->query($sql);
137  if ($resql)
138  {
139  $obj = $db->fetch_object($resql);
140  if ($obj) $max = intval($obj->max);
141  else $max=0;
142  }
143  else
144  {
145  dol_syslog("mod_project_simple::getNextValue", LOG_DEBUG);
146  return -1;
147  }
148 
149  $date=empty($project->date_c)?dol_now():$project->date_c;
150 
151  //$yymm = strftime("%y%m",time());
152  $yymm = strftime("%y%m",$date);
153 
154  if ($max >= (pow(10, 4) - 1)) $num=$max+1; // If counter > 9999, we do not format on 4 chars, we take number as it is
155  else $num = sprintf("%04s",$max+1);
156 
157  dol_syslog("mod_project_simple::getNextValue return ".$this->prefix.$yymm."-".$num);
158  return $this->prefix.$yymm."-".$num;
159  }
160 
161 
162  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.NotCamelCaps
170  function project_get_num($objsoc=0, $project='')
171  {
172  // phpcs:enable
173  return $this->getNextValue($objsoc, $project);
174  }
175 }
if(! empty($conf->facture->enabled) && $user->rights->facture->lire) if(! empty($conf->fournisseur->enabled) && $user->rights->fournisseur->facture->lire) if(! empty($conf->don->enabled) && $user->rights->societe->lire) if(! empty($conf->tax->enabled) && $user->rights->tax->charges->lire) if(! empty($conf->facture->enabled) &&! empty($conf->commande->enabled) && $user->rights->commande->lire &&empty($conf->global->WORKFLOW_DISABLE_CREATE_INVOICE_FROM_ORDER)) if(! empty($conf->facture->enabled) && $user->rights->facture->lire) if(! empty($conf->fournisseur->enabled) && $user->rights->fournisseur->facture->lire) $resql
Social contributions to pay.
Definition: index.php:1053
getNextValue($objsoc, $project)
Return next value.
Class to manage the numbering module Simple for project references.
getExample()
Return an example of numbering module values.
info()
Return description of numbering module.
dol_syslog($message, $level=LOG_INFO, $ident=0, $suffixinfilename='', $restricttologhandler='')
Write log message into outputs.
Classe mere des modeles de numerotation des references de projets.
canBeActivated()
Test si les numeros deja en vigueur dans la base ne provoquent pas de de conflits qui empechera cette...
$version
Dolibarr version of the loaded document string.
dol_now($mode='gmt')
Return date for now.
project_get_num($objsoc=0, $project='')
Return next reference not yet used as a reference.