dolibarr 21.0.0-beta
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 Frédéric France <frederic.france@free.fr>
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.'/fourn/class/fournisseur.commande.class.php';
32require_once DOL_DOCUMENT_ROOT.'/contact/class/contact.class.php';
33require_once DOL_DOCUMENT_ROOT.'/core/lib/fourn.lib.php';
34require_once DOL_DOCUMENT_ROOT.'/core/class/html.formcompany.class.php';
35if (isModEnabled('project')) {
36 require_once DOL_DOCUMENT_ROOT.'/projet/class/project.class.php';
37}
38
47// Load translation files required by the page
48$langs->loadLangs(array("facture", "orders", "sendings", "companies"));
49
50$id = GETPOSTINT('id');
51$ref = GETPOST('ref', 'alpha');
52$action = GETPOST('action', 'aZ09');
53
54// Security check
55if ($user->socid) {
56 $socid = $user->socid;
57}
58$hookmanager->initHooks(array('ordersuppliercardcontact', 'ordersuppliercontactcard', 'globalcard'));
59$result = restrictedArea($user, 'fournisseur', $id, 'commande_fournisseur', 'commande');
60
62
63$usercancreate = ($user->hasRight("fournisseur", "commande", "creer") || $user->hasRight("supplier_order", "creer"));
64$permissiontoadd = $usercancreate; // Used by the include of actions_addupdatedelete.inc.php
65
66/*
67 * Actions
68 */
69
70$parameters = array('id'=>$id);
71$reshook = $hookmanager->executeHooks('doActions', $parameters, $object, $action);
72if ($reshook < 0) {
73 setEventMessages($hookmanager->error, $hookmanager->errors, 'errors');
74}
75
76/*
77 * Add a new contact
78 */
79
80if (empty($reshook)) {
81 if ($action == 'addcontact' && ($user->hasRight("fournisseur", "commande", "creer") || $user->hasRight("supplier_order", "creer"))) {
82 $result = $object->fetch($id);
83
84 if ($result > 0 && $id > 0) {
85 $contactid = (GETPOST('userid') ? GETPOST('userid') : GETPOST('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("fournisseur", "commande", "creer") || $user->hasRight("supplier_order", "creer"))) {
102 // Toggle the status of a contact
103 if ($object->fetch($id)) {
104 $result = $object->swapContactStatus(GETPOSTINT('ligne'));
105 } else {
106 setEventMessages($object->error, $object->errors, 'errors');
107 }
108 } elseif ($action == 'deletecontact' && ($user->hasRight("fournisseur", "commande", "creer") || $user->hasRight("supplier_order", "creer"))) {
109 // Deleting a 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/*
124 * View
125 */
126
127$form = new Form($db);
128$formcompany = new FormCompany($db);
129$contactstatic = new Contact($db);
130$userstatic = new User($db);
131
132
133/* *************************************************************************** */
134/* */
135/* Card view and edit mode */
136/* */
137/* *************************************************************************** */
138
139if ($id > 0 || !empty($ref)) {
140 $langs->trans("OrderCard");
141
142 if ($object->fetch($id, $ref) > 0) {
143 $object->fetch_thirdparty();
144
145 $title = $object->ref." - ".$langs->trans('ContactsAddresses');
146 $help_url = 'EN:Module_Suppliers_Orders|FR:CommandeFournisseur|ES:Módulo_Pedidos_a_proveedores';
147 llxHeader('', $title, $help_url, '', 0, 0, '', '', '', 'mod-supplier-order page-card_contact');
148
149 $head = ordersupplier_prepare_head($object);
150 print dol_get_fiche_head($head, 'contact', $langs->trans("SupplierOrder"), -1, 'order');
151
152 // Supplier order card
153
154 $linkback = '<a href="'.DOL_URL_ROOT.'/fourn/commande/list.php'.(!empty($socid) ? '?socid='.$socid : '').'">'.$langs->trans("BackToList").'</a>';
155
156 $morehtmlref = '<div class="refidno">';
157 // Ref supplier
158 $morehtmlref .= $form->editfieldkey("RefSupplier", 'ref_supplier', $object->ref_supplier, $object, 0, 'string', '', 0, 1);
159 $morehtmlref .= $form->editfieldval("RefSupplier", 'ref_supplier', $object->ref_supplier, $object, 0, 'string', '', null, null, '', 1);
160 // Thirdparty
161 $morehtmlref .= '<br>'.$object->thirdparty->getNomUrl(1);
162 // Project
163 if (isModEnabled('project')) {
164 $langs->load("projects");
165 $morehtmlref .= '<br>';
166 if (0) {
167 $morehtmlref .= img_picto($langs->trans("Project"), 'project', 'class="pictofixedwidth"');
168 if ($action != 'classify' && $caneditproject) {
169 $morehtmlref .= '<a class="editfielda" href="'.$_SERVER['PHP_SELF'].'?action=classify&token='.newToken().'&id='.$object->id.'">'.img_edit($langs->transnoentitiesnoconv('SetProject')).'</a> ';
170 }
171 $morehtmlref .= $form->form_project($_SERVER['PHP_SELF'].'?id='.$object->id, (!getDolGlobalString('PROJECT_CAN_ALWAYS_LINK_TO_ALL_SUPPLIERS') ? $object->socid : -1), $object->fk_project, ($action == 'classify' ? 'projectid' : 'none'), 0, 0, 0, 1, '', 'maxwidth300');
172 } else {
173 if (!empty($object->fk_project)) {
174 $proj = new Project($db);
175 $proj->fetch($object->fk_project);
176 $morehtmlref .= $proj->getNomUrl(1);
177 if ($proj->title) {
178 $morehtmlref .= '<span class="opacitymedium"> - '.dol_escape_htmltag($proj->title).'</span>';
179 }
180 }
181 }
182 }
183 $morehtmlref .= '</div>';
184
185
186 dol_banner_tab($object, 'ref', $linkback, 1, 'ref', 'ref', $morehtmlref, '', 0, '', '', 1);
187
188 print dol_get_fiche_end();
189
190 // Contacts lines
191 include DOL_DOCUMENT_ROOT.'/core/tpl/contacts.tpl.php';
192 } else {
193 // Contact not found
194 print "ErrorRecordNotFound";
195 }
196}
197
198// End of page
199llxFooter();
200$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 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.
llxFooter()
Footer empty.
Definition document.php:107
ordersupplier_prepare_head(CommandeFournisseur $object)
Prepare array with list of tabs.
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)
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)
Show tabs of a record.
dol_get_fiche_end($notab=0)
Return tab footer of a card.
newToken()
Return the value of token currently saved into session with name 'newtoken'.
GETPOST($paramname, $check='alphanohtml', $method=0, $filter=null, $options=null, $noreplace=0)
Return value of a param into GET or POST supervariable.
getDolGlobalString($key, $default='')
Return a Dolibarr global constant string value.
img_edit($titlealt='default', $float=0, $other='')
Show logo edit/modify fiche.
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.