dolibarr 21.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-2018 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 Alexandre Spangaro <alexandre@inovea-conseil.com>
8 * Copyright (C) 2024 Frédéric France <frederic.france@free.fr>
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';
33require_once DOL_DOCUMENT_ROOT.'/supplier_proposal/class/supplier_proposal.class.php';
34require_once DOL_DOCUMENT_ROOT.'/contact/class/contact.class.php';
35require_once DOL_DOCUMENT_ROOT.'/core/lib/supplier_proposal.lib.php';
36require_once DOL_DOCUMENT_ROOT.'/core/class/html.formcompany.class.php';
37require_once DOL_DOCUMENT_ROOT.'/projet/class/project.class.php';
38require_once DOL_DOCUMENT_ROOT.'/fourn/class/fournisseur.commande.class.php';
39require_once DOL_DOCUMENT_ROOT.'/fourn/class/fournisseur.commande.dispatch.class.php';
40
49// Load translation files required by the page
50$langs->loadLangs(array("propal", "supplier_proposal", "facture", "orders", "sendings", "companies"));
51
52$id = GETPOSTINT('id');
53$ref = GETPOST('ref', 'alpha');
54$action = GETPOST('action', 'aZ09');
55
56// Security check
57if ($user->socid) {
58 $socid = $user->socid;
59}
60
61$hookmanager->initHooks(array('supplier_proposalcontactcard', 'globalcard'));
62
63$result = restrictedArea($user, 'supplier_proposal', $id, 'supplier_proposal', '');
64
65$object = new SupplierProposal($db);
66
67$permissiontoedit = $user->hasRight('supplier_proposal', 'creer');
68
69
70/*
71 * Actions
72 */
73
74$parameters = array('id'=>$id);
75$reshook = $hookmanager->executeHooks('doActions', $parameters, $object, $action);
76if ($reshook < 0) {
77 setEventMessages($hookmanager->error, $hookmanager->errors, 'errors');
78}
79
80if (empty($reshook)) {
81 /*
82 * Add a new contact
83 */
84 if ($action == 'addcontact' && $permissiontoedit) {
85 $result = $object->fetch($id);
86
87 if ($result > 0 && $id > 0) {
88 $contactid = (GETPOST('userid') ? GETPOST('userid') : GETPOST('contactid'));
89 $typeid = (GETPOST('typecontact') ? GETPOST('typecontact') : GETPOST('type'));
90 $result = $object->add_contact($contactid, $typeid, GETPOST("source"));
91 }
92
93 if ($result >= 0) {
94 header("Location: ".$_SERVER['PHP_SELF']."?id=".$object->id);
95 exit;
96 } else {
97 if ($object->error == 'DB_ERROR_RECORD_ALREADY_EXISTS') {
98 $langs->load("errors");
99 setEventMessages($langs->trans("ErrorThisContactIsAlreadyDefinedAsThisType"), null, 'errors');
100 } else {
101 setEventMessages($object->error, $object->errors, 'errors');
102 }
103 }
104 } elseif ($action == 'swapstatut' && $permissiontoedit) {
105 // Toggle the status of a contact
106 if ($object->fetch($id)) {
107 $result = $object->swapContactStatus(GETPOSTINT('ligne'));
108 } else {
109 setEventMessages($object->error, $object->errors, 'errors');
110 }
111 } elseif ($action == 'deletecontact' && $permissiontoedit) {
112 // Deleting a contact
113 $object->fetch($id);
114 $result = $object->delete_contact(GETPOSTINT("lineid"));
115
116 if ($result >= 0) {
117 header("Location: ".$_SERVER['PHP_SELF']."?id=".$object->id);
118 exit;
119 } else {
120 setEventMessages($object->error, $object->errors, 'errors');
121 }
122 }
123}
124
125
126/*
127 * View
128 */
129$form = new Form($db);
130$formcompany = new FormCompany($db);
131$contactstatic = new Contact($db);
132$userstatic = new User($db);
133
134
135/* *************************************************************************** */
136/* */
137/* Card view and edit mode */
138/* */
139/* *************************************************************************** */
140
141if ($id > 0 || !empty($ref)) {
142 $langs->trans("SupplierProposal");
143
144 if ($object->fetch($id, $ref) > 0) {
145 $object->fetch_thirdparty();
146
147 $title = $object->ref." - ".$langs->trans('ContactsAddresses');
148 $help_url = 'EN:Ask_Price_Supplier|FR:Demande_de_prix_fournisseur';
149
150 llxHeader('', $title, $help_url, '', 0, 0, '', '', '', 'mod-supplierproposal page-card_contact');
151
152 $head = supplier_proposal_prepare_head($object);
153 print dol_get_fiche_head($head, 'contact', $langs->trans("CommRequest"), -1, 'supplier_proposal');
154
155 // Supplier order card
156
157 $linkback = '<a href="'.DOL_URL_ROOT.'/supplier_proposal/list.php'.(!empty($socid) ? '?socid='.$socid : '').'">'.$langs->trans("BackToList").'</a>';
158
159 $morehtmlref = '<div class="refidno">';
160 // Ref supplier
161 //$morehtmlref .= $form->editfieldkey("RefSupplier", 'ref_supplier', $object->ref_supplier, $object, 0, 'string', '', 0, 1);
162 //$morehtmlref .= $form->editfieldval("RefSupplier", 'ref_supplier', $object->ref_supplier, $object, 0, 'string', '', null, null, '', 1);
163 // Thirdparty
164 $morehtmlref .= $object->thirdparty->getNomUrl(1);
165 // Project
166 if (isModEnabled('project')) {
167 $langs->load("projects");
168 $morehtmlref .= '<br>';
169 if (0) {
170 $morehtmlref .= img_picto($langs->trans("Project"), 'project', 'class="pictofixedwidth"');
171 if ($action != 'classify') {
172 $morehtmlref .= '<a class="editfielda" href="'.$_SERVER['PHP_SELF'].'?action=classify&token='.newToken().'&id='.$object->id.'">'.img_edit($langs->transnoentitiesnoconv('SetProject')).'</a> ';
173 }
174 $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');
175 } else {
176 if (!empty($object->fk_project)) {
177 $proj = new Project($db);
178 $proj->fetch($object->fk_project);
179 $morehtmlref .= $proj->getNomUrl(1);
180 if ($proj->title) {
181 $morehtmlref .= '<span class="opacitymedium"> - '.dol_escape_htmltag($proj->title).'</span>';
182 }
183 }
184 }
185 }
186 $morehtmlref .= '</div>';
187
188
189 dol_banner_tab($object, 'ref', $linkback, 1, 'ref', 'ref', $morehtmlref, '', 0, '', '', 1);
190
191 print dol_get_fiche_end();
192
193 // Contacts lines (modules that overwrite templates must declare this into descriptor)
194 $dirtpls = array_merge($conf->modules_parts['tpl'], array('/core/tpl'));
195 foreach ($dirtpls as $reldir) {
196 $res = @include dol_buildpath($reldir.'/contacts.tpl.php');
197 if ($res) {
198 break;
199 }
200 }
201 } else {
202 // Contact not found
203 print "ErrorRecordNotFound";
204 }
205}
206
207// End of page
208llxFooter();
209$db->close();
$id
Definition account.php:48
if( $user->socid > 0) if(! $user->hasRight('accounting', 'chartofaccount')) $object
Definition card.php:66
llxFooter($comment='', $zone='private', $disabledoutputofmessages=0)
Empty footer.
Definition wrapper.php:87
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 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 price ask supplier.
Class to manage Dolibarr users.
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)
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.
dol_buildpath($path, $type=0, $returnemptyifnotfound=0)
Return path of url or filesystem.
getDolGlobalString($key, $default='')
Return a Dolibarr global constant string value.
img_edit($titlealt='default', $float=0, $other='')
Show logo edit/modify fiche.
global $conf
The following vars must be defined: $type2label $form $conf, $lang, The following vars may also be de...
Definition member.php:79
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.
supplier_proposal_prepare_head($object)
Prepare array with list of tabs.