dolibarr 22.0.5
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="underbanner clearboth"></div>';
141 print '<table class="border tableforfield" width="100%">';
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 $sql .= $db->order($sortfield, $sortorder);
183
184 // Calcul total qty and amount for global if full scan list
185 $total_ht = 0;
186 $total_qty = 0;
187
188 // Count total nb of records
189 $totalofrecords = '';
190 if (!getDolGlobalInt('MAIN_DISABLE_FULL_SCANLIST')) {
191 $result = $db->query($sql);
192 $totalofrecords = $db->num_rows($result);
193 }
194
195 $sql .= $db->plimit($limit + 1, $offset);
196
197 $result = $db->query($sql);
198 if ($result) {
199 $num = $db->num_rows($result);
200
201 $option = '&id='.$product->id;
202
203 if ($limit > 0 && $limit != $conf->liste_limit) {
204 $option .= '&limit='.((int) $limit);
205 }
206 if (!empty($search_month)) {
207 $option .= '&search_month='.urlencode((string) ($search_month));
208 }
209 if (!empty($search_year)) {
210 $option .= '&search_year='.urlencode((string) ($search_year));
211 }
212
213 print '<form method="post" action="'.$_SERVER['PHP_SELF'].'?id='.$product->id.'" name="search_form">'."\n";
214 print '<input type="hidden" name="token" value="'.newToken().'">';
215 if (!empty($sortfield)) {
216 print '<input type="hidden" name="sortfield" value="'.$sortfield.'"/>';
217 }
218 if (!empty($sortorder)) {
219 print '<input type="hidden" name="sortorder" value="'.$sortorder.'"/>';
220 }
221
222 // @phan-suppress-next-line PhanPluginSuspiciousParamOrder
223 print_barre_liste($langs->trans("Proposals"), $page, $_SERVER["PHP_SELF"], $option, $sortfield, $sortorder, '', $num, $totalofrecords, '', 0, '', '', $limit, 0, 0, 1);
224
225 if (!empty($page)) {
226 $option .= '&page='.urlencode((string) ($page));
227 }
228
229 print '<div class="liste_titre liste_titre_bydiv centpercent">';
230 print '<div class="divsearchfield">';
231 print $langs->trans('Period').' ('.$langs->trans("DatePropal").') - ';
232 print $langs->trans('Month').':<input class="flat" type="text" size="4" name="search_month" value="'.($search_month > 0 ? $search_month : '').'"> ';
233 print $langs->trans('Year').':'.$formother->selectyear(($search_year ? (string) $search_year : '-1'), 'search_year', 1, 20, 5);
234 print '<div style="vertical-align: middle; display: inline-block">';
235 print '<input type="image" class="liste_titre" 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")).'">';
236 print '<input type="image" class="liste_titre" 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")).'">';
237 print '</div>';
238 print '</div>';
239 print '</div>';
240
241 $i = 0;
242 print '<div class="div-table-responsive">';
243 print '<table class="tagtable liste listwithfilterbefore centpercent">';
244 print '<tr class="liste_titre">';
245 print_liste_field_titre("Ref", $_SERVER["PHP_SELF"], "p.rowid", "", $option, '', $sortfield, $sortorder);
246 print_liste_field_titre("Company", $_SERVER["PHP_SELF"], "s.nom", "", $option, '', $sortfield, $sortorder);
247 print_liste_field_titre("DatePropal", $_SERVER["PHP_SELF"], "p.datep", "", $option, '', $sortfield, $sortorder, 'center ');
248 print_liste_field_titre("Qty", $_SERVER["PHP_SELF"], "d.qty", "", $option, '', $sortfield, $sortorder, 'center ');
249 print_liste_field_titre("AmountHT", $_SERVER["PHP_SELF"], "d.total_ht", "", $option, '', $sortfield, $sortorder, 'right ');
250 print_liste_field_titre("Status", $_SERVER["PHP_SELF"], "p.fk_statut", "", $option, '', $sortfield, $sortorder, 'right ');
251 print "</tr>\n";
252
253 if ($num > 0) {
254 while ($i < min($num, $limit)) {
255 $objp = $db->fetch_object($result);
256
257 $total_ht += $objp->amount;
258 $total_qty += $objp->qty;
259
260 $propalstatic->id = $objp->propalid;
261 $propalstatic->ref = $objp->ref;
262 $propalstatic->ref_client = $objp->ref_client;
263 $propalstatic->ref_customer = $objp->ref_client;
264 $societestatic->fetch($objp->socid);
265
266 print '<tr class="oddeven">';
267 print '<td class="tdoverflowmax150">';
268 print $propalstatic->getNomUrl(1);
269 print "</td>\n";
270 print '<td>'.$societestatic->getNomUrl(1).'</td>';
271 print '<td class="center">';
272 print dol_print_date($db->jdate($objp->datep), 'dayhour')."</td>";
273 print "<td align=\"center\">".$objp->qty."</td>\n";
274 print '<td align="right">'.price($objp->amount).'</td>'."\n";
275 print '<td align="right">'.$propalstatic->LibStatut($objp->statut, 5).'</td>';
276 print "</tr>\n";
277 $i++;
278 }
279 }
280
281 print '<tr class="liste_total">';
282 if ($num < $limit && empty($offset)) {
283 print '<td>'.$langs->trans("Total").'</td>';
284 } else {
285 print '<td>'.$form->textwithpicto($langs->trans("Total"), $langs->trans("Totalforthispage")).'</td>';
286 }
287 print '<td colspan="2"></td>';
288 print '<td class="center">'.$total_qty.'</td>';
289 print '<td align="right">'.price($total_ht).'</td>';
290 print '<td></td>';
291 print "</table>";
292 print '</div>';
293 print '</form>';
294 } else {
295 dol_print_error($db);
296 }
297 $db->free($result);
298 }
299 }
300} else {
302}
303
304// End of page
305llxFooter();
306$db->close();
$id
Support class for third parties, contacts, members, users or resources.
Definition account.php:48
if( $user->socid > 0) if(! $user->hasRight('accounting', 'chartofaccount')) $object
Definition card.php:67
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 permettant la generation de composants html autre 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...)
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.
dol_print_date($time, $format='', $tzoutput='auto', $outputlangs=null, $encodetooutput=false)
Output date in a string format according to outputlangs (or langs if not defined).
GETPOST($paramname, $check='alphanohtml', $method=0, $filter=null, $options=null, $noreplace=0)
Return value of a param into GET or POST supervariable.
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...
global $conf
The following vars must be defined: $type2label $form $conf, $lang, The following vars may also be de...
Definition member.php:79
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.