dolibarr 20.0.0
box_graph_invoices_supplier_permonth.php
Go to the documentation of this file.
1<?php
2/* Copyright (C) 2013 Laurent Destailleur <eldy@users.sourceforge.net>
3 * Copyright (C) 2024 Frédéric France <frederic.france@free.fr>
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 <https://www.gnu.org/licenses/>.
17 */
18
24include_once DOL_DOCUMENT_ROOT.'/core/boxes/modules_boxes.php';
25
26
31{
32 public $boxcode = "invoicessupplierpermonth";
33 public $boximg = "object_bill";
34 public $boxlabel = "BoxSuppliersInvoicesPerMonth";
35 public $depends = array("fournisseur");
36
37 public $widgettype = 'graph';
38
45 public function __construct($db, $param)
46 {
47 global $user;
48
49 $this->db = $db;
50
51 $this->hidden = !$user->hasRight('fournisseur', 'facture', 'lire');
52 }
53
60 public function loadBox($max = 5)
61 {
62 global $conf, $user, $langs;
63
64 $this->max = $max;
65
66 $refreshaction = 'refresh_'.$this->boxcode;
67
68 include_once DOL_DOCUMENT_ROOT.'/fourn/class/fournisseur.facture.class.php';
69
70 $startmonth = getDolGlobalInt('SOCIETE_FISCAL_MONTH_START', 1);
71 if (!getDolGlobalString('GRAPH_USE_FISCAL_YEAR')) {
72 $startmonth = 1;
73 }
74
75 $text = $langs->trans("BoxSuppliersInvoicesPerMonth", $max);
76 $this->info_box_head = array(
77 'text' => $text,
78 'limit'=> dol_strlen($text),
79 'graph'=> 1,
80 'sublink'=>'',
81 'subtext'=>$langs->trans("Filter"),
82 'subpicto'=>'filter.png',
83 'subclass'=>'linkobject boxfilter',
84 'target'=>'none' // Set '' to get target="_blank"
85 );
86
87 $dir = ''; // We don't need a path because image file will not be saved into disk
88 $prefix = '';
89 $socid = 0;
90 if ($user->socid) {
91 $socid = $user->socid;
92 }
93 if (!$user->hasRight('societe', 'client', 'voir')) {
94 $prefix .= 'private-'.$user->id.'-'; // If user has no permission to see all, output dir is specific to user
95 }
96
97 if ($user->hasRight('fournisseur', 'facture', 'lire')) {
98 $param_year = 'DOLUSERCOOKIE_box_'.$this->boxcode.'_year';
99 $param_shownb = 'DOLUSERCOOKIE_box_'.$this->boxcode.'_shownb';
100 $param_showtot = 'DOLUSERCOOKIE_box_'.$this->boxcode.'_showtot';
101
102 include_once DOL_DOCUMENT_ROOT.'/core/class/dolgraph.class.php';
103 include_once DOL_DOCUMENT_ROOT.'/compta/facture/class/facturestats.class.php';
104 $autosetarray = preg_split("/[,;:]+/", GETPOST('DOL_AUTOSET_COOKIE'));
105 if (in_array('DOLUSERCOOKIE_box_'.$this->boxcode, $autosetarray)) {
106 $endyear = GETPOSTINT($param_year);
107 $shownb = GETPOST($param_shownb, 'alpha');
108 $showtot = GETPOST($param_showtot, 'alpha');
109 } else {
110 $tmparray = (!empty($_COOKIE['DOLUSERCOOKIE_box_'.$this->boxcode]) ? json_decode($_COOKIE['DOLUSERCOOKIE_box_'.$this->boxcode], true) : array());
111 $endyear = (!empty($tmparray['year']) ? $tmparray['year'] : '');
112 $shownb = (!empty($tmparray['shownb']) ? $tmparray['shownb'] : '');
113 $showtot = (!empty($tmparray['showtot']) ? $tmparray['showtot'] : '');
114 }
115 if (empty($shownb) && empty($showtot)) {
116 $shownb = 1;
117 $showtot = 1;
118 }
119 $nowarray = dol_getdate(dol_now(), true);
120 if (empty($endyear)) {
121 $endyear = $nowarray['year'];
122 }
123 $startyear = $endyear - getDolGlobalInt('MAIN_NB_OF_YEAR_IN_WIDGET_GRAPH', 3) + 1;
124
125 $mode = 'supplier';
126 $WIDTH = (($shownb && $showtot) || !empty($conf->dol_optimize_smallscreen)) ? '256' : '320';
127 $HEIGHT = '192';
128
129 $stats = new FactureStats($this->db, $socid, $mode, 0);
130
131 // Build graphic number of object. $data = array(array('Lib',val1,val2,val3),...)
132 if ($shownb) {
133 $data1 = $stats->getNbByMonthWithPrevYear($endyear, $startyear, (GETPOST('action', 'aZ09') == $refreshaction ? -1 : (3600 * 24)), ($WIDTH < 300 ? 2 : 0), $startmonth);
134
135 $filenamenb = $dir."/".$prefix."invoicessuppliernbinyear-".$endyear.".png";
136 // default value for customer mode
137 $fileurlnb = DOL_URL_ROOT.'/viewimage.php?modulepart=billstatssupplier&file=invoicessuppliernbinyear-'.$endyear.'.png';
138
139 $px1 = new DolGraph();
140 $mesg = $px1->isGraphKo();
141 if (!$mesg) {
142 $langs->load("bills");
143
144 $px1->SetData($data1);
145 unset($data1);
146 $i = $startyear;
147 $legend = array();
148 while ($i <= $endyear) {
149 if ($startmonth != 1) {
150 $legend[] = sprintf("%d/%d", $i - 2001, $i - 2000);
151 } else {
152 $legend[] = $i;
153 }
154 $i++;
155 }
156 $px1->SetLegend($legend);
157 $px1->SetMaxValue($px1->GetCeilMaxValue());
158 $px1->SetWidth($WIDTH);
159 $px1->SetHeight($HEIGHT);
160 $px1->SetYLabel($langs->trans("NumberOfBills"));
161 $px1->SetShading(3);
162 $px1->SetHorizTickIncrement(1);
163 $px1->SetCssPrefix("cssboxes");
164 $px1->mode = 'depth';
165 $px1->SetTitle($langs->trans("NumberOfBillsByMonth"));
166
167 $px1->draw($filenamenb, $fileurlnb);
168 }
169 }
170
171 // Build graphic number of object. $data = array(array('Lib',val1,val2,val3),...)
172 if ($showtot) {
173 $data2 = $stats->getAmountByMonthWithPrevYear($endyear, $startyear, (GETPOST('action', 'aZ09') == $refreshaction ? -1 : (3600 * 24)), ($WIDTH < 300 ? 2 : 0), $startmonth);
174
175 $filenamenb = $dir."/".$prefix."invoicessupplieramountinyear-".$endyear.".png";
176 // default value for customer mode
177 $fileurlnb = DOL_URL_ROOT.'/viewimage.php?modulepart=billstatssupplier&file=invoicessupplieramountinyear-'.$endyear.'.png';
178
179 $px2 = new DolGraph();
180 $mesg = $px2->isGraphKo();
181 if (!$mesg) {
182 $langs->load("bills");
183
184 $px2->SetData($data2);
185 unset($data2);
186 $i = $startyear;
187 $legend = array();
188 while ($i <= $endyear) {
189 if ($startmonth != 1) {
190 $legend[] = sprintf("%d/%d", $i - 2001, $i - 2000);
191 } else {
192 $legend[] = $i;
193 }
194 $i++;
195 }
196 $px2->SetLegend($legend);
197 $px2->SetMaxValue($px2->GetCeilMaxValue());
198 $px2->SetWidth($WIDTH);
199 $px2->SetHeight($HEIGHT);
200 $px2->SetYLabel($langs->trans("AmountOfBillsHT"));
201 $px2->SetShading(3);
202 $px2->SetHorizTickIncrement(1);
203 $px2->SetCssPrefix("cssboxes");
204 $px2->mode = 'depth';
205 $px2->SetTitle($langs->trans("AmountOfBillsByMonthHT"));
206
207 $px2->draw($filenamenb, $fileurlnb);
208 }
209 }
210
211 if (empty($conf->use_javascript_ajax)) {
212 $langs->load("errors");
213 $mesg = $langs->trans("WarningFeatureDisabledWithDisplayOptimizedForBlindNoJs");
214 }
215
216 if (!$mesg) {
217 $stringtoshow = '';
218 $stringtoshow .= '<script nonce="'.getNonce().'" type="text/javascript">
219 jQuery(document).ready(function() {
220 jQuery("#idsubimg'.$this->boxcode.'").click(function() {
221 jQuery("#idfilter'.$this->boxcode.'").toggle();
222 });
223 });
224 </script>';
225 $stringtoshow .= '<div class="center hideobject" id="idfilter'.$this->boxcode.'">'; // hideobject is to start hidden
226 $stringtoshow .= '<form class="flat formboxfilter" method="POST" action="'.$_SERVER["PHP_SELF"].'">';
227 $stringtoshow .= '<input type="hidden" name="token" value="'.newToken().'">';
228 $stringtoshow .= '<input type="hidden" name="action" value="'.$refreshaction.'">';
229 $stringtoshow .= '<input type="hidden" name="page_y" value="">';
230 $stringtoshow .= '<input type="hidden" name="DOL_AUTOSET_COOKIE" value="DOLUSERCOOKIE_box_'.$this->boxcode.':year,shownb,showtot">';
231 $stringtoshow .= '<input type="checkbox" name="'.$param_shownb.'"'.($shownb ? ' checked' : '').'> '.$langs->trans("NumberOfBillsByMonth");
232 $stringtoshow .= ' &nbsp; ';
233 $stringtoshow .= '<input type="checkbox" name="'.$param_showtot.'"'.($showtot ? ' checked' : '').'> '.$langs->trans("AmountOfBillsByMonthHT");
234 $stringtoshow .= '<br>';
235 $stringtoshow .= $langs->trans("Year").' <input class="flat" size="4" type="text" name="'.$param_year.'" value="'.$endyear.'">';
236 $stringtoshow .= '<input type="image" class="reposition inline-block valigntextbottom" alt="'.$langs->trans("Refresh").'" src="'.img_picto($langs->trans("Refresh"), 'refresh.png', '', '', 1).'">';
237 $stringtoshow .= '</form>';
238 $stringtoshow .= '</div>';
239 if ($shownb && $showtot) {
240 $stringtoshow .= '<div class="fichecenter">';
241 $stringtoshow .= '<div class="fichehalfleft">';
242 }
243 if ($shownb) {
244 $stringtoshow .= $px1->show();
245 }
246 if ($shownb && $showtot) {
247 $stringtoshow .= '</div>';
248 $stringtoshow .= '<div class="fichehalfright">';
249 }
250 if ($showtot) {
251 $stringtoshow .= $px2->show();
252 }
253 if ($shownb && $showtot) {
254 $stringtoshow .= '</div>';
255 $stringtoshow .= '</div>';
256 }
257 $this->info_box_contents[0][0] = array('tr'=>'class="oddeven nohover"', 'td' => 'class="nohover center"', 'textnoformat'=>$stringtoshow);
258 } else {
259 $this->info_box_contents[0][0] = array('tr'=>'class="oddeven nohover"', 'td' => 'class="nohover left"', 'maxlength'=>500, 'text' => $mesg);
260 }
261 } else {
262 $this->info_box_contents[0][0] = array(
263 'td' => 'class="nohover left"',
264 'text' => '<span class="opacitymedium">'.$langs->trans("ReadPermissionNotAllowed").'</span>'
265 );
266 }
267 }
268
277 public function showBox($head = null, $contents = null, $nooutput = 0)
278 {
279 return parent::showBox($this->info_box_head, $this->info_box_contents, $nooutput);
280 }
281}
Class to build graphs.
Class to manage stats for invoices (customer and supplier)
Class ModeleBoxes.
Class to manage the box to show last invoices.
loadBox($max=5)
Load data into info_box_contents array to show array later.
showBox($head=null, $contents=null, $nooutput=0)
Method to show box.
img_picto($titlealt, $picto, $moreatt='', $pictoisfullpath=0, $srconly=0, $notitle=0, $alt='', $morecss='', $marginleftonlyshort=2)
Show picto whatever it's its name (generic function)
GETPOSTINT($paramname, $method=0)
Return the value of a $_GET or $_POST supervariable, converted into integer.
dol_strlen($string, $stringencoding='UTF-8')
Make a strlen call.
dol_now($mode='auto')
Return date for now.
getDolGlobalInt($key, $default=0)
Return a Dolibarr global constant int value.
GETPOST($paramname, $check='alphanohtml', $method=0, $filter=null, $options=null, $noreplace=0)
Return value of a param into GET or POST supervariable.
getDolGlobalString($key, $default='')
Return dolibarr global constant string value.
dol_getdate($timestamp, $fast=false, $forcetimezone='')
Return an array with locale date info.