forked from Wavyzz/dolibarr
310 lines
11 KiB
PHP
310 lines
11 KiB
PHP
<?php
|
|
/* Copyright (C) 2010 Regis Houssin <regis.houssin@inodbox.com>
|
|
* Copyright (C) 2012-2015 Laurent Destailleur <eldy@users.sourceforge.net>
|
|
*
|
|
* This program is free software; you can redistribute it and/or modify
|
|
* it under the terms of the GNU General Public License as published by
|
|
* the Free Software Foundation; either version 3 of the License, or
|
|
* (at your option) any later version.
|
|
*
|
|
* This program is distributed in the hope that it will be useful,
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
* GNU General Public License for more details.
|
|
*
|
|
* You should have received a copy of the GNU General Public License
|
|
* along with this program. If not, see <https://www.gnu.org/licenses/>.
|
|
*/
|
|
|
|
/**
|
|
* \file htdocs/projet/contact.php
|
|
* \ingroup project
|
|
* \brief Onglet de gestion des contacts du projet
|
|
*/
|
|
|
|
require '../main.inc.php';
|
|
require_once DOL_DOCUMENT_ROOT.'/projet/class/project.class.php';
|
|
require_once DOL_DOCUMENT_ROOT.'/contact/class/contact.class.php';
|
|
require_once DOL_DOCUMENT_ROOT.'/core/lib/project.lib.php';
|
|
require_once DOL_DOCUMENT_ROOT.'/core/class/html.formcompany.class.php';
|
|
|
|
// Load translation files required by the page
|
|
$langs->loadLangs(array('projects', 'companies'));
|
|
|
|
$id = GETPOST('id', 'int');
|
|
$ref = GETPOST('ref', 'alpha');
|
|
$lineid = GETPOST('lineid', 'int');
|
|
$socid = GETPOST('socid', 'int');
|
|
$action = GETPOST('action', 'alpha');
|
|
|
|
$mine = GETPOST('mode')=='mine' ? 1 : 0;
|
|
//if (! $user->rights->projet->all->lire) $mine=1; // Special for projects
|
|
|
|
$object = new Project($db);
|
|
|
|
include DOL_DOCUMENT_ROOT.'/core/actions_fetchobject.inc.php'; // Must be include, not include_once
|
|
if(! empty($conf->global->PROJECT_ALLOW_COMMENT_ON_PROJECT) && method_exists($object, 'fetchComments') && empty($object->comments)) $object->fetchComments();
|
|
|
|
// Security check
|
|
$socid=0;
|
|
//if ($user->socid > 0) $socid = $user->socid; // For external user, no check is done on company because readability is managed by public status of project and assignement.
|
|
$result = restrictedArea($user, 'projet', $id, 'projet&project');
|
|
|
|
$hookmanager->initHooks(array('projectcontactcard','globalcard'));
|
|
|
|
/*
|
|
* Actions
|
|
*/
|
|
|
|
// Add new contact
|
|
if ($action == 'addcontact' && $user->rights->projet->creer)
|
|
{
|
|
$result = 0;
|
|
$result = $object->fetch($id);
|
|
|
|
if ($result > 0 && $id > 0)
|
|
{
|
|
$contactid = (GETPOST('userid') ? GETPOST('userid', 'int') : GETPOST('contactid', 'int'));
|
|
$result = $object->add_contact($contactid, $_POST["type"], $_POST["source"]);
|
|
}
|
|
|
|
if ($result >= 0)
|
|
{
|
|
header("Location: ".$_SERVER['PHP_SELF']."?id=".$object->id);
|
|
exit;
|
|
}
|
|
else
|
|
{
|
|
if ($object->error == 'DB_ERROR_RECORD_ALREADY_EXISTS')
|
|
{
|
|
$langs->load("errors");
|
|
setEventMessages($langs->trans("ErrorThisContactIsAlreadyDefinedAsThisType"), null, 'errors');
|
|
}
|
|
else
|
|
{
|
|
setEventMessages($object->error, $object->errors, 'errors');
|
|
}
|
|
}
|
|
}
|
|
|
|
// bascule du statut d'un contact
|
|
if ($action == 'swapstatut' && $user->rights->projet->creer)
|
|
{
|
|
if ($object->fetch($id))
|
|
{
|
|
$result=$object->swapContactStatus(GETPOST('ligne', 'int'));
|
|
}
|
|
else
|
|
{
|
|
dol_print_error($db);
|
|
}
|
|
}
|
|
|
|
// Efface un contact
|
|
if (($action == 'deleteline' || $action == 'deletecontact') && $user->rights->projet->creer)
|
|
{
|
|
$object->fetch($id);
|
|
$result = $object->delete_contact(GETPOST("lineid"));
|
|
|
|
if ($result >= 0)
|
|
{
|
|
header("Location: contact.php?id=".$object->id);
|
|
exit;
|
|
}
|
|
else
|
|
{
|
|
dol_print_error($db);
|
|
}
|
|
}
|
|
|
|
|
|
/*
|
|
* View
|
|
*/
|
|
|
|
$title=$langs->trans("ProjectContact").' - '.$object->ref.' '.$object->name;
|
|
if (! empty($conf->global->MAIN_HTML_TITLE) && preg_match('/projectnameonly/', $conf->global->MAIN_HTML_TITLE) && $object->name) $title=$object->ref.' '.$object->name.' - '.$langs->trans("ProjectContact");
|
|
$help_url="EN:Module_Projects|FR:Module_Projets|ES:Módulo_Proyectos";
|
|
llxHeader('', $title, $help_url);
|
|
|
|
$form = new Form($db);
|
|
$formcompany= new FormCompany($db);
|
|
$contactstatic=new Contact($db);
|
|
$userstatic=new User($db);
|
|
|
|
|
|
/* *************************************************************************** */
|
|
/* */
|
|
/* Mode vue et edition */
|
|
/* */
|
|
/* *************************************************************************** */
|
|
|
|
if ($id > 0 || ! empty($ref))
|
|
{
|
|
if(! empty($conf->global->PROJECT_ALLOW_COMMENT_ON_PROJECT) && method_exists($object, 'fetchComments') && empty($object->comments)) $object->fetchComments();
|
|
// To verify role of users
|
|
//$userAccess = $object->restrictedProjectArea($user,'read');
|
|
$userWrite = $object->restrictedProjectArea($user, 'write');
|
|
//$userDelete = $object->restrictedProjectArea($user,'delete');
|
|
//print "userAccess=".$userAccess." userWrite=".$userWrite." userDelete=".$userDelete;
|
|
|
|
$head = project_prepare_head($object);
|
|
dol_fiche_head($head, 'contact', $langs->trans("Project"), -1, ($object->public?'projectpub':'project'));
|
|
|
|
|
|
// Project card
|
|
|
|
$linkback = '<a href="'.DOL_URL_ROOT.'/projet/list.php?restore_lastsearch_values=1">'.$langs->trans("BackToList").'</a>';
|
|
|
|
$morehtmlref='<div class="refidno">';
|
|
// Title
|
|
$morehtmlref.=$object->title;
|
|
// Thirdparty
|
|
if ($object->thirdparty->id > 0)
|
|
{
|
|
$morehtmlref.='<br>'.$langs->trans('ThirdParty') . ' : ' . $object->thirdparty->getNomUrl(1, 'project');
|
|
}
|
|
$morehtmlref.='</div>';
|
|
|
|
// Define a complementary filter for search of next/prev ref.
|
|
if (! $user->rights->projet->all->lire)
|
|
{
|
|
$objectsListId = $object->getProjectsAuthorizedForUser($user, 0, 0);
|
|
$object->next_prev_filter=" rowid in (".(count($objectsListId)?join(',', array_keys($objectsListId)):'0').")";
|
|
}
|
|
|
|
dol_banner_tab($object, 'ref', $linkback, 1, 'ref', 'ref', $morehtmlref);
|
|
|
|
|
|
print '<div class="fichecenter">';
|
|
print '<div class="fichehalfleft">';
|
|
print '<div class="underbanner clearboth"></div>';
|
|
|
|
print '<table class="border tableforfield centpercent">';
|
|
|
|
// Usage
|
|
print '<tr><td class="tdtop">';
|
|
print $langs->trans("Usage");
|
|
print '</td>';
|
|
print '<td>';
|
|
if (! empty($conf->global->PROJECT_USE_OPPORTUNITIES))
|
|
{
|
|
print '<input type="checkbox" disabled name="usage_opportunity"'.(GETPOSTISSET('usage_opportunity') ? (GETPOST('usage_opportunity', 'alpha')!=''?' checked="checked"':'') : ($object->usage_opportunity ? ' checked="checked"' : '')).'"> ';
|
|
$htmltext = $langs->trans("ProjectFollowOpportunity");
|
|
print $form->textwithpicto($langs->trans("ProjectFollowOpportunity"), $htmltext);
|
|
print '<br>';
|
|
}
|
|
if (empty($conf->global->PROJECT_HIDE_TASKS))
|
|
{
|
|
print '<input type="checkbox" disabled name="usage_task"'.(GETPOSTISSET('usage_task') ? (GETPOST('usage_task', 'alpha')!=''?' checked="checked"':'') : ($object->usage_task ? ' checked="checked"' : '')).'"> ';
|
|
$htmltext = $langs->trans("ProjectFollowTasks");
|
|
print $form->textwithpicto($langs->trans("ProjectFollowTasks"), $htmltext);
|
|
print '<br>';
|
|
}
|
|
if (! empty($conf->global->PROJECT_BILL_TIME_SPENT))
|
|
{
|
|
print '<input type="checkbox" disabled name="usage_bill_time"'.(GETPOSTISSET('usage_bill_time') ? (GETPOST('usage_bill_time', 'alpha')!=''?' checked="checked"':'') : ($object->usage_bill_time ? ' checked="checked"' : '')).'"> ';
|
|
$htmltext = $langs->trans("ProjectBillTimeDescription");
|
|
print $form->textwithpicto($langs->trans("BillTime"), $htmltext);
|
|
print '<br>';
|
|
}
|
|
print '</td></tr>';
|
|
|
|
// Visibility
|
|
print '<tr><td class="titlefield">'.$langs->trans("Visibility").'</td><td>';
|
|
if ($object->public) print $langs->trans('SharedProject');
|
|
else print $langs->trans('PrivateProject');
|
|
print '</td></tr>';
|
|
|
|
if (! empty($conf->global->PROJECT_USE_OPPORTUNITIES) && $object->opp_status)
|
|
{
|
|
// Opportunity status
|
|
print '<tr><td>'.$langs->trans("OpportunityStatus").'</td><td>';
|
|
$code = dol_getIdFromCode($db, $object->opp_status, 'c_lead_status', 'rowid', 'code');
|
|
if ($code) print $langs->trans("OppStatus".$code);
|
|
print '</td></tr>';
|
|
|
|
// Opportunity percent
|
|
print '<tr><td>'.$langs->trans("OpportunityProbability").'</td><td>';
|
|
if (strcmp($object->opp_percent, '')) print price($object->opp_percent, '', $langs, 1, 0).' %';
|
|
print '</td></tr>';
|
|
|
|
// Opportunity Amount
|
|
print '<tr><td>'.$langs->trans("OpportunityAmount").'</td><td>';
|
|
if (strcmp($object->opp_amount, '')) print price($object->opp_amount, '', $langs, 0, 0, 0, $conf->currency);
|
|
print '</td></tr>';
|
|
}
|
|
|
|
// Date start - end
|
|
print '<tr><td>'.$langs->trans("DateStart").' - '.$langs->trans("DateEnd").'</td><td>';
|
|
$start = dol_print_date($object->date_start, 'day');
|
|
print ($start?$start:'?');
|
|
$end = dol_print_date($object->date_end, 'day');
|
|
print ' - ';
|
|
print ($end?$end:'?');
|
|
if ($object->hasDelay()) print img_warning("Late");
|
|
print '</td></tr>';
|
|
|
|
// Budget
|
|
print '<tr><td>'.$langs->trans("Budget").'</td><td>';
|
|
if (strcmp($object->budget_amount, '')) print price($object->budget_amount, '', $langs, 0, 0, 0, $conf->currency);
|
|
print '</td></tr>';
|
|
|
|
// Other attributes
|
|
$cols = 2;
|
|
include DOL_DOCUMENT_ROOT . '/core/tpl/extrafields_view.tpl.php';
|
|
|
|
print "</table>";
|
|
|
|
print '</div>';
|
|
print '<div class="fichehalfright">';
|
|
print '<div class="ficheaddleft">';
|
|
print '<div class="underbanner clearboth"></div>';
|
|
|
|
print '<table class="border tableforfield" width="100%">';
|
|
|
|
// Description
|
|
print '<td class="titlefield tdtop">'.$langs->trans("Description").'</td><td>';
|
|
print nl2br($object->description);
|
|
print '</td></tr>';
|
|
|
|
// Bill time
|
|
if (empty($conf->global->PROJECT_HIDE_TASKS) && ! empty($conf->global->PROJECT_BILL_TIME_SPENT))
|
|
{
|
|
print '<tr><td>'.$langs->trans("BillTime").'</td><td>';
|
|
print yn($object->usage_bill_time);
|
|
print '</td></tr>';
|
|
}
|
|
|
|
// Categories
|
|
if ($conf->categorie->enabled) {
|
|
print '<tr><td class="valignmiddle">'.$langs->trans("Categories").'</td><td>';
|
|
print $form->showCategories($object->id, 'project', 1);
|
|
print "</td></tr>";
|
|
}
|
|
|
|
print '</table>';
|
|
|
|
print '</div>';
|
|
print '</div>';
|
|
print '</div>';
|
|
|
|
print '<div class="clearboth"></div>';
|
|
|
|
dol_fiche_end();
|
|
|
|
print '<br>';
|
|
|
|
// Contacts lines (modules that overwrite templates must declare this into descriptor)
|
|
$dirtpls=array_merge($conf->modules_parts['tpl'], array('/core/tpl'));
|
|
foreach($dirtpls as $reldir)
|
|
{
|
|
$res=@include dol_buildpath($reldir.'/contacts.tpl.php');
|
|
if ($res) break;
|
|
}
|
|
}
|
|
|
|
// End of page
|
|
llxFooter();
|
|
$db->close();
|