dolibarr  7.0.0-beta
mod_propale_saphir.php
Go to the documentation of this file.
1 <?php
2 /* Copyright (C) 2003-2007 Rodolphe Quiedeville <rodolphe@quiedeville.org>
3  * Copyright (C) 2004-2010 Laurent Destailleur <eldy@users.sourceforge.net>
4  * Copyright (C) 2005-2007 Regis Houssin <regis.houssin@capnetworks.com>
5  * Copyright (C) 2008 Raphael Bertrand (Resultic) <raphael.bertrand@resultic.fr>
6  *
7  * This program is free software; you can redistribute it and/or modify
8  * it under the terms of the GNU General Public License as published by
9  * the Free Software Foundation; either version 3 of the License, or
10  * (at your option) any later version.
11  *
12  * This program is distributed in the hope that it will be useful,
13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15  * GNU General Public License for more details.
16  *
17  * You should have received a copy of the GNU General Public License
18  * along with this program. If not, see <http://www.gnu.org/licenses/>.
19  * or see http://www.gnu.org/
20  */
21 
28 require_once DOL_DOCUMENT_ROOT .'/core/modules/propale/modules_propale.php';
29 
30 
35 {
36  var $version='dolibarr'; // 'development', 'experimental', 'dolibarr'
37  var $error = '';
38  var $nom = 'Saphir';
39 
40 
46  function info()
47  {
48  global $conf,$langs;
49 
50  $langs->load("bills");
51 
52  $form = new Form($this->db);
53 
54  $texte = $langs->trans('GenericNumRefModelDesc')."<br>\n";
55  $texte.= '<form action="'.$_SERVER["PHP_SELF"].'" method="POST">';
56  $texte.= '<input type="hidden" name="token" value="'.$_SESSION['newtoken'].'">';
57  $texte.= '<input type="hidden" name="action" value="updateMask">';
58  $texte.= '<input type="hidden" name="maskconstpropal" value="PROPALE_SAPHIR_MASK">';
59  $texte.= '<table class="nobordernopadding" width="100%">';
60 
61  $tooltip=$langs->trans("GenericMaskCodes",$langs->transnoentities("Proposal"),$langs->transnoentities("Proposal"));
62  $tooltip.=$langs->trans("GenericMaskCodes2");
63  $tooltip.=$langs->trans("GenericMaskCodes3");
64  $tooltip.=$langs->trans("GenericMaskCodes4a",$langs->transnoentities("Proposal"),$langs->transnoentities("Proposal"));
65  $tooltip.=$langs->trans("GenericMaskCodes5");
66 
67  // Parametrage du prefix
68  $texte.= '<tr><td>'.$langs->trans("Mask").':</td>';
69  $texte.= '<td align="right">'.$form->textwithpicto('<input type="text" class="flat" size="24" name="maskpropal" value="'.$conf->global->PROPALE_SAPHIR_MASK.'">',$tooltip,1,1).'</td>';
70 
71  $texte.= '<td align="left" rowspan="2">&nbsp; <input type="submit" class="button" value="'.$langs->trans("Modify").'" name="Button"></td>';
72 
73  $texte.= '</tr>';
74 
75  $texte.= '</table>';
76  $texte.= '</form>';
77 
78  return $texte;
79  }
80 
86  function getExample()
87  {
88  global $conf,$langs,$mysoc;
89 
90  $old_code_client=$mysoc->code_client;
91  $old_code_type=$mysoc->typent_code;
92  $mysoc->code_client='CCCCCCCCCC';
93  $mysoc->typent_code='TTTTTTTTTT';
94  $numExample = $this->getNextValue($mysoc,'');
95  $mysoc->code_client=$old_code_client;
96  $mysoc->typent_code=$old_code_type;
97 
98  if (! $numExample)
99  {
100  $numExample = 'NotConfigured';
101  }
102  return $numExample;
103  }
104 
112  function getNextValue($objsoc,$propal)
113  {
114  global $db,$conf;
115 
116  require_once DOL_DOCUMENT_ROOT .'/core/lib/functions2.lib.php';
117 
118  // On defini critere recherche compteur
119  $mask=$conf->global->PROPALE_SAPHIR_MASK;
120 
121  if (! $mask)
122  {
123  $this->error='NotConfigured';
124  return 0;
125  }
126 
127  $date = $propal->date;
128 
129  $numFinal=get_next_value($db,$mask,'propal','ref','',$objsoc,$date);
130 
131  return $numFinal;
132  }
133 
134 }
getNextValue($objsoc, $propal)
Return next value.
if(empty($reshook)) $form
View.
Definition: perms.php:103
info()
Return description of module.
Class to manage generation of HTML components Only common components must be here.
get_next_value($db, $mask, $table, $field, $where='', $objsoc='', $date='', $mode='next', $bentityon=true, $objuser=null)
Return last or next value for a mask (according to area we should not reset)
getExample()
Renvoi un exemple de numerotation.
Classe mere des modeles de numerotation des references de propales.
Class of file that contains the numbering module rules Saphir.