dolibarr 21.0.0-alpha
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 *
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.'/supplier_proposal/class/supplier_proposal.class.php';
32require_once DOL_DOCUMENT_ROOT.'/contact/class/contact.class.php';
33require_once DOL_DOCUMENT_ROOT.'/core/lib/supplier_proposal.lib.php';
34require_once DOL_DOCUMENT_ROOT.'/core/class/html.formcompany.class.php';
35require_once DOL_DOCUMENT_ROOT.'/projet/class/project.class.php';
36require_once DOL_DOCUMENT_ROOT.'/fourn/class/fournisseur.commande.class.php';
37require_once DOL_DOCUMENT_ROOT.'/fourn/class/fournisseur.commande.dispatch.class.php';
38
39// Load translation files required by the page
40$langs->loadLangs(array("propal", "supplier_proposal", "facture", "orders", "sendings", "companies"));
41
42$id = GETPOSTINT('id');
43$ref = GETPOST('ref', 'alpha');
44$action = GETPOST('action', 'aZ09');
45
46// Security check
47if ($user->socid) {
48 $socid = $user->socid;
49}
50
51$hookmanager->initHooks(array('supplier_proposalcontactcard', 'globalcard'));
52
53$result = restrictedArea($user, 'supplier_proposal', $id, 'supplier_proposal', '');
54
55$object = new SupplierProposal($db);
56
57$permissiontoedit = $user->hasRight('supplier_proposal', 'creer');
58
59
60/*
61 * Actions
62 */
63
64$parameters = array('id'=>$id);
65$reshook = $hookmanager->executeHooks('doActions', $parameters, $object, $action);
66if ($reshook < 0) {
67 setEventMessages($hookmanager->error, $hookmanager->errors, 'errors');
68}
69
70if (empty($reshook)) {
71 /*
72 * Add a new contact
73 */
74 if ($action == 'addcontact' && $permissiontoedit) {
75 $result = $object->fetch($id);
76
77 if ($result > 0 && $id > 0) {
78 $contactid = (GETPOST('userid') ? GETPOST('userid') : GETPOST('contactid'));
79 $typeid = (GETPOST('typecontact') ? GETPOST('typecontact') : GETPOST('type'));
80 $result = $object->add_contact($contactid, $typeid, GETPOST("source"));
81 }
82
83 if ($result >= 0) {
84 header("Location: ".$_SERVER['PHP_SELF']."?id=".$object->id);
85 exit;
86 } else {
87 if ($object->error == 'DB_ERROR_RECORD_ALREADY_EXISTS') {
88 $langs->load("errors");
89 setEventMessages($langs->trans("ErrorThisContactIsAlreadyDefinedAsThisType"), null, 'errors');
90 } else {
91 setEventMessages($object->error, $object->errors, 'errors');
92 }
93 }
94 } elseif ($action == 'swapstatut' && $permissiontoedit) {
95 // Toggle the status of a contact
96 if ($object->fetch($id)) {
97 $result = $object->swapContactStatus(GETPOSTINT('ligne'));
98 } else {
99 setEventMessages($object->error, $object->errors, 'errors');
100 }
101 } elseif ($action == 'deletecontact' && $permissiontoedit) {
102 // Deleting a contact
103 $object->fetch($id);
104 $result = $object->delete_contact(GETPOSTINT("lineid"));
105
106 if ($result >= 0) {
107 header("Location: ".$_SERVER['PHP_SELF']."?id=".$object->id);
108 exit;
109 } else {
110 setEventMessages($object->error, $object->errors, 'errors');
111 }
112 }
113}
114
115
116/*
117 * View
118 */
119$form = new Form($db);
120$formcompany = new FormCompany($db);
121$contactstatic = new Contact($db);
122$userstatic = new User($db);
123
124
125/* *************************************************************************** */
126/* */
127/* Card view and edit mode */
128/* */
129/* *************************************************************************** */
130
131if ($id > 0 || !empty($ref)) {
132 $langs->trans("SupplierProposal");
133
134 if ($object->fetch($id, $ref) > 0) {
135 $object->fetch_thirdparty();
136
137 $title = $object->ref." - ".$langs->trans('ContactsAddresses');
138 $help_url = 'EN:Ask_Price_Supplier|FR:Demande_de_prix_fournisseur';
139
140 llxHeader('', $title, $help_url, '', 0, 0, '', '', '', 'mod-supplierproposal page-card_contact');
141
142 $head = supplier_proposal_prepare_head($object);
143 print dol_get_fiche_head($head, 'contact', $langs->trans("CommRequest"), -1, 'supplier_proposal');
144
145 // Supplier order card
146
147 $linkback = '<a href="'.DOL_URL_ROOT.'/supplier_proposal/list.php'.(!empty($socid) ? '?socid='.$socid : '').'">'.$langs->trans("BackToList").'</a>';
148
149 $morehtmlref = '<div class="refidno">';
150 // Ref supplier
151 //$morehtmlref .= $form->editfieldkey("RefSupplier", 'ref_supplier', $object->ref_supplier, $object, 0, 'string', '', 0, 1);
152 //$morehtmlref .= $form->editfieldval("RefSupplier", 'ref_supplier', $object->ref_supplier, $object, 0, 'string', '', null, null, '', 1);
153 // Thirdparty
154 $morehtmlref .= $object->thirdparty->getNomUrl(1);
155 // Project
156 if (isModEnabled('project')) {
157 $langs->load("projects");
158 $morehtmlref .= '<br>';
159 if (0) {
160 $morehtmlref .= img_picto($langs->trans("Project"), 'project', 'class="pictofixedwidth"');
161 if ($action != 'classify') {
162 $morehtmlref .= '<a class="editfielda" href="'.$_SERVER['PHP_SELF'].'?action=classify&token='.newToken().'&id='.$object->id.'">'.img_edit($langs->transnoentitiesnoconv('SetProject')).'</a> ';
163 }
164 $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');
165 } else {
166 if (!empty($object->fk_project)) {
167 $proj = new Project($db);
168 $proj->fetch($object->fk_project);
169 $morehtmlref .= $proj->getNomUrl(1);
170 if ($proj->title) {
171 $morehtmlref .= '<span class="opacitymedium"> - '.dol_escape_htmltag($proj->title).'</span>';
172 }
173 }
174 }
175 }
176 $morehtmlref .= '</div>';
177
178
179 dol_banner_tab($object, 'ref', $linkback, 1, 'ref', 'ref', $morehtmlref, '', 0, '', '', 1);
180
181 print dol_get_fiche_end();
182
183 // Contacts lines
184 include DOL_DOCUMENT_ROOT.'/core/tpl/contacts.tpl.php';
185 } else {
186 // Contact not found
187 print "ErrorRecordNotFound";
188 }
189}
190
191// End of page
192llxFooter();
193$db->close();
$id
Definition account.php:39
if( $user->socid > 0) if(! $user->hasRight('accounting', 'chartofaccount')) $object
Definition card.php:58
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:70
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.