function xmldb_questionnaire_upgrade($oldversion = 0)
{
global $CFG;
$result = true;
if ($oldversion < 2007120101) {
$result &= questionnaire_upgrade_2007120101();
}
if ($oldversion < 2007120102) {
/// Change enum values to lower case for all tables using them.
$enumvals = array('y', 'n');
$table = new XMLDBTable('questionnaire_question');
$field = new XMLDBField('required');
$field->setAttributes(XMLDB_TYPE_CHAR, '1', XMLDB_UNSIGNED, XMLDB_NOTNULL, null, false, null, 'n');
$result &= change_field_enum($table, $field);
set_field('questionnaire_question', 'required', 'y', 'required', 'Y');
set_field('questionnaire_question', 'required', 'n', 'required', 'N');
$field->setAttributes(XMLDB_TYPE_CHAR, '1', XMLDB_UNSIGNED, XMLDB_NOTNULL, null, XMLDB_ENUM, array('y', 'n'), 'n');
$result &= change_field_enum($table, $field);
$result &= change_field_default($table, $field);
unset($field);
$field = new XMLDBField('deleted');
$field->setAttributes(XMLDB_TYPE_CHAR, '1', XMLDB_UNSIGNED, XMLDB_NOTNULL, null, false, null, 'n');
$result &= change_field_enum($table, $field);
set_field('questionnaire_question', 'deleted', 'y', 'deleted', 'Y');
set_field('questionnaire_question', 'deleted', 'n', 'deleted', 'N');
$field->setAttributes(XMLDB_TYPE_CHAR, '1', XMLDB_UNSIGNED, XMLDB_NOTNULL, null, XMLDB_ENUM, array('y', 'n'), 'n');
$result &= change_field_enum($table, $field);
$result &= change_field_default($table, $field);
unset($field);
$field = new XMLDBField('public');
$field->setAttributes(XMLDB_TYPE_CHAR, '1', XMLDB_UNSIGNED, XMLDB_NOTNULL, null, false, null, 'n');
$result &= change_field_enum($table, $field);
set_field('questionnaire_question', 'public', 'y', 'public', 'Y');
set_field('questionnaire_question', 'public', 'n', 'public', 'N');
$field->setAttributes(XMLDB_TYPE_CHAR, '1', XMLDB_UNSIGNED, XMLDB_NOTNULL, null, XMLDB_ENUM, array('y', 'n'), 'y');
$result &= change_field_enum($table, $field);
$result &= change_field_default($table, $field);
unset($field);
unset($table);
$table = new XMLDBTable('questionnaire_question_type');
$field = new XMLDBField('has_choices');
$field->setAttributes(XMLDB_TYPE_CHAR, '1', XMLDB_UNSIGNED, XMLDB_NOTNULL, null, false, null, 'n');
$result &= change_field_enum($table, $field);
set_field('questionnaire_question_type', 'has_choices', 'y', 'has_choices', 'Y');
set_field('questionnaire_question_type', 'has_choices', 'n', 'has_choices', 'N');
$field->setAttributes(XMLDB_TYPE_CHAR, '1', XMLDB_UNSIGNED, XMLDB_NOTNULL, null, XMLDB_ENUM, array('y', 'n'), 'y');
$result &= change_field_enum($table, $field);
$result &= change_field_default($table, $field);
unset($field);
unset($table);
$table = new XMLDBTable('questionnaire_response');
$field = new XMLDBField('complete');
$field->setAttributes(XMLDB_TYPE_CHAR, '1', XMLDB_UNSIGNED, XMLDB_NOTNULL, null, false, null, 'n');
$result &= change_field_enum($table, $field);
set_field('questionnaire_response', 'complete', 'y', 'complete', 'Y');
set_field('questionnaire_response', 'complete', 'n', 'complete', 'N');
$field->setAttributes(XMLDB_TYPE_CHAR, '1', XMLDB_UNSIGNED, XMLDB_NOTNULL, null, XMLDB_ENUM, array('y', 'n'), 'n');
$result &= change_field_enum($table, $field);
$result &= change_field_default($table, $field);
unset($field);
unset($table);
$table = new XMLDBTable('questionnaire_response_bool');
$field = new XMLDBField('choice_id');
$field->setAttributes(XMLDB_TYPE_CHAR, '1', XMLDB_UNSIGNED, XMLDB_NOTNULL, null, false, null, 'n');
$result &= change_field_enum($table, $field);
set_field('questionnaire_response_bool', 'choice_id', 'y', 'choice_id', 'Y');
set_field('questionnaire_response_bool', 'choice_id', 'n', 'choice_id', 'N');
$field->setAttributes(XMLDB_TYPE_CHAR, '1', XMLDB_UNSIGNED, XMLDB_NOTNULL, null, XMLDB_ENUM, array('y', 'n'), 'y');
$result &= change_field_enum($table, $field);
$result &= change_field_default($table, $field);
unset($field);
unset($table);
$table = new XMLDBTable('questionnaire_survey');
$field = new XMLDBField('public');
$field->setAttributes(XMLDB_TYPE_CHAR, '1', XMLDB_UNSIGNED, XMLDB_NOTNULL, null, false, null, 'n');
$result &= change_field_enum($table, $field);
set_field('questionnaire_survey', 'public', 'y', 'public', 'Y');
set_field('questionnaire_survey', 'public', 'n', 'public', 'N');
$field->setAttributes(XMLDB_TYPE_CHAR, '1', XMLDB_UNSIGNED, XMLDB_NOTNULL, null, XMLDB_ENUM, array('y', 'n'), 'y');
$result &= change_field_enum($table, $field);
$result &= change_field_default($table, $field);
unset($field);
/// Upgrade question_type table with corrected 'response_table' fields.
set_field('questionnaire_question_type', 'response_table', 'resp_single', 'response_table', 'response_single');
set_field('questionnaire_question_type', 'response_table', 'resp_multiple', 'response_table', 'response_multiple');
}
if ($oldversion < 2008031902) {
$table = new XMLDBTable('questionnaire');
$field = new XMLDBField('grade');
$field->setAttributes(XMLDB_TYPE_INTEGER, '10', false, true, false, false, null, 0, 'navigate');
$result = $result && add_field($table, $field);
unset($field);
unset($table);
$table = new XMLDBTable('questionnaire_response');
$field = new XMLDBField('grade');
$field->setAttributes(XMLDB_TYPE_INTEGER, '10', false, true, false, false, null, 0, 'complete');
$result = $result && add_field($table, $field);
}
if ($oldversion < 2008031904) {
$sql = "SELECT q.id, q.resp_eligible, q.resp_view, cm.id as cmid\n FROM {$CFG->prefix}questionnaire q, {$CFG->prefix}course_modules cm, {$CFG->prefix}modules m\n WHERE m.name='questionnaire' AND m.id=cm.module AND cm.instance=q.id";
if ($rs = get_recordset_sql($sql)) {
$studentroleid = get_field('role', 'id', 'shortname', 'student');
$editteacherroleid = get_field('role', 'id', 'shortname', 'editingteacher');
$teacherroleid = get_field('role', 'id', 'shortname', 'teacher');
$capview = 'mod/questionnaire:view';
$capsubmit = 'mod/questionnaire:submit';
while ($questionnaire = rs_fetch_next_record($rs)) {
$context = get_context_instance(CONTEXT_MODULE, $questionnaire->cmid);
/// Convert questionnaires with resp_eligible = 'all' so that students & teachers have view and submit
if ($questionnaire->resp_eligible == 'all') {
assign_capability($capsubmit, CAP_ALLOW, $editteacherroleid, $context->id, true);
assign_capability($capsubmit, CAP_ALLOW, $teacherroleid, $context->id, true);
/// Convert questionnaires with resp_eligible = 'students' so that just students have view and submit
} else {
if ($questionnaire->resp_eligible == 'students') {
/// This is the default; no changes necessary.
/// Convert questionnaires with resp_eligible = 'teachers' so just teachers have view and submit
} else {
if ($questionnaire->resp_eligible == 'teachers') {
assign_capability($capsubmit, CAP_ALLOW, $editteacherroleid, $context->id, true);
assign_capability($capsubmit, CAP_ALLOW, $teacherroleid, $context->id, true);
assign_capability($capview, CAP_PREVENT, $studentroleid, $context->id, true);
assign_capability($capsubmit, CAP_PREVENT, $studentroleid, $context->id, true);
}
}
}
}
rs_close($rs);
}
}
if ($oldversion < 2008031905) {
$table = new XMLDBTable('questionnaire_survey');
$field = new XMLDBField('changed');
$result = $result && drop_field($table, $field);
}
if ($oldversion < 2008031906) {
$table = new XMLDBTable('questionnaire_response_rank');
$field = new XMLDBField('rank');
$field->setAttributes(XMLDB_TYPE_INTEGER, '11', null, XMLDB_NOTNULL, null, null, null, '0', 'choice_id');
$field->setUnsigned(false);
$result &= change_field_unsigned($table, $field);
}
if ($oldversion < 2008060401) {
$table = new XMLDBTable('questionnaire_question');
$field = new XMLDBField('name');
$field->setAttributes(XMLDB_TYPE_CHAR, '30', null, XMLDB_NOTNULL, null, null, null, null, 'survey_id');
$field->setNotnull(false);
$result &= change_field_notnull($table, $field);
}
return $result;
}
function xmldb_questionnaire_upgrade($oldversion = 0)
{
global $CFG, $DB;
$dbman = $DB->get_manager();
// Loads ddl manager and xmldb classes.
$result = true;
if ($oldversion < 2007120101) {
$result &= questionnaire_upgrade_2007120101();
// Questionnaire savepoint reached.
upgrade_mod_savepoint(true, 2007120101, 'questionnaire');
}
if ($oldversion < 2007120102) {
// Change enum values to lower case for all tables using them.
$enumvals = array('y', 'n');
$table = new xmldb_table('questionnaire_question');
$field = new xmldb_field('required');
$field->set_attributes(XMLDB_TYPE_CHAR, '1', XMLDB_UNSIGNED, XMLDB_NOTNULL, null, false, null, 'n');
$dbman->change_field_enum($table, $field);
$DB->set_field('questionnaire_question', 'required', 'y', array('required' => 'Y'));
$DB->set_field('questionnaire_question', 'required', 'n', array('required' => 'N'));
$field->set_attributes(XMLDB_TYPE_CHAR, '1', XMLDB_UNSIGNED, XMLDB_NOTNULL, null, XMLDB_ENUM, array('y', 'n'), 'n');
$dbman->change_field_enum($table, $field);
$dbman->change_field_default($table, $field);
unset($field);
$field = new xmldb_field('deleted');
$field->set_attributes(XMLDB_TYPE_CHAR, '1', XMLDB_UNSIGNED, XMLDB_NOTNULL, null, false, null, 'n');
$dbman->change_field_enum($table, $field);
$DB->set_field('questionnaire_question', 'deleted', 'y', array('deleted' => 'Y'));
$DB->set_field('questionnaire_question', 'deleted', 'n', array('deleted' => 'N'));
$field->set_attributes(XMLDB_TYPE_CHAR, '1', XMLDB_UNSIGNED, XMLDB_NOTNULL, null, XMLDB_ENUM, array('y', 'n'), 'n');
$dbman->change_field_enum($table, $field);
$dbman->change_field_default($table, $field);
unset($field);
$field = new xmldb_field('public');
$field->set_attributes(XMLDB_TYPE_CHAR, '1', XMLDB_UNSIGNED, XMLDB_NOTNULL, null, false, null, 'n');
$dbman->change_field_enum($table, $field);
$DB->set_field('questionnaire_question', 'public', 'y', array('public' => 'Y'));
$DB->set_field('questionnaire_question', 'public', 'n', array('public' => 'N'));
$field->set_attributes(XMLDB_TYPE_CHAR, '1', XMLDB_UNSIGNED, XMLDB_NOTNULL, null, XMLDB_ENUM, array('y', 'n'), 'y');
$dbman->change_field_enum($table, $field);
$dbman->change_field_default($table, $field);
unset($field);
unset($table);
$table = new xmldb_table('questionnaire_question_type');
$field = new xmldb_field('has_choices');
$field->set_attributes(XMLDB_TYPE_CHAR, '1', XMLDB_UNSIGNED, XMLDB_NOTNULL, null, false, null, 'n');
$dbman->change_field_enum($table, $field);
$DB->set_field('questionnaire_question_type', 'has_choices', 'y', array('has_choices' => 'Y'));
$DB->set_field('questionnaire_question_type', 'has_choices', 'n', array('has_choices' => 'N'));
$field->set_attributes(XMLDB_TYPE_CHAR, '1', XMLDB_UNSIGNED, XMLDB_NOTNULL, null, XMLDB_ENUM, array('y', 'n'), 'y');
$dbman->change_field_enum($table, $field);
$dbman->change_field_default($table, $field);
unset($field);
unset($table);
$table = new xmldb_table('questionnaire_response');
$field = new xmldb_field('complete');
$field->set_attributes(XMLDB_TYPE_CHAR, '1', XMLDB_UNSIGNED, XMLDB_NOTNULL, null, false, null, 'n');
$dbman->change_field_enum($table, $field);
$DB->set_field('questionnaire_response', 'complete', 'y', array('complete' => 'Y'));
$DB->set_field('questionnaire_response', 'complete', 'n', array('complete' => 'N'));
$field->set_attributes(XMLDB_TYPE_CHAR, '1', XMLDB_UNSIGNED, XMLDB_NOTNULL, null, XMLDB_ENUM, array('y', 'n'), 'n');
$dbman->change_field_enum($table, $field);
$dbman->change_field_default($table, $field);
unset($field);
unset($table);
$table = new xmldb_table('questionnaire_response_bool');
$field = new xmldb_field('choice_id');
$field->set_attributes(XMLDB_TYPE_CHAR, '1', XMLDB_UNSIGNED, XMLDB_NOTNULL, null, false, null, 'n');
$dbman->change_field_enum($table, $field);
$DB->set_field('questionnaire_response_bool', 'choice_id', 'y', array('choice_id' => 'Y'));
$DB->set_field('questionnaire_response_bool', 'choice_id', 'n', array('choice_id' => 'N'));
$field->set_attributes(XMLDB_TYPE_CHAR, '1', XMLDB_UNSIGNED, XMLDB_NOTNULL, null, XMLDB_ENUM, array('y', 'n'), 'y');
$dbman->change_field_enum($table, $field);
$dbman->change_field_default($table, $field);
unset($field);
unset($table);
$table = new xmldb_table('questionnaire_survey');
$field = new xmldb_field('public');
$field->set_attributes(XMLDB_TYPE_CHAR, '1', XMLDB_UNSIGNED, XMLDB_NOTNULL, null, false, null, 'n');
$dbman->change_field_enum($table, $field);
$DB->set_field('questionnaire_survey', 'public', 'y', array('public' => 'Y'));
$DB->set_field('questionnaire_survey', 'public', 'n', array('public' => 'N'));
$field->set_attributes(XMLDB_TYPE_CHAR, '1', XMLDB_UNSIGNED, XMLDB_NOTNULL, null, XMLDB_ENUM, array('y', 'n'), 'y');
$dbman->change_field_enum($table, $field);
$dbman->change_field_default($table, $field);
unset($field);
// Upgrade question_type table with corrected 'response_table' fields.
$DB->set_field('questionnaire_question_type', 'response_table', 'resp_single', array('response_table' => 'response_single'));
$DB->set_field('questionnaire_question_type', 'response_table', 'resp_multiple', array('response_table' => 'response_multiple'));
// Questionnaire savepoint reached..
upgrade_mod_savepoint(true, 2007120102, 'questionnaire');
}
if ($oldversion < 2008031902) {
$table = new xmldb_table('questionnaire');
$field = new xmldb_field('grade');
$field->set_attributes(XMLDB_TYPE_INTEGER, '10', false, true, false, false, null, 0, 'navigate');
$dbman->add_field($table, $field);
unset($field);
unset($table);
$table = new xmldb_table('questionnaire_response');
$field = new xmldb_field('grade');
$field->set_attributes(XMLDB_TYPE_INTEGER, '10', false, true, false, false, null, 0, 'complete');
$dbman->add_field($table, $field);
// Questionnaire savepoint reached.
upgrade_mod_savepoint(true, 2008031902, 'questionnaire');
}
if ($oldversion < 2008031904) {
$sql = "SELECT q.id, q.resp_eligible, q.resp_view, cm.id as cmid\n FROM {questionnaire} q, {course_modules} cm, {modules} m\n WHERE m.name='questionnaire' AND m.id=cm.module AND cm.instance=q.id";
if ($rs = $DB->get_recordset_sql($sql)) {
$studentroleid = $DB->get_field('role', 'id', array('shortname' => 'student'));
$editteacherroleid = $DB->get_field('role', 'id', array('shortname' => 'editingteacher'));
$teacherroleid = $DB->get_field('role', 'id', array('shortname' => 'teacher'));
$capview = 'mod/questionnaire:view';
$capsubmit = 'mod/questionnaire:submit';
foreach ($rs as $questionnaire) {
$context = get_context_instance(CONTEXT_MODULE, $questionnaire->cmid);
// Convert questionnaires with resp_eligible = 'all' so that students & teachers have view and submit.
if ($questionnaire->resp_eligible == 'all') {
assign_capability($capsubmit, CAP_ALLOW, $editteacherroleid, $context->id, true);
assign_capability($capsubmit, CAP_ALLOW, $teacherroleid, $context->id, true);
// Convert questionnaires with resp_eligible = 'students' so that just students have view and submit.
} else {
if ($questionnaire->resp_eligible == 'teachers') {
assign_capability($capsubmit, CAP_ALLOW, $editteacherroleid, $context->id, true);
assign_capability($capsubmit, CAP_ALLOW, $teacherroleid, $context->id, true);
assign_capability($capview, CAP_PREVENT, $studentroleid, $context->id, true);
assign_capability($capsubmit, CAP_PREVENT, $studentroleid, $context->id, true);
}
}
}
$rs->close();
}
// Questionnaire savepoint reached.
upgrade_mod_savepoint(true, 2008031904, 'questionnaire');
}
if ($oldversion < 2008031905) {
$table = new xmldb_table('questionnaire_survey');
$field = new xmldb_field('changed');
$dbman->drop_field($table, $field);
// Questionnaire savepoint reached.
upgrade_mod_savepoint(true, 2008031905, 'questionnaire');
}
if ($oldversion < 2008031906) {
$table = new xmldb_table('questionnaire_response_rank');
$field = new xmldb_field('rank');
$field->set_attributes(XMLDB_TYPE_INTEGER, '11', null, XMLDB_NOTNULL, null, null, null, '0', 'choice_id');
$field->setUnsigned(false);
$dbman->change_field_unsigned($table, $field);
// Questionnaire savepoint reached.
upgrade_mod_savepoint(true, 2008031906, 'questionnaire');
}
if ($oldversion < 2008060401) {
$table = new xmldb_table('questionnaire_question');
$field = new xmldb_field('name');
$field->set_attributes(XMLDB_TYPE_CHAR, '30', null, XMLDB_NOTNULL, null, null, null, null, 'survey_id');
$field->setNotnull(false);
$dbman->change_field_notnull($table, $field);
// Questionnaire savepoint reached.
upgrade_mod_savepoint(true, 2008060401, 'questionnaire');
}
if ($oldversion < 2008070702) {
$table = new xmldb_table('questionnaire_question_type');
$field = new xmldb_field('response_table');
$field->set_attributes(XMLDB_TYPE_CHAR, '32', null, XMLDB_NOTNULL, null, null, null, null, 'has_choices');
$field->setNotnull(false);
$dbman->change_field_notnull($table, $field);
// Questionnaire savepoint reached.
upgrade_mod_savepoint(true, 2008070702, 'questionnaire');
}
if ($oldversion < 2008070703) {
$table = new xmldb_table('questionnaire_resp_multiple');
$index = new xmldb_index('response_question');
$index->set_attributes(XMLDB_INDEX_NOTUNIQUE, array('response_id', 'question_id', 'choice_id'));
if (!$dbman->index_exists($table, $index)) {
$dbman->add_index($table, $index);
}
// Questionnaire savepoint reached.
upgrade_mod_savepoint(true, 2008070703, 'questionnaire');
}
if ($oldversion < 2008070704) {
// CONTRIB-1542.
$table = new xmldb_table('questionnaire_survey');
$field = new xmldb_field('email');
$field->set_attributes(XMLDB_TYPE_CHAR, '64', null, XMLDB_NOTNULL, null, null, null, null, 'title');
$field->setLength('255');
$dbman->change_field_precision($table, $field);
// Questionnaire savepoint reached.
upgrade_mod_savepoint(true, 2008070704, 'questionnaire');
}
if ($oldversion < 2008070705) {
// Rename summary field to 'intro' to adhere to new Moodle standard.
$table = new xmldb_table('questionnaire');
$field = new xmldb_field('summary');
$field->set_attributes(XMLDB_TYPE_TEXT, 'small', null, XMLDB_NOTNULL, null, null, null, null, 'name');
$dbman->rename_field($table, $field, 'intro');
// Add 'introformat' to adhere to new Moodle standard.
$field = new xmldb_field('introformat', XMLDB_TYPE_INTEGER, '4', XMLDB_UNSIGNED, XMLDB_NOTNULL, null, '0', 'intro');
$dbman->add_field($table, $field);
// Set all existing records to HTML format.
$DB->set_field('questionnaire', 'introformat', 1);
// Questionnaire savepoint reached.
upgrade_mod_savepoint(true, 2008070705, 'questionnaire');
}
if ($oldversion < 2008070706) {
// CONTRIB-1153.
$table = new xmldb_table('questionnaire_survey');
$field = new xmldb_field('public');
if ($dbman->field_exists($table, $field)) {
$dbman->drop_field($table, $field);
}
$table = new xmldb_table('questionnaire_question');
$field = new xmldb_field('public');
if ($dbman->field_exists($table, $field)) {
$dbman->drop_field($table, $field);
}
// Questionnaire savepoint reached.
upgrade_mod_savepoint(true, 2008070706, 'questionnaire');
}
if ($oldversion < 2010110100) {
// Drop list of values (enum) from field has_choices on table questionnaire_question_type.
$table = new xmldb_table('questionnaire_question_type');
$field = new xmldb_field('has_choices', XMLDB_TYPE_CHAR, '1', null, XMLDB_NOTNULL, null, 'y', 'type');
// Launch drop of list of values from field has_choices.
$dbman->drop_enum_from_field($table, $field);
// Questionnaire savepoint reached.
upgrade_mod_savepoint(true, 2010110100, 'questionnaire');
}
if ($oldversion < 2010110101) {
// Drop list of values (enum) from field respondenttype on table questionnaire.
$table = new xmldb_table('questionnaire');
$field = new xmldb_field('respondenttype', XMLDB_TYPE_CHAR, '9', null, XMLDB_NOTNULL, null, 'fullname', 'qtype');
// Launch drop of list of values from field respondenttype.
$dbman->drop_enum_from_field($table, $field);
// Drop list of values (enum) from field resp_eligible on table questionnaire.
$field = new xmldb_field('resp_eligible', XMLDB_TYPE_CHAR, '8', null, XMLDB_NOTNULL, null, 'all', 'respondenttype');
// Launch drop of list of values from field resp_eligible.
$dbman->drop_enum_from_field($table, $field);
// Drop list of values (enum) from field required on table questionnaire_question.
$table = new xmldb_table('questionnaire_question');
$field = new xmldb_field('required', XMLDB_TYPE_CHAR, '1', null, XMLDB_NOTNULL, null, 'n', 'content');
// Launch drop of list of values from field required.
$dbman->drop_enum_from_field($table, $field);
// Drop list of values (enum) from field deleted on table questionnaire_question.
$field = new xmldb_field('deleted', XMLDB_TYPE_CHAR, '1', null, XMLDB_NOTNULL, null, 'n', 'required');
// Launch drop of list of values from field deleted.
$dbman->drop_enum_from_field($table, $field);
// Drop list of values (enum) from field complete on table questionnaire_response.
$table = new xmldb_table('questionnaire_response');
$field = new xmldb_field('complete', XMLDB_TYPE_CHAR, '1', null, XMLDB_NOTNULL, null, 'n', 'submitted');
// Launch drop of list of values from field complete.
$dbman->drop_enum_from_field($table, $field);
// Drop list of values (enum) from field choice_id on table questionnaire_response_bool.
$table = new xmldb_table('questionnaire_response_bool');
$field = new xmldb_field('choice_id', XMLDB_TYPE_CHAR, '1', null, XMLDB_NOTNULL, null, 'y', 'question_id');
// Launch drop of list of values from field choice_id.
$dbman->drop_enum_from_field($table, $field);
// Questionnaire savepoint reached.
upgrade_mod_savepoint(true, 2010110101, 'questionnaire');
}
if ($oldversion < 2012100800) {
// Changing precision of field name on table questionnaire_survey to (255).
// First drop the index.
$table = new xmldb_table('questionnaire_survey');
$index = new xmldb_index('name');
$index->set_attributes(XMLDB_INDEX_NOTUNIQUE, array('name'));
$dbman->drop_index($table, $index);
// Launch change of precision for field name.
$field = new xmldb_field('name', XMLDB_TYPE_CHAR, '255', null, XMLDB_NOTNULL, null, null, 'id');
$dbman->change_field_precision($table, $field);
// Add back in the index.
$table = new xmldb_table('questionnaire_survey');
$index = new xmldb_index('name');
$index->set_attributes(XMLDB_INDEX_NOTUNIQUE, array('name'));
$dbman->add_index($table, $index);
// Questionnaire savepoint reached.
upgrade_mod_savepoint(true, 2012100800, 'questionnaire');
}
if ($oldversion < 2013062302) {
// Adding completionsubmit field to table questionnaire.
$table = new xmldb_table('questionnaire');
$field = new xmldb_field('completionsubmit', XMLDB_TYPE_INTEGER, '1', null, XMLDB_NOTNULL, null, '0', 'timemodified');
// Conditionally launch add field.
if (!$dbman->field_exists($table, $field)) {
$dbman->add_field($table, $field);
}
// Questionnaire savepoint reached.
upgrade_mod_savepoint(true, 2013062302, 'questionnaire');
}
if ($oldversion < 2013062501) {
// Skip logic new feature.
// Define field dependquestion to be added to questionnaire_question table.
$table = new xmldb_table('questionnaire_question');
$field = new xmldb_field('dependquestion', XMLDB_TYPE_INTEGER, '10', null, XMLDB_NOTNULL, null, '0', 'deleted');
// Conditionally launch add field.
if (!$dbman->field_exists($table, $field)) {
$dbman->add_field($table, $field);
}
$table = new xmldb_table('questionnaire_question');
$field = new xmldb_field('dependchoice', XMLDB_TYPE_INTEGER, '10', null, XMLDB_NOTNULL, null, '0', 'dependquestion');
// Conditionally launch add field.
if (!$dbman->field_exists($table, $field)) {
$dbman->add_field($table, $field);
}
// Replace the = separator with :: separator in quest_choice content.
// This fixes radio button options using old "value"="display" formats.
require_once $CFG->dirroot . '/mod/questionnaire/locallib.php';
$choices = $DB->get_recordset('questionnaire_quest_choice', $conditions = null);
$total = $DB->count_records('questionnaire_quest_choice');
if ($total > 0) {
$pbar = new progress_bar('convertchoicevalues', 500, true);
$i = 1;
foreach ($choices as $choice) {
if (($choice->value == null || $choice->value == 'NULL') && !preg_match("/^([0-9]{1,3}=.*|!other=.*)\$/", $choice->content)) {
$content = questionnaire_choice_values($choice->content);
if ($pos = strpos($content->text, '=')) {
$newcontent = str_replace('=', '::', $content->text);
$choice->content = $newcontent;
$DB->update_record('questionnaire_quest_choice', $choice);
}
}
$pbar->update($i, $total, "Convert questionnaire choice value separator - {$i}/{$total}.");
$i++;
}
}
// Questionnaire savepoint reached.
upgrade_mod_savepoint(true, 2013062501, 'questionnaire');
}
if ($oldversion < 2013100500) {
// Add autonumbering option for questions and pages.
$table = new xmldb_table('questionnaire');
$field = new xmldb_field('autonum', XMLDB_TYPE_INTEGER, '1', null, XMLDB_NOTNULL, null, '3', 'completionsubmit');
// Conditionally launch add field.
if (!$dbman->field_exists($table, $field)) {
$dbman->add_field($table, $field);
}
// Questionnaire savepoint reached.
upgrade_mod_savepoint(true, 2013100500, 'questionnaire');
}
if ($oldversion < 2013122202) {
// Personality test feature.
$table = new xmldb_table('questionnaire_survey');
$field = new xmldb_field('feedbacksections', XMLDB_TYPE_INTEGER, '2', null, null, null, null, null);
// Conditionally launch add field.
if (!$dbman->field_exists($table, $field)) {
$dbman->add_field($table, $field);
}
unset($field);
$field = new xmldb_field('feedbacknotes', XMLDB_TYPE_TEXT, null, null, null, null, null);
if (!$dbman->field_exists($table, $field)) {
$dbman->add_field($table, $field);
}
unset($table);
unset($field);
// Define table questionnaire_fb_sections to be created.
$table = new xmldb_table('questionnaire_fb_sections');
$table->add_field('id', XMLDB_TYPE_INTEGER, '18', null, XMLDB_NOTNULL, XMLDB_SEQUENCE, null);
$table->add_field('survey_id', XMLDB_TYPE_INTEGER, '18', null, XMLDB_NOTNULL, null, null);
$table->add_field('section', XMLDB_TYPE_INTEGER, '2', null, null, null, null);
$table->add_field('scorecalculation', XMLDB_TYPE_TEXT, null, null, null, null, null);
$table->add_field('sectionlabel', XMLDB_TYPE_CHAR, '50', null, null, null, null);
$table->add_field('sectionheading', XMLDB_TYPE_TEXT, null, null, null, null, null);
$table->add_field('sectionheadingformat', XMLDB_TYPE_INTEGER, '2', null, null, null, '1');
// Adding keys to table questionnaire_fb_sections.
$table->add_key('primary', XMLDB_KEY_PRIMARY, array('id'));
// Conditionally launch create table for assign_user_mapping.
if (!$dbman->table_exists($table)) {
$dbman->create_table($table);
}
unset($table);
// Define table questionnaire_feedback to be created.
$table = new xmldb_table('questionnaire_feedback');
$table->add_field('id', XMLDB_TYPE_INTEGER, '18', null, XMLDB_NOTNULL, XMLDB_SEQUENCE, null);
$table->add_field('section_id', XMLDB_TYPE_INTEGER, '18', null, XMLDB_NOTNULL, null, null);
$table->add_field('feedbacklabel', XMLDB_TYPE_CHAR, '30', null, null, null, null);
$table->add_field('feedbacktext', XMLDB_TYPE_TEXT, null, null, null, null, null);
$table->add_field('feedbacktextformat', XMLDB_TYPE_INTEGER, '2', null, null, null, '1');
$table->add_field('minscore', XMLDB_TYPE_NUMBER, '10,5', null, null, null, '0.00000');
$table->add_field('maxscore', XMLDB_TYPE_NUMBER, '10,5', null, null, null, '101.00000');
// Adding keys to table questionnaire_fb_sections.
$table->add_key('primary', XMLDB_KEY_PRIMARY, array('id'));
// Conditionally launch create table for assign_user_mapping.
if (!$dbman->table_exists($table)) {
$dbman->create_table($table);
}
// Questionnaire savepoint reached.
upgrade_mod_savepoint(true, 2013122202, 'questionnaire');
}
if ($oldversion < 2014010300) {
// Personality test with chart.
$table = new xmldb_table('questionnaire_survey');
$field = new xmldb_field('chart_type', XMLDB_TYPE_CHAR, '64', null, null, null, null, null);
// Conditionally launch add field.
if (!$dbman->field_exists($table, $field)) {
$dbman->add_field($table, $field);
}
$field = new xmldb_field('feedbackscores', XMLDB_TYPE_INTEGER, '1', null, null, null, '0');
// Conditionally launch add field.
if (!$dbman->field_exists($table, $field)) {
$dbman->add_field($table, $field);
}
// Questionnaire savepoint reached.
upgrade_mod_savepoint(true, 2014010300, 'questionnaire');
}
if ($oldversion < 2015051101) {
// Move the global config value for 'usergraph' to the plugin config setting instead.
if (isset($CFG->questionnaire_usergraph)) {
set_config('usergraph', $CFG->questionnaire_usergraph, 'questionnaire');
unset_config('questionnaire_usergraph');
}
upgrade_mod_savepoint(true, 2015051101, 'questionnaire');
}
// Add index to reduce load on the questionnaire_quest_choice table.
if ($oldversion < 2015051102) {
// Conditionally add an index to the question_id field.
$table = new xmldb_table('questionnaire_quest_choice');
$index = new xmldb_index('quest_choice_quesidx', XMLDB_INDEX_NOTUNIQUE, array('question_id'));
// Only add the index if it does not exist.
if (!$dbman->index_exists($table, $index)) {
$dbman->add_index($table, $index);
}
// Questionnaire savepoint reached.
upgrade_mod_savepoint(true, 2015051102, 'questionnaire');
}
return $result;
}
