dolibarr  19.0.1
mod_facture_mercure.php
Go to the documentation of this file.
1 <?php
2 /* Copyright (C) 2003-2007 Rodolphe Quiedeville <rodolphe@quiedeville.org>
3  * Copyright (C) 2004-2011 Laurent Destailleur <eldy@users.sourceforge.net>
4  * Copyright (C) 2005-2007 Regis Houssin <regis.houssin@inodbox.com>
5  * Copyright (C) 2008 Raphael Bertrand (Resultic) <raphael.bertrand@resultic.fr>
6  * Copyright (C) 2013 uanjo Menent <jmenent@2byte.es>
7  * Copyright (C) 2022 Anthony Berton <anthony.berton@bb2a.fr>
8  *
9  * This program is free software; you can redistribute it and/or modify
10  * it under the terms of the GNU General Public License as published by
11  * the Free Software Foundation; either version 3 of the License, or
12  * (at your option) any later version.
13  *
14  * This program is distributed in the hope that it will be useful,
15  * but WITHOUT ANY WARRANTY; without even the implied warranty of
16  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
17  * GNU General Public License for more details.
18  *
19  * You should have received a copy of the GNU General Public License
20  * along with this program. If not, see <https://www.gnu.org/licenses/>.
21  * or see https://www.gnu.org/
22  */
23 
29 require_once DOL_DOCUMENT_ROOT.'/core/modules/facture/modules_facture.php';
30 
31 
36 {
41  public $version = 'dolibarr'; // 'development', 'experimental', 'dolibarr'
42 
46  public $error = '';
47 
48 
55  public function info($langs)
56  {
57  global $db, $langs;
58 
59  $langs->load("bills");
60 
61  $form = new Form($db);
62 
63  $texte = $langs->trans('GenericNumRefModelDesc')."<br>\n";
64  $texte .= '<form action="'.$_SERVER["PHP_SELF"].'" method="POST">';
65  $texte .= '<input type="hidden" name="token" value="'.newToken().'">';
66  $texte .= '<input type="hidden" name="action" value="updateMask">';
67  $texte .= '<input type="hidden" name="maskconstinvoice" value="FACTURE_MERCURE_MASK_INVOICE">';
68  $texte .= '<input type="hidden" name="maskconstreplacement" value="FACTURE_MERCURE_MASK_REPLACEMENT">';
69  $texte .= '<input type="hidden" name="maskconstcredit" value="FACTURE_MERCURE_MASK_CREDIT">';
70  $texte .= '<input type="hidden" name="maskconstdeposit" value="FACTURE_MERCURE_MASK_DEPOSIT">';
71  $texte .= '<table class="nobordernopadding" width="100%">';
72 
73  $tooltip = $langs->trans("GenericMaskCodes", $langs->transnoentities("Invoice"), $langs->transnoentities("Invoice"));
74  $tooltip .= $langs->trans("GenericMaskCodes2");
75  $tooltip .= $langs->trans("GenericMaskCodes3");
76  $tooltip .= $langs->trans("GenericMaskCodes4a", $langs->transnoentities("Invoice"), $langs->transnoentities("Invoice"));
77  $tooltip .= $langs->trans("GenericMaskCodes5");
78 
79  // Setting the prefix
80  $texte .= '<tr><td><span class="opacitymedium">'.$langs->trans("Mask").' ('.$langs->trans("InvoiceStandard").'):</span></td>';
81  $texte .= '<td class="right">'.$form->textwithpicto('<input type="text" class="flat minwidth175" name="maskinvoice" value="'.getDolGlobalString("FACTURE_MERCURE_MASK_INVOICE").'">', $tooltip, 1, 1).'</td>';
82 
83  $texte .= '<td class="left" rowspan="3">&nbsp; <input type="submit" class="button button-edit reposition smallpaddingimp" name="Button"value="'.$langs->trans("Modify").'"></td>';
84 
85  $texte .= '</tr>';
86 
87  // Prefix setting of replacement invoices
88  $texte .= '<tr><td><span class="opacitymedium">'.$langs->trans("Mask").' ('.$langs->trans("InvoiceReplacement").'):</span></td>';
89  $texte .= '<td class="right">'.$form->textwithpicto('<input type="text" class="flat minwidth175" name="maskreplacement" value="'.getDolGlobalString("FACTURE_MERCURE_MASK_REPLACEMENT").'">', $tooltip, 1, 1).'</td>';
90  $texte .= '</tr>';
91 
92  // Prefix setting of credit note
93  $texte .= '<tr><td><span class="opacitymedium">'.$langs->trans("Mask").' ('.$langs->trans("InvoiceAvoir").'):</span></td>';
94  $texte .= '<td class="right">'.$form->textwithpicto('<input type="text" class="flat minwidth175" name="maskcredit" value="'.getDolGlobalString("FACTURE_MERCURE_MASK_CREDIT").'">', $tooltip, 1, 1).'</td>';
95  $texte .= '</tr>';
96 
97  // Prefix setting of deposit
98  $texte .= '<tr><td><span class="opacitymedium">'.$langs->trans("Mask").' ('.$langs->trans("InvoiceDeposit").'):</span></td>';
99  $texte .= '<td class="right">'.$form->textwithpicto('<input type="text" class="flat minwidth175" name="maskdeposit" value="'.getDolGlobalString("FACTURE_MERCURE_MASK_DEPOSIT").'">', $tooltip, 1, 1).'</td>';
100  $texte .= '</tr>';
101 
102  $texte .= '</table>';
103  $texte .= '</form>';
104 
105  return $texte;
106  }
107 
113  public function getExample()
114  {
115  global $mysoc;
116 
117  $old_code_client = $mysoc->code_client;
118  $old_code_type = $mysoc->typent_code;
119  $mysoc->code_client = 'CCCCCCCCCC';
120  $mysoc->typent_code = 'TTTTTTTTTT';
121  $numExample = $this->getNextValue($mysoc, '');
122  $mysoc->code_client = $old_code_client;
123  $mysoc->typent_code = $old_code_type;
124 
125  if (!$numExample) {
126  $numExample = 'NotConfigured';
127  }
128  return $numExample;
129  }
130 
139  public function getNextValue($objsoc, $invoice, $mode = 'next')
140  {
141  global $db;
142 
143  require_once DOL_DOCUMENT_ROOT.'/core/lib/functions2.lib.php';
144 
145  // Get Mask value
146  $mask = '';
147  if (is_object($invoice) && $invoice->type == 1) {
148  $mask = getDolGlobalString('FACTURE_MERCURE_MASK_REPLACEMENT', getDolGlobalString('FACTURE_MERCURE_MASK_INVOICE'));
149  } elseif (is_object($invoice) && $invoice->type == 2) {
150  $mask = getDolGlobalString('FACTURE_MERCURE_MASK_CREDIT');
151  } elseif (is_object($invoice) && $invoice->type == 3) {
152  $mask = getDolGlobalString('FACTURE_MERCURE_MASK_DEPOSIT');
153  } else {
154  $mask = getDolGlobalString('FACTURE_MERCURE_MASK_INVOICE');
155  }
156  if (!$mask) {
157  $this->error = 'NotConfigured';
158  return 0;
159  }
160 
161  $where = '';
162  //if ($facture->type == 2) $where.= " AND type = 2";
163  //else $where.=" AND type != 2";
164 
165  // Get entities
166  $entity = getEntity('invoicenumber', 1, $invoice);
167 
168  $numFinal = get_next_value($db, $mask, 'facture', 'ref', $where, $objsoc, $invoice->date, $mode, false, null, $entity);
169  if (!preg_match('/([0-9])+/', $numFinal)) {
170  $this->error = $numFinal;
171  }
172 
173  return $numFinal;
174  }
175 
176 
185  public function getNumRef($objsoc, $objforref, $mode = 'next')
186  {
187  return $this->getNextValue($objsoc, $objforref, $mode);
188  }
189 }
Class to manage generation of HTML components Only common components must be here.
Parent class of invoice reference numbering templates.
Class of numbering module Mercure for invoices.
getNextValue($objsoc, $invoice, $mode='next')
Return next value.
getExample()
Return an example of number value.
getNumRef($objsoc, $objforref, $mode='next')
Return next free value.
info($langs)
Returns the description of the numbering model.
if($cancel &&! $id) if($action=='add' &&! $cancel) if($action=='delete') if($id) $form
Actions.
Definition: card.php:143
get_next_value($db, $mask, $table, $field, $where='', $objsoc='', $date='', $mode='next', $bentityon=true, $objuser=null, $forceentity=null)
Return last or next value for a mask (according to area we should not reset)
getDolGlobalString($key, $default='')
Return dolibarr global constant string value.
getEntity($element, $shared=1, $currentobject=null)
Get list of entity id to use.