dolibarr 18.0.6
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 Frédéric France <frederic.france@netlogic.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.'/commande/class/commande.class.php';
31require_once DOL_DOCUMENT_ROOT.'/contact/class/contact.class.php';
32require_once DOL_DOCUMENT_ROOT.'/core/lib/order.lib.php';
33require_once DOL_DOCUMENT_ROOT.'/core/class/html.formother.class.php';
34require_once DOL_DOCUMENT_ROOT.'/core/class/html.formcompany.class.php';
35require_once DOL_DOCUMENT_ROOT.'/projet/class/project.class.php';
36
37// Load translation files required by the page
38$langs->loadLangs(array('orders', 'sendings', 'companies', 'bills'));
39
40$id = GETPOST('id', 'int');
41$ref = GETPOST('ref', 'alpha');
42$action = GETPOST('action', 'aZ09');
43
44// Security check
45if ($user->socid) {
46 $socid = $user->socid;
47}
48// Initialize technical object to manage hooks of page. Note that conf->hooks_modules contains array of hook context
49$hookmanager->initHooks(array('ordercontact', 'globalcard'));
50
51$result = restrictedArea($user, 'commande', $id, '');
52
53$usercancreate = $user->hasRight("commande", "creer");
54
55$object = new Commande($db);
56
57
58/*
59 * Ajout d'un nouveau contact
60 */
61
62if ($action == 'addcontact' && $user->hasRight('commande', 'creer')) {
63 $result = $object->fetch($id);
64
65 if ($result > 0 && $id > 0) {
66 $contactid = (GETPOST('userid', 'int') ? GETPOST('userid', 'int') : GETPOST('contactid', 'int'));
67 $typeid = (GETPOST('typecontact') ? GETPOST('typecontact') : GETPOST('type'));
68 $result = $object->add_contact($contactid, $typeid, GETPOST("source", 'aZ09'));
69 }
70
71 if ($result >= 0) {
72 header("Location: ".$_SERVER['PHP_SELF']."?id=".$object->id);
73 exit;
74 } else {
75 if ($object->error == 'DB_ERROR_RECORD_ALREADY_EXISTS') {
76 $langs->load("errors");
77 setEventMessages($langs->trans("ErrorThisContactIsAlreadyDefinedAsThisType"), null, 'errors');
78 } else {
79 setEventMessages($object->error, $object->errors, 'errors');
80 }
81 }
82} elseif ($action == 'swapstatut' && $user->hasRight('commande', 'creer')) {
83 // bascule du statut d'un contact
84 if ($object->fetch($id)) {
85 $result = $object->swapContactStatus(GETPOST('ligne', 'int'));
86 } else {
87 dol_print_error($db);
88 }
89} elseif ($action == 'deletecontact' && $user->hasRight('commande', 'creer')) {
90 // Efface un contact
91 $object->fetch($id);
92 $result = $object->delete_contact(GETPOST("lineid", 'int'));
93
94 if ($result >= 0) {
95 header("Location: ".$_SERVER['PHP_SELF']."?id=".$object->id);
96 exit;
97 } else {
98 setEventMessages($object->error, $object->errors, 'errors');
99 }
100}
101
102
103/*
104 * View
105 */
106$form = new Form($db);
107$formcompany = new FormCompany($db);
108$formother = new FormOther($db);
109$contactstatic = new Contact($db);
110$userstatic = new User($db);
111
112
113/* *************************************************************************** */
114/* */
115/* Mode vue et edition */
116/* */
117/* *************************************************************************** */
118
119if ($id > 0 || !empty($ref)) {
120 if ($object->fetch($id, $ref) > 0) {
121 $object->fetch_thirdparty();
122
123 $title = $object->ref." - ".$langs->trans('ContactsAddresses');
124 $help_url = 'EN:Customers_Orders|FR:Commandes_Clients|ES:Pedidos de clientes|DE:Modul_Kundenaufträge';
125 llxHeader('', $title, $help_url);
126
127 $head = commande_prepare_head($object);
128 print dol_get_fiche_head($head, 'contact', $langs->trans("CustomerOrder"), -1, 'order');
129
130 // Order card
131
132 $linkback = '<a href="'.DOL_URL_ROOT.'/commande/list.php?restore_lastsearch_values=1'.(!empty($socid) ? '&socid='.$socid : '').'">'.$langs->trans("BackToList").'</a>';
133
134 $morehtmlref = '<div class="refidno">';
135 // Ref customer
136 $morehtmlref .= $form->editfieldkey("RefCustomer", 'ref_client', $object->ref_client, $object, 0, 'string', '', 0, 1);
137 $morehtmlref .= $form->editfieldval("RefCustomer", 'ref_client', $object->ref_client, $object, 0, 'string', '', null, null, '', 1);
138 // Thirdparty
139 $morehtmlref .= '<br>'.$object->thirdparty->getNomUrl(1);
140 // Project
141 if (isModEnabled('project')) {
142 $langs->load("projects");
143 $morehtmlref .= '<br>';
144 if (0) {
145 $morehtmlref .= img_picto($langs->trans("Project"), 'project', 'class="pictofixedwidth"');
146 if ($action != 'classify') {
147 $morehtmlref .= '<a class="editfielda" href="'.$_SERVER['PHP_SELF'].'?action=classify&token='.newToken().'&id='.$object->id.'">'.img_edit($langs->transnoentitiesnoconv('SetProject')).'</a> ';
148 }
149 $morehtmlref .= $form->form_project($_SERVER['PHP_SELF'].'?id='.$object->id, $object->socid, $object->fk_project, ($action == 'classify' ? 'projectid' : 'none'), 0, 0, 0, 1, '', 'maxwidth300');
150 } else {
151 if (!empty($object->fk_project)) {
152 $proj = new Project($db);
153 $proj->fetch($object->fk_project);
154 $morehtmlref .= $proj->getNomUrl(1);
155 if ($proj->title) {
156 $morehtmlref .= '<span class="opacitymedium"> - '.dol_escape_htmltag($proj->title).'</span>';
157 }
158 }
159 }
160 }
161 $morehtmlref .= '</div>';
162
163 dol_banner_tab($object, 'ref', $linkback, 1, 'ref', 'ref', $morehtmlref, '', 0, '', '', 1);
164
165 print dol_get_fiche_end();
166
167 print '<br>';
168
169 // Contacts lines (modules that overwrite templates must declare this into descriptor)
170 $dirtpls = array_merge($conf->modules_parts['tpl'], array('/core/tpl'));
171 foreach ($dirtpls as $reldir) {
172 $res = @include dol_buildpath($reldir.'/contacts.tpl.php');
173 if ($res) {
174 break;
175 }
176 }
177 } else {
178 // Contact not found
179 print "ErrorRecordNotFound";
180 }
181}
182
183
184// End of page
185llxFooter();
186$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:56
llxFooter()
Empty footer.
Definition wrapper.php:70
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.
Classe permettant la generation de composants html autre Only common components are here.
Class to manage projects.
Class to manage Dolibarr users.
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.
img_picto($titlealt, $picto, $moreatt='', $pictoisfullpath=false, $srconly=0, $notitle=0, $alt='', $morecss='', $marginleftonlyshort=2)
Show picto whatever it's its name (generic function)
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.
dol_buildpath($path, $type=0, $returnemptyifnotfound=0)
Return path of url or filesystem.
img_edit($titlealt='default', $float=0, $other='')
Show logo editer/modifier fiche.
commande_prepare_head(Commande $object)
Prepare array with list of tabs.
Definition order.lib.php:34
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.