'.getLanguageNameFromCode($language,false).'

"; // If there are answerscales if ($qtproperties[$questionrow['type']]['answerscales']>0) { for ($scale_id=0;$scale_id<$qtproperties[$questionrow['type']]['answerscales'];$scale_id++) { $editdefvalues.="
• "; if ($qtproperties[$questionrow['type']]['answerscales']>1) { $editdefvalues.=sprintf($clang->gT('Default answer for scale %s:'),$scale_id).""; } else { $editdefvalues.=sprintf($clang->gT('Default answer value:'),$scale_id).""; } $defaultvalue=$connect->GetOne("SELECT defaultvalue FROM ".db_table_name('defaultvalues')." WHERE qid=$qid AND specialtype='' and scale_id={$scale_id} AND language='{$language}'"); $editdefvalues.=""; $editdefvalues.="gT('').""; $answerquery = "SELECT code, answer FROM ".db_table_name('answers')." WHERE qid=$qid and language='$language' order by sortorder"; $answerresult = db_execute_assoc($answerquery); foreach ($answerresult as $answer) { $editdefvalues.="GetOne("SELECT defaultvalue FROM ".db_table_name('defaultvalues')." WHERE qid=$qid and specialtype='other' AND scale_id={$scale_id} AND language='{$language}'"); if (is_null($defaultvalue)) $defaultvalue=''; $editdefvalues.="
  ".$clang->gT("Default value for option 'Other':")."
"; } } } // If there are subquestions and no answerscales if ($qtproperties[$questionrow['type']]['answerscales']==0 && $qtproperties[$questionrow['type']]['subquestions']>0) { for ($scale_id=0;$scale_id<$qtproperties[$questionrow['type']]['subquestions'];$scale_id++) { $sqquery = "SELECT * FROM ".db_table_name('questions')." WHERE sid=$surveyid AND gid=$gid AND parent_qid=$qid and language=".db_quoteall($language)." and scale_id=0 order by question_order"; $sqresult = db_execute_assoc($sqquery); $sqrows = $sqresult->GetRows(); if ($qtproperties[$questionrow['type']]['subquestions']>1) { $editdefvalues.="
".sprintf($clang->gT('Default answer for scale %s:'),$scale_id)."
"; } if ($questionrow['type']=='M' || $questionrow['type']=='P') { $options=array(''=>$clang->gT(''),'Y'=>$clang->gT('Checked')); } $editdefvalues.="
"; switch($questionrow['type']) { case 'L': case 'M': case 'O': case 'P': case '!': $inputStyle='enum'; break; case 'K': case 'Q': $inputStyle='text'; break; } if ($inputStyle == 'enum') { foreach ($sqrows as $aSubquestion) { $defaultvalue=$connect->GetOne("SELECT defaultvalue FROM ".db_table_name('defaultvalues')." WHERE qid=$qid AND specialtype='' and sqid={$aSubquestion['qid']} and scale_id={$scale_id} AND language='{$language}'"); $editdefvalues.="
• {$aSubquestion['title']}: ".FlattenText($aSubquestion['question']).""; $editdefvalues.=""; foreach ($options as $value=>$label) { $editdefvalues.="GetOne("SELECT defaultvalue FROM ".db_table_name('defaultvalues')." WHERE qid=$qid AND specialtype='' and sqid={$aSubquestion['qid']} and scale_id={$scale_id} AND language='{$language}'"); $editdefvalues.="
  {$aSubquestion['title']}: ".FlattenText($aSubquestion['question']).""; $editdefvalues.=""; $editdefvalues.=$defaultvalue."
  \n"; } } } } if ($qtproperties[$questionrow['type']]['answerscales']==0 && $qtproperties[$questionrow['type']]['subquestions']==0) { /* case 'D': case 'N': case 'S': case 'T': case 'U':* */ $defaultvalue=$connect->GetOne("SELECT defaultvalue FROM ".db_table_name('defaultvalues')." WHERE qid=$qid AND language='{$language}'"); $editdefvalues.="
  "; $editdefvalues.=""; $editdefvalues.=$defaultvalue."
  \n"; } if ($language==$baselang && count($questlangs)>1) { $editdefvalues.="
  ".$clang->gT('Use same default value across languages:')."
  \n" . "\t
  \n" . "\t"; $editdefvalues.="

"; } if ($action == "editquestion" || $action=="addquestion") { $adding=($action=="addquestion"); if ($adding) { // This is needed to properly color-code content if it contains replacements LimeExpressionManager::StartProcessingPage(false,$rooturl,true); // so can click on syntax highlighting to edit questions } $questlangs = GetAdditionalLanguagesFromSurveyID($surveyid); $baselang = GetBaseLanguageFromSurveyID($surveyid); $questlangs[] = $baselang; $questlangs = array_flip($questlangs); if (!$adding) { $egquery = "SELECT * FROM ".db_table_name('questions')." WHERE sid=$surveyid AND gid=$gid AND qid=$qid"; $egresult = db_execute_assoc($egquery); while ($esrow = $egresult->FetchRow()) { if(!array_key_exists($esrow['language'], $questlangs)) // Language Exists, BUT ITS NOT ON THE SURVEY ANYMORE. { $egquery = "DELETE FROM ".db_table_name('questions')." WHERE sid='{$surveyid}' AND gid='{$gid}' AND qid='{$qid}' AND language='".$esrow['language']."'"; $egresultD = $connect->Execute($egquery); } else { $questlangs[$esrow['language']] = 99; } if ($esrow['language'] == $baselang) { $basesettings = array('question_order' => $esrow['question_order'], 'other' => $esrow['other'], 'mandatory' => $esrow['mandatory'], 'type' => $esrow['type'], 'title' => $esrow['title'], 'preg' => $esrow['preg'], 'question' => $esrow['question'], 'help' => $esrow['help']); } } if ($egresult==false or $egresult->RecordCount()==0) { safe_die('Invalid question id'); } while (list($key,$value) = each($questlangs)) { if ($value != 99) { db_switchIDInsert('questions',true); $egquery = "INSERT INTO ".db_table_name('questions')." (qid, sid, gid, type, title, question, preg, help, other, mandatory, question_order, language)" ." VALUES ('{$qid}','{$surveyid}', '{$gid}', '{$basesettings['type']}', '{$basesettings['title']}'," ." '{$basesettings['question']}', '{$basesettings['preg']}', '{$basesettings['help']}', '{$basesettings['other']}', '{$basesettings['mandatory']}', '{$basesettings['question_order']}','{$key}')"; $egresult = $connect->Execute($egquery); db_switchIDInsert('questions',false); } } $eqquery = "SELECT * FROM {$dbprefix}questions WHERE sid=$surveyid AND gid=$gid AND qid=$qid AND language='{$baselang}'"; $eqresult = db_execute_assoc($eqquery); } $js_admin_includes[] = '../scripts/jquery/jquery.dd.js'; $css_admin_includes[] = '../scripts/jquery/dd.css'; $editquestion = PrepareEditorScript(); $qtypelist=getqtypelist('','array'); $qDescToCode = 'qDescToCode = {'; $qCodeToInfo = 'qCodeToInfo = {'; foreach ($qtypelist as $qtype=>$qdesc){ $qDescToCode .= " '{$qdesc['description']}' : '{$qtype}', \n"; $qCodeToInfo .= " '{$qtype}' : '".ls_json_encode($qdesc)."', \n"; } $qTypeOutput = "$qDescToCode 'null':'null' }; \n $qCodeToInfo 'null':'null' };"; $editquestion .= "\n
"; if (!$adding) {$editquestion .=$clang->gT("Edit question");} else {$editquestion .=$clang->gT("Add a new question");}; $editquestion .= "
\n"; if (!$adding) { $eqrow = $eqresult->FetchRow(); // there should be only one datarow, therefore we don't need a 'while' construct here. // Todo: handler in case that record is not found } else { $eqrow['language']=$baselang; $eqrow['title']=''; $eqrow['question']=''; $eqrow['help']=''; $eqrow['type']='T'; $eqrow['lid']=0; $eqrow['lid1']=0; $eqrow['gid']=$gid; $eqrow['other']='N'; $eqrow['mandatory']='N'; $eqrow['preg']=''; $eqrow['relevance']='1'; } $editquestion .= "
"; $editquestion .= '
• '.getLanguageNameFromCode($eqrow['language'],false); $editquestion .= '('.$clang->gT("Base language").')'; $editquestion .= "
\n"; $addlanguages=GetAdditionalLanguagesFromSurveyID($surveyid); foreach ($addlanguages as $addlanguage) { $editquestion .= '
• '.getLanguageNameFromCode($addlanguage,false); $editquestion .= "
\n"; } $editquestion .= "\n
\n"; $editquestion .= "
gT("Error: You have to enter a question code.",'js')."');\">\n"; $editquestion .= '
'; $eqrow = array_map('htmlspecialchars', $eqrow); $editquestion .= "\t
".$clang->gT("Code:")."\n" . "\n" . "\t
\n"; $editquestion .= "\t
".$clang->gT("Question:")."\n" . "{$eqrow['question']}\n" . getEditor("question-text","question_".$eqrow['language'], "[".$clang->gT("Question:", "js")."](".$eqrow['language'].")",$surveyid,$gid,$qid,$action) . "\t
\n" . "\t
".$clang->gT("Help:")."\n" . "{$eqrow['help']}\n" . getEditor("question-help","help_".$eqrow['language'], "[".$clang->gT("Help:", "js")."](".$eqrow['language'].")",$surveyid,$gid,$qid,$action) . "" . "\t
\n"; $editquestion .= ' 
'; if (!$adding) { $aqquery = "SELECT * FROM {$dbprefix}questions WHERE sid=$surveyid AND gid=$gid AND qid=$qid AND language != '{$baselang}'"; $aqresult = db_execute_assoc($aqquery); while (!$aqresult->EOF) { $aqrow = $aqresult->FetchRow(); $editquestion .= '
'; $aqrow = array_map('htmlspecialchars', $aqrow); $editquestion .= "\t
".$clang->gT("Question:")."\n" . "{$aqrow['question']}\n" . getEditor("question-text","question_".$aqrow['language'], "[".$clang->gT("Question:", "js")."](".$aqrow['language'].")",$surveyid,$gid,$qid,$action) . "\t
\n" . "\t
".$clang->gT("Help:")."\n" . "{$aqrow['help']}\n" . getEditor("question-help","help_".$aqrow['language'], "[".$clang->gT("Help:", "js")."](".$aqrow['language'].")",$surveyid,$gid,$qid,$action) . "\t
\n"; $editquestion .= '
'; } } else { $addlanguages=GetAdditionalLanguagesFromSurveyID($surveyid); foreach ($addlanguages as $addlanguage) { $editquestion .= '
'; $editquestion .= ''; $editquestion .= "\t
".$clang->gT("Question:")."\n" . "\n" . getEditor("question-text","question_".$addlanguage, "[".$clang->gT("Question:", "js")."](".$addlanguage.")",$surveyid,$gid,$qid,$action) . "\t
\n" . "\t
".$clang->gT("Help:")."\n" . "\n" . getEditor("question-help","help_".$addlanguage, "[".$clang->gT("Help:", "js")."](".$addlanguage.")",$surveyid,$gid,$qid,$action) . "" . "\t
\n"; $editquestion .= '
'; } } //question type: $editquestion .= "\t
\n" . "
• ".$clang->gT("Question Type:")." \n"; if ($activated != "Y") { $editquestion .= "\n" . getqtypelist($eqrow['type'],'group') . "\n"; } else { $qtypelist=getqtypelist('','array'); $editquestion .= "{$qtypelist[$eqrow['type']]['description']} - ".$clang->gT("Cannot be changed (survey is active)")."\n" . "\n"; } $editquestion .="\t
\n"; if (!$adding) {$qattributes=questionAttributes();} else { $qattributes=array(); } if ($activated != "Y") { $editquestion .= "\t
• \n" . "\t".$clang->gT("Question group:")."\n" . "\n" . getgrouplist3($eqrow['gid']) . "\t\t
\n"; } else { $editquestion .= "\t
• \n" . "\t".$clang->gT("Question group:")."\n" . getgroupname($eqrow['gid'])." - ".$clang->gT("Cannot be changed (survey is active)")."\n" . "\t" . "
\n"; } $editquestion .= "\t
• \n" . "".$clang->gT("Option 'Other':")."\n"; if ($activated != "Y") { $editquestion .= "".$clang->gT("Yes")."".$clang->gT("No")."gT("Cannot be changed (survey is active)")."\n" . "\t\n"; } $editquestion .= "\t
\n"; $editquestion .= "\t
• \n" . "".$clang->gT("Mandatory:")."\n" . "\t".$clang->gT("Yes")."".$clang->gT("No")."\n"; $editquestion .= "\t
• \n" . "".$clang->gT("Validation:")."\n" . "\n" . "\t
"; // Relevance $editquestion .= "
• ".$clang->gT("Relevance equation:")." ".$eqrow['relevance']."
"; if ($adding) { //Get the questions for this group $baselang = GetBaseLanguageFromSurveyID($surveyid); $oqquery = "SELECT * FROM ".db_table_name('questions')." WHERE sid=$surveyid AND gid=$gid AND language='".$baselang."' and parent_qid=0 order by question_order" ; $oqresult = db_execute_assoc($oqquery); if ($oqresult->RecordCount()) { // select questionposition $editquestion .= "\t
• \n" . "".$clang->gT("Position:")."\n" . "\t\n" . "".$clang->gT("At end")."\n" . "".$clang->gT("At beginning")."\n"; while ($oq = $oqresult->FetchRow()) { //Bug Fix: add 1 to question_order $question_order_plus_one = $oq['question_order']+1; $editquestion .= "".$clang->gT("After").": ".$oq['title']."\n"; } $editquestion .= "\t\n" . "
\n"; } else { $editquestion .= ""; } } $editquestion .="
\n"; $editquestion .= '
'.$clang->gT("Show advanced settings").''.$clang->gT("Hide advanced settings").'
' .'
' .'
'.$clang->gT("Loading...").'
' .'
' .'
' ."
"; if ($adding) { $editquestion .="\t\n"; } else { $editquestion .= "\t\n" . "\t"; } $editquestion .= "\t
\n" . "
\n"; if ($adding) { // Import dialogue if (bHasSurveyPermission($surveyid,'surveycontent','import')) { $editquestion .= "

".$clang->gT("...or import a question")."
\n" . "\t
\n" . "

\n" . "\t
• \n" . "\t".$clang->gT("Select LimeSurvey question file (*.lsq/*.csv)").":\n" . "\t\n" . "\t
\n" . "\t
• \n" . "\t".$clang->gT("Convert resource links?")."\n" . "\t\n" . "\t
\n" . "

\n" . "

\n" . "\n" . "\n" . "\n" . "\n" ."

\n\n"; } $editquestion .= "\n"; } $editquestion .= questionjavascript($eqrow['type']); } //Constructing the interface here... if($action == "orderquestions") { if (isset($_POST['questionordermethod'])) { switch($_POST['questionordermethod']) { // Pressing the Up button case 'up': $newsortorder=$postsortorder-1; $oldsortorder=$postsortorder; $cdquery = "UPDATE ".db_table_name('questions')." SET question_order=-1 WHERE gid=$gid AND question_order=$newsortorder"; $cdresult=$connect->Execute($cdquery) or safe_die($connect->ErrorMsg()); $cdquery = "UPDATE ".db_table_name('questions')." SET question_order=$newsortorder WHERE gid=$gid AND question_order=$oldsortorder"; $cdresult=$connect->Execute($cdquery) or safe_die($connect->ErrorMsg()); $cdquery = "UPDATE ".db_table_name('questions')." SET question_order='$oldsortorder' WHERE gid=$gid AND question_order=-1"; $cdresult=$connect->Execute($cdquery) or safe_die($connect->ErrorMsg()); break; // Pressing the Down button case 'down': $newsortorder=$postsortorder+1; $oldsortorder=$postsortorder; $cdquery = "UPDATE ".db_table_name('questions')." SET question_order=-1 WHERE gid=$gid AND question_order=$newsortorder"; $cdresult=$connect->Execute($cdquery) or safe_die($connect->ErrorMsg()); $cdquery = "UPDATE ".db_table_name('questions')." SET question_order='$newsortorder' WHERE gid=$gid AND question_order=$oldsortorder"; $cdresult=$connect->Execute($cdquery) or safe_die($connect->ErrorMsg()); $cdquery = "UPDATE ".db_table_name('questions')." SET question_order=$oldsortorder WHERE gid=$gid AND question_order=-1"; $cdresult=$connect->Execute($cdquery) or safe_die($connect->ErrorMsg()); break; } LimeExpressionManager::SetDirtyFlag(); // so refreshes syntax highlighting } if ((!empty($_POST['questionmovefrom']) || (isset($_POST['questionmovefrom']) && $_POST['questionmovefrom'] == '0')) && (!empty($_POST['questionmoveto']) || (isset($_POST['questionmoveto']) && $_POST['questionmoveto'] == '0'))) { $newpos=(int)$_POST['questionmoveto']; $oldpos=(int)$_POST['questionmovefrom']; if($newpos > $oldpos) { //Move the question we're changing out of the way $cdquery = "UPDATE ".db_table_name('questions')." SET question_order=-1 WHERE gid=$gid AND question_order=$oldpos"; $cdresult=$connect->Execute($cdquery) or safe_die($connect->ErrorMsg()); //Move all question_orders that are less than the newpos down one $cdquery = "UPDATE ".db_table_name('questions')." SET question_order=question_order-1 WHERE gid=$gid AND question_order > $oldpos AND question_order <= $newpos"; $cdresult=$connect->Execute($cdquery) or safe_die($connect->ErrorMsg()); //Renumber the question we're changing $cdquery = "UPDATE ".db_table_name('questions')." SET question_order=$newpos WHERE gid=$gid AND question_order=-1"; $cdresult=$connect->Execute($cdquery) or safe_die($connect->ErrorMsg()); } if(($newpos+1) < $oldpos) { //echo "Newpos $newpos, Oldpos $oldpos"; //Move the question we're changing out of the way $cdquery = "UPDATE ".db_table_name('questions')." SET question_order=-1 WHERE gid=$gid AND question_order=$oldpos"; $cdresult=$connect->Execute($cdquery) or safe_die($connect->ErrorMsg()); //Move all question_orders that are later than the newpos up one $cdquery = "UPDATE ".db_table_name('questions')." SET question_order=question_order+1 WHERE gid=$gid AND question_order > $newpos AND question_order <= $oldpos"; $cdresult=$connect->Execute($cdquery) or safe_die($connect->ErrorMsg()); //Renumber the question we're changing $cdquery = "UPDATE ".db_table_name('questions')." SET question_order=".($newpos+1)." WHERE gid=$gid AND question_order=-1"; $cdresult=$connect->Execute($cdquery) or safe_die($connect->ErrorMsg()); } LimeExpressionManager::SetDirtyFlag(); // so refreshes syntax highlighting } //Get the questions for this group $baselang = GetBaseLanguageFromSurveyID($surveyid); $oqquery = "SELECT * FROM ".db_table_name('questions')." WHERE sid=$surveyid AND gid=$gid AND language='".$baselang."' and parent_qid=0 order by question_order" ; $oqresult = db_execute_assoc($oqquery); $orderquestions = "
".$clang->gT("Change Question Order")."
"; $questioncount = $oqresult->RecordCount(); $oqarray = $oqresult->GetArray(); $minioqarray=$oqarray; $orderquestions .= "
"; LimeExpressionManager::StartProcessingPage(false,$rooturl,true); // so can click on syntax highlighting to edit questions for($i=0; $i < $questioncount ; $i++) //Assumes that all question orders start with 0 { $downdisabled = ""; $updisabled = ""; //Move to location $orderquestions.="
• \n" ; $orderquestions.="\t\n"; $orderquestions.="".$clang->gT("Place after..")."\n"; //Display the "position at beginning" item if($i != 0) { $orderquestions.="".$clang->gT("At beginning")."\n"; } //Find out if there are any dependencies $max_start_order=0; $max_end_order=$questioncount+1; $minipos=$minioqarray[0]['question_order']; //Start at the very first question_order foreach($minioqarray as $mo) { if($minipos >= $max_start_order && $minipos < $max_end_order) { $orderquestions.="".$mo['title']."\n"; } $minipos++; } $orderquestions.="\n"; $orderquestions.= "\t\n"; if ($i < $questioncount-1) { // Fill the sortorder hiddenfield so we know what field is moved down $orderquestions.= "\t\n"; } $orderquestions.= "".$oqarray[$i]['title'].": "; $relevance = ($oqarray[$i]['relevance'] == '') ? 1 : $oqarray[$i]['relevance']; $showme = '[{' . $relevance . '}] ' . $oqarray[$i]['question']; LimeExpressionManager::ProcessString($showme, $oqarray[$i]['qid']); $orderquestions.=FlattenText(LimeExpressionManager::GetLastPrettyPrintExpression(), false, 'UTF-8', true, true); $orderquestions.= "
\n" ; } $orderquestions.="
\n" . "\n" . "\n" . "\n" . "\t" . "\t" . "
" ; $orderquestions .="
" ; LimeExpressionManager::FinishProcessingGroup(); LimeExpressionManager::FinishProcessingPage(); } function questionjavascript($type) { $newquestionoutput = "\n"; return $newquestionoutput; } if ($action == "ajaxlabelsetdetails") { $lid=returnglobal('lid'); $query='select * from '.db_table_name('labelsets').' where lid='.$lid; $labelsetdata=$connect->GetArray($query); $labelsetlanguages=explode(' ',$labelsetdata[0]['languages']); foreach ($labelsetlanguages as $language){ $query='select * from '.db_table_name('labels').' where lid='.$lid." and language='{$language}' order by sortorder"; $labels=$connect->GetArray($query); $resultdata[]=array($language=>array($labels,getLanguageNameFromCode($language,false))); } echo ls_json_encode($resultdata); } if ($action == "ajaxlabelsetpicker") { $match=(int)returnglobal('match'); $surveyid=returnglobal('sid'); if ($match==1) { $language=GetBaseLanguageFromSurveyID($surveyid); } else { $language=null; } $resultdata=getlabelsets($language); echo ls_json_encode($resultdata); } if ($action == "ajaxquestionattributes") { $thissurvey=getSurveyInfo($surveyid); $type=returnglobal('question_type'); if (isset($qid)) { $attributesettings=getQuestionAttributes($qid); } $availableattributes=questionAttributes(); if (isset($availableattributes[$type])) { uasort($availableattributes[$type],'CategorySort'); $ajaxoutput = ''; $currentfieldset=''; foreach ($availableattributes[$type] as $qa) { if (isset($attributesettings[$qa['name']])) { $value=$attributesettings[$qa['name']]; } else { $value=$qa['default']; } if ($currentfieldset!=$qa['category']) { if ($currentfieldset!='') { $ajaxoutput.='
'; } $ajaxoutput.="
\n"; $ajaxoutput.="
{$qa['category']}
\n
"; $currentfieldset=$qa['category']; } $ajaxoutput .= "
• " ."".$qa['caption'].""; if (isset($qa['readonly']) && $qa['readonly']==true && $thissurvey['active']=='Y') { $ajaxoutput .= "$value"; } else { switch ($qa['inputtype']){ case 'singleselect': $ajaxoutput .=""; foreach($qa['options'] as $optionvalue=>$optiontext) { $ajaxoutput .="