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