dolibarr 20.0.0
contact.php
Go to the documentation of this file.
1<?php
2/* Copyright (C) 2005 Patrick Rouillon <patrick@rouillon.net>
3 * Copyright (C) 2005-2016 Destailleur Laurent <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) 2023 Christian Foellmann <christian@foellmann.de>
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.'/comm/propal/class/propal.class.php';
31require_once DOL_DOCUMENT_ROOT.'/contact/class/contact.class.php';
32require_once DOL_DOCUMENT_ROOT.'/core/lib/propal.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('facture', 'propal', 'orders', 'sendings', 'companies'));
39
40$id = GETPOSTINT('id');
41$ref = GETPOST('ref', 'alpha');
42$lineid = GETPOSTINT('lineid');
43$action = GETPOST('action', 'aZ09');
44
45$object = new Propal($db);
46
47// Load object
48if ($id > 0 || !empty($ref)) {
49 $ret = $object->fetch($id, $ref);
50 if ($ret == 0) {
51 $langs->load("errors");
52 setEventMessages($langs->trans('ErrorRecordNotFound'), null, 'errors');
53 $error++;
54 } elseif ($ret < 0) {
55 setEventMessages($object->error, $object->errors, 'errors');
56 $error++;
57 }
58}
59if (!$error) {
60 $object->fetch_thirdparty();
61} else {
62 header('Location: '.DOL_URL_ROOT.'/comm/propal/list.php');
63 exit;
64}
65
66// Security check
67$socid = '';
68if (!empty($user->socid)) {
69 $socid = $user->socid;
70}
71$result = restrictedArea($user, 'propal', $object->id);
72$hookmanager->initHooks(array('proposalcontactcard', 'globalcard'));
73
74$usercancreate = $user->hasRight("propal", "creer");
75
76/*
77 * Actions
78 */
79
80$parameters = array('id'=>$id);
81$reshook = $hookmanager->executeHooks('doActions', $parameters, $object, $action);
82if ($reshook < 0) {
83 setEventMessages($hookmanager->error, $hookmanager->errors, 'errors');
84}
85
86if (empty($reshook)) {
87 // Add new contact
88 if ($action == 'addcontact' && $user->hasRight('propal', 'creer')) {
89 if ($object->id > 0) {
90 $contactid = (GETPOSTINT('userid') ? GETPOSTINT('userid') : GETPOSTINT('contactid'));
91 $typeid = (GETPOST('typecontact') ? GETPOST('typecontact') : GETPOST('type'));
92 $result = $object->add_contact($contactid, $typeid, GETPOST("source", 'aZ09'));
93 }
94
95 if ($result >= 0) {
96 header("Location: ".$_SERVER['PHP_SELF']."?id=".$object->id);
97 exit;
98 } else {
99 if ($object->error == 'DB_ERROR_RECORD_ALREADY_EXISTS') {
100 $langs->load("errors");
101 setEventMessages($langs->trans("ErrorThisContactIsAlreadyDefinedAsThisType"), null, 'errors');
102 } else {
103 setEventMessages($object->error, $object->errors, 'errors');
104 }
105 }
106 } elseif ($action == 'swapstatut' && $user->hasRight('propal', 'creer')) {
107 // Toggle the status of a contact
108 if ($object->id > 0) {
109 $result = $object->swapContactStatus(GETPOSTINT('ligne'));
110 }
111 } elseif ($action == 'deletecontact' && $user->hasRight('propal', 'creer')) {
112 // Delete contact
113 $result = $object->delete_contact($lineid);
114
115 if ($result >= 0) {
116 header("Location: ".$_SERVER['PHP_SELF']."?id=".$object->id);
117 exit;
118 } else {
119 dol_print_error($db);
120 }
121 }
122}
123
124/*
125 * View
126 */
127$title = $object->ref." - ".$langs->trans('ContactsAddresses');
128$help_url = "EN:Commercial_Proposals|FR:Proposition_commerciale|ES:Presupuestos";
129
130llxHeader('', $title, $help_url);
131
132$form = new Form($db);
133$formcompany = new FormCompany($db);
134$formother = new FormOther($db);
135
136if ($object->id > 0) {
137 $head = propal_prepare_head($object);
138 print dol_get_fiche_head($head, 'contact', $langs->trans("Proposal"), -1, 'propal');
139
140
141 // Proposal card
142
143 $linkback = '<a href="'.DOL_URL_ROOT.'/comm/propal/list.php?restore_lastsearch_values=1'.(!empty($socid) ? '&socid='.$socid : '').'">'.$langs->trans("BackToList").'</a>';
144
145
146 $morehtmlref = '<div class="refidno">';
147 // Ref customer
148 $morehtmlref .= $form->editfieldkey("RefCustomer", 'ref_client', $object->ref_client, $object, 0, 'string', '', 0, 1);
149 $morehtmlref .= $form->editfieldval("RefCustomer", 'ref_client', $object->ref_client, $object, 0, 'string', '', null, null, '', 1);
150 // Thirdparty
151 $morehtmlref .= '<br>'.$object->thirdparty->getNomUrl(1, 'customer');
152 // Project
153 if (isModEnabled('project')) {
154 $langs->load("projects");
155 $morehtmlref .= '<br>';
156 if (0) {
157 $morehtmlref .= img_picto($langs->trans("Project"), 'project', 'class="pictofixedwidth"');
158 if ($action != 'classify') {
159 $morehtmlref .= '<a class="editfielda" href="'.$_SERVER['PHP_SELF'].'?action=classify&token='.newToken().'&id='.$object->id.'">'.img_edit($langs->transnoentitiesnoconv('SetProject')).'</a> ';
160 }
161 $morehtmlref .= $form->form_project($_SERVER['PHP_SELF'].'?id='.$object->id, $object->socid, $object->fk_project, ($action == 'classify' ? 'projectid' : 'none'), 0, 0, 0, 1, '', 'maxwidth300');
162 } else {
163 if (!empty($object->fk_project)) {
164 $proj = new Project($db);
165 $proj->fetch($object->fk_project);
166 $morehtmlref .= $proj->getNomUrl(1);
167 if ($proj->title) {
168 $morehtmlref .= '<span class="opacitymedium"> - '.dol_escape_htmltag($proj->title).'</span>';
169 }
170 }
171 }
172 }
173 $morehtmlref .= '</div>';
174
175 dol_banner_tab($object, 'ref', $linkback, 1, 'ref', 'ref', $morehtmlref, '', 0, '', '', 1);
176
177 print dol_get_fiche_end();
178
179
180 // Contacts lines (modules that overwrite templates must declare this into descriptor)
181 $dirtpls = array_merge($conf->modules_parts['tpl'], array('/core/tpl'));
182 foreach ($dirtpls as $reldir) {
183 $res = @include dol_buildpath($reldir.'/contacts.tpl.php');
184 if ($res) {
185 break;
186 }
187 }
188}
189
190// End of page
191llxFooter();
192$db->close();
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()
Empty header.
Definition wrapper.php:55
llxFooter()
Empty footer.
Definition wrapper.php:69
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 permettant la generation de composants html autre Only common components are here.
Class to manage projects.
Class to manage proposals.
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.
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.
dol_print_error($db=null, $error='', $errors=null)
Displays error message system with all the information to facilitate the diagnosis and the escalation...
img_edit($titlealt='default', $float=0, $other='')
Show logo edit/modify fiche.
propal_prepare_head($object)
Prepare array with list of tabs.
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.