dolibarr 18.0.6
contact.php
Go to the documentation of this file.
1<?php
2/* Copyright (C) 2005 Patrick Rouillon <patrick@rouillon.net>
3 * Copyright (C) 2005-2009 Destailleur Laurent <eldy@users.sourceforge.net>
4 * Copyright (C) 2005-2012 Regis Houssin <regis.houssin@inodbox.com>
5 * Copyright (C) 2011-2015 Philippe Grand <philippe.grand@atoo-net.com>
6 * Copyright (C) 2017 Ferran Marcet <fmarcet@2byte.es>
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.'/compta/facture/class/facture.class.php';
31require_once DOL_DOCUMENT_ROOT.'/contact/class/contact.class.php';
32require_once DOL_DOCUMENT_ROOT.'/core/class/discount.class.php';
33require_once DOL_DOCUMENT_ROOT.'/core/lib/invoice.lib.php';
34require_once DOL_DOCUMENT_ROOT.'/core/class/html.formcompany.class.php';
35if (isModEnabled('project')) {
36 require_once DOL_DOCUMENT_ROOT.'/projet/class/project.class.php';
37}
38
39// Load translation files required by the page
40$langs->loadLangs(array('bills', 'companies'));
41
42$id = (GETPOST('id') ?GETPOST('id', 'int') : GETPOST('facid', 'int')); // For backward compatibility
43$ref = GETPOST('ref', 'alpha');
44$lineid = GETPOST('lineid', 'int');
45$socid = GETPOST('socid', 'int');
46$action = GETPOST('action', 'aZ09');
47
48// Security check
49if ($user->socid) {
50 $socid = $user->socid;
51}
52
53$object = new Facture($db);
54// Load object
55if ($id > 0 || !empty($ref)) {
56 $ret = $object->fetch($id, $ref, '', '', (!empty($conf->global->INVOICE_USE_SITUATION) ? $conf->global->INVOICE_USE_SITUATION : 0));
57}
58$hookmanager->initHooks(array('invoicecontactcard', 'globalcard'));
59$result = restrictedArea($user, 'facture', $object->id);
60
61$usercancreate = $user->hasRight("facture", "creer");
62
63/*
64 * Add a new contact
65 */
66
67if ($action == 'addcontact' && $user->hasRight('facture', 'creer')) {
68 if ($result > 0 && $id > 0) {
69 $contactid = (GETPOST('userid') ? GETPOST('userid', 'int') : GETPOST('contactid', 'int'));
70 $typeid = (GETPOST('typecontact') ? GETPOST('typecontact') : GETPOST('type'));
71 $result = $object->add_contact($contactid, $typeid, GETPOST("source", 'aZ09'));
72 }
73
74 if ($result >= 0) {
75 header("Location: ".$_SERVER['PHP_SELF']."?id=".$object->id);
76 exit;
77 } else {
78 if ($object->error == 'DB_ERROR_RECORD_ALREADY_EXISTS') {
79 $langs->load("errors");
80 setEventMessages($langs->trans("ErrorThisContactIsAlreadyDefinedAsThisType"), null, 'errors');
81 } else {
82 setEventMessages($object->error, $object->errors, 'errors');
83 }
84 }
85} elseif ($action == 'swapstatut' && $user->hasRight('facture', 'creer')) {
86 // Toggle the status of a contact
87 $result = $object->swapContactStatus(GETPOST('ligne', 'int'));
88} elseif ($action == 'deletecontact' && $user->hasRight('facture', 'creer')) {
89 // Deletes a contact
90 $result = $object->delete_contact($lineid);
91
92 if ($result >= 0) {
93 header("Location: ".$_SERVER['PHP_SELF']."?id=".$object->id);
94 exit;
95 } else {
96 dol_print_error($db);
97 }
98}
99
100
101/*
102 * View
103 */
104
105$title = $object->ref." - ".$langs->trans('ContactsAddresses');
106$helpurl = "EN:Customers_Invoices|FR:Factures_Clients|ES:Facturas_a_clientes";
107llxHeader('', $title, $helpurl);
108
109$form = new Form($db);
110$formcompany = new FormCompany($db);
111$contactstatic = new Contact($db);
112$userstatic = new User($db);
113
114
115/* *************************************************************************** */
116/* */
117/* View and edit mode */
118/* */
119/* *************************************************************************** */
120
121if ($id > 0 || !empty($ref)) {
122 if ($object->fetch($id, $ref) > 0) {
123 $object->fetch_thirdparty();
124
125 $head = facture_prepare_head($object);
126
127 $totalpaid = $object->getSommePaiement();
128
129 print dol_get_fiche_head($head, 'contact', $langs->trans('InvoiceCustomer'), -1, 'bill');
130
131 // Invoice content
132
133 $linkback = '<a href="'.DOL_URL_ROOT.'/compta/facture/list.php?restore_lastsearch_values=1'.(!empty($socid) ? '&socid='.$socid : '').'">'.$langs->trans("BackToList").'</a>';
134
135 $morehtmlref = '<div class="refidno">';
136 // Ref customer
137 $morehtmlref .= $form->editfieldkey("RefCustomer", 'ref_client', $object->ref_client, $object, 0, 'string', '', 0, 1);
138 $morehtmlref .= $form->editfieldval("RefCustomer", 'ref_client', $object->ref_client, $object, 0, 'string', '', null, null, '', 1);
139 // Thirdparty
140 $morehtmlref .= '<br>'.$object->thirdparty->getNomUrl(1, 'customer');
141 // Project
142 if (isModEnabled('project')) {
143 $langs->load("projects");
144 $morehtmlref .= '<br>';
145 if (0) {
146 $morehtmlref .= img_picto($langs->trans("Project"), 'project', 'class="pictofixedwidth"');
147 if ($action != 'classify') {
148 $morehtmlref .= '<a class="editfielda" href="'.$_SERVER['PHP_SELF'].'?action=classify&token='.newToken().'&id='.$object->id.'">'.img_edit($langs->transnoentitiesnoconv('SetProject')).'</a> ';
149 }
150 $morehtmlref .= $form->form_project($_SERVER['PHP_SELF'].'?id='.$object->id, $object->socid, $object->fk_project, ($action == 'classify' ? 'projectid' : 'none'), 0, 0, 0, 1, '', 'maxwidth300');
151 } else {
152 if (!empty($object->fk_project)) {
153 $proj = new Project($db);
154 $proj->fetch($object->fk_project);
155 $morehtmlref .= $proj->getNomUrl(1);
156 if ($proj->title) {
157 $morehtmlref .= '<span class="opacitymedium"> - '.dol_escape_htmltag($proj->title).'</span>';
158 }
159 }
160 }
161 }
162 $morehtmlref .= '</div>';
163
164 $object->totalpaid = $totalpaid; // To give a chance to dol_banner_tab to use already paid amount to show correct status
165
166 dol_banner_tab($object, 'ref', $linkback, 1, 'ref', 'ref', $morehtmlref, '', 0, '', '', 1);
167
168 print dol_get_fiche_end();
169
170 //print '<br>';
171
172 // Contacts lines (modules that overwrite templates must declare this into descriptor)
173 $dirtpls = array_merge($conf->modules_parts['tpl'], array('/core/tpl'));
174 foreach ($dirtpls as $reldir) {
175 $res = @include dol_buildpath($reldir.'/contacts.tpl.php');
176 if ($res) {
177 break;
178 }
179 }
180 } else {
181 // Record not found
182 print "ErrorRecordNotFound";
183 }
184}
185
186// End of page
187llxFooter();
188$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:56
llxFooter()
Empty footer.
Definition wrapper.php:70
Class to manage contact/addresses.
Class to manage invoices.
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 projects.
Class to manage Dolibarr users.
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.
img_edit($titlealt='default', $float=0, $other='')
Show logo editer/modifier fiche.
facture_prepare_head($object)
Initialize the array of tabs for customer invoice.
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.