dolibarr 24.0.0-beta
propal.php
Go to the documentation of this file.
1<?php
2/* Copyright (C) 2004-2007 Rodolphe Quiedeville <rodolphe@quiedeville.org>
3 * Copyright (C) 2004-2009 Laurent Destailleur <eldy@users.sourceforge.net>
4 * Copyright (C) 2005-2012 Regis Houssin <regis.houssin@inodbox.com>
5 * Copyright (C) 2014 Florian Henry <florian.henry@open-concept.pro>
6 * Copyright (C) 2024 Frédéric France <frederic.france@free.fr>
7 * Copyright (C) 2025 MDW <mdeweerd@users.noreply.github.com>
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 */
22
29// Load Dolibarr environment
30require '../../main.inc.php';
31require_once DOL_DOCUMENT_ROOT.'/core/lib/product.lib.php';
32require_once DOL_DOCUMENT_ROOT.'/comm/propal/class/propal.class.php';
33require_once DOL_DOCUMENT_ROOT.'/product/class/product.class.php';
34require_once DOL_DOCUMENT_ROOT.'/core/class/html.formother.class.php';
35
44// Load translation files required by the page
45$langs->loadLangs(array('products', 'companies'));
46
47$id = GETPOSTINT('id');
48$ref = GETPOST('ref', 'alpha');
49
50// Security check
51$fieldvalue = (!empty($id) ? $id : (!empty($ref) ? $ref : ''));
52$fieldtype = (!empty($ref) ? 'ref' : 'rowid');
53$socid = '';
54
55if (!empty($user->socid)) {
56 $socid = $user->socid;
57}
58
59// Initialize a technical object to manage hooks of page. Note that conf->hooks_modules contains an array of hook context
60$hookmanager->initHooks(array('productstatspropal'));
61
62$result = restrictedArea($user, 'produit|service', $fieldvalue, 'product&product', '', '', $fieldtype);
63
64// Load variable for pagination
65$limit = GETPOSTINT('limit') ? GETPOSTINT('limit') : $conf->liste_limit;
66$sortfield = GETPOST('sortfield', 'aZ09comma');
67$sortorder = GETPOST('sortorder', 'aZ09comma');
68$page = GETPOSTISSET('pageplusone') ? (GETPOSTINT('pageplusone') - 1) : GETPOSTINT("page");
69if (empty($page) || $page == -1) {
70 $page = 0;
71} // If $page is not defined, or '' or -1
72$offset = $limit * $page;
73$pageprev = $page - 1;
74$pagenext = $page + 1;
75if (!$sortorder) {
76 $sortorder = "DESC";
77}
78if (!$sortfield) {
79 $sortfield = "p.datep";
80}
81
82$search_month = GETPOSTINT('search_month');
83$search_year = GETPOSTINT('search_year');
84
85if (GETPOST('button_removefilter_x', 'alpha') || GETPOST('button_removefilter', 'alpha')) {
86 $search_month = '';
87 $search_year = '';
88}
89
90$result = restrictedArea($user, 'produit|service', $fieldvalue, 'product&product', '', '', $fieldtype);
91
92
93/*
94 * View
95 */
96
97$propalstatic = new Propal($db);
98$societestatic = new Societe($db);
99
100$form = new Form($db);
101$formother = new FormOther($db);
102
103if ($id > 0 || !empty($ref)) {
104 $product = new Product($db);
105 $result = $product->fetch($id, $ref);
106
107 $object = $product;
108
109 $parameters = array('id' => $id);
110 $reshook = $hookmanager->executeHooks('doActions', $parameters, $product, $action); // Note that $action and $object may have been modified by some hooks
111 if ($reshook < 0) {
112 setEventMessages($hookmanager->error, $hookmanager->errors, 'errors');
113 }
114
115 llxHeader("", "", $langs->trans("CardProduct".$product->type), '', 0, 0, '', '', 'mod-product page-stats_propal');
116
117 if ($result > 0) {
118 $head = product_prepare_head($product);
119 $titre = $langs->trans("CardProduct".$product->type);
120 $picto = ($product->type == Product::TYPE_SERVICE ? 'service' : 'product');
121 print dol_get_fiche_head($head, 'referers', $titre, -1, $picto);
122
123 $reshook = $hookmanager->executeHooks('formObjectOptions', $parameters, $product, $action); // Note that $action and $object may have been modified by hook
124 print $hookmanager->resPrint;
125 if ($reshook < 0) {
126 setEventMessages($hookmanager->error, $hookmanager->errors, 'errors');
127 }
128
129 $linkback = '<a href="'.DOL_URL_ROOT.'/product/list.php?restore_lastsearch_values=1">'.$langs->trans("BackToList").'</a>';
130
131 $shownav = 1;
132 if ($user->socid && !in_array('product', explode(',', getDolGlobalString('MAIN_MODULES_FOR_EXTERNAL')))) {
133 $shownav = 0;
134 }
135
136 dol_banner_tab($object, 'ref', $linkback, $shownav, 'ref');
137
138 print '<div class="fichecenter">';
139
140 print '<div class="clearboth"></div>';
141 print '<table class="noborder tableforfield centpercent">';
142
143 $nboflines = show_stats_for_company($product, $socid);
144
145 print "</table>";
146
147 print '</div>';
148 print '<div class="clearboth"></div>';
149
150 print dol_get_fiche_end();
151
152
153 if ($user->hasRight('propal', 'lire')) {
154 $sql = "SELECT DISTINCT s.nom as name, s.rowid as socid, p.rowid as propalid, p.ref, d.total_ht as amount,";
155 $sql .= " p.ref_client,";
156 $sql .= "p.datep, p.fk_statut as statut, d.rowid, d.qty";
157 if (!$user->hasRight('societe', 'client', 'voir')) {
158 $sql .= ", sc.fk_soc, sc.fk_user ";
159 }
160 $sql .= " FROM ".MAIN_DB_PREFIX."societe as s";
161 $sql .= ",".MAIN_DB_PREFIX."propal as p";
162 $sql .= ", ".MAIN_DB_PREFIX."propaldet as d";
163 if (!$user->hasRight('societe', 'client', 'voir')) {
164 $sql .= ", ".MAIN_DB_PREFIX."societe_commerciaux as sc";
165 }
166 $sql .= " WHERE p.fk_soc = s.rowid";
167 $sql .= " AND p.entity IN (".getEntity('propal').")";
168 $sql .= " AND d.fk_propal = p.rowid";
169 $sql .= " AND d.fk_product = ".((int) $product->id);
170 if (!empty($search_month)) {
171 $sql .= ' AND MONTH(p.datep) = '.((int) $search_month);
172 }
173 if (!empty($search_year)) {
174 $sql .= ' AND YEAR(p.datep) = '.((int) $search_year);
175 }
176 if (!$user->hasRight('societe', 'client', 'voir')) {
177 $sql .= " AND s.rowid = sc.fk_soc AND sc.fk_user = ".((int) $user->id);
178 }
179 if ($socid) {
180 $sql .= " AND p.fk_soc = ".((int) $socid);
181 }
182 // Add where from hooks
183 $parameters = array('socid' => $socid, 'type_element' => 'propal');
184 $reshook = $hookmanager->executeHooks('printFieldListWhere', $parameters, $object); // Note that $action and $object may have been modified by hook
185 $sql .= $hookmanager->resPrint;
186 $sql .= $db->order($sortfield, $sortorder);
187
188 // Calcul total qty and amount for global if full scan list
189 $total_ht = 0;
190 $total_qty = 0;
191
192 // Count total nb of records
193 $totalofrecords = '';
194 if (!getDolGlobalInt('MAIN_DISABLE_FULL_SCANLIST')) {
195 $result = $db->query($sql);
196 $totalofrecords = $db->num_rows($result);
197 }
198
199 $sql .= $db->plimit($limit + 1, $offset);
200
201 $result = $db->query($sql);
202 if ($result) {
203 $num = $db->num_rows($result);
204
205 $option = '&id='.$product->id;
206
207 if ($limit > 0 && $limit != $conf->liste_limit) {
208 $option .= '&limit='.((int) $limit);
209 }
210 if (!empty($search_month)) {
211 $option .= '&search_month='.urlencode((string) ($search_month));
212 }
213 if (!empty($search_year)) {
214 $option .= '&search_year='.urlencode((string) ($search_year));
215 }
216
217 print '<span id="anchorundermenu" class="anchorundermenu"></span>';
218 print '<form method="post" action="'.$_SERVER['PHP_SELF'].'?id='.$product->id.'" name="search_form">'."\n";
219 print '<input type="hidden" name="token" value="'.newToken().'">';
220 print '<input type="hidden" name="page_y" value="">';
221 if (!empty($sortfield)) {
222 print '<input type="hidden" name="sortfield" value="'.$sortfield.'"/>';
223 }
224 if (!empty($sortorder)) {
225 print '<input type="hidden" name="sortorder" value="'.$sortorder.'"/>';
226 }
227
228 // @phan-suppress-next-line PhanPluginSuspiciousParamOrder
229 print_barre_liste($langs->trans("Proposals"), $page, $_SERVER["PHP_SELF"], $option, $sortfield, $sortorder, '', $num, $totalofrecords, '', 0, '', '', $limit, 0, 0, 1);
230
231 if (!empty($page)) {
232 $option .= '&page='.urlencode((string) ($page));
233 }
234
235 print '<div class="liste_titre liste_titre_bydiv centpercent">';
236 print '<div class="divsearchfield">';
237 print $langs->trans('Period').' ('.$langs->trans("DatePropal").') - ';
238 print $langs->trans('Month').':<input class="flat" type="text" size="4" name="search_month" value="'.($search_month > 0 ? $search_month : '').'"> ';
239 print $langs->trans('Year').':'.$formother->selectyear(($search_year ? (string) $search_year : '-1'), 'search_year', 1, 20, 5);
240 print '<div style="vertical-align: middle; display: inline-block">';
241 print '<input type="image" class="liste_titre reposition" name="button_search" src="'.img_picto($langs->trans("Search"), 'search.png', '', 0, 1).'" value="'.dol_escape_htmltag($langs->trans("Search")).'" title="'.dol_escape_htmltag($langs->trans("Search")).'">';
242 print '<input type="image" class="liste_titre reposition" name="button_removefilter" src="'.img_picto($langs->trans("Search"), 'searchclear.png', '', 0, 1).'" value="'.dol_escape_htmltag($langs->trans("RemoveFilter")).'" title="'.dol_escape_htmltag($langs->trans("RemoveFilter")).'">';
243 print '</div>';
244 print '</div>';
245 print '</div>';
246
247 $i = 0;
248 print '<div class="div-table-responsive">';
249 print '<table class="tagtable liste listwithfilterbefore centpercent">';
250 print '<tr class="liste_titre">';
251 print_liste_field_titre("Ref", $_SERVER["PHP_SELF"], "p.rowid", "", $option, '', $sortfield, $sortorder);
252 print_liste_field_titre("Company", $_SERVER["PHP_SELF"], "s.nom", "", $option, '', $sortfield, $sortorder);
253 print_liste_field_titre("DatePropal", $_SERVER["PHP_SELF"], "p.datep", "", $option, '', $sortfield, $sortorder, 'center ');
254 print_liste_field_titre("Qty", $_SERVER["PHP_SELF"], "d.qty", "", $option, '', $sortfield, $sortorder, 'center ');
255 print_liste_field_titre("AmountHT", $_SERVER["PHP_SELF"], "d.total_ht", "", $option, '', $sortfield, $sortorder, 'right ');
256 print_liste_field_titre("Status", $_SERVER["PHP_SELF"], "p.fk_statut", "", $option, '', $sortfield, $sortorder, 'right ');
257 print "</tr>\n";
258
259 if ($num > 0) {
260 while ($i < min($num, $limit)) {
261 $objp = $db->fetch_object($result);
262
263 $total_ht += $objp->amount;
264 $total_qty += $objp->qty;
265
266 $propalstatic->id = $objp->propalid;
267 $propalstatic->ref = $objp->ref;
268 $propalstatic->ref_client = $objp->ref_client;
269 $propalstatic->ref_customer = $objp->ref_client;
270 $societestatic->fetch($objp->socid);
271
272 print '<tr class="oddeven">';
273 print '<td class="tdoverflowmax150">';
274 print $propalstatic->getNomUrl(1);
275 print "</td>\n";
276 print '<td class="tdoverflowmax125">'.$societestatic->getNomUrl(1).'</td>';
277 print '<td class="center">';
278 print dol_print_date($db->jdate($objp->datep), 'dayhour')."</td>";
279 print '<td class="center">'.$objp->qty."</td>\n";
280 print '<td class="right">'.price($objp->amount).'</td>'."\n";
281 print '<td class="right">'.$propalstatic->LibStatut($objp->statut, 5).'</td>';
282 print "</tr>\n";
283 $i++;
284 }
285 }
286
287 print '<tr class="liste_total">';
288 if ($num < $limit && empty($offset)) {
289 print '<td>'.$langs->trans("Total").'</td>';
290 } else {
291 print '<td>'.$form->textwithpicto($langs->trans("Total"), $langs->trans("Totalforthispage")).'</td>';
292 }
293 print '<td colspan="2"></td>';
294 print '<td class="center">'.$total_qty.'</td>';
295 print '<td align="right">'.price($total_ht).'</td>';
296 print '<td></td>';
297 print "</table>";
298 print '</div>';
299 print '</form>';
300 } else {
302 }
303 $db->free($result);
304 }
305 }
306} else {
308}
309
310// End of page
311llxFooter();
312$db->close();
$id
Support class for third parties, contacts, members, users or resources.
Definition account.php:47
if(! $sortfield) if(! $sortorder) $object
Definition account.php:100
llxFooter($comment='', $zone='private', $disabledoutputofmessages=0)
Empty footer.
Definition wrapper.php:91
if(!defined('NOREQUIRESOC')) if(!defined( 'NOREQUIRETRAN')) if(!defined('NOTOKENRENEWAL')) if(!defined( 'NOREQUIREMENU')) if(!defined('NOREQUIREHTML')) if(!defined( 'NOREQUIREAJAX')) llxHeader($head='', $title='', $help_url='', $target='', $disablejs=0, $disablehead=0, $arrayofjs='', $arrayofcss='', $morequerystring='', $morecssonbody='', $replacemainareaby='', $disablenofollow=0, $disablenoindex=0)
Empty header.
Definition wrapper.php:73
Class to manage generation of HTML components Only common components must be here.
Class to help generate other html components Only common components are here.
Class to manage products or services.
const TYPE_SERVICE
Service.
Class to manage proposals.
Class to manage third parties objects (customers, suppliers, prospects...)
if(!isModEnabled('ai')||!getDolGlobalString('AI_ASSISTANT_ENABLED')) global $conf
The main.inc.php has been included so the following variable are now defined:
if(!isModEnabled('ai')||!getDolGlobalString('AI_ASSISTANT_ENABLED')) global $db
API class for accounts.
setEventMessages($mesg, $mesgs, $style='mesgs', $messagekey='', $noduplicate=0, $attop=0)
Set event messages in dol_events session object.
print_liste_field_titre($name, $file="", $field="", $begin="", $param="", $moreattrib="", $sortfield="", $sortorder="", $prefix="", $tooltip="", $forcenowrapcolumntitle=0)
Show title line of an array.
print_barre_liste($title, $page, $file, $options='', $sortfield='', $sortorder='', $morehtmlcenter='', $num=-1, $totalnboflines='', $picto='generic', $pictoisfullpath=0, $morehtmlright='', $morecss='', $limit=-1, $selectlimitsuffix=0, $hidenavigation=0, $pagenavastextinput=0, $morehtmlrightbeforearrow='')
Print a title with navigation controls for pagination.
GETPOSTINT($paramname, $method=0)
Return the value of a $_GET or $_POST supervariable, converted into integer.
dol_get_fiche_head($links=array(), $active='', $title='', $notab=0, $picto='', $pictoisfullpath=0, $morehtmlright='', $morecss='', $limittoshow=0, $moretabssuffix='', $dragdropfile=0, $morecssdiv='')
Show tabs of a record.
dol_get_fiche_end($notab=0)
Return tab footer of a card.
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.
dol_print_date($time, $format='', $tzoutput='auto', $outputlangs=null, $encodetooutput=false, $decorate=0)
Output date in a string format according to outputlangs (or langs if not defined).
dol_print_error($db=null, $error='', $errors=null)
Displays error message system with all the information to facilitate the diagnosis and the escalation...
getDolGlobalString($key, $default='')
Return a Dolibarr global constant string value.
dol_escape_htmltag($stringtoescape, $keepb=0, $keepn=0, $noescapetags='', $escapeonlyhtmltags=0, $cleanalsojavascript=0)
Returns text escaped for inclusion in HTML alt or title or value tags, or into values of HTML input f...
product_prepare_head($object)
Prepare array with list of tabs.
show_stats_for_company($product, $socid)
Show stats for a product.
restrictedArea(User $user, $features, $object=0, $tableandshare='', $feature2='', $dbt_keyfield='fk_soc', $dbt_select='rowid', $isdraft=0, $mode=0)
Check permissions of a user to show a page and an object.