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-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 *
10 * This program is free software; you can redistribute it and/or modify
11 * it under the terms of the GNU General Public License as published by
12 * the Free Software Foundation; either version 3 of the License, or
13 * (at your option) any later version.
14 *
15 * This program is distributed in the hope that it will be useful,
16 * but WITHOUT ANY WARRANTY; without even the implied warranty of
17 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
18 * GNU General Public License for more details.
19 *
20 * You should have received a copy of the GNU General Public License
21 * along with this program. If not, see <https://www.gnu.org/licenses/>.
22 */
23
30// Load Dolibarr environment
31require '../main.inc.php';
32require_once DOL_DOCUMENT_ROOT.'/supplier_proposal/class/supplier_proposal.class.php';
33require_once DOL_DOCUMENT_ROOT.'/contact/class/contact.class.php';
34require_once DOL_DOCUMENT_ROOT.'/core/lib/supplier_proposal.lib.php';
35require_once DOL_DOCUMENT_ROOT.'/core/class/html.formcompany.class.php';
36require_once DOL_DOCUMENT_ROOT.'/projet/class/project.class.php';
37require_once DOL_DOCUMENT_ROOT.'/fourn/class/fournisseur.commande.class.php';
38require_once DOL_DOCUMENT_ROOT.'/fourn/class/fournisseur.commande.dispatch.class.php';
39
48// Load translation files required by the page
49$langs->loadLangs(array("propal", "supplier_proposal", "facture", "orders", "sendings", "companies"));
50
51$id = GETPOSTINT('id');
52$ref = GETPOST('ref', 'alpha');
53$action = GETPOST('action', 'aZ09');
54
55// Security check
56if ($user->socid) {
57 $socid = $user->socid;
58}
59
60$hookmanager->initHooks(array('supplier_proposalcontactcard', 'globalcard'));
61
62$result = restrictedArea($user, 'supplier_proposal', $id, 'supplier_proposal', '');
63
64$object = new SupplierProposal($db);
65
66$permissiontoedit = $user->hasRight('supplier_proposal', 'creer');
67
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 /*
81 * Add a new contact
82 */
83 if ($action == 'addcontact' && $permissiontoedit) {
84 $result = $object->fetch($id);
85
86 if ($result > 0 && $id > 0) {
87 $contactid = (GETPOST('userid') ? GETPOST('userid') : GETPOST('contactid'));
88 $typeid = (GETPOST('typecontact') ? GETPOST('typecontact') : GETPOST('type'));
89 $result = $object->add_contact($contactid, $typeid, GETPOST("source"));
90 }
91
92 if ($result >= 0) {
93 header("Location: ".$_SERVER['PHP_SELF']."?id=".$object->id);
94 exit;
95 } else {
96 if ($object->error == 'DB_ERROR_RECORD_ALREADY_EXISTS') {
97 $langs->load("errors");
98 setEventMessages($langs->trans("ErrorThisContactIsAlreadyDefinedAsThisType"), null, 'errors');
99 } else {
100 setEventMessages($object->error, $object->errors, 'errors');
101 }
102 }
103 } elseif ($action == 'swapstatut' && $permissiontoedit) {
104 // Toggle the status of a contact
105 if ($object->fetch($id)) {
106 $result = $object->swapContactStatus(GETPOSTINT('ligne'));
107 } else {
108 setEventMessages($object->error, $object->errors, 'errors');
109 }
110 } elseif ($action == 'deletecontact' && $permissiontoedit) {
111 // Deleting a contact
112 $object->fetch($id);
113 $result = $object->delete_contact(GETPOSTINT("lineid"));
114
115 if ($result >= 0) {
116 header("Location: ".$_SERVER['PHP_SELF']."?id=".$object->id);
117 exit;
118 } else {
119 setEventMessages($object->error, $object->errors, 'errors');
120 }
121 }
122}
123
124
125/*
126 * View
127 */
128$form = new Form($db);
129$formcompany = new FormCompany($db);
130$contactstatic = new Contact($db);
131$userstatic = new User($db);
132
133
134/* *************************************************************************** */
135/* */
136/* Card view and edit mode */
137/* */
138/* *************************************************************************** */
139
140if ($id > 0 || !empty($ref)) {
141 $langs->trans("SupplierProposal");
142
143 if ($object->fetch($id, $ref) > 0) {
144 $object->fetch_thirdparty();
145
146 $title = $object->ref." - ".$langs->trans('ContactsAddresses');
147 $help_url = 'EN:Ask_Price_Supplier|FR:Demande_de_prix_fournisseur';
148
149 llxHeader('', $title, $help_url, '', 0, 0, '', '', '', 'mod-supplierproposal page-card_contact');
150
151 $head = supplier_proposal_prepare_head($object);
152 print dol_get_fiche_head($head, 'contact', $langs->trans("CommRequest"), -1, 'supplier_proposal');
153
154 // Supplier order card
155
156 $linkback = '<a href="'.DOL_URL_ROOT.'/supplier_proposal/list.php'.(!empty($socid) ? '?socid='.$socid : '').'">'.$langs->trans("BackToList").'</a>';
157
158 $morehtmlref = '<div class="refidno">';
159 // Ref supplier
160 //$morehtmlref .= $form->editfieldkey("RefSupplier", 'ref_supplier', $object->ref_supplier, $object, 0, 'string', '', 0, 1);
161 //$morehtmlref .= $form->editfieldval("RefSupplier", 'ref_supplier', $object->ref_supplier, $object, 0, 'string', '', null, null, '', 1);
162 // Thirdparty
163 $morehtmlref .= $object->thirdparty->getNomUrl(1);
164 // Project
165 if (isModEnabled('project')) {
166 $langs->load("projects");
167 $morehtmlref .= '<br>';
168 if (0) {
169 $morehtmlref .= img_picto($langs->trans("Project"), 'project', 'class="pictofixedwidth"');
170 if ($action != 'classify') {
171 $morehtmlref .= '<a class="editfielda" href="'.$_SERVER['PHP_SELF'].'?action=classify&token='.newToken().'&id='.$object->id.'">'.img_edit($langs->transnoentitiesnoconv('SetProject')).'</a> ';
172 }
173 $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');
174 } else {
175 if (!empty($object->fk_project)) {
176 $proj = new Project($db);
177 $proj->fetch($object->fk_project);
178 $morehtmlref .= $proj->getNomUrl(1);
179 if ($proj->title) {
180 $morehtmlref .= '<span class="opacitymedium"> - '.dol_escape_htmltag($proj->title).'</span>';
181 }
182 }
183 }
184 }
185 $morehtmlref .= '</div>';
186
187
188 dol_banner_tab($object, 'ref', $linkback, 1, 'ref', 'ref', $morehtmlref, '', 0, '', '', 1);
189
190 print dol_get_fiche_end();
191
192 // Contacts lines
193 include DOL_DOCUMENT_ROOT.'/core/tpl/contacts.tpl.php';
194 } else {
195 // Contact not found
196 print "ErrorRecordNotFound";
197 }
198}
199
200// End of page
201llxFooter();
202$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 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.
llxFooter()
Footer empty.
Definition document.php:107
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.
supplier_proposal_prepare_head($object)
Prepare array with list of tabs.