-
Notifications
You must be signed in to change notification settings - Fork 1
Expand file tree
/
Copy pathschemeLayout.php
More file actions
executable file
·62 lines (50 loc) · 2.06 KB
/
schemeLayout.php
File metadata and controls
executable file
·62 lines (50 loc) · 2.06 KB
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
<?php
use KORA\Manager;
/**
Copyright (2008) Matrix: Michigan State University
This file is part of KORA.
KORA is free software; you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
the Free Software Foundation; either version 2 of the License, or
(at your option) any later version.
KORA is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
GNU General Public License for more details.
You should have received a copy of the GNU General Public License
along with this program. If not, see <http://www.gnu.org/licenses/>.
*/
// Initial Version: Matt Geimer, 2008
// Refactor: Joe Deming, Anthony D'Onofrio 2013
require_once('includes/includes.php');
Manager::Init();
Manager::RequireLogin();
Manager::RequireProject();
Manager::RequireScheme();
// check once for ability to edit scheme layout to prevent repeated database calls
$ePerm = Manager::GetUser()->HasProjectPermissions(EDIT_LAYOUT);
Manager::PrintHeader();
echo '<h2>'.gettext('Scheme Layout for').' '.Manager::GetScheme()->GetName().'</h2>';
if (Manager::IsSystemAdmin())
{
// See if the dublin core information is up-to-date
$dcQuery = $db->query('SELECT dublinCoreOutOfDate FROM scheme WHERE schemeid='.Manager::GetScheme()->GetSID().' LIMIT 1');
$dcQuery = $dcQuery->fetch_assoc();
if ($dcQuery['dublinCoreOutOfDate'] > 0)
{
echo '<div class="error">'.gettext('Warning').': '.gettext('Dublin Core data for this scheme is out of date. You should consider running the update script.').'</div><br />';
}
}
if($ePerm)
{
$controlQuery = $db->query('SELECT cid FROM p'.Manager::GetProject()->GetPID().'Control WHERE schemeid='.Manager::GetScheme()->GetSID().' LIMIT 1');
if ($controlQuery->num_rows > 0)
{
echo "<a href='manageDublinCore.php?pid=".$_REQUEST['pid']."&sid=".$_REQUEST['sid']."'>".gettext('Edit Dublin Core scheme field associations').'</a><br />';
}
}
?>
<div id="apschemecontrols"></div>
<?php
Manager::PrintFooter();
?>