".$connect->ErrorMsg()); while ($row=$result->FetchRow()) {$lastqid=$row['qid'];} $newqid=$lastqid+1; $query = "UPDATE {$dbprefix}questions SET qid=$newqid WHERE qid=$oldqid"; $result = $connect->Execute($query) or safe_die($query."
".$connect->ErrorMsg()); //Update conditions.. firstly conditions FOR this question $query = "UPDATE {$dbprefix}conditions SET qid=$newqid WHERE qid=$oldqid"; $result = $connect->Execute($query) or safe_die($query."
".$connect->ErrorMsg()); //Now conditions based upon this question $query = "SELECT cqid, cfieldname FROM {$dbprefix}conditions WHERE cqid=$oldqid"; $result = db_execute_assoc($query) or safe_die($query."
".$connect->ErrorMsg()); while ($row=$result->FetchRow()) { $switcher[]=array("cqid"=>$row['cqid'], "cfieldname"=>$row['cfieldname']); } if (isset($switcher)) { foreach ($switcher as $switch) { $query = "UPDATE {$dbprefix}conditions SET cqid=$newqid, cfieldname='".str_replace("X".$oldqid, "X".$newqid, $switch['cfieldname'])."' WHERE cqid=$oldqid"; $result = $connect->Execute($query) or safe_die($query."
".$connect->ErrorMsg()); } } //Now question_attributes $query = "UPDATE {$dbprefix}question_attributes SET qid=$newqid WHERE qid=$oldqid"; $result = $connect->Execute($query) or safe_die($query."
".$connect->ErrorMsg()); //Now answers $query = "UPDATE {$dbprefix}answers SET qid=$newqid WHERE qid=$oldqid"; $result = $connect->Execute($query) or safe_die($query."
".$connect->ErrorMsg()); } //CHECK TO MAKE SURE ALL QUESTION TYPES THAT REQUIRE ANSWERS HAVE ACTUALLY GOT ANSWERS //THESE QUESTION TYPES ARE: // # "L" -> LIST // # "O" -> LIST WITH COMMENT // # "M" -> MULTIPLE OPTIONS // # "P" -> MULTIPLE OPTIONS WITH COMMENTS // # "A", "B", "C", "E", "F", "H", "^" -> Various Array Types // # "R" -> RANKING // # "U" -> FILE CSV MORE // # "I" -> FILE CSV ONE // # "1" -> MULTI SCALE $chkquery = "SELECT qid, question, gid FROM {$dbprefix}questions WHERE sid={$_GET['sid']} AND type IN ('L', 'O', 'M', 'P', 'A', 'B', 'C', 'E', 'F', 'R', 'J', '!', '^', '1')"; $chkresult = db_execute_assoc($chkquery) or safe_die ("Couldn't get list of questions
$chkquery
".$connect->ErrorMsg()); while ($chkrow = $chkresult->FetchRow()) { $chaquery = "SELECT * FROM {$dbprefix}answers WHERE qid = {$chkrow['qid']} ORDER BY sortorder, answer"; $charesult=$connect->Execute($chaquery); $chacount=$charesult->RecordCount(); if (!$chacount > 0) { $failedcheck[]=array($chkrow['qid'], $chkrow['question'], ": ".$clang->gT("This question is a multiple answer type question but has no answers."), $chkrow['gid']); } } //NOW CHECK THAT ALL QUESTIONS HAVE A 'QUESTION TYPE' FIELD $chkquery = "SELECT qid, question, gid FROM {$dbprefix}questions WHERE sid={$_GET['sid']} AND type = ''"; $chkresult = db_execute_assoc($chkquery) or safe_die ("Couldn't check questions for missing types
$chkquery
".$connect->ErrorMsg()); while ($chkrow = $chkresult->FetchRow()) { $failedcheck[]=array($chkrow['qid'], $chkrow['question'], ": ".$clang->gT("This question does not have a question 'type' set."), $chkrow['gid']); } //CHECK THAT FLEXIBLE LABEL TYPE QUESTIONS HAVE AN "LID" SET $chkquery = "SELECT qid, question, gid FROM {$dbprefix}questions WHERE sid={$_GET['sid']} AND type IN ('F', 'H', 'W', 'Z', '1') AND (lid = 0 OR lid is null)"; $chkresult = db_execute_assoc($chkquery) or safe_die ("Couldn't check questions for missing LIDs
$chkquery
".$connect->ErrorMsg()); while($chkrow = $chkresult->FetchRow()){ $failedcheck[]=array($chkrow['qid'], $chkrow['question'], ": ".$clang->gT("This question requires a Labelset, but none is set."), $chkrow['gid']); } // while //CHECK THAT FLEXIBLE LABEL TYPE QUESTIONS HAVE AN "LID1" SET FOR MULTI SCALE $chkquery = "SELECT qid, question, gid FROM {$dbprefix}questions WHERE sid={$_GET['sid']} AND (type ='1') AND (lid1 = 0 OR lid1 is null)"; $chkresult = db_execute_assoc($chkquery) or safe_die ("Couldn't check questions for missing LIDs
$chkquery
".$connect->ErrorMsg()); while($chkrow = $chkresult->FetchRow()){ $failedcheck[]=array($chkrow['qid'], $chkrow['question'], ": ".$clang->gT("This question requires a second Labelset, but none is set."), $chkrow['gid']); } // while //NOW check that all used labelsets have all necessary languages $chkquery = "SELECT qid, question, gid, lid FROM {$dbprefix}questions WHERE sid={$_GET['sid']} AND type IN ('F', 'H', 'W', 'Z', '1') AND (lid > 0) AND (lid is not null)"; $chkresult = db_execute_assoc($chkquery) or safe_die ("Couldn't check questions for missing LID languages
$chkquery
".$connect->ErrorMsg()); $slangs = GetAdditionalLanguagesFromSurveyID($surveyid); $baselang = GetBaseLanguageFromSurveyID($surveyid); array_unshift($slangs,$baselang); while ($chkrow = $chkresult->FetchRow()) { foreach ($slangs as $surveylanguage) { $chkquery2 = "SELECT lid FROM {$dbprefix}labels WHERE language='$surveylanguage' AND (lid = {$chkrow['lid']}) "; $chkresult2 = db_execute_assoc($chkquery2); if ($chkresult2->RecordCount()==0) { $failedcheck[]=array($chkrow['qid'], $chkrow['question'], ": ".$clang->gT("The labelset used in this question does not exists or is missing a translation."), $chkrow['gid']); } } //foreach } //while //CHECK THAT ALL CONDITIONS SET ARE FOR QUESTIONS THAT PRECEED THE QUESTION CONDITION //A: Make an array of all the qids in order of appearance // $qorderquery="SELECT * FROM {$dbprefix}questions, {$dbprefix}groups WHERE {$dbprefix}questions.gid={$dbprefix}groups.gid AND {$dbprefix}questions.sid={$_GET['sid']} ORDER BY {$dbprefix}groups.sortorder, {$dbprefix}questions.title"; // $qorderresult=$connect->Execute($qorderquery) or safe_die("Couldn't generate a list of questions in order
$qorderquery
".$connect->ErrorMsg()); // $qordercount=$qorderresult->RecordCount(); // $c=0; // while ($qorderrow=$qorderresult->FetchRow()) // { // $qidorder[]=array($c, $qorderrow['qid']); // $c++; // } //TO AVOID NATURAL SORT ORDER ISSUES, FIRST GET ALL QUESTIONS IN NATURAL SORT ORDER, AND FIND OUT WHICH NUMBER IN THAT ORDER THIS QUESTION IS $qorderquery = "SELECT * FROM {$dbprefix}questions WHERE sid=$surveyid AND type not in ('S', 'D', 'T', 'Q')"; $qorderresult = db_execute_assoc($qorderquery) or safe_die ("$qorderquery
".$connect->ErrorMsg()); $qrows = array(); //Create an empty array in case FetchRow does not return any rows while ($qrow = $qorderresult->FetchRow()) {$qrows[] = $qrow;} // Get table output into array usort($qrows, 'CompareGroupThenTitle'); // Perform a case insensitive natural sort on group name then question title of a multidimensional array $c=0; foreach ($qrows as $qr) { $qidorder[]=array($c, $qrow['qid']); $c++; } $qordercount=""; //1: Get each condition's question id $conquery= "SELECT {$dbprefix}conditions.qid, cqid, {$dbprefix}questions.question, " . "{$dbprefix}questions.gid " . "FROM {$dbprefix}conditions, {$dbprefix}questions, {$dbprefix}groups " . "WHERE {$dbprefix}conditions.qid={$dbprefix}questions.qid " . "AND {$dbprefix}questions.gid={$dbprefix}groups.gid ORDER BY {$dbprefix}conditions.qid"; $conresult=db_execute_assoc($conquery) or safe_die("Couldn't check conditions for relative consistency
$conquery
".$connect->ErrorMsg()); //2: Check each conditions cqid that it occurs later than the cqid while ($conrow=$conresult->FetchRow()) { $cqidfound=0; $qidfound=0; $b=0; while ($b<$qordercount) { if ($conrow['cqid'] == $qidorder[$b][1]) { $cqidfound = 1; $b=$qordercount; } if ($conrow['qid'] == $qidorder[$b][1]) { $qidfound = 1; $b=$qordercount; } if ($qidfound == 1) { $failedcheck[]=array($conrow['qid'], $conrow['question'], ": ".$clang->gT("This question has a condition set, however the condition is based on a question that appears after it."), $conrow['gid']); } $b++; } } //CHECK THAT ALL THE CREATED FIELDS WILL BE UNIQUE $fieldmap=createFieldMap($surveyid, "full"); if (isset($fieldmap)) { foreach($fieldmap as $fielddata) { $fieldlist[]=$fielddata['fieldname']; } $fieldlist=array_reverse($fieldlist); //let's always change the later duplicate, not the earlier one } $checkKeysUniqueComparison = create_function('$value','if ($value > 1) return true;'); @$duplicates = array_keys (array_filter (array_count_values($fieldlist), $checkKeysUniqueComparison)); if (isset($duplicates)) { foreach ($duplicates as $dup) { $badquestion=arraySearchByKey($dup, $fieldmap, "fieldname", 1); $fix = "[Click Here to Fix]"; $failedcheck[]=array($badquestion['qid'], $badquestion['question'], ": Bad duplicate fieldname $fix", $badquestion['gid']); } } //IF ANY OF THE CHECKS FAILED, PRESENT THIS SCREEN if (isset($failedcheck) && $failedcheck) { $activateoutput .= "
\n\n"; $activateoutput .= "\t\t\t\t\n"; $activateoutput .= "\t\n"; $activateoutput .= "\t\t\n"; $activateoutput .= "\t\n"; $activateoutput .= "\t\n"; $activateoutput .= "\t\t\n"; $activateoutput .= "\t\n"; $activateoutput .= "
".$clang->gT("Activate Survey")." ($surveyid)
\n"; $activateoutput .= "\t\t\t".$clang->gT("Error")."
\n"; $activateoutput .= "\t\t\t".$clang->gT("Survey does not pass consistency check")."\n"; $activateoutput .= "\t\t
\n"; $activateoutput .= "\t\t\t".$clang->gT("The following problems have been found:")."
\n"; $activateoutput .= "\t\t\t
    \n"; foreach ($failedcheck as $fc) { $activateoutput .= "\t\t\t\t
  • Question qid-{$fc[0]} (\"{$fc[1]}\"){$fc[2]}
    • \n"; } $activateoutput .= "\t\t\t
\n"; $activateoutput .= "\t\t\t".$clang->gT("The survey cannot be activated until these problems have been resolved.")."\n"; $activateoutput .= "\t\t

 \n"; return; } $activateoutput .= "
\n\n"; $activateoutput .= "\t\t\t\t\n"; $activateoutput .= "\t\n"; $activateoutput .= "\t\t\n"; $activateoutput .= "\t\n"; $activateoutput .= "\t\n"; $activateoutput .= "\t\t\n"; $activateoutput .= "\t\n"; $activateoutput .= "\t\n"; $activateoutput .= "\t\t\n"; $activateoutput .= "\t\n"; $activateoutput .= "
".$clang->gT("Activate Survey")." ($surveyid)
\n"; $activateoutput .= "\t\t\t".$clang->gT("Warning")."
\n"; $activateoutput .= "\t\t\t".$clang->gT("READ THIS CAREFULLY BEFORE PROCEEDING")."\n"; $activateoutput .= "\t\t\t\n"; $activateoutput .= "\t\t
\n"; $activateoutput .= $clang->gT("You should only activate a survey when you are absolutely certain that your survey setup is finished and will not need changing.")."

\n"; $activateoutput .= $clang->gT("Once a survey is activated you can no longer:")."
  • ".$clang->gT("Add or delete groups")."
  • ".$clang->gT("Add or remove answers to Multiple Answer questions")."
  • ".$clang->gT("Add or delete questions")."
\n"; $activateoutput .= $clang->gT("However you can still:")."
  • ".$clang->gT("Edit (change) your questions code, text or type")."
  • ".$clang->gT("Edit (change) your group names")."
  • ".$clang->gT("Add, Remove or Edit pre-defined question answers (except for Multi-answer questions)")."
  • ".$clang->gT("Change survey name or description")."
\n"; $activateoutput .= $clang->gT("Once data has been entered into this survey, if you want to add or remove groups or questions, you will need to de-activate this survey, which will move all data that has already been entered into a separate archived table.")."

\n"; $activateoutput .= "\t\t
\n"; // $activateoutput .= "\t\t\tgT("Activate Survey")."\" onclick=\"window.open('$scriptname?action=activate&ok=Y&sid={$_GET['sid']}', '_top')\" />\n"; $activateoutput .= "\t\t\tgT("Activate Survey")."\" onclick=\"".get2post("$scriptname?action=activate&ok=Y&sid={$_GET['sid']}")."\" />\n"; $activateoutput .= "\t\t
 

 \n"; } else { //Create the survey responses table $createsurvey = "id I NOTNULL AUTO PRIMARY,\n"; $createsurvey .= " submitdate T,\n"; $createsurvey .= " startlanguage C(20) NOTNULL ,\n"; //Check for any additional fields for this survey and create necessary fields (token and datestamp) $pquery = "SELECT private, allowregister, datestamp, ipaddr, refurl FROM {$dbprefix}surveys WHERE sid={$postsid}"; $presult=db_execute_assoc($pquery); while($prow=$presult->FetchRow()) { if ($prow['private'] == "N") { $createsurvey .= " token C(36),\n"; $surveynotprivate="TRUE"; } if ($prow['allowregister'] == "Y") { $surveyallowsregistration="TRUE"; } if ($prow['datestamp'] == "Y") { $createsurvey .= " datestamp T NOTNULL,\n"; $createsurvey .= " startdate T NOTNULL,\n"; } if ($prow['ipaddr'] == "Y") { $createsurvey .= " ipaddr X,\n"; } //Check to see if 'refurl' field is required. if ($prow['refurl'] == "Y") { $createsurvey .= " refurl X,\n"; } } //Get list of questions for the base language $aquery = " SELECT * FROM ".db_table_name('questions').", ".db_table_name('groups') ." WHERE ".db_table_name('questions').".gid=".db_table_name('groups').".gid " ." AND ".db_table_name('questions').".sid={$postsid} " ." AND ".db_table_name('groups').".language='".GetbaseLanguageFromSurveyid($postsid). "' " ." AND ".db_table_name('questions').".language='".GetbaseLanguageFromSurveyid($postsid). "' " ." ORDER BY ".db_table_name('groups').".group_order, title"; $aresult = db_execute_assoc($aquery); while ($arow=$aresult->FetchRow()) //With each question, create the appropriate field(s) { if ( substr($createsurvey, strlen($createsurvey)-2, 2) != ",\n") {$createsurvey .= ",\n";} if ($arow['type'] != "M" && $arow['type'] != "A" && $arow['type'] != "B" && $arow['type'] != "C" && $arow['type'] != "E" && $arow['type'] != "F" && $arow['type'] != "H" && $arow['type'] != "P" && $arow['type'] != "R" && $arow['type'] != "Q" && $arow['type'] != "^" && $arow['type'] != "J" && $arow['type'] != "K" && $arow['type'] != "1") { $createsurvey .= " `{$arow['sid']}X{$arow['gid']}X{$arow['qid']}`"; switch($arow['type']) { case "N": //NUMERICAL $createsurvey .= " C(20)"; break; case "S": //SHORT TEXT if ($databasetype=='mysql') {$createsurvey .= " X";} else {$createsurvey .= " C(255)";} break; case "L": //LIST (RADIO) case "!": //LIST (DROPDOWN) case "W": case "Z": $createsurvey .= " C(5)"; if ($arow['other'] == "Y") { $createsurvey .= ",\n`{$arow['sid']}X{$arow['gid']}X{$arow['qid']}other` X"; } break; case "I": // CSV ONE $createsurvey .= " C(5)"; break; case "O": //DROPDOWN LIST WITH COMMENT $createsurvey .= " C(5),\n `{$arow['sid']}X{$arow['gid']}X{$arow['qid']}comment` X"; break; case "T": //LONG TEXT $createsurvey .= " X"; break; case "U": //HUGE TEXT $createsurvey .= " X"; break; case "D": //DATE $createsurvey .= " D"; break; case "5": //5 Point Choice case "G": //Gender case "Y": //YesNo case "X": //Boilerplate $createsurvey .= " C(1)"; break; } } elseif ($arow['type'] == "M" || $arow['type'] == "A" || $arow['type'] == "B" || $arow['type'] == "C" || $arow['type'] == "E" || $arow['type'] == "F" || $arow['type'] == "H" || $arow['type'] == "P" || $arow['type'] == "^") { //MULTI ENTRY $abquery = "SELECT a.*, q.other FROM {$dbprefix}answers as a, {$dbprefix}questions as q" ." WHERE a.qid=q.qid AND sid={$postsid} AND q.qid={$arow['qid']} " ." AND a.language='".GetbaseLanguageFromSurveyid($postsid). "' " ." AND q.language='".GetbaseLanguageFromSurveyid($postsid). "' " ." ORDER BY a.sortorder, a.answer"; $abresult=db_execute_assoc($abquery) or safe_die ("Couldn't get perform answers query
$abquery
".$connect->ErrorMsg()); while ($abrow=$abresult->FetchRow()) { $createsurvey .= " `{$arow['sid']}X{$arow['gid']}X{$arow['qid']}{$abrow['code']}` C(5),\n"; if ($abrow['other']=="Y") {$alsoother="Y";} if ($arow['type'] == "P") { $createsurvey .= " `{$arow['sid']}X{$arow['gid']}X{$arow['qid']}{$abrow['code']}comment` X,\n"; } } if ((isset($alsoother) && $alsoother=="Y") && ($arow['type']=="M" || $arow['type']=="P" || $arow['type']=="1")) //Sc: check! { $createsurvey .= " `{$arow['sid']}X{$arow['gid']}X{$arow['qid']}other` C(255),\n"; if ($arow['type']=="P") { $createsurvey .= " `{$arow['sid']}X{$arow['gid']}X{$arow['qid']}othercomment` X,\n"; } } } elseif ($arow['type'] == "Q") { $abquery = "SELECT a.*, q.other FROM {$dbprefix}answers as a, {$dbprefix}questions as q WHERE a.qid=q.qid AND sid={$postsid} AND q.qid={$arow['qid']} " ." AND a.language='".GetbaseLanguageFromSurveyid($postsid). "' " ." AND q.language='".GetbaseLanguageFromSurveyid($postsid). "' " ." ORDER BY a.sortorder, a.answer"; $abresult=db_execute_assoc($abquery) or safe_die ("Couldn't get perform answers query
$abquery
".$connect->ErrorMsg()); while ($abrow = $abresult->FetchRow()) { $createsurvey .= " `{$arow['sid']}X{$arow['gid']}X{$arow['qid']}{$abrow['code']}`"; if ($databasetype=='mysql') { $createsurvey .= " X"; } else { $createsurvey .= " C(255)"; } $createsurvey .= ",\n"; } } elseif ($arow['type'] == "K") //Multiple Numeric - replica of multiple short text, except numbers only { $abquery = "SELECT a.*, q.other FROM {$dbprefix}answers as a, {$dbprefix}questions as q WHERE a.qid=q.qid AND sid={$postsid} AND q.qid={$arow['qid']} " ." AND a.language='".GetbaseLanguageFromSurveyid($postsid). "' " ." AND q.language='".GetbaseLanguageFromSurveyid($postsid). "' " ." ORDER BY a.sortorder, a.answer"; $abresult=db_execute_assoc($abquery) or safe_die ("Couldn't get perform answers query
$abquery
".$connect->ErrorMsg()); while ($abrow = $abresult->FetchRow()) { $createsurvey .= " `{$arow['sid']}X{$arow['gid']}X{$arow['qid']}{$abrow['code']}` C(20),\n"; } } //End if ($arow['type'] == "K") /* elseif ($arow['type'] == "J") { $abquery = "SELECT {$dbprefix}answers.*, {$dbprefix}questions.other FROM {$dbprefix}answers, {$dbprefix}questions WHERE {$dbprefix}answers.qid={$dbprefix}questions.qid AND sid={$_GET['sid']} AND {$dbprefix}questions.qid={$arow['qid']} ORDER BY {$dbprefix}answers.sortorder, {$dbprefix}answers.answer"; $abresult=db_execute_assoc($abquery) or safe_die ("Couldn't get perform answers query
$abquery
".$connect->ErrorMsg()); while ($abrow = $abresultt->FetchRow()) { $createsurvey .= " `{$arow['sid']}X{$arow['gid']}X{$arow['qid']}{$abrow['code']}` C(5),\n"; } }*/ elseif ($arow['type'] == "R") { //MULTI ENTRY $abquery = "SELECT a.*, q.other FROM {$dbprefix}answers as a, {$dbprefix}questions as q" ." WHERE a.qid=q.qid AND sid={$postsid} AND q.qid={$arow['qid']} " ." AND a.language='".GetbaseLanguageFromSurveyid($postsid). "' " ." AND q.language='".GetbaseLanguageFromSurveyid($postsid). "' " ." ORDER BY a.sortorder, a.answer"; $abresult=$connect->Execute($abquery) or safe_die ("Couldn't get perform answers query
$abquery
".$connect->ErrorMsg()); $abcount=$abresult->RecordCount(); for ($i=1; $i<=$abcount; $i++) { $createsurvey .= " `{$arow['sid']}X{$arow['gid']}X{$arow['qid']}$i` C(5),\n"; } } elseif ($arow['type'] == "1") { $abquery = "SELECT a.*, q.other FROM {$dbprefix}answers as a, {$dbprefix}questions as q" ." WHERE a.qid=q.qid AND sid={$postsid} AND q.qid={$arow['qid']} " ." AND a.language='".GetbaseLanguageFromSurveyid($postsid). "' " ." AND q.language='".GetbaseLanguageFromSurveyid($postsid). "' " ." ORDER BY a.sortorder, a.answer"; $abresult=db_execute_assoc($abquery) or safe_die ("Couldn't get perform answers query
$abquery
".$connect->ErrorMsg()); $abcount=$abresult->RecordCount(); while ($abrow = $abresult->FetchRow()) { $abmultiscalequery = "SELECT a.*, q.other FROM {$dbprefix}answers as a, {$dbprefix}questions as q, {$dbprefix}labels as l" ." WHERE a.qid=q.qid AND sid={$postsid} AND q.qid={$arow['qid']} " ." AND l.lid=q.lid AND sid={$postsid} AND q.qid={$arow['qid']} AND l.title = '' " ." AND l.language='".GetbaseLanguageFromSurveyid($postsid). "' " ." AND q.language='".GetbaseLanguageFromSurveyid($postsid). "' "; $abmultiscaleresult=$connect->Execute($abmultiscalequery) or safe_die ("Couldn't get perform answers query
$abmultiscalequery
".$connect->ErrorMsg()); $abmultiscaleresultcount =$abmultiscaleresult->RecordCount(); $abmultiscaleresultcount = 1; for ($j=0; $j<=$abmultiscaleresultcount; $j++) { $createsurvey .= " `{$arow['sid']}X{$arow['gid']}X{$arow['qid']}{$abrow['code']}#$j` C(5),\n"; } } } } // If last question is of type MCABCEFHP^QKJR let's get rid of the ending coma in createsurvey $createsurvey = rtrim($createsurvey, ",\n")."\n"; // Does nothing if not ending with a comma $tabname = "{$dbprefix}survey_{$postsid}"; # not using db_table_name as it quotes the table name (as does CreateTableSQL) $taboptarray = array('mysql' => 'TYPE='.$databasetabletype.' CHARACTER SET utf8 COLLATE utf8_unicode_ci'); $dict = NewDataDictionary($connect); $sqlarray = $dict->CreateTableSQL($tabname, $createsurvey, $taboptarray); $execresult=$dict->ExecuteSQLArray($sqlarray,1); if ($execresult==0 || $execresult==1) { $activateoutput .= "
\n\n" . "\n" . "
".$clang->gT("Activate Survey")." ($surveyid)
\n" . "".$clang->gT("Survey could not be actived.")."
\n" . "
".$clang->gT("Main Admin Screen")."
\n" . "DB ".$clang->gT("Error").":
\n" . $connect->ErrorMsg() . "\n" . "
$createsurvey
\n" . "

 \n" . "\n"; } if ($execresult != 0 && $execresult !=1) { $anquery = "SELECT autonumber_start FROM {$dbprefix}surveys WHERE sid={$postsid}"; if ($anresult=db_execute_assoc($anquery)) { //if there is an autonumber_start field, start auto numbering here while($row=$anresult->FetchRow()) { if ($row['autonumber_start'] > 0) { $autonumberquery = "ALTER TABLE {$dbprefix}survey_{$postsid} AUTO_INCREMENT = ".$row['autonumber_start']; if ($result = $connect->Execute($autonumberquery)) { //We're happy it worked! } else { //Continue regardless - it's not the end of the world } } } } $activateoutput .= "
\n\n"; $activateoutput .= "\t\t\t\t\n"; $activateoutput .= "\t\t\t\t
".$clang->gT("Activate Survey")." ($surveyid)
".$clang->gT("Survey has been activated. Results table has been successfully created.")."

\n"; $acquery = "UPDATE {$dbprefix}surveys SET active='Y' WHERE sid=".returnglobal('sid'); $acresult = $connect->Execute($acquery); // Private means data privacy, not closed access survey // if (isset($surveynotprivate) && $surveynotprivate) //This survey is tracked, and therefore a tokens table MUST exist // { // $activateoutput .= $clang->gT("This is not an anonymous survey. A token table must also be created.")."

\n"; // $activateoutput .= "\n"; // } // elseif (isset($surveyallowsregistration) && $surveyallowsregistration == "TRUE") if (isset($surveyallowsregistration) && $surveyallowsregistration == "TRUE") { $activateoutput .= $clang->gT("This survey allows public registration. A token table must also be created.")."

\n"; // $activateoutput .= "\n"; $activateoutput .= "\n"; } else { $activateoutput .= $clang->gT("This survey is now active, and responses can be recorded.")."

\n"; $activateoutput .= "".$clang->gT("Open-access mode").": ".$clang->gT("No invitation code is needed to complete the survey.")."
".$clang->gT("You can switch to the closed-access mode by initialising a token table with the button below.")."

\n"; // $activateoutput .= $clang->gT("Optional").": \n"; $activateoutput .= $clang->gT("Optional").": \n"; } $activateoutput .= "\t\t\t\t

 \n"; } } ?>