dolibarr  20.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-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
29 require '../../main.inc.php';
30 require_once DOL_DOCUMENT_ROOT.'/comm/propal/class/propal.class.php';
31 require_once DOL_DOCUMENT_ROOT.'/contact/class/contact.class.php';
32 require_once DOL_DOCUMENT_ROOT.'/core/lib/propal.lib.php';
33 require_once DOL_DOCUMENT_ROOT.'/core/class/html.formother.class.php';
34 require_once DOL_DOCUMENT_ROOT.'/core/class/html.formcompany.class.php';
35 require_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
48 if ($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 }
59 if (!$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 = '';
68 if (!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);
82 if ($reshook < 0) {
83  setEventMessages($hookmanager->error, $hookmanager->errors, 'errors');
84 }
85 
86 if (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 
130 llxHeader('', $title, $help_url);
131 
132 $form = new Form($db);
133 $formcompany = new FormCompany($db);
134 $formother = new FormOther($db);
135 
136 if ($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
191 llxFooter();
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...
isModEnabled($module)
Is Dolibarr module enabled.
img_edit($titlealt='default', $float=0, $other='')
Show logo edit/modify fiche.
propal_prepare_head($object)
Prepare array with list of tabs.
Definition: propal.lib.php:32
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.