Linux vps-61133.fhnet.fr 4.9.0-19-amd64 #1 SMP Debian 4.9.320-2 (2022-06-30) x86_64
Apache/2.4.25 (Debian)
Server IP : 93.113.207.21 & Your IP : 216.73.216.35
Domains :
Cant Read [ /etc/named.conf ]
User : www-data
Terminal
Auto Root
Create File
Create Folder
Localroot Suggester
Backdoor Destroyer
Readme
/
var /
www /
html /
speed.bdcloud.fr /
core /
Delete
Unzip
Name
Size
Permission
Date
Action
ajax
[ DIR ]
drwxr-xr-x
2025-11-08 11:17
boxes
[ DIR ]
drwxr-xr-x
2025-11-08 11:17
class
[ DIR ]
drwxr-xr-x
2025-11-08 11:17
db
[ DIR ]
drwxr-xr-x
2025-11-08 11:17
filemanagerdol
[ DIR ]
drwxr-xr-x
2025-11-08 11:17
js
[ DIR ]
drwxr-xr-x
2025-11-08 11:17
lib
[ DIR ]
drwxr-xr-x
2025-11-08 11:17
login
[ DIR ]
drwxr-xr-x
2025-11-08 11:17
menus
[ DIR ]
drwxr-xr-x
2025-11-08 11:17
modules
[ DIR ]
drwxr-xr-x
2025-11-08 11:17
tpl
[ DIR ]
drwxr-xr-x
2025-11-08 11:17
triggers
[ DIR ]
drwxr-xr-x
2025-11-08 11:17
actions_addupdatedelete.inc.php
13.2
KB
-rw-r--r--
2020-09-02 15:31
actions_builddoc.inc.php
5.25
KB
-rw-r--r--
2020-09-02 15:31
actions_changeselectedfields.inc.php
1.57
KB
-rw-r--r--
2020-09-02 15:31
actions_comments.inc.php
2.65
KB
-rw-r--r--
2020-09-02 15:31
actions_dellink.inc.php
1.59
KB
-rw-r--r--
2020-09-02 15:31
actions_extrafields.inc.php
12.42
KB
-rw-r--r--
2020-09-02 15:31
actions_fetchobject.inc.php
1.93
KB
-rw-r--r--
2020-09-02 15:31
actions_lineupdown.inc.php
2.53
KB
-rw-r--r--
2020-09-02 15:31
actions_linkedfiles.inc.php
11.51
KB
-rw-r--r--
2020-09-02 15:31
actions_massactions.inc.php
48.7
KB
-rw-r--r--
2020-09-02 15:31
actions_printing.inc.php
3.06
KB
-rw-r--r--
2020-09-02 15:31
actions_sendmails.inc.php
19.24
KB
-rw-r--r--
2020-09-02 15:31
actions_setmoduleoptions.inc.php
3.79
KB
-rw-r--r--
2020-09-02 15:31
actions_setnotes.inc.php
3.43
KB
-rw-r--r--
2020-09-02 15:31
antispamimage.php
1.88
KB
-rw-r--r--
2020-09-02 15:31
commonfieldsinexport.inc.php
2.01
KB
-rw-r--r--
2020-09-02 15:31
customreports.php
32.73
KB
-rw-r--r--
2020-09-02 15:31
datepicker.php
9.29
KB
-rw-r--r--
2020-09-02 15:31
doxygen.php
1.71
KB
-rw-r--r--
2020-09-02 15:31
extrafieldsinexport.inc.php
2.67
KB
-rw-r--r--
2020-09-02 15:31
get_info.php
7.79
KB
-rw-r--r--
2020-09-02 15:31
get_menudiv.php
7.02
KB
-rw-r--r--
2020-09-02 15:31
index.html
0
B
-rw-r--r--
2020-09-02 15:31
photos_resize.php
20.68
KB
-rw-r--r--
2020-09-02 15:31
search.php
4.92
KB
-rw-r--r--
2020-09-02 15:31
search_page.php
4.28
KB
-rw-r--r--
2020-09-02 15:31
tools.php
1.56
KB
-rw-r--r--
2020-09-02 15:31
website.inc.php
4.97
KB
-rw-r--r--
2020-09-02 15:31
Save
Rename
<?php /* Copyright (C) 2020 Laurent Destailleur <eldy@users.sourceforge.net> * * This program is free software; you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 3 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see <http://www.gnu.org/licenses/>. * * Note: This tool can be included into a list page with : * define('USE_CUSTOME_REPORT_AS_INCLUDE', 1); * include DOL_DOCUMENT_ROOT.'/core/customreports.php'; */ /** * \file htdocs/core/customreports.php * \ingroup core * \brief Page to make custom reports */ if (!defined('USE_CUSTOME_REPORT_AS_INCLUDE')) { require '../main.inc.php'; // Get parameters $action = GETPOST('action', 'aZ09') ?GETPOST('action', 'aZ09') : 'view'; // The action 'add', 'create', 'edit', 'update', 'view', ... $massaction = GETPOST('massaction', 'alpha'); // The bulk action (combo box choice into lists) $mode = GETPOST('mode', 'alpha') ? GETPOST('mode', 'alpha') : 'graph'; $objecttype = GETPOST('objecttype', 'aZ09'); $tabfamily = GETPOST('tabfamily', 'aZ09'); if (empty($objecttype)) $objecttype = 'thirdparty'; $search_filters = GETPOST('search_filters', 'array'); $search_measures = GETPOST('search_measures', 'array'); //$search_xaxis = GETPOST('search_xaxis', 'array'); if (GETPOST('search_xaxis', 'alpha') && GETPOST('search_xaxis', 'alpha') != '-1') $search_xaxis = array(GETPOST('search_xaxis', 'alpha')); else $search_xaxis = array(); //$search_groupby = GETPOST('search_groupby', 'array'); if (GETPOST('search_groupby', 'alpha') && GETPOST('search_groupby', 'alpha') != '-1') $search_groupby = array(GETPOST('search_groupby', 'alpha')); else $search_groupby = array(); $search_yaxis = GETPOST('search_yaxis', 'array'); $search_graph = GETPOST('search_graph', 'none'); // Load variable for pagination $limit = GETPOST('limit', 'int') ? GETPOST('limit', 'int') : $conf->liste_limit; $sortfield = GETPOST('sortfield', 'alpha'); $sortorder = GETPOST('sortorder', 'alpha'); $page = GETPOSTISSET('pageplusone') ? (GETPOST('pageplusone') - 1) : GETPOST("page", 'int'); if (empty($page) || $page == -1 || GETPOST('button_search', 'alpha') || GETPOST('button_removefilter', 'alpha') || (empty($toselect) && $massaction === '0')) { $page = 0; } // If $page is not defined, or '' or -1 or if we click on clear filters or if we select empty mass action $offset = $limit * $page; $pageprev = $page - 1; $pagenext = $page + 1; $diroutputmassaction = $conf->user->dir_temp.'/'.$user->id.'/customreport'; } require_once DOL_DOCUMENT_ROOT."/core/lib/admin.lib.php"; require_once DOL_DOCUMENT_ROOT."/core/lib/company.lib.php"; require_once DOL_DOCUMENT_ROOT."/core/class/dolgraph.class.php"; require_once DOL_DOCUMENT_ROOT."/core/class/doleditor.class.php"; require_once DOL_DOCUMENT_ROOT."/core/class/html.formother.class.php"; // Load traductions files requiredby by page $langs->loadLangs(array("companies", "other", "exports", "sendings")); $extrafields = new ExtraFields($db); $hookmanager->initHooks(array('customreport')); // Note that conf->hooks_modules contains array $title = ''; $picto = ''; $head = array(); $object = null; $ObjectClassName = ''; // Objects available by default $arrayoftype = array( 'thirdparty' => array('label' => 'ThirdParties', 'ObjectClassName' => 'Societe', 'enabled' => $conf->societe->enabled, 'ClassPath' => "/societe/class/societe.class.php"), 'contact' => array('label' => 'Contacts', 'ObjectClassName' => 'Contact', 'enabled' => $conf->societe->enabled, 'ClassPath' => "/contact/class/contact.class.php"), 'proposal' => array('label' => 'Proposals', 'ObjectClassName' => 'Propal', 'enabled' => $conf->propal->enabled, 'ClassPath' => "/comm/propal/class/propal.class.php"), 'order' => array('label' => 'Orders', 'ObjectClassName' => 'Commande', 'enabled' => $conf->commande->enabled, 'ClassPath' => "/commande/class/commande.class.php"), 'invoice' => array('label' => 'Invoices', 'ObjectClassName' => 'Facture', 'enabled' => $conf->facture->enabled, 'ClassPath' => "/compta/facture/class/facture.class.php"), 'invoice_template'=>array('label' => 'PredefinedInvoices', 'ObjectClassName' => 'FactureRec', 'enabled' => $conf->facture->enabled, 'ClassPath' => "/compta/class/facturerec.class.php", 'langs'=>'bills'), 'contract' => array('label' => 'Contracts', 'ObjectClassName' => 'Contrat', 'enabled' => $conf->contrat->enabled, 'ClassPath' => "/contrat/class/contrat.class.php", 'langs'=>'contract'), 'bom' => array('label' => 'BOM', 'ObjectClassName' => 'Bom', 'enabled' => $conf->bom->enabled), 'mo' => array('label' => 'MO', 'ObjectClassName' => 'Mo', 'enabled' => $conf->mrp->enabled, 'ClassPath' => "/mrp/class/mo.class.php"), 'ticket' => array('label' => 'Ticket', 'ObjectClassName' => 'Ticket', 'enabled' => $conf->ticket->enabled), 'member' => array('label' => 'Adherent', 'ObjectClassName' => 'Adherent', 'enabled' => $conf->adherent->enabled, 'ClassPath' => "/adherents/class/adherent.class.php", 'langs'=>'members'), 'cotisation' => array('label' => 'Subscriptions', 'ObjectClassName' => 'Subscription', 'enabled' => $conf->adherent->enabled, 'ClassPath' => "/adherents/class/subscription.class.php", 'langs'=>'members'), ); // Complete $arrayoftype by external modules $parameters = array('objecttype'=>$objecttype, 'tabfamily'=>$tabfamily); $reshook = $hookmanager->executeHooks('loadDataForCustomReports', $parameters, $object, $action); // Note that $action and $object may have been modified by some hooks if ($reshook < 0) setEventMessages($hookmanager->error, $hookmanager->errors, 'errors'); elseif (is_array($hookmanager->resArray)) { if (!empty($hookmanager->resArray['title'])) { // Add entries for tabs $title = $hookmanager->resArray['title']; } if (!empty($hookmanager->resArray['picto'])) { // Add entries for tabs $picto = $hookmanager->resArray['picto']; } if (!empty($hookmanager->resArray['head'])) { // Add entries for tabs $head = array_merge($head, $hookmanager->resArray['head']); } if (!empty($hookmanager->resArray['arrayoftype'])) { // Add entries from hook foreach ($hookmanager->resArray['arrayoftype'] as $key => $val) { $arrayoftype[$key] = $val; } } } if ($objecttype) { try { if (!empty($arrayoftype[$objecttype]['ClassPath'])) { dol_include_once($arrayoftype[$objecttype]['ClassPath']); } else { dol_include_once("/".$objecttype."/class/".$objecttype.".class.php"); } $ObjectClassName = $arrayoftype[$objecttype]['ObjectClassName']; $object = new $ObjectClassName($db); } catch (Exception $e) { print 'Failed to load class for type '.$objecttype; } } // Security check $socid = 0; if ($user->socid > 0) // Protection if external user { //$socid = $user->socid; accessforbidden(); } $result = restrictedArea($user, $object->element, 0, ''); // Fetch optionals attributes and labels $extrafields->fetch_name_optionals_label($object->table_element); //$extrafields->fetch_name_optionals_label($object->table_element_line); $search_array_options = $extrafields->getOptionalsFromPost($object->table_element, '', 'search_'); $search_component_params = array(''); $MAXUNIQUEVALFORGROUP = 20; $MAXMEASURESINBARGRAPH = 20; $YYYY = substr($langs->trans("Year"), 0, 1).substr($langs->trans("Year"), 0, 1).substr($langs->trans("Year"), 0, 1).substr($langs->trans("Year"), 0, 1); $MM = substr($langs->trans("Month"), 0, 1).substr($langs->trans("Month"), 0, 1); $DD = substr($langs->trans("Day"), 0, 1).substr($langs->trans("Day"), 0, 1); $HH = substr($langs->trans("Hour"), 0, 1).substr($langs->trans("Hour"), 0, 1); $MI = substr($langs->trans("Minute"), 0, 1).substr($langs->trans("Minute"), 0, 1); $SS = substr($langs->trans("Second"), 0, 1).substr($langs->trans("Second"), 0, 1); $arrayofmesures = array('t.count'=>'Count'); $arrayofxaxis = array(); $arrayofgroupby = array(); $arrayofyaxis = array(); $arrayofvaluesforgroupby = array(); /* * Actions */ /* * View */ $form = new Form($db); $formother = new FormOther($db); if (!defined('USE_CUSTOME_REPORT_AS_INCLUDE')) { llxHeader('', $langs->transnoentitiesnoconv('CustomReports'), ''); dol_fiche_head($head, 'customreports', $title, -1, $picto); } // Check parameters if ($action == 'viewgraph') { if (!count($search_measures)) { setEventMessages($langs->trans("AtLeastOneMeasureIsRequired"), null, 'warnings'); } elseif ($mode == 'graph' && count($search_xaxis) > 1) { setEventMessages($langs->trans("OnlyOneFieldForXAxisIsPossible"), null, 'warnings'); $search_xaxis = array(0 => $search_xaxis[0]); } if (count($search_groupby) >= 2) { setEventMessages($langs->trans("ErrorOnlyOneFieldForGroupByIsPossible"), null, 'warnings'); $search_groupby = array(0 => $search_groupby[0]); } if (!count($search_xaxis)) { setEventMessages($langs->trans("AtLeastOneXAxisIsRequired"), null, 'warnings'); } elseif ($mode == 'graph' && $search_graph == 'bars' && count($search_measures) > $MAXMEASURESINBARGRAPH) { $langs->load("errors"); setEventMessages($langs->trans("GraphInBarsAreLimitedToNMeasures", $MAXMEASURESINBARGRAPH), null, 'warnings'); $search_graph = 'lines'; } } // Get all possible values of fields when a 'group by' is set, and save this into $arrayofvaluesforgroupby // $arrayofvaluesforgroupby will be used to forge lael of each grouped series if (is_array($search_groupby) && count($search_groupby)) { foreach ($search_groupby as $gkey => $gval) { $gvalwithoutprefix = preg_replace('/^[a-z]+\./', '', $gval); if (preg_match('/\-year$/', $search_groupby[$gkey])) { $tmpval = preg_replace('/\-year$/', '', $search_groupby[$gkey]); $fieldtocount .= 'DATE_FORMAT('.$tmpval.", '%Y')"; } elseif (preg_match('/\-month$/', $search_groupby[$gkey])) { $tmpval = preg_replace('/\-month$/', '', $search_groupby[$gkey]); $fieldtocount .= 'DATE_FORMAT('.$tmpval.", '%Y-%m')"; } elseif (preg_match('/\-day$/', $search_groupby[$gkey])) { $tmpval = preg_replace('/\-day$/', '', $search_groupby[$gkey]); $fieldtocount .= 'DATE_FORMAT('.$tmpval.", '%Y-%m-%d')"; } else { $fieldtocount = $search_groupby[$gkey]; } $sql = 'SELECT DISTINCT '.$fieldtocount.' as val'; if (strpos($fieldtocount, 'te.') === 0) { $sql .= ' FROM '.MAIN_DB_PREFIX.$object->table_element.'_extrafields as te'; } else { $sql .= ' FROM '.MAIN_DB_PREFIX.$object->table_element.' as t'; } // TODO Add the where here $sql .= ' LIMIT '.($MAXUNIQUEVALFORGROUP + 1); //print $sql; $resql = $db->query($sql); if (!$resql) { dol_print_error($db); } while ($obj = $db->fetch_object($resql)) { if (is_null($obj->val)) { $keytouse = '__NULL__'; $valuetranslated = $langs->transnoentitiesnoconv("NotDefined"); } elseif ($obj->val === '') { $keytouse = ''; $valuetranslated = $langs->transnoentitiesnoconv("Empty"); } else { $keytouse = (string) $obj->val; $valuetranslated = $obj->val; } $regs = array(); if (!empty($object->fields[$gvalwithoutprefix]['arrayofkeyval'])) { $valuetranslated = $object->fields[$gvalwithoutprefix]['arrayofkeyval'][$obj->val]; if (is_null($valuetranslated)) $valuetranslated = $langs->transnoentitiesnoconv("UndefinedKey"); $valuetranslated = $langs->trans($valuetranslated); } elseif (preg_match('/integer:([^:]+):([^:]+)$/', $object->fields[$gvalwithoutprefix]['type'], $regs)) { $classname = $regs[1]; $classpath = $regs[2]; dol_include_once($classpath); if (class_exists($classname)) { $tmpobject = new $classname($db); $tmpobject->fetch($obj->val); foreach ($tmpobject->fields as $fieldkey => $field) { if ($field['showoncombobox']) { $valuetranslated = $tmpobject->$fieldkey; //if ($valuetranslated == '-') $valuetranslated = $langs->transnoentitiesnoconv("Unknown") break; } } //$valuetranslated = $tmpobject->ref.'eee'; } } $arrayofvaluesforgroupby['g_'.$gkey][$keytouse] = $valuetranslated; } asort($arrayofvaluesforgroupby['g_'.$gkey]); if (count($arrayofvaluesforgroupby['g_'.$gkey]) > $MAXUNIQUEVALFORGROUP) { $langs->load("errors"); //var_dump($gkey.' '.$gval.' '.$gvalwithoutprefix); $gvalwithoutprefix = preg_replace('/\-(year|month|day)/', '', $gvalwithoutprefix); $labeloffield = $langs->transnoentitiesnoconv($object->fields[$gvalwithoutprefix]['label']); setEventMessages($langs->trans("ErrorTooManyDifferentValueForSelectedGroupBy", $MAXUNIQUEVALFORGROUP, $labeloffield), null, 'warnings'); $search_groupby = array(); } $db->free($resql); } } //var_dump($arrayofvaluesforgroupby);exit; $tmparray = dol_getdate(dol_now()); $endyear = $tmparray['year']; $endmonth = $tmparray['mon']; $datelastday = dol_get_last_day($endyear, $endmonth, 1); $startyear = $endyear - 2; $param = ''; print '<form method="post" action="'.$_SERVER['PHP_SELF'].'">'; print '<input type="hidden" name="token" value="'.$_SESSION['newtoken'].'">'; print '<input type="hidden" name="action" value="viewgraph">'; print '<input type="hidden" name="tabfamily" value="'.$tabfamily.'">'; print '<div class="liste_titre liste_titre_bydiv centpercent">'; // Select object print '<div class="divadvancedsearchfield center floatnone">'; print '<div class="inline-block"><span class="opacitymedium">'.$langs->trans("StatisticsOn").'</span></div> '; $newarrayoftype = array(); foreach ($arrayoftype as $key => $val) { if (dol_eval($val['enabled'], 1)) { $newarrayoftype[$key] = $arrayoftype[$key]; } if ($val['langs']) { $langs->load($val['langs']); } } print $form->selectarray('objecttype', $newarrayoftype, $objecttype, 0, 0, 0, '', 1, 0, 0, '', 'minwidth200', 1); if (empty($conf->use_javascript_ajax)) print '<input type="submit" class="button buttongen" name="changeobjecttype" value="'.$langs->trans("Refresh").'">'; else { print '<script type="text/javascript" language="javascript"> jQuery(document).ready(function() { jQuery("#objecttype").change(function() { console.log("Reload for "+jQuery("#objecttype").val()); location.href = "'.$_SERVER["PHP_SELF"].'?objecttype="+jQuery("#objecttype").val()+"'.($tabfamily ? '&tabfamily='.$tabfamily : '').'"; }); }); </script>'; } print '</div><div class="clearboth"></div>'; // Add Filter print '<div class="divadvancedsearchfield quatrevingtpercent">'; print $form->searchComponent(array($object->element => $object->fields), $search_component_params); print '</div>'; // Add measures into array print '<div class="divadvancedsearchfield clearboth">'; foreach ($object->fields as $key => $val) { if (!empty($val['isameasure']) && (!isset($val['enabled']) || dol_eval($val['enabled'], 1))) { $arrayofmesures['t.'.$key.'-sum'] = $langs->trans($val['label']).' <span class="opacitymedium">('.$langs->trans("Sum").')</span>'; $arrayofmesures['t.'.$key.'-average'] = $langs->trans($val['label']).' <span class="opacitymedium">('.$langs->trans("Average").')</span>'; $arrayofmesures['t.'.$key.'-min'] = $langs->trans($val['label']).' <span class="opacitymedium">('.$langs->trans("Minimum").')</span>'; $arrayofmesures['t.'.$key.'-max'] = $langs->trans($val['label']).' <span class="opacitymedium">('.$langs->trans("Maximum").')</span>'; } } // Add extrafields to Measures if ($object->isextrafieldmanaged) { foreach ($extrafields->attributes[$object->table_element]['label'] as $key => $val) { if (!empty($extrafields->attributes[$object->table_element]['totalizable'][$key]) && (!isset($extrafields->attributes[$object->table_element]['enabled'][$key]) || dol_eval($extrafields->attributes[$object->table_element]['enabled'][$key], 1))) { $arrayofmesures['te.'.$key.'-sum'] = $langs->trans($extrafields->attributes[$object->table_element]['label'][$key]).' <span class="opacitymedium">('.$langs->trans("Sum").')</span>'; $arrayofmesures['te.'.$key.'-average'] = $langs->trans($extrafields->attributes[$object->table_element]['label'][$key]).' <span class="opacitymedium">('.$langs->trans("Average").')</span>'; $arrayofmesures['te.'.$key.'-min'] = $langs->trans($extrafields->attributes[$object->table_element]['label'][$key]).' <span class="opacitymedium">('.$langs->trans("Minimum").')</span>'; $arrayofmesures['te.'.$key.'-max'] = $langs->trans($extrafields->attributes[$object->table_element]['label'][$key]).' <span class="opacitymedium">('.$langs->trans("Maximum").')</span>'; } } } print '<div class="inline-block"><span class="fas fa-chart-line paddingright" title="'.$langs->trans("Measures").'"></span>'.$langs->trans("Measures").'</div> '; print $form->multiselectarray('search_measures', $arrayofmesures, $search_measures, 0, 0, 'minwidth500', 1); print '</div>'; // Group by print '<div class="divadvancedsearchfield">'; print '<div class="inline-block opacitymedium"><span class="fas fa-ruler-horizontal paddingright" title="'.$langs->trans("GroupBy").'"></span>'.$langs->trans("GroupBy").'</div> '; print $formother->selectGroupByField($object, $search_groupby, $arrayofgroupby); print '</div>'; // XAxis print '<div class="divadvancedsearchfield">'; print '<div class="inline-block"><span class="fas fa-ruler-horizontal paddingright" title="'.$langs->trans("XAxis").'"></span>'.$langs->trans("XAxis").'</div> '; print $formother->selectXAxisField($object, $search_xaxis, $arrayofxaxis); print '</div>'; if ($mode == 'grid') { // YAxis print '<div class="divadvancedsearchfield">'; foreach ($object->fields as $key => $val) { if (empty($val['measure']) && (!isset($val['enabled']) || dol_eval($val['enabled'], 1))) { if (in_array($key, array('id', 'rowid', 'entity', 'last_main_doc', 'extraparams'))) continue; if (preg_match('/^fk_/', $key)) continue; if (in_array($val['type'], array('html', 'text'))) continue; if (in_array($val['type'], array('timestamp', 'date', 'datetime'))) { $arrayofyaxis['t.'.$key.'-year'] = array('label' => $langs->trans($val['label']).' ('.$YYYY.')', 'position' => $val['position']); $arrayofyaxis['t.'.$key.'-month'] = array('label' => $langs->trans($val['label']).' ('.$YYYY.'-'.$MM.')', 'position' => $val['position']); $arrayofyaxis['t.'.$key.'-day'] = array('label' => $langs->trans($val['label']).' ('.$YYYY.'-'.$MM.'-'.$DD.')', 'position' => $val['position']); } else { $arrayofyaxis['t.'.$key] = array('label' => $val['label'], 'position' => (int) $val['position']); } } // Add measure from extrafields if ($object->isextrafieldmanaged) { foreach ($extrafields->attributes[$object->table_element]['label'] as $key => $val) { if (!empty($extrafields->attributes[$object->table_element]['totalizable'][$key]) && (!isset($extrafields->attributes[$object->table_element]['enabled'][$key]) || dol_eval($extrafields->attributes[$object->table_element]['enabled'][$key], 1))) { $arrayofyaxis['te.'.$key] = array('label' => $extrafields->attributes[$object->table_element]['label'][$key], 'position' => (int) $extrafields->attributes[$object->table_element]['pos'][$key]); } } } } $arrayofyaxis = dol_sort_array($arrayofyaxis, 'position'); $arrayofyaxislabel = array(); foreach ($arrayofyaxis as $key => $val) { $arrayofyaxislabel[$key] = $val['label']; } print '<div class="inline-block opacitymedium"><span class="fas fa-ruler-vertical paddingright" title="'.$langs->trans("YAxis").'"></span>'.$langs->trans("YAxis").'</div> '; print $form->multiselectarray('search_yaxis', $arrayofyaxislabel, $search_yaxis, 0, 0, 'minwidth100', 1); print '</div>'; } if ($mode == 'graph') { print '<div class="divadvancedsearchfield">'; $arrayofgraphs = array('bars' => 'Bars', 'lines' => 'Lines'); // also 'pies' print '<div class="inline-block opacitymedium"><span class="fas fa-chart-area paddingright" title="'.$langs->trans("Graph").'"></span>'.$langs->trans("Graph").'</div> '; print $form->selectarray('search_graph', $arrayofgraphs, $search_graph, 0, 0, 0, 'minwidth100', 1); print '</div>'; } print '<div class="divadvancedsearchfield">'; print '<input type="submit" class="button buttongen" value="'.$langs->trans("Refresh").'">'; print '</div>'; print '</div>'; print '</form>'; // Generate the SQL request $sql = ''; if (!empty($search_measures) && !empty($search_xaxis)) { $fieldid = 'rowid'; $sql = 'SELECT '; foreach ($search_xaxis as $key => $val) { if (preg_match('/\-year$/', $val)) { $tmpval = preg_replace('/\-year$/', '', $val); $sql .= 'DATE_FORMAT('.$tmpval.", '%Y') as x_".$key.', '; } elseif (preg_match('/\-month$/', $val)) { $tmpval = preg_replace('/\-month$/', '', $val); $sql .= 'DATE_FORMAT('.$tmpval.", '%Y-%m') as x_".$key.', '; } elseif (preg_match('/\-day$/', $val)) { $tmpval = preg_replace('/\-day$/', '', $val); $sql .= 'DATE_FORMAT('.$tmpval.", '%Y-%m-%d') as x_".$key.', '; } else $sql .= $val.' as x_'.$key.', '; } foreach ($search_groupby as $key => $val) { if (preg_match('/\-year$/', $val)) { $tmpval = preg_replace('/\-year$/', '', $val); $sql .= 'DATE_FORMAT('.$tmpval.", '%Y') as g_".$key.', '; } elseif (preg_match('/\-month$/', $val)) { $tmpval = preg_replace('/\-month$/', '', $val); $sql .= 'DATE_FORMAT('.$tmpval.", '%Y-%m') as g_".$key.', '; } elseif (preg_match('/\-day$/', $val)) { $tmpval = preg_replace('/\-day$/', '', $val); $sql .= 'DATE_FORMAT('.$tmpval.", '%Y-%m-%d') as g_".$key.', '; } else $sql .= $val.' as g_'.$key.', '; } foreach ($search_measures as $key => $val) { if ($val == 't.count') $sql .= 'COUNT(t.'.$fieldid.') as y_'.$key.', '; elseif (preg_match('/\-sum$/', $val)) { $tmpval = preg_replace('/\-sum$/', '', $val); $sql .= 'SUM('.$db->ifsql($tmpval.' IS NULL', '0', $tmpval).') as y_'.$key.', '; } elseif (preg_match('/\-average$/', $val)) { $tmpval = preg_replace('/\-average$/', '', $val); $sql .= 'AVG('.$db->ifsql($tmpval.' IS NULL', '0', $tmpval).') as y_'.$key.', '; } elseif (preg_match('/\-min$/', $val)) { $tmpval = preg_replace('/\-min$/', '', $val); $sql .= 'MIN('.$db->ifsql($tmpval.' IS NULL', '0', $tmpval).') as y_'.$key.', '; } elseif (preg_match('/\-max$/', $val)) { $tmpval = preg_replace('/\-max$/', '', $val); $sql .= 'MAX('.$db->ifsql($tmpval.' IS NULL', '0', $tmpval).') as y_'.$key.', '; } } $sql = preg_replace('/,\s*$/', '', $sql); $sql .= ' FROM '.MAIN_DB_PREFIX.$object->table_element.' as t'; // Add measure from extrafields if ($object->isextrafieldmanaged) { $sql .= ' LEFT JOIN '.MAIN_DB_PREFIX.$object->table_element.'_extrafields as te ON te.fk_object = t.'.$fieldid; } if ($object->ismultientitymanaged) { if ($object->ismultientitymanaged == 1) { // Nothing here } else { $tmparray = explode('@', $object->ismultientitymanaged); $sql .= ' INNER JOIN '.MAIN_DB_PREFIX.$tmparray[1].' as parenttable ON t.'.$tmparray[0].' = parenttable.rowid'; $sql .= ' AND parenttable.entity IN ('.getEntity($tmparray[1]).')'; } } $sql .= ' WHERE 1 = 1'; if ($object->ismultientitymanaged == 1) { $sql .= ' AND entity IN ('.getEntity($object->element).')'; } foreach ($search_filters as $key => $val) { // TODO Add the where here } $sql .= ' GROUP BY '; foreach ($search_xaxis as $key => $val) { if (preg_match('/\-year$/', $val)) { $tmpval = preg_replace('/\-year$/', '', $val); $sql .= 'DATE_FORMAT('.$tmpval.", '%Y'), "; } elseif (preg_match('/\-month$/', $val)) { $tmpval = preg_replace('/\-month$/', '', $val); $sql .= 'DATE_FORMAT('.$tmpval.", '%Y-%m'), "; } elseif (preg_match('/\-day$/', $val)) { $tmpval = preg_replace('/\-day$/', '', $val); $sql .= 'DATE_FORMAT('.$tmpval.", '%Y-%m-%d'), "; } else $sql .= $val.', '; } foreach ($search_groupby as $key => $val) { if (preg_match('/\-year$/', $val)) { $tmpval = preg_replace('/\-year$/', '', $val); $sql .= 'DATE_FORMAT('.$tmpval.", '%Y'), "; } elseif (preg_match('/\-month$/', $val)) { $tmpval = preg_replace('/\-month$/', '', $val); $sql .= 'DATE_FORMAT('.$tmpval.", '%Y-%m'), "; } elseif (preg_match('/\-day$/', $val)) { $tmpval = preg_replace('/\-day$/', '', $val); $sql .= 'DATE_FORMAT('.$tmpval.", '%Y-%m-%d'), "; } else $sql .= $val.', '; } $sql = preg_replace('/,\s*$/', '', $sql); $sql .= ' ORDER BY '; foreach ($search_xaxis as $key => $val) { if (preg_match('/\-year$/', $val)) { $tmpval = preg_replace('/\-year$/', '', $val); $sql .= 'DATE_FORMAT('.$tmpval.", '%Y'), "; } elseif (preg_match('/\-month$/', $val)) { $tmpval = preg_replace('/\-month$/', '', $val); $sql .= 'DATE_FORMAT('.$tmpval.", '%Y-%m'), "; } elseif (preg_match('/\-day$/', $val)) { $tmpval = preg_replace('/\-day$/', '', $val); $sql .= 'DATE_FORMAT('.$tmpval.", '%Y-%m-%d'), "; } else $sql .= $val.', '; } foreach ($search_groupby as $key => $val) { if (preg_match('/\-year$/', $val)) { $tmpval = preg_replace('/\-year$/', '', $val); $sql .= 'DATE_FORMAT('.$tmpval.", '%Y'), "; } elseif (preg_match('/\-month$/', $val)) { $tmpval = preg_replace('/\-month$/', '', $val); $sql .= 'DATE_FORMAT('.$tmpval.", '%Y-%m'), "; } elseif (preg_match('/\-day$/', $val)) { $tmpval = preg_replace('/\-day$/', '', $val); $sql .= 'DATE_FORMAT('.$tmpval.", '%Y-%m-%d'), "; } else $sql .= $val.', '; } $sql = preg_replace('/,\s*$/', '', $sql); } //print $sql; $legend = array(); foreach ($search_measures as $key => $val) { $legend[] = $langs->trans($arrayofmesures[$val]); } $useagroupby = (is_array($search_groupby) && count($search_groupby)); //var_dump($useagroupby); //var_dump($arrayofvaluesforgroupby); // Execute the SQL request $totalnbofrecord = 0; $data = array(); if ($sql) { $resql = $db->query($sql); if (!$resql) { dol_print_error($db); } $ifetch = 0; $xi = 0; $oldlabeltouse = ''; while ($obj = $db->fetch_object($resql)) { $ifetch++; if ($useagroupby) { $xval = $search_xaxis[0]; $fieldforxkey = 'x_0'; $xlabel = $obj->$fieldforxkey; $xvalwithoutprefix = preg_replace('/^[a-z]+\./', '', $xval); // Define $xlabel if (!empty($object->fields[$xvalwithoutprefix]['arrayofkeyval'])) { $xlabel = $object->fields[$xvalwithoutprefix]['arrayofkeyval'][$obj->$fieldforxkey]; } $labeltouse = (($xlabel || $xlabel == '0') ? dol_trunc($xlabel, 20, 'middle') : ($xlabel === '' ? $langs->trans("Empty") : $langs->trans("NotDefined"))); if ($oldlabeltouse && ($labeltouse != $oldlabeltouse)) { $xi++; // Increase $xi } //var_dump($labeltouse.' '.$oldlabeltouse.' '.$xi); $oldlabeltouse = $labeltouse; /* Example of value for $arrayofvaluesforgroupby * array (size=1) * 'g_0' => * array (size=6) * 0 => string '0' (length=1) * '' => string 'Empty' (length=5) * '__NULL__' => string 'Not defined' (length=11) * 'done' => string 'done' (length=4) * 'processing' => string 'processing' (length=10) * 'undeployed' => string 'undeployed' (length=10) */ foreach ($search_measures as $key => $val) { $gi = 0; foreach ($search_groupby as $gkey) { //var_dump('*** Fetch #'.$ifetch.' for labeltouse='.$labeltouse.' measure number '.$key.' and group g_'.$gi); //var_dump($arrayofvaluesforgroupby); foreach ($arrayofvaluesforgroupby['g_'.$gi] as $gvaluepossiblekey => $gvaluepossiblelabel) { $ykeysuffix = $gvaluepossiblelabel; $gvalwithoutprefix = preg_replace('/^[a-z]+\./', '', $gval); $fieldfory = 'y_'.$key; $fieldforg = 'g_'.$gi; $fieldforybis = 'y_'.$key.'_'.$ykeysuffix; //var_dump('gvaluepossiblekey='.$gvaluepossiblekey.' gvaluepossiblelabel='.$gvaluepossiblelabel.' ykeysuffix='.$ykeysuffix.' gval='.$gval.' gvalwithoutsuffix='.$gvalwithoutprefix); //var_dump('fieldforg='.$fieldforg.' obj->$fieldforg='.$obj->$fieldforg.' fieldfory='.$fieldfory.' obj->$fieldfory='.$obj->$fieldfory.' fieldforybis='.$fieldforybis); if (!is_array($data[$xi])) $data[$xi] = array(); if (!array_key_exists('label', $data[$xi])) { $data[$xi] = array(); $data[$xi]['label'] = $labeltouse; } $objfieldforg = $obj->$fieldforg; if (is_null($objfieldforg)) $objfieldforg = '__NULL__'; if ($gvaluepossiblekey == '0') { // $gvaluepossiblekey can have type int or string. So we create a special if, used when value is '0' //var_dump($objfieldforg.' == \'0\' -> '.($objfieldforg == '0')); if ($objfieldforg == '0') { // The record we fetch is for this group $data[$xi][$fieldforybis] = $obj->$fieldfory; } // The record we fetch is not for this group elseif (!isset($data[$xi][$fieldforybis])) { $data[$xi][$fieldforybis] = '0'; } } else { //var_dump((string) $objfieldforg.' === '.(string) $gvaluepossiblekey.' -> '.((string) $objfieldforg === (string) $gvaluepossiblekey)); if ((string) $objfieldforg === (string) $gvaluepossiblekey) { // The record we fetch is for this group $data[$xi][$fieldforybis] = $obj->$fieldfory; } // The record we fetch is not for this group elseif (!isset($data[$xi][$fieldforybis])) { $data[$xi][$fieldforybis] = '0'; } } } //var_dump($data[$xi]); $gi++; } } } else { // No group by $xval = $search_xaxis[0]; $fieldforxkey = 'x_0'; $xlabel = $obj->$fieldforxkey; $xvalwithoutprefix = preg_replace('/^[a-z]+\./', '', $xval); // Define $xlabel if (!empty($object->fields[$xvalwithoutprefix]['arrayofkeyval'])) { $xlabel = $object->fields[$xvalwithoutprefix]['arrayofkeyval'][$obj->$fieldforxkey]; } $labeltouse = (($xlabel || $xlabel == '0') ? dol_trunc($xlabel, 20, 'middle') : ($xlabel === '' ? $langs->trans("Empty") : $langs->trans("NotDefined"))); $xarrayforallseries = array('label' => $labeltouse); foreach ($search_measures as $key => $val) { $fieldfory = 'y_'.$key; $xarrayforallseries[$fieldfory] = $obj->$fieldfory; } $data[$xi] = $xarrayforallseries; $xi++; } } $totalnbofrecord = count($data); } //var_dump($data); print '<div class="customreportsoutput'.($totalnbofrecord ? '' : ' customreportsoutputnotdata').'">'; if ($mode == 'grid') { // TODO } if ($mode == 'graph') { $WIDTH = '80%'; $HEIGHT = 200; // Show graph $px1 = new DolGraph(); $mesg = $px1->isGraphKo(); if (!$mesg) { /*var_dump($legend); var_dump($data);*/ $px1->SetData($data); unset($data); $arrayoftypes = array(); foreach ($search_measures as $key => $val) { $arrayoftypes[] = $search_graph; } $px1->SetLegend($legend); $px1->SetMinValue($px1->GetFloorMinValue()); $px1->SetMaxValue($px1->GetCeilMaxValue()); $px1->SetWidth($WIDTH); $px1->SetHeight($HEIGHT); $px1->SetYLabel($langs->trans("Y")); $px1->SetShading(3); $px1->SetHorizTickIncrement(1); $px1->SetCssPrefix("cssboxes"); $px1->SetType($arrayoftypes); $px1->mode = 'depth'; $px1->SetTitle(''); $dir = $conf->user->dir_temp; dol_mkdir($dir); $filenamenb = $dir.'/customreport_'.$object->element.'.png'; $fileurlnb = DOL_URL_ROOT.'/viewimage.php?modulepart=user&file=customreport_'.$object->element.'.png'; $px1->draw($filenamenb, $fileurlnb); $texttoshow = $langs->trans("NoRecordFound"); if (!GETPOSTISSET('search_measures') || !GETPOSTISSET('search_xaxis')) { $texttoshow = $langs->trans("SelectYourGraphOptionsFirst"); } print $px1->show($totalnbofrecord ? 0 : $texttoshow); } } if ($sql) { // Show admin info print '<br>'.info_admin($langs->trans("SQLUsedForExport").':<br> '.$sql, 0, 0, 1, '', 'TechnicalInformation'); } print '<div>'; if (!defined('USE_CUSTOME_REPORT_AS_INCLUDE')) { dol_fiche_end(); } // End of page llxFooter(); $db->close();