dolibarr  7.0.0-beta
box_graph_invoices_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="invoicespermonth";
32  var $boximg="object_bill";
33  var $boxlabel="BoxCustomersInvoicesPerMonth";
34  var $depends = array("facture");
35 
36  var $db;
37 
38  var $info_box_head = array();
39  var $info_box_contents = array();
40 
41 
48  function __construct($db,$param)
49  {
50  global $user;
51 
52  $this->db=$db;
53 
54  $this->hidden = ! ($user->rights->facture->lire);
55  }
56 
63  function loadBox($max=5)
64  {
65  global $conf, $user, $langs, $db;
66 
67  $this->max=$max;
68 
69  $refreshaction='refresh_'.$this->boxcode;
70 
71  //include_once DOL_DOCUMENT_ROOT.'/compta/facture/class/facture.class.php';
72  //$facturestatic=new Facture($db);
73 
74  $text = $langs->trans("BoxCustomersInvoicesPerMonth",$max);
75  $this->info_box_head = array(
76  'text' => $text,
77  'limit'=> dol_strlen($text),
78  'graph'=> 1,
79  'sublink'=>'',
80  'subtext'=>$langs->trans("Filter"),
81  'subpicto'=>'filter.png',
82  'subclass'=>'linkobject boxfilter',
83  'target'=>'none' // Set '' to get target="_blank"
84  );
85 
86  $dir=''; // We don't need a path because image file will not be saved into disk
87  $prefix='';
88  $socid=0;
89  if ($user->societe_id) $socid=$user->societe_id;
90  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
91 
92  if ($user->rights->facture->lire)
93  {
94  $param_year='DOLUSERCOOKIE_box_'.$this->boxcode.'_year';
95  $param_shownb='DOLUSERCOOKIE_box_'.$this->boxcode.'_shownb';
96  $param_showtot='DOLUSERCOOKIE_box_'.$this->boxcode.'_showtot';
97 
98  include_once DOL_DOCUMENT_ROOT.'/core/class/dolgraph.class.php';
99  include_once DOL_DOCUMENT_ROOT.'/compta/facture/class/facturestats.class.php';
100  $autosetarray=preg_split("/[,;:]+/",GETPOST('DOL_AUTOSET_COOKIE'));
101  if (in_array('DOLUSERCOOKIE_box_'.$this->boxcode,$autosetarray))
102  {
103  $endyear=GETPOST($param_year,'int');
104  $shownb=GETPOST($param_shownb,'alpha');
105  $showtot=GETPOST($param_showtot,'alpha');
106  }
107  else
108  {
109  $tmparray=json_decode($_COOKIE['DOLUSERCOOKIE_box_'.$this->boxcode],true);
110  $endyear=$tmparray['year'];
111  $shownb=$tmparray['shownb'];
112  $showtot=$tmparray['showtot'];
113  }
114  if (empty($shownb) && empty($showtot)) { $shownb=1; $showtot=1; }
115  $nowarray=dol_getdate(dol_now(),true);
116  if (empty($endyear)) $endyear=$nowarray['year'];
117  $startyear=$endyear-1;
118  $mode='customer';
119  $WIDTH=(($shownb && $showtot) || ! empty($conf->dol_optimize_smallscreen))?'256':'320';
120  $HEIGHT='192';
121 
122  $stats = new FactureStats($this->db, $socid, $mode, 0);
123 
124  // Build graphic number of object. $data = array(array('Lib',val1,val2,val3),...)
125  if ($shownb)
126  {
127  $data1 = $stats->getNbByMonthWithPrevYear($endyear, $startyear, (GETPOST('action','aZ09')==$refreshaction?-1:(3600*24)), ($WIDTH<300?2:0));
128 
129  $filenamenb = $dir."/".$prefix."invoicesnbinyear-".$endyear.".png";
130  if ($mode == 'customer') $fileurlnb = DOL_URL_ROOT.'/viewimage.php?modulepart=billstats&amp;file=invoicesnbinyear-'.$endyear.'.png';
131  if ($mode == 'supplier') $fileurlnb = DOL_URL_ROOT.'/viewimage.php?modulepart=billstatssupplier&amp;file=invoicessuppliernbinyear-'.$endyear.'.png';
132 
133  $px1 = new DolGraph();
134  $mesg = $px1->isGraphKo();
135  if (! $mesg)
136  {
137  $langs->load("bills");
138 
139  $px1->SetData($data1);
140  unset($data1);
141  $px1->SetPrecisionY(0);
142  $i=$startyear;$legend=array();
143  while ($i <= $endyear)
144  {
145  $legend[]=$i;
146  $i++;
147  }
148  $px1->SetLegend($legend);
149  $px1->SetMaxValue($px1->GetCeilMaxValue());
150  $px1->SetWidth($WIDTH);
151  $px1->SetHeight($HEIGHT);
152  $px1->SetYLabel($langs->trans("NumberOfBills"));
153  $px1->SetShading(3);
154  $px1->SetHorizTickIncrement(1);
155  $px1->SetPrecisionY(0);
156  $px1->SetCssPrefix("cssboxes");
157  $px1->mode='depth';
158  $px1->SetTitle($langs->trans("NumberOfBillsByMonth"));
159 
160  $px1->draw($filenamenb,$fileurlnb);
161  }
162  }
163 
164  // Build graphic number of object. $data = array(array('Lib',val1,val2,val3),...)
165  if ($showtot)
166  {
167  $data2 = $stats->getAmountByMonthWithPrevYear($endyear,$startyear,(GETPOST('action','aZ09')==$refreshaction?-1:(3600*24)), ($WIDTH<300?2:0));
168 
169  $filenamenb = $dir."/".$prefix."invoicesamountinyear-".$endyear.".png";
170  if ($mode == 'customer') $fileurlnb = DOL_URL_ROOT.'/viewimage.php?modulepart=billstats&amp;file=invoicesamountinyear-'.$endyear.'.png';
171  if ($mode == 'supplier') $fileurlnb = DOL_URL_ROOT.'/viewimage.php?modulepart=billstatssupplier&amp;file=invoicessupplieramountinyear-'.$endyear.'.png';
172 
173  $px2 = new DolGraph();
174  $mesg = $px2->isGraphKo();
175  if (! $mesg)
176  {
177  $langs->load("bills");
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("AmountOfBillsHT"));
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("AmountOfBillsByMonthHT"));
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="DOL_AUTOSET_COOKIE" value="DOLUSERCOOKIE_box_'.$this->boxcode.':year,shownb,showtot">';
224  $stringtoshow.='<input type="checkbox" name="'.$param_shownb.'"'.($shownb?' checked':'').'> '.$langs->trans("NumberOfBillsByMonth");
225  $stringtoshow.=' &nbsp; ';
226  $stringtoshow.='<input type="checkbox" name="'.$param_showtot.'"'.($showtot?' checked':'').'> '.$langs->trans("AmountOfBillsByMonthHT");
227  $stringtoshow.='<br>';
228  $stringtoshow.=$langs->trans("Year").' <input class="flat" size="4" type="text" name="'.$param_year.'" value="'.$endyear.'">';
229  $stringtoshow.='<input type="image" alt="'.$langs->trans("Refresh").'" src="'.img_picto($langs->trans("Refresh"),'refresh.png','','',1).'">';
230  $stringtoshow.='</form>';
231  $stringtoshow.='</div>';
232  if ($shownb && $showtot)
233  {
234  $stringtoshow.='<div class="fichecenter">';
235  $stringtoshow.='<div class="fichehalfleft">';
236  }
237  if ($shownb) $stringtoshow.=$px1->show();
238  if ($shownb && $showtot)
239  {
240  $stringtoshow.='</div>';
241  $stringtoshow.='<div class="fichehalfright">';
242  }
243  if ($showtot) $stringtoshow.=$px2->show();
244  if ($shownb && $showtot)
245  {
246  $stringtoshow.='</div>';
247  $stringtoshow.='</div>';
248  }
249  $this->info_box_contents[0][0] = array('td' => 'align="center" class="nohover"','textnoformat'=>$stringtoshow);
250  }
251  else
252  {
253  $this->info_box_contents[0][0] = array( 'td' => 'align="left" class="nohover"',
254  'maxlength'=>500,
255  'text' => $mesg);
256  }
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 }
281 
img_picto($titlealt, $picto, $moreatt= '', $pictoisfullpath=false, $srconly=0, $notitle=0, $alt='', $morecss='')
Show picto whatever it's its name (generic function)
loadBox($max=5)
Load data into info_box_contents array to show array later.
Class to manage the box to show last invoices.
Class ModeleBoxes.
showBox($head=null, $contents=null, $nooutput=0)
Method to show box.
GETPOST($paramname, $check='none', $method=0, $filter=NULL, $options=NULL, $noreplace=0)
Return value of a param into GET or POST supervariable.
dol_now($mode='gmt')
Return date for now.
Class to build graphs.
__construct($db, $param)
Constructor.
dol_getdate($timestamp, $fast=false)
Return an array with locale date info.
Class to manage stats for invoices (customer and supplier)
dol_strlen($string, $stringencoding='UTF-8')
Make a strlen call.