dolibarr 23.0.3
note.php
Go to the documentation of this file.
1<?php
2/* Copyright (C) 2007-2017 Laurent Destailleur <eldy@users.sourceforge.net>
3 * Copyright (C) 2024-2025 Frédéric France <frederic.france@free.fr>
4 *
5 * This program is free software; you can redistribute it and/or modify
6 * it under the terms of the GNU General Public License as published by
7 * the Free Software Foundation; either version 3 of the License, or
8 * (at your option) any later version.
9 *
10 * This program is distributed in the hope that it will be useful,
11 * but WITHOUT ANY WARRANTY; without even the implied warranty of
12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 * GNU General Public License for more details.
14 *
15 * You should have received a copy of the GNU General Public License
16 * along with this program. If not, see <https://www.gnu.org/licenses/>.
17 */
18
25// Load Dolibarr environment
26require '../../main.inc.php';
27
28require_once DOL_DOCUMENT_ROOT.'/comm/mailing/class/mailing.class.php';
29require_once DOL_DOCUMENT_ROOT.'/core/lib/emailing.lib.php';
30
39// Load translation files required by the page
40$langs->loadLangs(array("mails", "mailing", "companies"));
41
42// Get parameters
43$id = GETPOSTINT('id');
44$ref = GETPOST('ref', 'alpha');
45$action = GETPOST('action', 'aZ09');
46$cancel = GETPOST('cancel', 'alpha');
47$backtopage = GETPOST('backtopage', 'alpha');
48
49// Initialize a technical objects
50$object = new Mailing($db);
51$extrafields = new ExtraFields($db);
52$diroutputmassaction = $conf->mailing->dir_output.'/temp/massgeneration/'.$user->id;
53$hookmanager->initHooks(array('mailingnote', 'globalcard')); // Note that conf->hooks_modules contains array
54// Fetch optionals attributes and labels
55$extrafields->fetch_name_optionals_label($object->table_element);
56
57// Load object
58include DOL_DOCUMENT_ROOT.'/core/actions_fetchobject.inc.php'; // Must be 'include', not 'include_once'. Include fetch and fetch_thirdparty but not fetch_optionals
59if ($id > 0 || !empty($ref)) {
60 $upload_dir = $conf->mailing->multidir_output[$object->entity ?? $conf->entity]."/".$object->id;
61}
62
63$permissionnote = $user->hasRight('mailing', 'write'); // Used by the include of actions_setnotes.inc.php
64$permissiontoadd = $user->hasRight('mailing', 'write'); // Used by the include of actions_addupdatedelete.inc.php
65
66// Security check - Protection if external user
67//if ($user->socid > 0) accessforbidden();
68//if ($user->socid > 0) $socid = $user->socid;
69$isdraft = (($object->status == $object::STATUS_DRAFT) ? 1 : 0);
70restrictedArea($user, $object->module, $object->id, $object->table_element, '', '', 'rowid', $isdraft);
71
72
73/*
74 * Actions
75 */
76
77$reshook = $hookmanager->executeHooks('doActions', array(), $object, $action); // Note that $action and $object may have been modified by some hooks
78if ($reshook < 0) {
79 setEventMessages($hookmanager->error, $hookmanager->errors, 'errors');
80}
81if (empty($reshook)) {
82 include DOL_DOCUMENT_ROOT.'/core/actions_setnotes.inc.php'; // Must be 'include', not 'include_once'
83}
84
85
86/*
87 * View
88 */
89
90$form = new Form($db);
91
92//$help_url='EN:Customers_Orders|FR:Commandes_Clients|ES:Pedidos de clientes';
93$help_url = '';
94llxHeader('', $langs->trans('Mailing'), $help_url);
95
96if ($id > 0 || !empty($ref)) {
97 $object->fetch_thirdparty();
98
99 $head = emailing_prepare_head($object);
100
101 print dol_get_fiche_head($head, 'note', $langs->trans("Mailing"), -1, $object->picto);
102
103 // Object card
104 // ------------------------------------------------------------
105 $linkback = '<a href="'.dol_buildpath('/knowledgemanagement/knowledgerecord_list.php', 1).'?restore_lastsearch_values=1'.(!empty($socid) ? '&socid='.$socid : '').'">'.$langs->trans("BackToList").'</a>';
106
107 $morehtmlref = '<div class="refidno">';
108 $morehtmlref .= $form->editfieldval("", 'title', $object->title, $object, $user->hasRight('mailing', 'creer'), 'string', '', null, null, '', 1);
109
110 /*
111 // Ref customer
112 $morehtmlref.=$form->editfieldkey("RefCustomer", 'ref_client', $object->ref_client, $object, 0, 'string', '', 0, 1);
113 $morehtmlref.=$form->editfieldval("RefCustomer", 'ref_client', $object->ref_client, $object, 0, 'string', '', null, null, '', 1);
114 // Thirdparty
115 $morehtmlref.='<br>'.$langs->trans('ThirdParty') . ' : ' . (is_object($object->thirdparty) ? $object->thirdparty->getNomUrl(1) : '');
116 // Project
117 if (isModEnabled('project'))
118 {
119 $langs->load("projects");
120 $morehtmlref.='<br>'.$langs->trans('Project') . ' ';
121 if ($permissiontoadd)
122 {
123 if ($action != 'classify')
124 //$morehtmlref.='<a class="editfielda" href="' . dolBuildUrl($_SERVER['PHP_SELF'], ['action' => 'classify', 'id' => $object->id], true) . '">' . img_edit($langs->transnoentitiesnoconv('SetProject')) . '</a> : ';
125 $morehtmlref.=' : ';
126 if ($action == 'classify') {
127 //$morehtmlref.=$form->form_project($_SERVER['PHP_SELF'] . '?id=' . $object->id, $object->socid, $object->fk_project, 'projectid', 0, 0, 1, 1);
128 $morehtmlref.='<form method="post" action="'.$_SERVER['PHP_SELF'].'?id='.$object->id.'">';
129 $morehtmlref.='<input type="hidden" name="action" value="classin">';
130 $morehtmlref.='<input type="hidden" name="token" value="'.newToken().'">';
131 $morehtmlref.=$formproject->select_projects($object->socid, $object->fk_project, 'projectid', $maxlength, 0, 1, 0, 1, 0, 0, '', 1);
132 $morehtmlref.='<input type="submit" class="button valignmiddle" value="'.$langs->trans("Modify").'">';
133 $morehtmlref.='</form>';
134 } else {
135 $morehtmlref.=$form->form_project($_SERVER['PHP_SELF'] . '?id=' . $object->id, $object->socid, $object->fk_project, 'none', 0, 0, 0, 1);
136 }
137 } else {
138 if (!empty($object->fk_project)) {
139 $proj = new Project($db);
140 $proj->fetch($object->fk_project);
141 $morehtmlref .= ': '.$proj->getNomUrl();
142 } else {
143 $morehtmlref .= '';
144 }
145 }
146 }*/
147 $morehtmlref .= '</div>';
148
149
150 dol_banner_tab($object, 'id', $linkback, 1, 'rowid', 'ref', $morehtmlref);
151
152
153 print '<div class="fichecenter">';
154 print '<div class="underbanner clearboth"></div>';
155
156
157 $cssclass = "titlefield";
158 include DOL_DOCUMENT_ROOT.'/core/tpl/notes.tpl.php';
159
160 print '</div>';
161
162 print dol_get_fiche_end();
163}
164
165// End of page
166llxFooter();
167$db->close();
$id
Support class for third parties, contacts, members, users or resources.
Definition account.php:47
if(! $sortfield) if(! $sortorder) $object
Definition account.php:100
llxFooter($comment='', $zone='private', $disabledoutputofmessages=0)
Empty footer.
Definition wrapper.php:91
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:73
Class to manage standard extra fields.
Class to manage generation of HTML components Only common components must be here.
Class to manage emailings module.
emailing_prepare_head(Mailing $object)
Prepare array with list of tabs.
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, $morecssdiv='')
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.
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.