dolibarr 21.0.0-beta
supplier_proposal.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 *
8 * This program is free software; you can redistribute it and/or modify
9 * it under the terms of the GNU General Public License as published by
10 * the Free Software Foundation; either version 3 of the License, or
11 * (at your option) any later version.
12 *
13 * This program is distributed in the hope that it will be useful,
14 * but WITHOUT ANY WARRANTY; without even the implied warranty of
15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 * GNU General Public License for more details.
17 *
18 * You should have received a copy of the GNU General Public License
19 * along with this program. If not, see <https://www.gnu.org/licenses/>.
20 */
21
28// Load Dolibarr environment
29require '../../main.inc.php';
30require_once DOL_DOCUMENT_ROOT.'/core/lib/product.lib.php';
31require_once DOL_DOCUMENT_ROOT.'/supplier_proposal/class/supplier_proposal.class.php';
32require_once DOL_DOCUMENT_ROOT.'/product/class/product.class.php';
33require_once DOL_DOCUMENT_ROOT.'/core/class/html.formother.class.php';
34
43// Load translation files required by the page
44$langs->loadLangs(array('products', 'companies', 'supplier_proposal'));
45
46$id = GETPOSTINT('id');
47$ref = GETPOST('ref', 'alpha');
48
49// Security check
50$fieldvalue = (!empty($id) ? $id : (!empty($ref) ? $ref : ''));
51$fieldtype = (!empty($ref) ? 'ref' : 'rowid');
52$socid = '';
53if (!empty($user->socid)) {
54 $socid = $user->socid;
55}
56
57// Initialize a technical object to manage hooks of page. Note that conf->hooks_modules contains an array of hook context
58$hookmanager->initHooks(array('productstatssupplierpropal'));
59
60// Load variable for pagination
61$limit = GETPOSTINT('limit') ? GETPOSTINT('limit') : $conf->liste_limit;
62$sortfield = GETPOST('sortfield', 'aZ09comma');
63$sortorder = GETPOST('sortorder', 'aZ09comma');
64$page = GETPOSTISSET('pageplusone') ? (GETPOSTINT('pageplusone') - 1) : GETPOSTINT("page");
65if (empty($page) || $page == -1) {
66 $page = 0;
67} // If $page is not defined, or '' or -1
68$offset = $limit * $page;
69$pageprev = $page - 1;
70$pagenext = $page + 1;
71if (!$sortorder) {
72 $sortorder = "DESC";
73}
74if (!$sortfield) {
75 $sortfield = "p.date_valid";
76}
77
78$search_month = GETPOSTINT('search_month');
79$search_year = GETPOSTINT('search_year');
80
81if (GETPOST('button_removefilter_x', 'alpha') || GETPOST('button_removefilter', 'alpha')) {
82 $search_month = '';
83 $search_year = '';
84}
85
86$result = restrictedArea($user, 'produit|service', $fieldvalue, 'product&product', '', '', $fieldtype);
87
88
89/*
90 * View
91 */
92
93$propalstatic = new SupplierProposal($db);
94$societestatic = new Societe($db);
95
96$form = new Form($db);
97$formother = new FormOther($db);
98
99if ($id > 0 || !empty($ref)) {
100 $product = new Product($db);
101 $result = $product->fetch($id, $ref);
102
103 $object = $product;
104
105 $parameters = array('id' => $id);
106 $reshook = $hookmanager->executeHooks('doActions', $parameters, $product, $action); // Note that $action and $object may have been modified by some hooks
107 if ($reshook < 0) {
108 setEventMessages($hookmanager->error, $hookmanager->errors, 'errors');
109 }
110
111 llxHeader("", "", $langs->trans("CardProduct".$product->type), '', 0, 0, '', '', '', '', 'mod-product page-stats_supplier_proposal');
112
113 if ($result > 0) {
114 $head = product_prepare_head($product);
115 $titre = $langs->trans("CardProduct".$product->type);
116 $picto = ($product->type == Product::TYPE_SERVICE ? 'service' : 'product');
117 print dol_get_fiche_head($head, 'referers', $titre, -1, $picto);
118
119 $reshook = $hookmanager->executeHooks('formObjectOptions', $parameters, $product, $action); // Note that $action and $object may have been modified by hook
120 print $hookmanager->resPrint;
121 if ($reshook < 0) {
122 setEventMessages($hookmanager->error, $hookmanager->errors, 'errors');
123 }
124
125 $linkback = '<a href="'.DOL_URL_ROOT.'/product/list.php?restore_lastsearch_values=1">'.$langs->trans("BackToList").'</a>';
126
127 $shownav = 1;
128 if ($user->socid && !in_array('product', explode(',', getDolGlobalString('MAIN_MODULES_FOR_EXTERNAL')))) {
129 $shownav = 0;
130 }
131
132 dol_banner_tab($object, 'ref', $linkback, $shownav, 'ref');
133
134 print '<div class="fichecenter">';
135
136 print '<div class="underbanner clearboth"></div>';
137 print '<table class="border tableforfield" width="100%">';
138
139 $nboflines = show_stats_for_company($product, $socid);
140
141 print "</table>";
142
143 print '</div>';
144 print '<div class="clearboth"></div>';
145
146 print dol_get_fiche_end();
147
148
149 if ($user->hasRight('propal', 'lire')) {
150 $sql = "SELECT DISTINCT s.nom as name, s.rowid as socid, p.rowid as propalid, p.ref, d.total_ht as amount,";
151 //$sql .= " p.ref_supplier,";
152 $sql .= "p.date_valid, p.fk_statut as statut, d.rowid, d.qty";
153 if (!$user->hasRight('societe', 'client', 'voir')) {
154 $sql .= ", sc.fk_soc, sc.fk_user ";
155 }
156 $sql .= " FROM ".MAIN_DB_PREFIX."societe as s";
157 $sql .= ",".MAIN_DB_PREFIX."supplier_proposal as p";
158 $sql .= ", ".MAIN_DB_PREFIX."supplier_proposaldet as d";
159 if (!$user->hasRight('societe', 'client', 'voir')) {
160 $sql .= ", ".MAIN_DB_PREFIX."societe_commerciaux as sc";
161 }
162 $sql .= " WHERE p.fk_soc = s.rowid";
163 $sql .= " AND p.entity IN (".getEntity('supplier_proposal').")";
164 $sql .= " AND d.fk_supplier_proposal = p.rowid";
165 $sql .= " AND d.fk_product = ".((int) $product->id);
166 if (!empty($search_month)) {
167 $sql .= ' AND MONTH(p.datep) IN ('.$db->sanitize($search_month).')';
168 }
169 if (!empty($search_year)) {
170 $sql .= ' AND YEAR(p.datep) IN ('.$db->sanitize($search_year).')';
171 }
172 if (!$user->hasRight('societe', 'client', 'voir')) {
173 $sql .= " AND s.rowid = sc.fk_soc AND sc.fk_user = ".((int) $user->id);
174 }
175 if ($socid) {
176 $sql .= " AND p.fk_soc = ".((int) $socid);
177 }
178 $sql .= $db->order($sortfield, $sortorder);
179
180 // Calcul total qty and amount for global if full scan list
181 $total_ht = 0;
182 $total_qty = 0;
183
184 // Count total nb of records
185 $totalofrecords = '';
186 if (!getDolGlobalInt('MAIN_DISABLE_FULL_SCANLIST')) {
187 $result = $db->query($sql);
188 $totalofrecords = $db->num_rows($result);
189 }
190
191 $sql .= $db->plimit($limit + 1, $offset);
192
193 $result = $db->query($sql);
194 if ($result) {
195 $num = $db->num_rows($result);
196
197 $option = '&id='.$product->id;
198
199 if ($limit > 0 && $limit != $conf->liste_limit) {
200 $option .= '&limit='.((int) $limit);
201 }
202 if (!empty($search_month)) {
203 $option .= '&search_month='.urlencode((string) ($search_month));
204 }
205 if (!empty($search_year)) {
206 $option .= '&search_year='.urlencode((string) ($search_year));
207 }
208
209 print '<form method="post" action="'.$_SERVER['PHP_SELF'].'?id='.$product->id.'" name="search_form">'."\n";
210 print '<input type="hidden" name="token" value="'.newToken().'">';
211 if (!empty($sortfield)) {
212 print '<input type="hidden" name="sortfield" value="'.$sortfield.'"/>';
213 }
214 if (!empty($sortorder)) {
215 print '<input type="hidden" name="sortorder" value="'.$sortorder.'"/>';
216 }
217
218 // @phan-suppress-next-line PhanPluginSuspiciousParamOrder
219 print_barre_liste($langs->trans("Proposals"), $page, $_SERVER["PHP_SELF"], $option, $sortfield, $sortorder, '', $num, $totalofrecords, '', 0, '', '', $limit, 0, 0, 1);
220
221 if (!empty($page)) {
222 $option .= '&page='.urlencode((string) ($page));
223 }
224
225 print '<div class="liste_titre liste_titre_bydiv centpercent">';
226 print '<div class="divsearchfield">';
227 print $langs->trans('Period').' ('.$langs->trans("DatePropal").') - ';
228 print $langs->trans('Month').':<input class="flat" type="text" size="4" name="search_month" value="'.($search_month > 0 ? $search_month : '').'"> ';
229 print $langs->trans('Year').':'.$formother->selectyear($search_year ? $search_year : - 1, 'search_year', 1, 20, 5);
230 print '<div style="vertical-align: middle; display: inline-block">';
231 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")).'">';
232 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")).'">';
233 print '</div>';
234 print '</div>';
235 print '</div>';
236
237 $i = 0;
238 print '<div class="div-table-responsive">';
239 print '<table class="tagtable liste listwithfilterbefore" width="100%">';
240 print '<tr class="liste_titre">';
241 print_liste_field_titre("Ref", $_SERVER["PHP_SELF"], "p.rowid", "", $option, '', $sortfield, $sortorder);
242 print_liste_field_titre("Company", $_SERVER["PHP_SELF"], "s.nom", "", $option, '', $sortfield, $sortorder);
243 print_liste_field_titre("DatePropal", $_SERVER["PHP_SELF"], "p.date_valid", "", $option, 'align="center"', $sortfield, $sortorder);
244 print_liste_field_titre("Qty", $_SERVER["PHP_SELF"], "d.qty", "", $option, 'align="center"', $sortfield, $sortorder);
245 print_liste_field_titre("AmountHT", $_SERVER["PHP_SELF"], "p.total_ht", "", $option, 'align="right"', $sortfield, $sortorder);
246 print_liste_field_titre("Status", $_SERVER["PHP_SELF"], "p.fk_statut", "", $option, 'align="right"', $sortfield, $sortorder);
247 print "</tr>\n";
248
249 if ($num > 0) {
250 while ($i < min($num, $limit)) {
251 $objp = $db->fetch_object($result);
252
253 $total_ht += $objp->amount;
254 $total_qty += $objp->qty;
255
256 $propalstatic->id = $objp->propalid;
257 $propalstatic->ref = $objp->ref;
258 $societestatic->fetch($objp->socid);
259
260 print '<tr class="oddeven">';
261 print '<td>';
262 print $propalstatic->getNomUrl(1);
263 print "</td>\n";
264 print '<td>'.$societestatic->getNomUrl(1).'</td>';
265 print '<td class="center">';
266 print dol_print_date($db->jdate($objp->date_valid), 'dayhour')."</td>";
267 print "<td align=\"center\">".$objp->qty."</td>\n";
268 print '<td align="right">'.price($objp->amount).'</td>'."\n";
269 print '<td align="right">'.$propalstatic->LibStatut($objp->statut, 5).'</td>';
270 print "</tr>\n";
271 $i++;
272 }
273 }
274
275 print '<tr class="liste_total">';
276 if ($num < $limit && empty($offset)) {
277 print '<td>'.$langs->trans("Total").'</td>';
278 } else {
279 print '<td>'.$form->textwithpicto($langs->trans("Total"), $langs->trans("Totalforthispage")).'</td>';
280 }
281 print '<td colspan="2"></td>';
282 print '<td class="center">'.$total_qty.'</td>';
283 print '<td align="right">'.price($total_ht).'</td>';
284 print '<td></td>';
285 print "</table>";
286 print '</div>';
287 print '</form>';
288 } else {
289 dol_print_error($db);
290 }
291 $db->free($result);
292 }
293 }
294} else {
296}
297
298// End of page
299llxFooter();
300$db->close();
$id
Definition account.php:48
if( $user->socid > 0) if(! $user->hasRight('accounting', 'chartofaccount')) $object
Definition card.php:66
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:71
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 third parties objects (customers, suppliers, prospects...)
Class to manage price ask supplier.
llxFooter()
Footer empty.
Definition document.php:107
setEventMessages($mesg, $mesgs, $style='mesgs', $messagekey='', $noduplicate=0, $attop=0)
Set event messages in dol_events session object.
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)
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).
print_liste_field_titre($name, $file="", $field="", $begin="", $moreparam="", $moreattrib="", $sortfield="", $sortorder="", $prefix="", $tooltip="", $forcenowrapcolumntitle=0)
Show title line of an array.
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.