dolibarr 21.0.0-alpha
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 * Copyright (C) 2023 Christian Foellmann <christian@foellmann.de>
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
29// Load Dolibarr environment
30require '../../main.inc.php';
31require_once DOL_DOCUMENT_ROOT.'/compta/facture/class/facture.class.php';
32require_once DOL_DOCUMENT_ROOT.'/contact/class/contact.class.php';
33require_once DOL_DOCUMENT_ROOT.'/core/class/discount.class.php';
34require_once DOL_DOCUMENT_ROOT.'/core/lib/invoice.lib.php';
35require_once DOL_DOCUMENT_ROOT.'/core/class/html.formcompany.class.php';
36if (isModEnabled('project')) {
37 require_once DOL_DOCUMENT_ROOT.'/projet/class/project.class.php';
38}
39
40// Load translation files required by the page
41$langs->loadLangs(array('bills', 'companies'));
42
43$id = (GETPOST('id') ? GETPOSTINT('id') : GETPOSTINT('facid')); // For backward compatibility
44$ref = GETPOST('ref', 'alpha');
45$lineid = GETPOSTINT('lineid');
46$socid = GETPOSTINT('socid');
47$action = GETPOST('action', 'aZ09');
48
49// Security check
50if ($user->socid) {
51 $socid = $user->socid;
52}
53
54$object = new Facture($db);
55// Load object
56if ($id > 0 || !empty($ref)) {
57 $ret = $object->fetch($id, $ref, '', '', (getDolGlobalString('INVOICE_USE_SITUATION') ? $conf->global->INVOICE_USE_SITUATION : 0));
58}
59// Initialize a technical object to manage hooks of page. Note that conf->hooks_modules contains an array of hook context
60$hookmanager->initHooks(array('invoicecontactcard', 'globalcard'));
61
62$result = restrictedArea($user, 'facture', $object->id);
63
64$usercancreate = $user->hasRight("facture", "creer");
65
66
67/*
68 * Actions
69 */
70
71$parameters = array('id'=>$id);
72$reshook = $hookmanager->executeHooks('doActions', $parameters, $object, $action);
73if ($reshook < 0) {
74 setEventMessages($hookmanager->error, $hookmanager->errors, 'errors');
75}
76
77if (empty($reshook)) {
78 // Add new contact
79 if ($action == 'addcontact' && $user->hasRight('facture', 'creer')) {
80 if ($result > 0 && $id > 0) {
81 $contactid = (GETPOST('userid') ? GETPOSTINT('userid') : GETPOSTINT('contactid'));
82 $typeid = (GETPOST('typecontact') ? GETPOST('typecontact') : GETPOST('type'));
83 $result = $object->add_contact($contactid, $typeid, GETPOST("source", 'aZ09'));
84 }
85
86 if ($result >= 0) {
87 header("Location: ".$_SERVER['PHP_SELF']."?id=".$object->id);
88 exit;
89 } else {
90 if ($object->error == 'DB_ERROR_RECORD_ALREADY_EXISTS') {
91 $langs->load("errors");
92 setEventMessages($langs->trans("ErrorThisContactIsAlreadyDefinedAsThisType"), null, 'errors');
93 } else {
94 setEventMessages($object->error, $object->errors, 'errors');
95 }
96 }
97 } elseif ($action == 'swapstatut' && $user->hasRight('facture', 'creer')) {
98 // Toggle the status of a contact
99 $result = $object->swapContactStatus(GETPOSTINT('ligne'));
100 } elseif ($action == 'deletecontact' && $user->hasRight('facture', 'creer')) {
101 // Delete contact
102 $result = $object->delete_contact($lineid);
103
104 if ($result >= 0) {
105 header("Location: ".$_SERVER['PHP_SELF']."?id=".$object->id);
106 exit;
107 } else {
108 dol_print_error($db);
109 }
110 }
111}
112
113/*
114 * View
115 */
116
117$title = $object->ref." - ".$langs->trans('ContactsAddresses');
118$helpurl = "EN:Customers_Invoices|FR:Factures_Clients|ES:Facturas_a_clientes";
119llxHeader('', $title, $helpurl);
120
121$form = new Form($db);
122$formcompany = new FormCompany($db);
123$contactstatic = new Contact($db);
124$userstatic = new User($db);
125
126
127/* *************************************************************************** */
128/* */
129/* View and edit mode */
130/* */
131/* *************************************************************************** */
132
133if ($id > 0 || !empty($ref)) {
134 if ($object->fetch($id, $ref) > 0) {
135 $object->fetch_thirdparty();
136
137 $head = facture_prepare_head($object);
138
139 $totalpaid = $object->getSommePaiement();
140
141 print dol_get_fiche_head($head, 'contact', $langs->trans('InvoiceCustomer'), -1, 'bill');
142
143 // Invoice content
144
145 $linkback = '<a href="'.DOL_URL_ROOT.'/compta/facture/list.php?restore_lastsearch_values=1'.(!empty($socid) ? '&socid='.$socid : '').'">'.$langs->trans("BackToList").'</a>';
146
147 $morehtmlref = '<div class="refidno">';
148 // Ref customer
149 $morehtmlref .= $form->editfieldkey("RefCustomer", 'ref_client', $object->ref_customer, $object, 0, 'string', '', 0, 1);
150 $morehtmlref .= $form->editfieldval("RefCustomer", 'ref_client', $object->ref_customer, $object, 0, 'string', '', null, null, '', 1);
151 // Thirdparty
152 $morehtmlref .= '<br>'.$object->thirdparty->getNomUrl(1, 'customer');
153 // Project
154 if (isModEnabled('project')) {
155 $langs->load("projects");
156 $morehtmlref .= '<br>';
157 if (0) {
158 $morehtmlref .= img_picto($langs->trans("Project"), 'project', 'class="pictofixedwidth"');
159 if ($action != 'classify') {
160 $morehtmlref .= '<a class="editfielda" href="'.$_SERVER['PHP_SELF'].'?action=classify&token='.newToken().'&id='.$object->id.'">'.img_edit($langs->transnoentitiesnoconv('SetProject')).'</a> ';
161 }
162 $morehtmlref .= $form->form_project($_SERVER['PHP_SELF'].'?id='.$object->id, $object->socid, $object->fk_project, ($action == 'classify' ? 'projectid' : 'none'), 0, 0, 0, 1, '', 'maxwidth300');
163 } else {
164 if (!empty($object->fk_project)) {
165 $proj = new Project($db);
166 $proj->fetch($object->fk_project);
167 $morehtmlref .= $proj->getNomUrl(1);
168 if ($proj->title) {
169 $morehtmlref .= '<span class="opacitymedium"> - '.dol_escape_htmltag($proj->title).'</span>';
170 }
171 }
172 }
173 }
174 $morehtmlref .= '</div>';
175
176 $object->totalpaid = $totalpaid; // To give a chance to dol_banner_tab to use already paid amount to show correct status
177
178 dol_banner_tab($object, 'ref', $linkback, 1, 'ref', 'ref', $morehtmlref, '', 0, '', '', 1);
179
180 print dol_get_fiche_end();
181
182 //print '<br>';
183
184 // Contacts lines (modules that overwrite templates must declare this into descriptor)
185 $dirtpls = array_merge($conf->modules_parts['tpl'], array('/core/tpl'));
186 foreach ($dirtpls as $reldir) {
187 $res = @include dol_buildpath($reldir.'/contacts.tpl.php');
188 if ($res) {
189 break;
190 }
191 }
192 } else {
193 // Record not found
194 print "ErrorRecordNotFound";
195 }
196}
197
198// End of page
199llxFooter();
200$db->close();
$id
Definition account.php:39
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($head='', $title='', $help_url='', $target='', $disablejs=0, $disablehead=0, $arrayofjs='', $arrayofcss='', $morequerystring='', $morecssonbody='', $replacemainareaby='', $disablenofollow=0, $disablenoindex=0)
Empty header.
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.
llxFooter()
Footer empty.
Definition document.php:107
setEventMessages($mesg, $mesgs, $style='mesgs', $messagekey='', $noduplicate=0, $attop=0)
Set event messages in dol_events session object.
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.
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...
getDolGlobalString($key, $default='')
Return a Dolibarr global constant string value.
img_edit($titlealt='default', $float=0, $other='')
Show logo edit/modify 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.