Merge branch 'MDL-63167-master' of git://github.com/peterRd/moodle
[moodle.git] / mod / data / export.php
blobe6d6e50213c47c9084021e28ba62e492a7c82923
1 <?php
3 // This file is part of Moodle - http://moodle.org/
4 //
5 // Moodle 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 // Moodle 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.
15 // You should have received a copy of the GNU General Public License
16 // along with Moodle. If not, see <http://www.gnu.org/licenses/>.
18 /**
19 * This file is part of the Database module for Moodle
21 * @copyright 2005 Martin Dougiamas http://dougiamas.com
22 * @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
23 * @package mod_data
26 require_once('../../config.php');
27 require_once('lib.php');
28 require_once('export_form.php');
30 // database ID
31 $d = required_param('d', PARAM_INT);
32 $exportuser = optional_param('exportuser', false, PARAM_BOOL); // Flag for exporting user details
33 $exporttime = optional_param('exporttime', false, PARAM_BOOL); // Flag for exporting date/time information
34 $exportapproval = optional_param('exportapproval', false, PARAM_BOOL); // Flag for exporting user details
35 $tags = optional_param('exporttags', false, PARAM_BOOL); // Flag for exporting user details.
37 $PAGE->set_url('/mod/data/export.php', array('d'=>$d));
39 if (! $data = $DB->get_record('data', array('id'=>$d))) {
40 print_error('wrongdataid', 'data');
43 if (! $cm = get_coursemodule_from_instance('data', $data->id, $data->course)) {
44 print_error('invalidcoursemodule');
47 if(! $course = $DB->get_record('course', array('id'=>$cm->course))) {
48 print_error('invalidcourseid');
51 // fill in missing properties needed for updating of instance
52 $data->course = $cm->course;
53 $data->cmidnumber = $cm->idnumber;
54 $data->instance = $cm->instance;
56 $context = context_module::instance($cm->id);
58 require_login($course, false, $cm);
59 require_capability(DATA_CAP_EXPORT, $context);
61 // get fields for this database
62 $fieldrecords = $DB->get_records('data_fields', array('dataid'=>$data->id), 'id');
64 if(empty($fieldrecords)) {
65 if (has_capability('mod/data:managetemplates', $context)) {
66 redirect($CFG->wwwroot.'/mod/data/field.php?d='.$data->id);
67 } else {
68 print_error('nofieldindatabase', 'data');
72 // populate objets for this databases fields
73 $fields = array();
74 foreach ($fieldrecords as $fieldrecord) {
75 $fields[]= data_get_field($fieldrecord, $data);
79 $mform = new mod_data_export_form('export.php?d='.$data->id, $fields, $cm, $data);
81 if($mform->is_cancelled()) {
82 redirect('view.php?d='.$data->id);
83 } elseif (!$formdata = (array) $mform->get_data()) {
84 // build header to match the rest of the UI
85 $PAGE->set_title($data->name);
86 $PAGE->set_heading($course->fullname);
87 $PAGE->force_settings_menu(true);
88 echo $OUTPUT->header();
89 echo $OUTPUT->heading(format_string($data->name), 2);
90 echo $OUTPUT->box(format_module_intro('data', $data, $cm->id), 'generalbox', 'intro');
92 $url = new moodle_url('/mod/data/export.php', array('d' => $d));
93 groups_print_activity_menu($cm, $url);
95 // these are for the tab display
96 $currentgroup = groups_get_activity_group($cm);
97 $groupmode = groups_get_activity_groupmode($cm);
98 $currenttab = 'export';
99 include('tabs.php');
100 $mform->display();
101 echo $OUTPUT->footer();
102 die;
105 $selectedfields = array();
106 foreach ($formdata as $key => $value) {
107 //field form elements are field_1 field_2 etc. 0 if not selected. 1 if selected.
108 if (strpos($key, 'field_')===0 && !empty($value)) {
109 $selectedfields[] = substr($key, 6);
113 $currentgroup = groups_get_activity_group($cm);
115 $exportdata = data_get_exportdata($data->id, $fields, $selectedfields, $currentgroup, $context,
116 $exportuser, $exporttime, $exportapproval, $tags);
117 $count = count($exportdata);
118 switch ($formdata['exporttype']) {
119 case 'csv':
120 data_export_csv($exportdata, $formdata['delimiter_name'], $data->name, $count);
121 break;
122 case 'xls':
123 data_export_xls($exportdata, $data->name, $count);
124 break;
125 case 'ods':
126 data_export_ods($exportdata, $data->name, $count);
127 break;
130 die();