MDL-31873 added mod_assign_get_grades web service function
[moodle.git] / cohort / edit_form.php
CommitLineData
b980c56e 1<?php
b980c56e
PS
2// This file is part of Moodle - http://moodle.org/
3//
4// Moodle is free software: you can redistribute it and/or modify
5// it under the terms of the GNU General Public License as published by
6// the Free Software Foundation, either version 3 of the License, or
7// (at your option) any later version.
8//
9// Moodle is distributed in the hope that it will be useful,
10// but WITHOUT ANY WARRANTY; without even the implied warranty of
11// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12// GNU General Public License for more details.
13//
14// You should have received a copy of the GNU General Public License
15// along with Moodle. If not, see <http://www.gnu.org/licenses/>.
16
17/**
18 * Cohort related management functions, this file needs to be included manually.
19 *
6eb8bf7f 20 * @package core_cohort
707f4136 21 * @copyright 2010 Petr Skoda {@link http://skodak.org}
b980c56e
PS
22 * @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
23 */
24
6eb8bf7f 25defined('MOODLE_INTERNAL') || die();
bfebaf64 26
a379029c 27require_once($CFG->dirroot . '/lib/formslib.php');
b980c56e
PS
28
29class cohort_edit_form extends moodleform {
30
a379029c 31 /**
9e1065a8 32 * Define the cohort edit form
a379029c 33 */
9e1065a8 34 public function definition() {
b980c56e
PS
35
36 $mform = $this->_form;
37 $editoroptions = $this->_customdata['editoroptions'];
9e1065a8 38 $cohort = $this->_customdata['data'];
b980c56e
PS
39
40 $mform->addElement('text', 'name', get_string('name', 'cohort'), 'maxlength="254" size="50"');
41 $mform->addRule('name', get_string('required'), 'required', null, 'client');
071e68f9 42 $mform->setType('name', PARAM_TEXT);
b980c56e 43
9e1065a8
PS
44 $options = $this->get_category_options($cohort->contextid);
45 $mform->addElement('select', 'contextid', get_string('context', 'role'), $options);
46
b980c56e 47 $mform->addElement('text', 'idnumber', get_string('idnumber', 'cohort'), 'maxlength="254" size="50"');
6eb8bf7f 48 $mform->setType('idnumber', PARAM_RAW); // Idnumbers are plain text, must not be changed.
b980c56e
PS
49
50 $mform->addElement('editor', 'description_editor', get_string('description', 'cohort'), null, $editoroptions);
51 $mform->setType('description_editor', PARAM_RAW);
52
a379029c 53 $mform->addElement('hidden', 'id');
b980c56e
PS
54 $mform->setType('id', PARAM_INT);
55
b980c56e 56 $this->add_action_buttons();
9e1065a8
PS
57
58 $this->set_data($cohort);
b980c56e
PS
59 }
60
9e1065a8 61 public function validation($data, $files) {
b980c56e
PS
62 global $DB;
63
64 $errors = parent::validation($data, $files);
b980c56e
PS
65
66 $idnumber = trim($data['idnumber']);
0defeb16 67 if ($idnumber === '') {
6eb8bf7f 68 // Fine, empty is ok.
0defeb16
PS
69
70 } else if ($data['id']) {
a379029c
PS
71 $current = $DB->get_record('cohort', array('id'=>$data['id']), '*', MUST_EXIST);
72 if ($current->idnumber !== $idnumber) {
73 if ($DB->record_exists('cohort', array('idnumber'=>$idnumber))) {
74 $errors['idnumber'] = get_string('duplicateidnumber', 'cohort');
75 }
76 }
0defeb16 77
a379029c
PS
78 } else {
79 if ($DB->record_exists('cohort', array('idnumber'=>$idnumber))) {
80 $errors['idnumber'] = get_string('duplicateidnumber', 'cohort');
81 }
b980c56e
PS
82 }
83
84 return $errors;
85 }
9e1065a8
PS
86
87 protected function get_category_options($currentcontextid) {
88 $displaylist = array();
89 $parentlist = array();
90 make_categories_list($displaylist, $parentlist, 'moodle/cohort:manage');
91 $options = array();
6ca657a7 92 $syscontext = context_system::instance();
9e1065a8 93 if (has_capability('moodle/cohort:manage', $syscontext)) {
6eb8bf7f 94 $options[$syscontext->id] = $syscontext->get_context_name();
9e1065a8
PS
95 }
96 foreach ($displaylist as $cid=>$name) {
abdf2b67 97 $context = context_coursecat::instance($cid);
9e1065a8
PS
98 $options[$context->id] = $name;
99 }
6eb8bf7f 100 // Always add current - this is not likely, but if the logic gets changed it might be a problem.
9e1065a8 101 if (!isset($options[$currentcontextid])) {
d197ea43 102 $context = context::instance_by_id($currentcontextid, MUST_EXIST);
6eb8bf7f 103 $options[$context->id] = $syscontext->get_context_name();
9e1065a8
PS
104 }
105 return $options;
106 }
b980c56e 107}
0defeb16 108