dolibarr 19.0.4
contact.php
Go to the documentation of this file.
1<?php
2/* Copyright (C) 2005-2012 Regis Houssin <regis.houssin@inodbox.com>
3 * Copyright (C) 2007-2009 Laurent Destailleur <eldy@users.sourceforge.net>
4 * Copyright (C) 2012 Juanjo Menent <jmenent@2byte.es>
5 *
6 * This program is free software; you can redistribute it and/or modify
7 * it under the terms of the GNU General Public License as published by
8 * the Free Software Foundation; either version 3 of the License, or
9 * (at your option) any later version.
10 *
11 * This program is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 * GNU General Public License for more details.
15 *
16 * You should have received a copy of the GNU General Public License
17 * along with this program. If not, see <https://www.gnu.org/licenses/>.
18 */
19
26// Load Dolibarr environment
27require '../main.inc.php';
28require_once DOL_DOCUMENT_ROOT.'/fichinter/class/fichinter.class.php';
29require_once DOL_DOCUMENT_ROOT.'/contact/class/contact.class.php';
30require_once DOL_DOCUMENT_ROOT.'/core/lib/fichinter.lib.php';
31require_once DOL_DOCUMENT_ROOT.'/core/class/html.formcompany.class.php';
32require_once DOL_DOCUMENT_ROOT.'/core/class/html.formprojet.class.php';
33require_once DOL_DOCUMENT_ROOT.'/projet/class/project.class.php';
34
35// Load translation files required by the page
36$langs->loadLangs(array('interventions', 'sendings', 'companies'));
37
38$id = GETPOST('id', 'int');
39$ref = GETPOST('ref', 'alpha');
40$action = GETPOST('action', 'aZ09');
41
42// Security check
43if ($user->socid) {
44 $socid = $user->socid;
45}
46$result = restrictedArea($user, 'ficheinter', $id, 'fichinter');
47
48$object = new Fichinter($db);
49$result = $object->fetch($id, $ref);
50if (!$result) {
51 print 'Record not found';
52 exit;
53}
54
55$usercancreate = $user->hasRight('ficheinter', 'creer');
56
57
58/*
59 * Adding a new contact
60 */
61
62if ($action == 'addcontact' && $user->hasRight('ficheinter', 'creer')) {
63 if ($result > 0 && $id > 0) {
64 $contactid = (GETPOST('userid', 'int') ? GETPOST('userid', 'int') : GETPOST('contactid', 'int'));
65 $typeid = (GETPOST('typecontact') ? GETPOST('typecontact') : GETPOST('type'));
66 $result = $object->add_contact($contactid, $typeid, GETPOST("source", 'aZ09'));
67 }
68
69 if ($result >= 0) {
70 header("Location: ".$_SERVER['PHP_SELF']."?id=".$object->id);
71 exit;
72 } else {
73 if ($object->error == 'DB_ERROR_RECORD_ALREADY_EXISTS') {
74 $langs->load("errors");
75 $mesg = $langs->trans("ErrorThisContactIsAlreadyDefinedAsThisType");
76 } else {
77 $mesg = $object->error;
78 }
79
80 setEventMessages($mesg, null, 'errors');
81 }
82} elseif ($action == 'swapstatut' && $user->hasRight('ficheinter', 'creer')) {
83 // Toggle the status of a contact
84 $result = $object->swapContactStatus(GETPOST('ligne', 'int'));
85} elseif ($action == 'deletecontact' && $user->hasRight('ficheinter', 'creer')) {
86 // Deletes a contact
87 $result = $object->delete_contact(GETPOST('lineid', 'int'));
88
89 if ($result >= 0) {
90 header("Location: ".$_SERVER['PHP_SELF']."?id=".$object->id);
91 exit;
92 } else {
93 dol_print_error($db);
94 }
95}
96
97
98/*
99 * View
100 */
101
102$form = new Form($db);
103$formcompany = new FormCompany($db);
104$contactstatic = new Contact($db);
105$userstatic = new User($db);
106$formproject = new FormProjets($db);
107
108llxHeader('', $langs->trans("Intervention"));
109
110// Mode vue et edition
111
112if ($id > 0 || !empty($ref)) {
113 $object->fetch_thirdparty();
114
115 $head = fichinter_prepare_head($object);
116 print dol_get_fiche_head($head, 'contact', $langs->trans("InterventionCard"), -1, 'intervention');
117
118
119 // Intervention card
120 $linkback = '<a href="'.DOL_URL_ROOT.'/fichinter/list.php?restore_lastsearch_values=1'.(!empty($socid) ? '&socid='.$socid : '').'">'.$langs->trans("BackToList").'</a>';
121
122
123 $morehtmlref = '<div class="refidno">';
124 // Ref customer
125 //$morehtmlref.=$form->editfieldkey("RefCustomer", 'ref_client', $object->ref_client, $object, $user->rights->ficheinter->creer, 'string', '', 0, 1);
126 //$morehtmlref.=$form->editfieldval("RefCustomer", 'ref_client', $object->ref_client, $object, $user->rights->ficheinter->creer, 'string', '', null, null, '', 1);
127 $morehtmlref.=$form->editfieldkey("RefCustomer", 'ref_client', $object->ref_client, $object, 0, 'string', '', 0, 1);
128 $morehtmlref.=$form->editfieldval("RefCustomer", 'ref_client', $object->ref_client, $object, 0, 'string', '', null, null, '', 1);
129 // Thirdparty
130 $morehtmlref .= '<br>'.$object->thirdparty->getNomUrl(1, 'customer');
131 // Project
132 if (isModEnabled('project')) {
133 $langs->load("projects");
134 $morehtmlref .= '<br>';
135 if ($usercancreate && 0) {
136 $morehtmlref .= img_picto($langs->trans("Project"), 'project', 'class="pictofixedwidth"');
137 if ($action != 'classify') {
138 $morehtmlref .= '<a class="editfielda" href="'.$_SERVER['PHP_SELF'].'?action=classify&token='.newToken().'&id='.$object->id.'">'.img_edit($langs->transnoentitiesnoconv('SetProject')).'</a> ';
139 }
140 $morehtmlref .= $form->form_project($_SERVER['PHP_SELF'].'?id='.$object->id, $object->socid, $object->fk_project, ($action == 'classify' ? 'projectid' : 'none'), 0, 0, 0, 1, '', 'maxwidth300');
141 } else {
142 if (!empty($object->fk_project)) {
143 $proj = new Project($db);
144 $proj->fetch($object->fk_project);
145 $morehtmlref .= $proj->getNomUrl(1);
146 if ($proj->title) {
147 $morehtmlref .= '<span class="opacitymedium"> - '.dol_escape_htmltag($proj->title).'</span>';
148 }
149 }
150 }
151 }
152 $morehtmlref .= '</div>';
153
154 dol_banner_tab($object, 'ref', $linkback, 1, 'ref', 'ref', $morehtmlref, '', 0, '', '', 1);
155
156 print dol_get_fiche_end();
157
158 print '<br>';
159
160 if (getDolGlobalString('FICHINTER_HIDE_ADD_CONTACT_USER')) {
161 $hideaddcontactforuser = 1;
162 }
163 if (getDolGlobalString('FICHINTER_HIDE_ADD_CONTACT_THIPARTY')) {
164 $hideaddcontactforthirdparty = 1;
165 }
166
167 // Contacts lines (modules that overwrite templates must declare this into descriptor)
168 $dirtpls = array_merge($conf->modules_parts['tpl'], array('/core/tpl'));
169 foreach ($dirtpls as $reldir) {
170 $res = @include dol_buildpath($reldir.'/contacts.tpl.php');
171 if ($res) {
172 break;
173 }
174 }
175}
176
177
178llxFooter();
179$db->close();
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 manage interventions.
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 building of HTML components.
Class to manage projects.
Class to manage Dolibarr users.
fichinter_prepare_head($object)
Prepare array with list of tabs.
dol_banner_tab($object, $paramid, $morehtml='', $shownav=1, $fieldid='rowid', $fieldref='ref', $morehtmlref='', $moreparam='', $nodbprefix=0, $morehtmlleft='', $morehtmlstatus='', $onlybanner=0, $morehtmlright='')
Show tab footer of a card.
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_print_error($db='', $error='', $errors=null)
Displays error message system with all the information to facilitate the diagnosis and the escalation...
dol_get_fiche_end($notab=0)
Return tab footer of a card.
img_picto($titlealt, $picto, $moreatt='', $pictoisfullpath=false, $srconly=0, $notitle=0, $alt='', $morecss='', $marginleftonlyshort=2)
Show picto whatever it's its name (generic function)
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.
getDolGlobalString($key, $default='')
Return dolibarr global constant string value.
img_edit($titlealt='default', $float=0, $other='')
Show logo editer/modifier 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.
Contact()
Old copy.
Definition index.php:572