dolibarr  9.0.0
box_graph_orders_supplier_permonth.php
Go to the documentation of this file.
1 <?php
2 /* Copyright (C) 2013 Laurent Destailleur <eldy@users.sourceforge.net>
3  *
4  * This program is free software; you can redistribute it and/or modify
5  * it under the terms of the GNU General Public License as published by
6  * the Free Software Foundation; either version 3 of the License, or
7  * (at your option) any later version.
8  *
9  * This program is distributed in the hope that it will be useful,
10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12  * GNU General Public License for more details.
13  *
14  * You should have received a copy of the GNU General Public License
15  * along with this program. If not, see <http://www.gnu.org/licenses/>.
16  */
17 
23 include_once DOL_DOCUMENT_ROOT.'/core/boxes/modules_boxes.php';
24 
25 
30 {
31  var $boxcode="orderssupplierpermonth";
32  var $boximg="object_order";
33  var $boxlabel="BoxSuppliersOrdersPerMonth";
34  var $depends = array("fournisseur");
35 
39  public $db;
40 
41  var $info_box_head = array();
42  var $info_box_contents = array();
43 
44 
51  function __construct($db,$param)
52  {
53  global $user;
54 
55  $this->db=$db;
56 
57  $this->hidden = ! ($user->rights->fournisseur->commande->lire);
58  }
59 
66  function loadBox($max=5)
67  {
68  global $conf, $user, $langs, $db;
69 
70  $this->max=$max;
71 
72  $refreshaction='refresh_'.$this->boxcode;
73 
74  include_once DOL_DOCUMENT_ROOT.'/fourn/class/fournisseur.commande.class.php';
75 
76  $text = $langs->trans("BoxSuppliersOrdersPerMonth",$max);
77  $this->info_box_head = array(
78  'text' => $text,
79  'limit'=> dol_strlen($text),
80  'graph'=> 1,
81  'sublink'=>'',
82  'subtext'=>$langs->trans("Filter"),
83  'subpicto'=>'filter.png',
84  'subclass'=>'linkobject boxfilter',
85  'target'=>'none' // Set '' to get target="_blank"
86  );
87 
88  $dir=''; // We don't need a path because image file will not be saved into disk
89  $prefix='';
90  $socid=0;
91  if ($user->societe_id) $socid=$user->societe_id;
92  if (! $user->rights->societe->client->voir || $socid) $prefix.='private-'.$user->id.'-'; // If user has no permission to see all, output dir is specific to user
93 
94  if ($user->rights->fournisseur->commande->lire)
95  {
96  $langs->load("orders");
97 
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.'/commande/class/commandestats.class.php';
104  $autosetarray=preg_split("/[,;:]+/",GETPOST('DOL_AUTOSET_COOKIE'));
105  if (in_array('DOLUSERCOOKIE_box_'.$this->boxcode,$autosetarray))
106  {
107  $endyear=GETPOST($param_year,'int');
108  $shownb=GETPOST($param_shownb,'alpha');
109  $showtot=GETPOST($param_showtot,'alpha');
110  }
111  else
112  {
113  $tmparray=json_decode($_COOKIE['DOLUSERCOOKIE_box_'.$this->boxcode],true);
114  $endyear=$tmparray['year'];
115  $shownb=$tmparray['shownb'];
116  $showtot=$tmparray['showtot'];
117  }
118  if (empty($shownb) && empty($showtot)) { $shownb=1; $showtot=1; }
119  $nowarray=dol_getdate(dol_now(),true);
120  if (empty($endyear)) $endyear=$nowarray['year'];
121  $startyear=$endyear-1;
122  $mode='supplier';
123  $WIDTH=(($shownb && $showtot) || ! empty($conf->dol_optimize_smallscreen))?'256':'320';
124  $HEIGHT='192';
125 
126  $stats = new CommandeStats($this->db, $socid, $mode, 0);
127 
128  // Build graphic number of object. $data = array(array('Lib',val1,val2,val3),...)
129  if ($shownb)
130  {
131  $data1 = $stats->getNbByMonthWithPrevYear($endyear,$startyear,(GETPOST('action','aZ09')==$refreshaction?-1:(3600*24)), ($WIDTH<300?2:0));
132 
133  $filenamenb = $dir."/".$prefix."orderssuppliernbinyear-".$endyear.".png";
134  if ($mode == 'customer') $fileurlnb = DOL_URL_ROOT.'/viewimage.php?modulepart=orderstats&amp;file=ordersnbinyear-'.$endyear.'.png';
135  if ($mode == 'supplier') $fileurlnb = DOL_URL_ROOT.'/viewimage.php?modulepart=orderstatssupplier&amp;file=orderssuppliernbinyear-'.$endyear.'.png';
136 
137  $px1 = new DolGraph();
138  $mesg = $px1->isGraphKo();
139  if (! $mesg)
140  {
141  $px1->SetData($data1);
142  unset($data1);
143  $px1->SetPrecisionY(0);
144  $i=$startyear;$legend=array();
145  while ($i <= $endyear)
146  {
147  $legend[]=$i;
148  $i++;
149  }
150  $px1->SetLegend($legend);
151  $px1->SetMaxValue($px1->GetCeilMaxValue());
152  $px1->SetWidth($WIDTH);
153  $px1->SetHeight($HEIGHT);
154  $px1->SetYLabel($langs->trans("NumberOfOrders"));
155  $px1->SetShading(3);
156  $px1->SetHorizTickIncrement(1);
157  $px1->SetPrecisionY(0);
158  $px1->SetCssPrefix("cssboxes");
159  $px1->mode='depth';
160  $px1->SetTitle($langs->trans("NumberOfOrdersByMonth"));
161 
162  $px1->draw($filenamenb,$fileurlnb);
163  }
164  }
165 
166  // Build graphic number of object. $data = array(array('Lib',val1,val2,val3),...)
167  if ($showtot)
168  {
169  $data2 = $stats->getAmountByMonthWithPrevYear($endyear,$startyear,(GETPOST('action','aZ09')==$refreshaction?-1:(3600*24)), ($WIDTH<300?2:0));
170 
171  $filenamenb = $dir."/".$prefix."orderssupplieramountinyear-".$endyear.".png";
172  if ($mode == 'customer') $fileurlnb = DOL_URL_ROOT.'/viewimage.php?modulepart=orderstats&amp;file=ordersamountinyear-'.$endyear.'.png';
173  if ($mode == 'supplier') $fileurlnb = DOL_URL_ROOT.'/viewimage.php?modulepart=orderstatssupplier&amp;file=orderssupplieramountinyear-'.$endyear.'.png';
174 
175  $px2 = new DolGraph();
176  $mesg = $px2->isGraphKo();
177  if (! $mesg)
178  {
179  $px2->SetData($data2);
180  unset($data2);
181  $px2->SetPrecisionY(0);
182  $i=$startyear;$legend=array();
183  while ($i <= $endyear)
184  {
185  $legend[]=$i;
186  $i++;
187  }
188  $px2->SetLegend($legend);
189  $px2->SetMaxValue($px2->GetCeilMaxValue());
190  $px2->SetWidth($WIDTH);
191  $px2->SetHeight($HEIGHT);
192  $px2->SetYLabel($langs->trans("AmountOfOrdersHT"));
193  $px2->SetShading(3);
194  $px2->SetHorizTickIncrement(1);
195  $px2->SetPrecisionY(0);
196  $px2->SetCssPrefix("cssboxes");
197  $px2->mode='depth';
198  $px2->SetTitle($langs->trans("AmountOfOrdersByMonthHT"));
199 
200  $px2->draw($filenamenb,$fileurlnb);
201  }
202  }
203 
204  if (empty($conf->use_javascript_ajax))
205  {
206  $langs->load("errors");
207  $mesg=$langs->trans("WarningFeatureDisabledWithDisplayOptimizedForBlindNoJs");
208  }
209 
210  if (! $mesg)
211  {
212  $stringtoshow='';
213  $stringtoshow.='<script type="text/javascript" language="javascript">
214  jQuery(document).ready(function() {
215  jQuery("#idsubimg'.$this->boxcode.'").click(function() {
216  jQuery("#idfilter'.$this->boxcode.'").toggle();
217  });
218  });
219  </script>';
220  $stringtoshow.='<div class="center hideobject" id="idfilter'.$this->boxcode.'">'; // hideobject is to start hidden
221  $stringtoshow.='<form class="flat formboxfilter" method="POST" action="'.$_SERVER["PHP_SELF"].'">';
222  $stringtoshow.='<input type="hidden" name="action" value="'.$refreshaction.'">';
223  $stringtoshow.='<input type="hidden" name="page_y" value="">';
224  $stringtoshow.='<input type="hidden" name="DOL_AUTOSET_COOKIE" value="DOLUSERCOOKIE_box_'.$this->boxcode.':year,shownb,showtot">';
225  $stringtoshow.='<input type="checkbox" name="'.$param_shownb.'"'.($shownb?' checked':'').'> '.$langs->trans("NumberOfOrdersByMonth");
226  $stringtoshow.=' &nbsp; ';
227  $stringtoshow.='<input type="checkbox" name="'.$param_showtot.'"'.($showtot?' checked':'').'> '.$langs->trans("AmountOfOrdersByMonthHT");
228  $stringtoshow.='<br>';
229  $stringtoshow.=$langs->trans("Year").' <input class="flat" size="4" type="text" name="'.$param_year.'" value="'.$endyear.'">';
230  $stringtoshow.='<input type="image" class="reposition inline-block valigntextbottom" alt="'.$langs->trans("Refresh").'" src="'.img_picto($langs->trans("Refresh"),'refresh.png','','',1).'">';
231  $stringtoshow.='</form>';
232  $stringtoshow.='</div>';
233  if ($shownb && $showtot)
234  {
235  $stringtoshow.='<div class="fichecenter">';
236  $stringtoshow.='<div class="fichehalfleft">';
237  }
238  if ($shownb) $stringtoshow.=$px1->show();
239  if ($shownb && $showtot)
240  {
241  $stringtoshow.='</div>';
242  $stringtoshow.='<div class="fichehalfright">';
243  }
244  if ($showtot) $stringtoshow.=$px2->show();
245  if ($shownb && $showtot)
246  {
247  $stringtoshow.='</div>';
248  $stringtoshow.='</div>';
249  }
250  $this->info_box_contents[0][0] = array('tr'=>'class="oddeven nohover"', 'td' => 'align="center" class="nohover"','textnoformat'=>$stringtoshow);
251  }
252  else
253  {
254  $this->info_box_contents[0][0] = array('tr'=>'class="oddeven nohover"', 'td' => 'align="left" class="nohover"',
255  'maxlength'=>500,
256  'text' => $mesg);
257  }
258  }
259  else {
260  $this->info_box_contents[0][0] = array(
261  'td' => 'align="left" class="nohover opacitymedium"',
262  'text' => $langs->trans("ReadPermissionNotAllowed")
263  );
264  }
265  }
266 
275  function showBox($head = null, $contents = null, $nooutput=0)
276  {
277  return parent::showBox($this->info_box_head, $this->info_box_contents, $nooutput);
278  }
279 }
280 
GETPOST($paramname, $check='none', $method=0, $filter=null, $options=null, $noreplace=0)
Return value of a param into GET or POST supervariable.
loadBox($max=5)
Load data into info_box_contents array to show array later.
Class ModeleBoxes.
dol_now($mode='gmt')
Return date for now.
showBox($head=null, $contents=null, $nooutput=0)
Method to show box.
Class to manage order statistics (customer and supplier)
Class to manage the box to show last orders.
Class to build graphs.
dol_getdate($timestamp, $fast=false)
Return an array with locale date info.
img_picto($titlealt, $picto, $moreatt='', $pictoisfullpath=false, $srconly=0, $notitle=0, $alt='', $morecss='')
Show picto whatever it&#39;s its name (generic function)
dol_strlen($string, $stringencoding='UTF-8')
Make a strlen call.