dolibarr  7.0.0-beta
mod_supplier_proposal_saphir.php
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/supplier_proposal/modules_supplier_proposal.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="maskconstsupplier_proposal" value="SUPPLIER_PROPOSAL_SAPHIR_MASK">';
59  $texte.= '<table class="nobordernopadding" width="100%">';
60 
61  $tooltip=$langs->trans("GenericMaskCodes",$langs->transnoentities("CommRequest"),$langs->transnoentities("CommRequest"));
62  $tooltip.=$langs->trans("GenericMaskCodes2");
63  $tooltip.=$langs->trans("GenericMaskCodes3");
64  $tooltip.=$langs->trans("GenericMaskCodes4a",$langs->transnoentities("CommRequest"),$langs->transnoentities("CommRequest"));
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="masksupplier_proposal" value="'.$conf->global->SUPPLIER_PROPOSAL_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  $mysoc->code_client='CCCCCCCCCC';
92  $numExample = $this->getNextValue($mysoc,'');
93  $mysoc->code_client=$old_code_client;
94 
95  if (! $numExample)
96  {
97  $numExample = 'NotConfigured';
98  }
99  return $numExample;
100  }
101 
109  function getNextValue($objsoc,$supplier_proposal)
110  {
111  global $db,$conf;
112 
113  require_once DOL_DOCUMENT_ROOT .'/core/lib/functions2.lib.php';
114 
115  // On defini critere recherche compteur
116  $mask=$conf->global->SUPPLIER_PROPOSAL_SAPHIR_MASK;
117 
118  if (! $mask)
119  {
120  $this->error='NotConfigured';
121  return 0;
122  }
123 
124  $date=$supplier_proposal->datep;
125  $customercode=$objsoc->code_client;
126  $numFinal=get_next_value($db,$mask,'supplier_proposal','ref','',$customercode,$date);
127 
128  return $numFinal;
129  }
130 
131 }
Class of file that contains the numbering module rules Saphir.
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.
getNextValue($objsoc, $supplier_proposal)
Return next value.
getExample()
Renvoi un exemple de numerotation.
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)
Classe mere des modeles de numerotation des references de propales.