dolibarr 21.0.4
evaluation_contact.php
Go to the documentation of this file.
1<?php
2/* Copyright (C) 2007-2017 Laurent Destailleur <eldy@users.sourceforge.net>
3 * Copyright (C) 2021 Gauthier VERDOL <gauthier.verdol@atm-consulting.fr>
4 * Copyright (C) 2021 Greg Rastklan <greg.rastklan@atm-consulting.fr>
5 * Copyright (C) 2021 Jean-Pascal BOUDET <jean-pascal.boudet@atm-consulting.fr>
6 * Copyright (C) 2021 Grégory BLEMAND <gregory.blemand@atm-consulting.fr>
7 * Copyright (C) 2024 Frédéric France <frederic.france@free.fr>
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
30// Load Dolibarr environment
31require '../main.inc.php';
32
33require_once DOL_DOCUMENT_ROOT.'/contact/class/contact.class.php';
34require_once DOL_DOCUMENT_ROOT.'/core/class/html.formcompany.class.php';
35require_once DOL_DOCUMENT_ROOT.'/hrm/class/evaluation.class.php';
36require_once DOL_DOCUMENT_ROOT.'/hrm/lib/hrm_evaluation.lib.php';
37require_once DOL_DOCUMENT_ROOT.'/hrm/class/job.class.php';
38
47// Load translation files required by the page
48$langs->loadLangs(array('hrm', 'companies', 'other', 'mails'));
49
50// Get Parameters
51$id = (GETPOST('id') ? GETPOSTINT('id') : GETPOSTINT('facid')); // For backward compatibility
52$ref = GETPOST('ref', 'alpha');
53$lineid = GETPOSTINT('lineid');
54$socid = GETPOSTINT('socid');
55$action = GETPOST('action', 'aZ09');
56
57// Initialize a technical objects
58$object = new Evaluation($db);
59$extrafields = new ExtraFields($db);
60$diroutputmassaction = $conf->hrm->dir_output.'/temp/massgeneration/'.$user->id;
61$hookmanager->initHooks(array('evaluationcontact', 'globalcard')); // Note that conf->hooks_modules contains array
62// Fetch optionals attributes and labels
63$extrafields->fetch_name_optionals_label($object->table_element);
64
65// Load object
66include DOL_DOCUMENT_ROOT.'/core/actions_fetchobject.inc.php'; // Must be 'include', not 'include_once'. Include fetch and fetch_thirdparty but not fetch_optionals
67
68// Permissions
69$permission = $user->hasRight('hrm', 'evaluation', 'write');
70
71// Security check (enable the most restrictive one)
72//if ($user->socid > 0) accessforbidden();
73//if ($user->socid > 0) $socid = $user->socid;
74$isdraft = $object->status == Evaluation::STATUS_DRAFT ? 1 : 0;
75restrictedArea($user, $object->element, $object, $object->table_element, '', 'fk_soc', 'rowid', $isdraft);
76
77
78
79/*
80 * Action
81 */
82
83// Add a new contact
84
85if ($action == 'addcontact' && $permission) {
86 $contactid = (GETPOST('userid') ? GETPOSTINT('userid') : GETPOSTINT('contactid'));
87 $typeid = (GETPOST('typecontact') ? GETPOST('typecontact') : GETPOST('type'));
88 $result = $object->add_contact($contactid, $typeid, GETPOST("source", 'aZ09'));
89
90 if ($result >= 0) {
91 header("Location: ".$_SERVER['PHP_SELF']."?id=".$object->id);
92 exit;
93 } else {
94 if ($object->error == 'DB_ERROR_RECORD_ALREADY_EXISTS') {
95 $langs->load("errors");
96 setEventMessages($langs->trans("ErrorThisContactIsAlreadyDefinedAsThisType"), null, 'errors');
97 } else {
98 setEventMessages($object->error, $object->errors, 'errors');
99 }
100 }
101} elseif ($action == 'swapstatut' && $permission) {
102 // Toggle the status of a contact
103 $result = $object->swapContactStatus(GETPOSTINT('ligne'));
104} elseif ($action == 'deletecontact' && $permission) {
105 // Deletes a contact
106 $result = $object->delete_contact($lineid);
107
108 if ($result >= 0) {
109 header("Location: ".$_SERVER['PHP_SELF']."?id=".$object->id);
110 exit;
111 } else {
112 dol_print_error($db);
113 }
114}
115
116
117/*
118 * View
119 */
120
121$title = $langs->trans('Evaluation')." - ".$langs->trans('ContactsAddresses');
122$help_url = '';
123//$help_url='EN:Module_Third_Parties|FR:Module_Tiers|ES:Empresas';
124llxHeader('', $title, $help_url);
125
126$form = new Form($db);
127$formcompany = new FormCompany($db);
128$contactstatic = new Contact($db);
129$userstatic = new User($db);
130
131
132/* *************************************************************************** */
133/* */
134/* View and edit mode */
135/* */
136/* *************************************************************************** */
137
138if ($object->id) {
139 /*
140 * Show tabs
141 */
142 $head = evaluationPrepareHead($object);
143
144 print dol_get_fiche_head($head, 'contact', '', -1, $object->picto);
145
146 $linkback = '<a href="'.dol_buildpath('/hrm/evaluation_list.php', 1).'?restore_lastsearch_values=1'.(!empty($socid) ? '&socid='.$socid : '').'">'.$langs->trans("BackToList").'</a>';
147
148 $morehtmlref = '<div class="refidno">';
149 $morehtmlref .= $langs->trans('Label').' : '.$object->label;
150 $u_position = new User(($db));
151 $u_position->fetch($object->fk_user);
152 $morehtmlref .= '<br>'.$u_position->getNomUrl(1);
153 $job = new Job($db);
154 $job->fetch($object->fk_job);
155 $morehtmlref .= '<br>'.$langs->trans('JobProfile').' : '.$job->getNomUrl(1);
156 $morehtmlref .= '</div>';
157
158 dol_banner_tab($object, 'ref', $linkback, 1, 'ref', 'ref', $morehtmlref, '', 0, '', '', 1);
159
160 print dol_get_fiche_end();
161
162 print '<br>';
163
164 // Contacts lines (modules that overwrite templates must declare this into descriptor)
165 $dirtpls = array_merge($conf->modules_parts['tpl'], array('/core/tpl'));
166 foreach ($dirtpls as $reldir) {
167 $res = @include dol_buildpath($reldir.'/contacts.tpl.php');
168 if ($res) {
169 break;
170 }
171 }
172}
173
174// End of page
175llxFooter();
176$db->close();
$id
Definition account.php:48
if( $user->socid > 0) if(! $user->hasRight('accounting', 'chartofaccount')) $object
Definition card.php:66
llxFooter($comment='', $zone='private', $disabledoutputofmessages=0)
Empty footer.
Definition wrapper.php:87
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 for Evaluation.
Class to manage standard extra fields.
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 for Job.
Definition job.class.php:38
Class to manage Dolibarr users.
setEventMessages($mesg, $mesgs, $style='mesgs', $messagekey='', $noduplicate=0, $attop=0)
Set event messages in dol_events session object.
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.
GETPOST($paramname, $check='alphanohtml', $method=0, $filter=null, $options=null, $noreplace=0)
Return value of a param into GET or POST supervariable.
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...
evaluationPrepareHead($object)
Prepare array of tabs for Evaluation.
global $conf
The following vars must be defined: $type2label $form $conf, $lang, The following vars may also be de...
Definition member.php:79
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.