dolibarr  7.0.0-beta
info.php
Go to the documentation of this file.
1 <?php
2 /* Copyright (C) 2009 Laurent Destailleur <eldy@users.sourceforge.net>
3  * Copyright (C) 2010 Regis Houssin <regis.houssin@capnetworks.com>
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 <http://www.gnu.org/licenses/>.
17  */
18 
25 require '../../main.inc.php';
26 require_once DOL_DOCUMENT_ROOT .'/comm/mailing/class/mailing.class.php';
27 require_once DOL_DOCUMENT_ROOT.'/core/lib/functions2.lib.php';
28 require_once DOL_DOCUMENT_ROOT.'/core/lib/emailing.lib.php';
29 
30 $id=GETPOST('id');
31 
32 $langs->load("mails");
33 
34 // Security check
35 if (! $user->rights->mailing->lire || $user->societe_id > 0)
37 
38 
39 
40 /*
41  * View
42  */
43 
44 llxHeader('',$langs->trans("Mailing"),'EN:Module_EMailing|FR:Module_Mailing|ES:M&oacute;dulo_Mailing');
45 
46 $form = new Form($db);
47 
48 $object = new Mailing($db);
49 
50 if ($object->fetch($id) >= 0)
51 {
52  $head = emailing_prepare_head($object);
53 
54  dol_fiche_head($head, 'info', $langs->trans("Mailing"), -1, 'email');
55 
56  $linkback = '<a href="'.DOL_URL_ROOT.'/comm/mailing/list.php">'.$langs->trans("BackToList").'</a>';
57 
58  $morehtmlright='';
59  if ($object->statut == 2) $morehtmlright.=' ('.$object->countNbOfTargets('alreadysent').'/'.$object->nbemail.') ';
60 
61  dol_banner_tab($object, 'id', $linkback, 1, 'rowid', 'ref', '', '', 0, '', $morehtmlright);
62 
63  print '<div class="underbanner clearboth"></div><br>';
64 
65  //print '<table width="100%"><tr><td>';
66  $object->user_creation=$object->user_creat;
67  $object->date_creation=$object->date_creat;
68  $object->user_validation=$object->user_valid;
69  $object->date_validation=$object->date_valid;
70  dol_print_object_info($object, 0);
71  //print '</td></tr></table>';
72 
73 
74  dol_fiche_end();
75 }
76 
77 llxFooter();
78 $db->close();
llxFooter()
Empty footer.
Definition: wrapper.php:58
dol_fiche_head($links=array(), $active='0', $title='', $notab=0, $picto='', $pictoisfullpath=0, $morehtmlright='')
Show tab header of a card.
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_print_object_info($object, $usetable=0)
Show informations on an object TODO Move this into html.formother.
if(empty($reshook)) $form
View.
Definition: perms.php:103
GETPOST($paramname, $check='none', $method=0, $filter=NULL, $options=NULL, $noreplace=0)
Return value of a param into GET or POST supervariable.
accessforbidden($message='', $printheader=1, $printfooter=1, $showonlymessage=0)
Show a message to say access is forbidden and stop program Calling this function terminate execution ...
Class to manage generation of HTML components Only common components must be here.
emailing_prepare_head(Mailing $object)
Prepare array with list of tabs.
dol_fiche_end($notab=0)
Show tab footer of a card.
llxHeader()
Empty header.
Definition: wrapper.php:46
Class to manage emailings module.
print
Draft customers invoices.
Definition: index.php:91