dolibarr 23.0.4
contact.php
Go to the documentation of this file.
1<?php
2/* Copyright (C) 2005 Patrick Rouillon <patrick@rouillon.net>
3 * Copyright (C) 2005-2011 Laurent Destailleur <eldy@users.sourceforge.net>
4 * Copyright (C) 2005-2012 Regis Houssin <regis.houssin@inodbox.com>
5 * Copyright (C) 2011-2022 Philippe Grand <philippe.grand@atoo-net.com>
6 * Copyright (C) 2021-2025 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.'/commande/class/commande.class.php';
32require_once DOL_DOCUMENT_ROOT.'/contact/class/contact.class.php';
33require_once DOL_DOCUMENT_ROOT.'/core/lib/order.lib.php';
34require_once DOL_DOCUMENT_ROOT.'/core/class/html.formother.class.php';
35require_once DOL_DOCUMENT_ROOT.'/core/class/html.formcompany.class.php';
36require_once DOL_DOCUMENT_ROOT.'/projet/class/project.class.php';
37
46// Load translation files required by the page
47$langs->loadLangs(array('orders', 'sendings', 'companies', 'bills'));
48
49$id = GETPOSTINT('id');
50$ref = GETPOST('ref', 'alpha');
51$action = GETPOST('action', 'aZ09');
52
53// Security check
54if ($user->socid) {
55 $socid = $user->socid;
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('ordercontact', 'globalcard'));
59
60$object = new Commande($db);
61$object->fetch($id, $ref);
62if ($object->id > 0) {
63 $id = $object->id; // The page may be called with the ref only: the security check must be done on the object found
64}
65$result = restrictedArea($user, 'commande', $id, '');
66
67$usercancreate = $user->hasRight("commande", "creer");
68
69/*
70 * Actions
71 */
72
73$parameters = array('id' => $id);
74$reshook = $hookmanager->executeHooks('doActions', $parameters, $object, $action);
75if ($reshook < 0) {
76 setEventMessages($hookmanager->error, $hookmanager->errors, 'errors');
77}
78
79if (empty($reshook)) {
80 // Add new contact
81 if ($action == 'addcontact' && $user->hasRight('commande', 'creer')) {
82 $result = $object->fetch($id);
83
84 if ($result > 0 && $id > 0) {
85 $contactid = (GETPOSTINT('userid') ? GETPOSTINT('userid') : GETPOSTINT('contactid'));
86 $typeid = (GETPOST('typecontact') ? GETPOST('typecontact') : GETPOST('type'));
87 $result = $object->add_contact($contactid, $typeid, GETPOST("source", 'aZ09'));
88 }
89
90 if ($result >= 0) {
91 header("Location: ".$_SERVER['PHP_SELF']."?id=".$object->id);
92 exit;
93 } else {
94 if ($object->error == 'DB_ERROR_RECORD_ALREADY_EXISTS') {
95 $langs->load("errors");
96 setEventMessages($langs->trans("ErrorThisContactIsAlreadyDefinedAsThisType"), null, 'errors');
97 } else {
98 setEventMessages($object->error, $object->errors, 'errors');
99 }
100 }
101 } elseif ($action == 'swapstatut' && $user->hasRight('commande', 'creer')) {
102 // Toggle the status of a contact
103 if ($object->fetch($id)) {
104 $result = $object->swapContactStatus(GETPOSTINT('ligne'));
105 } else {
106 dol_print_error($db);
107 }
108 } elseif ($action == 'deletecontact' && $user->hasRight('commande', 'creer')) {
109 // Delete contact
110 $object->fetch($id);
111 $result = $object->delete_contact(GETPOSTINT("lineid"));
112
113 if ($result >= 0) {
114 header("Location: ".$_SERVER['PHP_SELF']."?id=".$object->id);
115 exit;
116 } else {
117 setEventMessages($object->error, $object->errors, 'errors');
118 }
119 }
120}
121
122/*
123 * View
124 */
125$form = new Form($db);
126$formcompany = new FormCompany($db);
127$formother = new FormOther($db);
128$contactstatic = new Contact($db);
129$userstatic = new User($db);
130
131
132/* *************************************************************************** */
133/* */
134/* Card view and edit mode */
135/* */
136/* *************************************************************************** */
137
138if ($id > 0 || !empty($ref)) {
139 if ($object->fetch($id, $ref) > 0) {
140 $object->fetch_thirdparty();
141
142 $title = $object->ref." - ".$langs->trans('ContactsAddresses');
143 $help_url = 'EN:Customers_Orders|FR:Commandes_Clients|ES:Pedidos de clientes|DE:Modul_Kundenaufträge';
144 llxHeader('', $title, $help_url, '', 0, 0, '', '', '', 'mod-order page-card_contact');
145
146 $head = commande_prepare_head($object);
147 print dol_get_fiche_head($head, 'contact', $langs->trans("CustomerOrder"), -1, $object->picto);
148
149 // Order card
150
151 $linkback = '<a href="'.DOL_URL_ROOT.'/commande/list.php?restore_lastsearch_values=1'.(!empty($socid) ? '&socid='.$socid : '').'">'.$langs->trans("BackToList").'</a>';
152
153 $morehtmlref = '<div class="refidno">';
154 // Ref customer
155 $morehtmlref .= $form->editfieldkey("RefCustomer", 'ref_client', $object->ref_client, $object, 0, 'string', '', 0, 1);
156 $morehtmlref .= $form->editfieldval("RefCustomer", 'ref_client', $object->ref_client, $object, 0, 'string', '', null, null, '', 1);
157 // Thirdparty
158 $morehtmlref .= '<br>'.$object->thirdparty->getNomUrl(1);
159 // Project
160 if (isModEnabled('project')) {
161 $langs->load("projects");
162 $morehtmlref .= '<br>';
163 if (0) { // @phpstan-ignore-line
164 $morehtmlref .= img_picto($langs->trans("Project"), 'project', 'class="pictofixedwidth"');
165 if ($action != 'classify') {
166 $morehtmlref .= '<a class="editfielda" href="'.dolBuildUrl($_SERVER['PHP_SELF'], ['action' => 'classify', 'id' => $object->id], true).'">'.img_edit($langs->transnoentitiesnoconv('SetProject')).'</a> ';
167 }
168 $morehtmlref .= $form->form_project($_SERVER['PHP_SELF'].'?id='.$object->id, $object->socid, (string) $object->fk_project, ($action == 'classify' ? 'projectid' : 'none'), 0, 0, 0, 1, '', 'maxwidth300');
169 } else {
170 if (!empty($object->fk_project)) {
171 $proj = new Project($db);
172 $proj->fetch($object->fk_project);
173 $morehtmlref .= $proj->getNomUrl(1);
174 if ($proj->title) {
175 $morehtmlref .= '<span class="opacitymedium"> - '.dol_escape_htmltag($proj->title).'</span>';
176 }
177 }
178 }
179 }
180 $morehtmlref .= '</div>';
181
182 dol_banner_tab($object, 'ref', $linkback, 1, 'ref', 'ref', $morehtmlref, '', 0, '', '', 1);
183
184 print dol_get_fiche_end();
185
186 print '<br>';
187
188 // Contacts lines (modules that overwrite templates must declare this into descriptor)
189 $dirtpls = array_merge($conf->modules_parts['tpl'], array('/core/tpl'));
190 foreach ($dirtpls as $reldir) {
191 $file = dol_buildpath($reldir.'/contacts.tpl.php');
192 if (file_exists($file)) {
193 $res = @include $file;
194 if ($res) {
195 break;
196 }
197 }
198 }
199 } else {
200 // Contact not found
201 recordNotFound('', 0);
202 }
203}
204
205
206// End of page
207llxFooter();
208$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 customers orders.
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 permettant la generation de composants html autre Only common components are here.
Class to manage projects.
Class to manage Dolibarr users.
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)
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.
GETPOST($paramname, $check='alphanohtml', $method=0, $filter=null, $options=null, $noreplace=0)
Return value of a param into GET or POST supervariable.
dol_buildpath($path, $type=0, $returnemptyifnotfound=0)
Return path of url or filesystem.
dol_print_error($db=null, $error='', $errors=null)
Displays error message system with all the information to facilitate the diagnosis and the escalation...
isModEnabled($module)
Is Dolibarr module enabled.
img_edit($titlealt='default', $float=0, $other='')
Show logo edit/modify fiche.
commande_prepare_head(Commande $object)
Prepare array with list of tabs.
Definition order.lib.php:36
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.