libdir . '/formslib.php'); require_once($CFG->libdir . '/csvlib.class.php'); class mod_data_export_form extends moodleform { var $_datafields = array(); var $_cm; // @param string $url: the url to post to // @param array $datafields: objects in this database function mod_data_export_form($url, $datafields, $cm) { $this->_datafields = $datafields; $this->_cm = $cm; parent::moodleform($url); } function definition() { global $CFG; $mform =& $this->_form; $mform->addElement('header', 'notice', get_string('chooseexportformat', 'data')); $choices = csv_import_reader::get_delimiter_list(); $key = array_search(';', $choices); if (! $key === FALSE) { // array $choices contains the semicolon -> drop it (because its encrypted form also contains a semicolon): unset($choices[$key]); } $typesarray = array(); $typesarray[] = &MoodleQuickForm::createElement('radio', 'exporttype', null, get_string('csvwithselecteddelimiter', 'data') . ' ', 'csv'); $typesarray[] = &MoodleQuickForm::createElement('select', 'delimiter_name', null, $choices); //temporarily commenting out Excel export option. See MDL-19864 //$typesarray[] = &MoodleQuickForm::createElement('radio', 'exporttype', null, get_string('excel', 'data'), 'xls'); $typesarray[] = &MoodleQuickForm::createElement('radio', 'exporttype', null, get_string('ods', 'data'), 'ods'); $mform->addGroup($typesarray, 'exportar', '', array(''), false); $mform->addRule('exportar', null, 'required'); $mform->setDefault('exporttype', 'csv'); if (array_key_exists('cfg', $choices)) { $mform->setDefault('delimiter_name', 'cfg'); } else if (get_string('listsep', 'langconfig') == ';') { $mform->setDefault('delimiter_name', 'semicolon'); } else { $mform->setDefault('delimiter_name', 'comma'); } $mform->addElement('header', 'notice', get_string('chooseexportfields', 'data')); foreach($this->_datafields as $field) { if($field->text_export_supported()) { $mform->addElement('advcheckbox', 'field_'.$field->field->id, '