dolibarr 24.0.2
contact.php
Go to the documentation of this file.
1<?php
2/* Copyright (C) 2005 Patrick Rouillon <patrick@rouillon.net>
3 * Copyright (C) 2005-2009 Destailleur Laurent <eldy@users.sourceforge.net>
4 * Copyright (C) 2005-2012 Regis Houssin <regis.houssin@inodbox.com>
5 * Copyright (C) 2017 Ferran Marcet <fmarcet@2byte.es>
6 * Copyright (C) 2023 Christian Foellmann <christian@foellmann.de>
7 * Copyright (C) 2024-2026 Frédéric France <frederic.france@free.fr>
8 * Copyright (C) 2025 MDW <mdeweerd@users.noreply.github.com>
9 * Copyright (C) 2026 Serhii Bondarenko <serhiilabs@gmail.com>
10 *
11 * This program is free software; you can redistribute it and/or modify
12 * it under the terms of the GNU General Public License as published by
13 * the Free Software Foundation; either version 3 of the License, or
14 * (at your option) any later version.
15 *
16 * This program is distributed in the hope that it will be useful,
17 * but WITHOUT ANY WARRANTY; without even the implied warranty of
18 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
19 * GNU General Public License for more details.
20 *
21 * You should have received a copy of the GNU General Public License
22 * along with this program. If not, see <https://www.gnu.org/licenses/>.
23 */
24
31// Load Dolibarr environment
32require '../../main.inc.php';
40require_once DOL_DOCUMENT_ROOT.'/fourn/class/fournisseur.commande.class.php';
41require_once DOL_DOCUMENT_ROOT.'/contact/class/contact.class.php';
42require_once DOL_DOCUMENT_ROOT.'/core/lib/fourn.lib.php';
43require_once DOL_DOCUMENT_ROOT.'/core/class/html.formcompany.class.php';
44if (isModEnabled('project')) {
45 require_once DOL_DOCUMENT_ROOT.'/projet/class/project.class.php';
46}
47
48// Load translation files required by the page
49$langs->loadLangs(array("facture", "orders", "sendings", "companies"));
50
51$id = GETPOSTINT('id');
52$ref = GETPOST('ref', 'alpha');
53$action = GETPOST('action', 'aZ09');
54
56$object->fetch($id, $ref);
57if ($object->id > 0) {
58 $id = $object->id; // The page may be called with the ref only: the security check must be done on the object found
59}
60
61// Security check
62if ($user->isExternalUser()) {
63 $socid = $user->isExternalUser();
64}
65$hookmanager->initHooks(array('ordersuppliercardcontact', 'ordersuppliercontactcard', 'globalcard'));
66$result = restrictedArea($user, 'fournisseur', $id, 'commande_fournisseur', 'commande');
67
68$usercancreate = ($user->hasRight("fournisseur", "commande", "creer") || $user->hasRight("supplier_order", "creer"));
69$permissiontoadd = $usercancreate; // Used by the include of actions_addupdatedelete.inc.php
70$caneditproject = false;
71
72/*
73 * Actions
74 */
75
76$parameters = array('id' => $id);
77$reshook = $hookmanager->executeHooks('doActions', $parameters, $object, $action);
78if ($reshook < 0) {
79 setEventMessages($hookmanager->error, $hookmanager->errors, 'errors');
80}
81
82/*
83 * Add a new contact
84 */
85
86if (empty($reshook)) {
87 if ($action == 'addcontact' && ($user->hasRight("fournisseur", "commande", "creer") || $user->hasRight("supplier_order", "creer"))) {
88 $result = $object->fetch($id);
89
90 if ($result > 0 && $id > 0) {
91 $contactid = (GETPOST('userid') ? GETPOSTINT('userid') : GETPOSTINT('contactid'));
92 $typeid = (GETPOST('typecontact') ? GETPOSTINT('typecontact') : GETPOSTINT('type'));
93 $result = $object->add_contact($contactid, $typeid, GETPOST("source", 'aZ09'));
94 }
95
96 if ($result >= 0) {
97 header("Location: ".$_SERVER['PHP_SELF']."?id=".$object->id);
98 exit;
99 } else {
100 if ($object->error == 'DB_ERROR_RECORD_ALREADY_EXISTS') {
101 $langs->load("errors");
102 setEventMessages($langs->trans("ErrorThisContactIsAlreadyDefinedAsThisType"), null, 'errors');
103 } else {
104 setEventMessages($object->error, $object->errors, 'errors');
105 }
106 }
107 } elseif ($action == 'swapstatut' && ($user->hasRight("fournisseur", "commande", "creer") || $user->hasRight("supplier_order", "creer"))) {
108 // Toggle the status of a contact
109 if ($object->fetch($id)) {
110 $result = $object->swapContactStatus(GETPOSTINT('ligne'));
111 } else {
112 setEventMessages($object->error, $object->errors, 'errors');
113 }
114 } elseif ($action == 'deletecontact' && ($user->hasRight("fournisseur", "commande", "creer") || $user->hasRight("supplier_order", "creer"))) {
115 // Deleting a contact
116 $object->fetch($id);
117 $result = $object->delete_contact(GETPOSTINT("lineid"));
118
119 if ($result >= 0) {
120 header("Location: ".$_SERVER['PHP_SELF']."?id=".$object->id);
121 exit;
122 } else {
123 setEventMessages($object->error, $object->errors, 'errors');
124 }
125 }
126}
127
128
129/*
130 * View
131 */
132
133$form = new Form($db);
134$formcompany = new FormCompany($db);
135$contactstatic = new Contact($db);
136$userstatic = new User($db);
137
138
139/* *************************************************************************** */
140/* */
141/* Card view and edit mode */
142/* */
143/* *************************************************************************** */
144
145if ($id > 0 || !empty($ref)) {
146 $langs->trans("OrderCard");
147
148 if ($object->fetch($id, $ref) > 0) {
149 $object->fetch_thirdparty();
150
151 $title = $object->ref." - ".$langs->trans('ContactsAddresses');
152 $help_url = 'EN:Module_Suppliers_Orders|FR:CommandeFournisseur|ES:Módulo_Pedidos_a_proveedores';
153 llxHeader('', $title, $help_url, '', 0, 0, '', '', '', 'mod-supplier-order page-card_contact');
154
155 $head = ordersupplier_prepare_head($object);
156 print dol_get_fiche_head($head, 'contact', $langs->trans("SupplierOrder"), -1, 'order');
157
158 // Supplier order card
159
160 $linkback = '<a href="'.DOL_URL_ROOT.'/fourn/commande/list.php'.(!empty($socid) ? '?socid='.$socid : '').'">'.$langs->trans("BackToList").'</a>';
161
162 $morehtmlref = '<div class="refidno">';
163 // Ref supplier
164 $morehtmlref .= $form->editfieldkey("RefSupplier", 'ref_supplier', $object->ref_supplier, $object, 0, 'string', '', 0, 1);
165 $morehtmlref .= $form->editfieldval("RefSupplier", 'ref_supplier', $object->ref_supplier, $object, 0, 'string', '', null, null, '', 1);
166 // Thirdparty
167 $morehtmlref .= '<br>'.$object->thirdparty->getNomUrl(1);
168 // Project
169 if (isModEnabled('project')) {
170 $langs->load("projects");
171 $morehtmlref .= '<br>';
172 if (0) { // @phpstan-ignore-line
173 $morehtmlref .= img_picto($langs->trans("Project"), 'project', 'class="pictofixedwidth"');
174 if ($action != 'classify' && $caneditproject) { // Always false @phpstan-ignore-line
175 $morehtmlref .= '<a class="editfielda" href="'.dolBuildUrl($_SERVER['PHP_SELF'], ['action' => 'classify', 'id' => $object->id], true).'">'.img_edit($langs->transnoentitiesnoconv('SetProject')).'</a> ';
176 }
177 $morehtmlref .= $form->form_project($_SERVER['PHP_SELF'].'?id='.$object->id, (!getDolGlobalString('PROJECT_CAN_ALWAYS_LINK_TO_ALL_SUPPLIERS') ? $object->socid : -1), (string) $object->fk_project, ($action == 'classify' ? 'projectid' : 'none'), 0, 0, 0, 1, '', 'maxwidth300');
178 } else {
179 if (!empty($object->fk_project)) {
180 $proj = new Project($db);
181 $proj->fetch($object->fk_project);
182 $morehtmlref .= $proj->getNomUrl(1);
183 if ($proj->title) {
184 $morehtmlref .= '<span class="opacitymedium"> - '.dol_escape_htmltag($proj->title).'</span>';
185 }
186 }
187 }
188 }
189 $morehtmlref .= '</div>';
190
191
192 dol_banner_tab($object, 'ref', $linkback, 1, 'ref', 'ref', $morehtmlref, '', 0, '', '', 1);
193
194 print dol_get_fiche_end();
195
196 // Contacts lines (modules that overwrite templates must declare this into descriptor)
197 $dirtpls = array_merge($conf->modules_parts['tpl'], array('/core/tpl'));
198 foreach ($dirtpls as $reldir) {
199 $res = @include dol_buildpath($reldir.'/contacts.tpl.php');
200 if ($res) {
201 break;
202 }
203 }
204 } else {
205 // Contact not found
206 recordNotFound('', 0);
207 }
208}
209
210// End of page
211llxFooter();
212$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 predefined suppliers products.
Class to manage contact/addresses.
Class to build HTML component for third parties management Only common components are here.
Class to manage generation of HTML components Only common components must be here.
Class to manage projects.
Class to manage Dolibarr users.
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.
ordersupplier_prepare_head(CommandeFournisseur $object)
Prepare array with list of tabs.
recordNotFound($message='', $printheader=1, $printfooter=1, $showonlymessage=0, $params=null)
Displays an error page when a record is not found.
setEventMessages($mesg, $mesgs, $style='mesgs', $messagekey='', $noduplicate=0, $attop=0)
Set event messages in dol_events session object.
img_picto($titlealt, $picto, $moreatt='', $pictoisfullpath=0, $srconly=0, $notitle=0, $alt='', $morecss='', $marginleftonlyshort=2, $allowothertags=array())
Show picto whatever it's its name (generic function)
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.
GETPOST($paramname, $check='alphanohtml', $method=0, $filter=null, $options=null, $noreplace=0, $nodefault=0)
Return value of a param into GET or POST supervariable.
GETPOSTINT($paramname, $method=0, $nodefault=0)
Return the value of a $_GET or $_POST supervariable, converted into integer.
dol_buildpath($path, $type=0, $returnemptyifnotfound=0)
Return path of url or filesystem.
getDolGlobalString($key, $default='')
Return a Dolibarr global constant string value.
isModEnabled($module)
Is Dolibarr module enabled.
img_edit($titlealt='default', $float=0, $other='')
Show logo edit/modify fiche.
print $langs trans("Show") . '< td style="' . $timeColor . '" align="center"> s</td > badge status0 badge status4 badge status3 Error badge status8< td align="center">< span class="badge ' . $badge . '"></span ></td >< td align="center">< a href="#" class="button button-small" onclick="openLogModal(this)" data-req="' . dol_escape_htmltag($reqSafe) . '" data-res="' . dol_escape_htmltag($resSafe) . '" data-err="' . dol_escape_htmltag($errSafe) . '">< span class="fa fa-search-plus"></span ></a ></td ></tr >< tr >< td colspan="' . $colspan . '" class="opacitymedium"></td ></tr ></table ></div ></form > logModal none logModal none s a JSON string
buildzip.php
restrictedArea(User $user, $features, $object=0, $tableandshare='', $feature2='', $dbt_keyfield='fk_soc', $dbt_select='rowid', $isdraft=0, $nodie=0, $mode='')
Check permissions of a user to show a page and an object.