1<?php
2/* Copyright (C) 2001-2002	Rodolphe Quiedeville	<rodolphe@quiedeville.org>
3 * Copyright (C) 2003		Jean-Louis Bergamo		<jlb@j1b.org>
4 * Copyright (C) 2004-2013	Laurent Destailleur		<eldy@users.sourceforge.net>
5 * Copyright (C) 2012		Regis Houssin			<regis.houssin@inodbox.com>
6 * Copyright (C) 2012		Florian Henry			<florian.henry@open-concept.pro>
7 * Copyright (C) 2013		Philippe Grand			<philippe.grand@atoo-net.com>
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
23/**
24 *      \file       htdocs/admin/expensereport_extrafields.php
25 *		\ingroup    expensereport
26 *		\brief      Page to setup extra fields of expensereport
27 */
28
29require '../main.inc.php';
30require_once DOL_DOCUMENT_ROOT.'/core/lib/expensereport.lib.php';
31require_once DOL_DOCUMENT_ROOT.'/core/class/extrafields.class.php';
32
33if (!$user->admin)
34	accessforbidden();
35
36// Load translation files required by the page
37$langs->loadLangs(array('admin', 'errors', 'trips', 'other'));
38
39$extrafields = new ExtraFields($db);
40$form = new Form($db);
41
42// List of supported format
43$tmptype2label = ExtraFields::$type2label;
44$type2label = array('');
45foreach ($tmptype2label as $key => $val) $type2label[$key] = $langs->transnoentitiesnoconv($val);
46
47$action = GETPOST('action', 'aZ09');
48$attrname = GETPOST('attrname', 'alpha');
49$elementtype = 'expensereport'; //Must be the $table_element of the class that manage extrafield
50
51if (!$user->admin) accessforbidden();
52
53
54/*
55 * Actions
56 */
57
58require DOL_DOCUMENT_ROOT.'/core/actions_extrafields.inc.php';
59
60
61
62/*
63 * View
64 */
65
66llxHeader('', $langs->trans("ExpenseReportsSetup"));
67
68$linkback = '<a href="'.DOL_URL_ROOT.'/admin/modules.php?restore_lastsearch_values=1">'.$langs->trans("BackToModuleList").'</a>';
69print load_fiche_titre($langs->trans("ExpenseReportsSetup"), $linkback, 'title_setup');
70
71$head = expensereport_admin_prepare_head();
72
73print dol_get_fiche_head($head, 'attributes', $langs->trans("ExpenseReports"), -1, 'trip');
74
75require DOL_DOCUMENT_ROOT.'/core/tpl/admin_extrafields_view.tpl.php';
76
77print dol_get_fiche_end();
78
79
80// Buttons
81if ($action != 'create' && $action != 'edit')
82{
83	print '<div class="tabsAction">';
84	print "<a class=\"butAction\" href=\"".$_SERVER["PHP_SELF"]."?action=create#newattrib\">".$langs->trans("NewAttribute")."</a>";
85	print "</div>";
86}
87
88
89/* ************************************************************************** */
90/*                                                                            */
91/* Creation of an optional field											  */
92/*                                                                            */
93/* ************************************************************************** */
94
95if ($action == 'create')
96{
97	print '<br><div id="newattrib"></div>';
98	print load_fiche_titre($langs->trans('NewAttribute'));
99
100	require DOL_DOCUMENT_ROOT.'/core/tpl/admin_extrafields_add.tpl.php';
101}
102
103/* ************************************************************************** */
104/*                                                                            */
105/* Edition of an optional field                                               */
106/*                                                                            */
107/* ************************************************************************** */
108if ($action == 'edit' && !empty($attrname))
109{
110	print "<br>";
111	print load_fiche_titre($langs->trans("FieldEdition", $attrname));
112
113	require DOL_DOCUMENT_ROOT.'/core/tpl/admin_extrafields_edit.tpl.php';
114}
115
116// End of page
117llxFooter();
118$db->close();
119