3 // This file is part of Moodle - http://moodle.org/
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.
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/>.
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
26 require_once('../../config.php');
27 require_once('lib.php');
28 require_once('export_form.php');
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.
36 $redirectbackto = optional_param('backto', '', PARAM_LOCALURL
); // The location to redirect back to.
38 $url = new moodle_url('/mod/data/export.php', array('d' => $d));
41 if (! $data = $DB->get_record('data', array('id'=>$d))) {
42 throw new \
moodle_exception('wrongdataid', 'data');
45 if (! $cm = get_coursemodule_from_instance('data', $data->id
, $data->course
)) {
46 throw new \
moodle_exception('invalidcoursemodule');
49 if(! $course = $DB->get_record('course', array('id'=>$cm->course
))) {
50 throw new \
moodle_exception('invalidcourseid');
53 // fill in missing properties needed for updating of instance
54 $data->course
= $cm->course
;
55 $data->cmidnumber
= $cm->idnumber
;
56 $data->instance
= $cm->instance
;
58 $context = context_module
::instance($cm->id
);
60 require_login($course, false, $cm);
61 require_capability(DATA_CAP_EXPORT
, $context);
63 // get fields for this database
64 $fieldrecords = $DB->get_records('data_fields', array('dataid'=>$data->id
), 'id');
66 if(empty($fieldrecords)) {
67 if (has_capability('mod/data:managetemplates', $context)) {
68 redirect($CFG->wwwroot
.'/mod/data/field.php?d='.$data->id
);
70 throw new \
moodle_exception('nofieldindatabase', 'data');
74 // populate objets for this databases fields
76 foreach ($fieldrecords as $fieldrecord) {
77 $fields[]= data_get_field($fieldrecord, $data);
80 $mform = new mod_data_export_form(new moodle_url('/mod/data/export.php', ['d' => $data->id
,
81 'backto' => $redirectbackto]), $fields, $cm, $data);
83 if ($mform->is_cancelled()) {
84 $redirectbackto = !empty($redirectbackto) ?
$redirectbackto :
85 new \
moodle_url('/mod/data/view.php', ['d' => $data->id
]);
86 redirect($redirectbackto);
87 } else if ($formdata = (array) $mform->get_data()) {
88 $selectedfields = array();
89 foreach ($formdata as $key => $value) {
90 //field form elements are field_1 field_2 etc. 0 if not selected. 1 if selected.
91 if (strpos($key, 'field_')===0 && !empty($value)) {
92 $selectedfields[] = substr($key, 6);
96 $currentgroup = groups_get_activity_group($cm);
99 switch ($formdata['exporttype']) {
101 $exporter = new \mod_data\local\exporter\
csv_entries_exporter();
102 $exporter->set_delimiter_name($formdata['delimiter_name']);
105 $exporter = new \mod_data\local\exporter\
ods_entries_exporter();
108 throw new coding_exception('Invalid export format has been specified. '
109 . 'Only "csv" and "ods" are currently supported.');
112 $includefiles = !empty($formdata['includefiles']);
113 \mod_data\local\exporter\utils
::data_exportdata($data->id
, $fields, $selectedfields, $exporter, $currentgroup, $context,
114 $exportuser, $exporttime, $exportapproval, $tags, $includefiles);
115 $count = $exporter->get_records_count();
116 $filename = clean_filename("{$data->name}-{$count}_record");
120 $filename .= clean_filename('-' . gmdate("Ymd_Hi"));
121 $exporter->set_export_file_name($filename);
122 $exporter->send_file();
125 // Build header to match the rest of the UI.
126 $PAGE->add_body_class('mediumwidth');
127 $pagename = get_string('exportentries', 'data');
130 format_string($data->name
),
131 format_string($course->fullname
),
133 $PAGE->set_title(implode(moodle_page
::TITLE_SEPARATOR
, $titleparts));
134 $PAGE->set_heading($course->fullname
);
135 $PAGE->force_settings_menu(true);
136 $PAGE->set_secondary_active_tab('modulepage');
137 $PAGE->activityheader
->disable();
138 echo $OUTPUT->header();
139 echo $OUTPUT->heading($pagename);
141 groups_print_activity_menu($cm, $url);
145 echo $OUTPUT->footer();