';
foreach ($ansresult as $ansrow)
{
$check_ans = '';
if ($_SESSION['survey_'.Yii::app()->getConfig('surveyID')][$ia[1]] == $ansrow['code'])
{
$check_ans = CHECKED;
}
$answer .= '
'.$ansrow['answer'].'
';
}
if ($ia[6] != 'Y' && SHOW_NO_ANSWER == 1)
{
if ((!$_SESSION['survey_'.Yii::app()->getConfig('surveyID')][$ia[1]] || $_SESSION['survey_'.Yii::app()->getConfig('surveyID')][$ia[1]] == '') ||($_SESSION['survey_'.Yii::app()->getConfig('surveyID')][$ia[1]] == ' ' ))
{
$check_ans = CHECKED;
}
elseif (($_SESSION['survey_'.Yii::app()->getConfig('surveyID')][$ia[1]] || $_SESSION['survey_'.Yii::app()->getConfig('surveyID')][$ia[1]] != ''))
{
$check_ans = '';
}
$answer .= '
'.$clang->gT('No answer').'
';
}
$fname2 = $ia[1].'comment';
if ($anscount > 8) {$tarows = $anscount/1.2;} else {$tarows = 4;}
// --> START NEW FEATURE - SAVE
// --> START ORIGINAL
// $answer .= "\t\n"
// . "
';
// --> END NEW FEATURE - SAVE
foreach ($ansresult as $ansrow)
{
$check_ans = '';
if ($_SESSION['survey_'.Yii::app()->getConfig('surveyID')][$ia[1]] == $ansrow['code'])
{
$check_ans = SELECTED;
}
$answer .= ' '.$ansrow['answer']." \n";
if (strlen($ansrow['answer']) > $maxoptionsize)
{
$maxoptionsize = strlen($ansrow['answer']);
}
}
if ($ia[6] != 'Y' && SHOW_NO_ANSWER == 1)
{
if ((!$_SESSION['survey_'.Yii::app()->getConfig('surveyID')][$ia[1]] || $_SESSION['survey_'.Yii::app()->getConfig('surveyID')][$ia[1]] == '') ||($_SESSION['survey_'.Yii::app()->getConfig('surveyID')][$ia[1]] == ' '))
{
$check_ans = SELECTED;
}
elseif ($_SESSION['survey_'.Yii::app()->getConfig('surveyID')][$ia[1]] || $_SESSION['survey_'.Yii::app()->getConfig('surveyID')][$ia[1]] != '')
{
$check_ans = '';
}
$answer .= ''.$clang->gT('No answer')." \n";
}
$answer .= '
';
$fname2 = $ia[1].'comment';
if ($anscount > 8) {$tarows = $anscount/1.2;} else {$tarows = 4;}
if ($tarows > 15) {$tarows=15;}
$maxoptionsize=$maxoptionsize*0.72;
if ($maxoptionsize < 33) {$maxoptionsize=33;}
if ($maxoptionsize > 70) {$maxoptionsize=70;}
$answer .= '';
$inputnames[]=$ia[1];
$inputnames[]=$ia[1].'comment';
}
return array($answer, $inputnames);
}
// ---------------------------------------------------------------
// TMSW TODO - Can remove DB query by passing in answer list from EM
function do_ranking($ia)
{
// note to self: this function needs to define:
// inputnames, answer, among others
global $thissurvey;
$clang=Yii::app()->lang;
$imageurl = Yii::app()->getConfig("imageurl");
$checkconditionFunction = "checkconditions";
$aQuestionAttributes = getQuestionAttributeValues($ia[0], $ia[4]);
if ($aQuestionAttributes['random_order']==1) {
$ansquery = "SELECT * FROM {{answers}} WHERE qid=$ia[0] AND language='".$_SESSION['survey_'.Yii::app()->getConfig('surveyID')]['s_lang']."' and scale_id=0 ORDER BY ".dbRandom();
} else {
$ansquery = "SELECT * FROM {{answers}} WHERE qid=$ia[0] AND language='".$_SESSION['survey_'.Yii::app()->getConfig('surveyID')]['s_lang']."' and scale_id=0 ORDER BY sortorder, answer";
}
$ansresult = Yii::app()->db->createCommand($ansquery)->query()->readAll(); //Checked
$anscount= count($ansresult);
if (trim($aQuestionAttributes["max_answers"])!='')
{
$max_answers=trim($aQuestionAttributes["max_answers"]);
} else {
$max_answers=$anscount;
}
// Get the max number of line needed
if(ctype_digit($max_answers) && intval($max_answers)<$anscount){
$iMaxLine=$max_answers;
}else{
$iMaxLine=$anscount;
}
if (trim($aQuestionAttributes["min_answers"])!='')
{
$min_answers=trim($aQuestionAttributes["min_answers"]);
} else {
$min_answers=0;
}
$answer = '';
// First start by a ranking without javascript : just a list of select box
// construction select box
$answers= array();
foreach ($ansresult as $ansrow)
{
$answers[] = $ansrow;
}
$answer .= '
"
. "
{".$max_answers."}
"
. "
{".$min_answers."}
"
. "
".$ia[1]."
"
. "
";
// The list with HTML answres
$answer .="";
foreach ($answers as $ansrow)
{
$answer.="
{$ansrow['answer']}
";
}
$answer .="
getConfig('surveyID')][$myfname]))
{
if ($_SESSION['survey_'.Yii::app()->getConfig('surveyID')][$myfname] == 'Y')
{
$answer .= CHECKED;
}
}
$answer .= " onclick='cancelBubbleThis(event);";
$answer .= ''
. "$checkconditionFunction(this.value, this.name, this.type)' />\n"
. ""
. $ansrow['question']
. " \n";
// if ($maxansw > 0) {$maxanswscript .= "\tif (document.getElementById('answer".$myfname."').checked) { count += 1; }\n";}
// if ($minansw > 0) {$minanswscript .= "\tif (document.getElementById('answer".$myfname."').checked) { count += 1; }\n";}
++$fn;
/* Now add the hidden field to contain information about this answer */
$answer .= ' getConfig('surveyID')][$myfname]) && trim($_SESSION['survey_'.Yii::app()->getConfig('surveyID')][$myfname])!='')
{
$answer .= CHECKED;
}
$answer .= " />
".$othertext."
\n"
. "\t\n"
. $ansrow['question']." \n";
$answer_main .= " \n\n"
. "\t\n";
$fn++;
$inputnames[]=$myfname;
$inputnames[]=$myfname2;
}
if ($other == 'Y')
{
$myfname = $ia[1].'other';
$myfname2 = $myfname.'comment';
$anscount = $anscount + 2;
$answer_main .= "\t\n\n"
. "\t\n".$othertext."\n \n \n"
. "\n\t \n";
$inputnames[]=$myfname;
$inputnames[]=$myfname2;
}
$answer .= "\n";
if($aQuestionAttributes['commented_checkbox']!="allways" && $aQuestionAttributes['commented_checkbox_auto'])
{
Yii::app()->getClientScript()->registerScriptFile(Yii::app()->getConfig('generalscripts')."multiplechoice_withcomments.js");
# $script= " doMultipleChoiceWithComments({$ia[0]},'{$aQuestionAttributes["commented_checkbox"]}');\n";
# App()->getClientScript()->registerScript("doMultipleChoiceWithComments",$script,CClientScript::POS_HEAD);// Deactivate now: need to be after question, and just after
$answer .= "\n";
}
return array($answer, $inputnames);
}
// ---------------------------------------------------------------
function do_file_upload($ia)
{
global $thissurvey;
$clang = Yii::app()->lang;
$checkconditionFunction = "checkconditions";
$aQuestionAttributes=getQuestionAttributeValues($ia[0]);
// Fetch question attributes
$_SESSION['survey_'.Yii::app()->getConfig('surveyID')]['fieldname'] = $ia[1];
$currentdir = getcwd();
$pos = stripos($currentdir, "admin");
$scriptloc = Yii::app()->getController()->createUrl('uploader/index');
if ($pos)
{
$_SESSION['survey_'.Yii::app()->getConfig('surveyID')]['preview'] = 1 ;
$questgrppreview = 1; // Preview is launched from Question or group level
}
else if ($thissurvey['active'] != "Y")
{
$_SESSION['survey_'.Yii::app()->getConfig('surveyID')]['preview'] = 1;
$questgrppreview = 0;
}
else
{
$_SESSION['survey_'.Yii::app()->getConfig('surveyID')]['preview'] = 0;
$questgrppreview = 0;
}
$uploadbutton = "";
$answer = "\n";
Yii::app()->getClientScript()->registerScriptFile(Yii::app()->getConfig('generalscripts')."modaldialog.js");
// Modal dialog
$answer .= $uploadbutton;
$answer .= "
";
$answer .= '';
$answer .= '';
$inputnames[] = $ia[1];
$inputnames[] = $ia[1]."_filecount";
return array($answer, $inputnames);
}
// ---------------------------------------------------------------
// TMSW TODO - Can remove DB query by passing in answer list from EM
function do_multipleshorttext($ia)
{
global $thissurvey;
$clang = Yii::app()->lang;
$extraclass ="";
$answer='';
$aQuestionAttributes = getQuestionAttributeValues($ia[0], $ia[4]);
if ($aQuestionAttributes['numbers_only']==1)
{
$sSeparator = getRadixPointData($thissurvey['surveyls_numberformat']);
$sSeparator = $sSeparator['separator'];
$extraclass .=" numberonly";
$checkconditionFunction = "fixnum_checkconditions";
}
else
{
$checkconditionFunction = "checkconditions";
}
if (intval(trim($aQuestionAttributes['maximum_chars']))>0)
{
// Only maxlength attribute, use textarea[maxlength] jquery selector for textarea
$maximum_chars= intval(trim($aQuestionAttributes['maximum_chars']));
$maxlength= "maxlength='{$maximum_chars}' ";
$extraclass .=" maxchars maxchars-".$maximum_chars;
}
else
{
$maxlength= "";
}
if (trim($aQuestionAttributes['text_input_width'])!='')
{
$tiwidth=$aQuestionAttributes['text_input_width'];
$extraclass .=" inputwidth".trim($aQuestionAttributes['text_input_width']);
}
else
{
$tiwidth=20;
}
if (trim($aQuestionAttributes['prefix'][$_SESSION['survey_'.Yii::app()->getConfig('surveyID')]['s_lang']])!='') {
$prefix=$aQuestionAttributes['prefix'][$_SESSION['survey_'.Yii::app()->getConfig('surveyID')]['s_lang']];
$extraclass .=" withprefix";
}
else
{
$prefix = '';
}
if (trim($aQuestionAttributes['suffix'][$_SESSION['survey_'.Yii::app()->getConfig('surveyID')]['s_lang']])!='') {
$suffix=$aQuestionAttributes['suffix'][$_SESSION['survey_'.Yii::app()->getConfig('surveyID')]['s_lang']];
$extraclass .=" withsuffix";
}
else
{
$suffix = '';
}
if ($thissurvey['nokeyboard']=='Y')
{
includeKeypad();
$kpclass = "text-keypad";
$extraclass .=" inputkeypad";
}
else
{
$kpclass = "";
}
if ($aQuestionAttributes['random_order']==1) {
$ansquery = "SELECT * FROM {{questions}} WHERE parent_qid=$ia[0] AND language='".$_SESSION['survey_'.Yii::app()->getConfig('surveyID')]['s_lang']."' ORDER BY ".dbRandom();
}
else
{
$ansquery = "SELECT * FROM {{questions}} WHERE parent_qid=$ia[0] AND language='".$_SESSION['survey_'.Yii::app()->getConfig('surveyID')]['s_lang']."' ORDER BY question_order";
}
$ansresult = dbExecuteAssoc($ansquery); //Checked
$aSubquestions = $ansresult->readAll();
$anscount = count($aSubquestions)*2;
//$answer .= "\t'.$clang->gT('Error: This question has no answers.')." \n";
}
else
{
if (trim($aQuestionAttributes['display_rows'])!='')
{
//question attribute "display_rows" is set -> we need a textarea to be able to show several rows
$drows=$aQuestionAttributes['display_rows'];
foreach ($aSubquestions as $ansrow)
{
$myfname = $ia[1].$ansrow['title'];
if ($ansrow['question'] == "")
{
$ansrow['question'] = " ";
}
//NEW: textarea instead of input=text field
list($htmltbody2, $hiddenfield)=return_array_filter_strings($ia, $aQuestionAttributes, $thissurvey, $ansrow, $myfname, '', $myfname, "li","question-item answer-item text-item".$extraclass);
$answer_main .= "\t$htmltbody2\n"
. "{$ansrow['question']} \n"
. "\t\n".$prefix."\n".'
\n".$suffix."\n\t \n"
. "\t\n";
$fn++;
$inputnames[]=$myfname;
}
}
else
{
foreach ($aSubquestions as $ansrow)
{
$myfname = $ia[1].$ansrow['title'];
if ($ansrow['question'] == "") {$ansrow['question'] = " ";}
// color code missing mandatory questions red
if ($ia[6]=='Y' && (($_SESSION['survey_'.Yii::app()->getConfig('surveyID')]['step'] == $_SESSION['survey_'.Yii::app()->getConfig('surveyID')]['prevstep'])
|| ($_SESSION['survey_'.Yii::app()->getConfig('surveyID')]['maxstep'] > $_SESSION['survey_'.Yii::app()->getConfig('surveyID')]['step']))
&& $_SESSION['survey_'.Yii::app()->getConfig('surveyID')][$myfname] == '') {
$ansrow['question'] = "{$ansrow['question']} ";
}
list($htmltbody2, $hiddenfield)=return_array_filter_strings($ia, $aQuestionAttributes, $thissurvey, $ansrow, $myfname, '', $myfname, "li","question-item answer-item text-item".$extraclass);
$answer_main .= "\t$htmltbody2\n"
. "{$ansrow['question']} \n"
. "\t\n".$prefix."\n".' \n"
. "\t\n";
// --> END NEW FEATURE - SAVE
$fn++;
$inputnames[]=$myfname;
}
}
}
$answer = "\n";
return array($answer, $inputnames);
}
// -----------------------------------------------------------------
// @todo: Can remove DB query by passing in answer list from EM
function do_multiplenumeric($ia)
{
global $thissurvey;
$clang = Yii::app()->lang;
$extraclass ="";
$checkconditionFunction = "fixnum_checkconditions";
$aQuestionAttributes = getQuestionAttributeValues($ia[0], $ia[4]);
$answer='';
$sSeparator = getRadixPointData($thissurvey['surveyls_numberformat']);
$sSeparator = $sSeparator['separator'];
//Must turn on the "numbers only javascript"
$extraclass .=" numberonly";
if (intval(trim($aQuestionAttributes['maximum_chars']))>0)
{
// Only maxlength attribute, use textarea[maxlength] jquery selector for textarea
$maximum_chars= intval(trim($aQuestionAttributes['maximum_chars']));
$maxlength= "maxlength='{$maximum_chars}' ";
$extraclass .=" maxchars maxchars-".$maximum_chars;
}
else
{
$maxlength= " maxlength='25' ";
}
if (trim($aQuestionAttributes['prefix'][$_SESSION['survey_'.Yii::app()->getConfig('surveyID')]['s_lang']])!='') {
$prefix=$aQuestionAttributes['prefix'][$_SESSION['survey_'.Yii::app()->getConfig('surveyID')]['s_lang']];
$extraclass .=" withprefix";
}
else
{
$prefix = '';
}
if (trim($aQuestionAttributes['suffix'][$_SESSION['survey_'.Yii::app()->getConfig('surveyID')]['s_lang']])!='') {
$suffix=$aQuestionAttributes['suffix'][$_SESSION['survey_'.Yii::app()->getConfig('surveyID')]['s_lang']];
$extraclass .=" withsuffix";
}
else
{
$suffix = '';
}
if ($thissurvey['nokeyboard']=='Y')
{
includeKeypad();
$kpclass = "num-keypad";
$extraclass .=" keypad";
}
else
{
$kpclass = "";
}
$numbersonly_slider = ''; // DEPRECATED
if (trim($aQuestionAttributes['text_input_width'])!='')
{
$tiwidth=$aQuestionAttributes['text_input_width'];
$extraclass .=" inputwidth".trim($aQuestionAttributes['text_input_width']);
}
else
{
$tiwidth=10;
}
$prefixclass="numeric";
if ($aQuestionAttributes['slider_layout']==1)
{
$prefixclass="slider";
$slider_layout=true;
$extraclass .=" withslider";
if (trim($aQuestionAttributes['slider_accuracy'])!='')
{
$slider_step = $aQuestionAttributes['slider_accuracy'];
}
else
{
$slider_step = 1;
}
if (trim($aQuestionAttributes['slider_min'])!='')
{
$slider_mintext = $aQuestionAttributes['slider_min'];
$slider_min = $aQuestionAttributes['slider_min'];
}
else
{
$slider_mintext = 0;
$slider_min = 0;
}
if (trim($aQuestionAttributes['slider_max'])!='')
{
$slider_maxtext = $aQuestionAttributes['slider_max'];
$slider_max = $aQuestionAttributes['slider_max'];
}
else
{
$slider_maxtext = "100";
$slider_max = 100;
}
$slider_default= (trim($aQuestionAttributes['slider_default'])!='')?$aQuestionAttributes['slider_default']:"";
if ($slider_default == '' && $aQuestionAttributes['slider_middlestart']==1)
{
$slider_middlestart = intval(($slider_max + $slider_min)/2);
}
else
{
$slider_middlestart = '';
}
$slider_separator= (trim($aQuestionAttributes['slider_separator'])!='')?$aQuestionAttributes['slider_separator']:"";
$slider_reset=($aQuestionAttributes['slider_reset'])?1:0;
}
else
{
$slider_layout = false;
}
$hidetip=$aQuestionAttributes['hide_tip'];
if ($aQuestionAttributes['random_order']==1)
{
$ansquery = "SELECT * FROM {{questions}} WHERE parent_qid=$ia[0] AND language='".$_SESSION['survey_'.Yii::app()->getConfig('surveyID')]['s_lang']."' ORDER BY ".dbRandom();
}
else
{
$ansquery = "SELECT * FROM {{questions}} WHERE parent_qid=$ia[0] AND language='".$_SESSION['survey_'.Yii::app()->getConfig('surveyID')]['s_lang']."' ORDER BY question_order";
}
$ansresult = dbExecuteAssoc($ansquery); //Checked
$aSubquestions = $ansresult->readAll();
$anscount = count($aSubquestions)*2;
$fn = 1;
$answer_main = '';
if ($anscount==0)
{
$inputnames=array();
$answer_main .= ' '.$clang->gT('Error: This question has no answers.')." \n";
}
else
{
foreach($aSubquestions as $ansrow)
{
$myfname = $ia[1].$ansrow['title'];
if ($ansrow['question'] == "") {$ansrow['question'] = " ";}
if ($slider_layout === false || $slider_separator == '')
{
$theanswer = $ansrow['question'];
$sliderleft='';
$sliderright='';
}
else
{
$aAnswer=explode($slider_separator,$ansrow['question']);
$theanswer=(isset($aAnswer[0]))?$aAnswer[0]:"";
$sliderleft=(isset($aAnswer[1]))?$aAnswer[1]:"";
$sliderright=(isset($aAnswer[2]))?$aAnswer[2]:"";
$sliderleft="$sliderleft
";
$sliderright="$sliderright
";
}
// color code missing mandatory questions red
if ($ia[6]=='Y' && (($_SESSION['survey_'.Yii::app()->getConfig('surveyID')]['step'] == $_SESSION['survey_'.Yii::app()->getConfig('surveyID')]['prevstep'])
|| ($_SESSION['survey_'.Yii::app()->getConfig('surveyID')]['maxstep'] > $_SESSION['survey_'.Yii::app()->getConfig('surveyID')]['step']))
&& $_SESSION['survey_'.Yii::app()->getConfig('surveyID')][$myfname] === '') {
$theanswer = "{$theanswer} ";
}
list($htmltbody2, $hiddenfield)=return_array_filter_strings($ia, $aQuestionAttributes, $thissurvey, $ansrow, $myfname, '', $myfname, "li","question-item answer-item text-item numeric-item".$extraclass);
$answer_main .= "\t$htmltbody2\n";
$answer_main .= "{$theanswer} \n";
$sSeparator = getRadixPointData($thissurvey['surveyls_numberformat']);
$sSeparator = $sSeparator['separator'];
$answer_main .= "{$sliderleft}\n\t".$prefix."\n\t {$sliderright}\n\t\n";
$fn++;
$inputnames[]=$myfname;
}
if (trim($aQuestionAttributes['equals_num_value']) != ''
|| trim($aQuestionAttributes['min_num_value']) != ''
|| trim($aQuestionAttributes['max_num_value']) != ''
)
{
$qinfo = LimeExpressionManager::GetQuestionStatus($ia[0]);
if (trim($aQuestionAttributes['equals_num_value']) != '')
{
$answer_main .= "\t\n"
. "".$clang->gT('Remaining: ')." \n"
. "$prefix\n"
. "{" . $qinfo['sumRemainingEqn'] . "}\n"
. "$suffix \n"
. "\t \n";
}
$answer_main .= "\t\n"
. "".$clang->gT('Total: ')." \n"
. "$prefix\n"
. "{" . $qinfo['sumEqn'] . "}\n"
. "$suffix \n"
. "\t \n";
}
$answer .= "\n";
}
if($aQuestionAttributes['slider_layout']==1)
{
Yii::app()->getClientScript()->registerScriptFile(Yii::app()->getConfig('generalscripts')."numeric-slider.js");
Yii::app()->getClientScript()->registerCssFile(Yii::app()->getConfig('publicstyleurl') . "numeric-slider.css");
if ($slider_default != "")
{
$slider_startvalue = $slider_default;
$slider_displaycallout=1;
}
elseif ($slider_middlestart != '')
{
$slider_startvalue = $slider_middlestart;
$slider_displaycallout=0;
}
else
{
$slider_startvalue = 'NULL';
$slider_displaycallout=0;
}
$slider_showminmax=($aQuestionAttributes['slider_showminmax']==1)?1:0;
//some var for slider
$aJsLang=array(
'reset' => $clang->gT('Reset'),
'tip' => $clang->gT('Please click and drag the slider handles to enter your answer.'),
);
$aJsVar=array(
'slider_showminmax'=>$slider_showminmax,
'slider_min' => $slider_min,
'slider_mintext'=>$slider_mintext,
'slider_max' => $slider_max,
'slider_maxtext'=>$slider_maxtext,
'slider_step'=>$slider_step,
'slider_startvalue'=>$slider_startvalue,
'slider_displaycallout'=>$slider_displaycallout,
'slider_prefix' => $prefix,
'slider_suffix' => $suffix,
'slider_reset' => $slider_reset,
'lang'=> $aJsLang,
);
$answer .= "";
}
$sSeparator = getRadixPointData($thissurvey['surveyls_numberformat']);
$sSeparator = $sSeparator['separator'];
return array($answer, $inputnames);
}
// ---------------------------------------------------------------
function do_numerical($ia)
{
global $thissurvey;
$clang = Yii::app()->lang;
$extraclass ="";
$answertypeclass = "numeric";
$checkconditionFunction = "fixnum_checkconditions";
$aQuestionAttributes = getQuestionAttributeValues($ia[0], $ia[4]);
if (trim($aQuestionAttributes['prefix'][$_SESSION['survey_'.Yii::app()->getConfig('surveyID')]['s_lang']])!='') {
$prefix=$aQuestionAttributes['prefix'][$_SESSION['survey_'.Yii::app()->getConfig('surveyID')]['s_lang']];
$extraclass .=" withprefix";
}
else
{
$prefix = '';
}
if (trim($aQuestionAttributes['suffix'][$_SESSION['survey_'.Yii::app()->getConfig('surveyID')]['s_lang']])!='') {
$suffix=$aQuestionAttributes['suffix'][$_SESSION['survey_'.Yii::app()->getConfig('surveyID')]['s_lang']];
$extraclass .=" withsuffix";
}
else
{
$suffix = '';
}
if (intval(trim($aQuestionAttributes['maximum_chars']))>0 && intval(trim($aQuestionAttributes['maximum_chars']))<20)
{
// Only maxlength attribute, use textarea[maxlength] jquery selector for textarea
$maximum_chars= intval(trim($aQuestionAttributes['maximum_chars']));
$maxlength= " maxlength='{$maximum_chars}' ";
$extraclass .=" maxchars maxchars-".$maximum_chars;
}
else
{
$maxlength= " maxlength='20' ";
}
if (trim($aQuestionAttributes['text_input_width'])!='')
{
$tiwidth=$aQuestionAttributes['text_input_width'];
$extraclass .=" inputwidth-".trim($aQuestionAttributes['text_input_width']);
}
else
{
$tiwidth=10;
}
if (trim($aQuestionAttributes['num_value_int_only'])==1)
{
$acomma="";
$extraclass .=" integeronly";
$answertypeclass .= " integeronly";
$integeronly=1;
}
else
{
$acomma=getRadixPointData($thissurvey['surveyls_numberformat']);
$acomma = $acomma['separator'];
$integeronly=0;
}
$fValue=$_SESSION['survey_'.Yii::app()->getConfig('surveyID')][$ia[1]];
$sSeparator = getRadixPointData($thissurvey['surveyls_numberformat']);
$sSeparator = $sSeparator['separator'];
// Fix the display value : Value is stored as decimal in SQL then return dot and 0 after dot. Seems only for numerical question type
if(strpos($fValue,"."))
{
$fValue=rtrim(rtrim($fValue,"0"),".");
}
$fValue = str_replace('.',$sSeparator,$fValue);
if ($thissurvey['nokeyboard']=='Y')
{
includeKeypad();
$extraclass .=" inputkeypad";
$answertypeclass .= " num-keypad";
}
else
{
$kpclass = "";
}
// --> START NEW FEATURE - SAVE
$answer = "\n";
// --> END NEW FEATURE - SAVE
$inputnames[]=$ia[1];
$mandatory=null;
return array($answer, $inputnames, $mandatory);
}
// ---------------------------------------------------------------
function do_shortfreetext($ia)
{
global $thissurvey;
$clang = Yii::app()->lang;
$sGoogleMapsAPIKey = trim(Yii::app()->getConfig("googleMapsAPIKey"));
if ($sGoogleMapsAPIKey!='')
{
$sGoogleMapsAPIKey='&key='.$sGoogleMapsAPIKey;
}
$extraclass ="";
$aQuestionAttributes = getQuestionAttributeValues($ia[0], $ia[4]);
if ($aQuestionAttributes['numbers_only']==1)
{
$sSeparator = getRadixPointData($thissurvey['surveyls_numberformat']);
$sSeparator = $sSeparator['separator'];
$extraclass .=" numberonly";
$checkconditionFunction = "fixnum_checkconditions";
}
else
{
$checkconditionFunction = "checkconditions";
}
if (intval(trim($aQuestionAttributes['maximum_chars']))>0)
{
// Only maxlength attribute, use textarea[maxlength] jquery selector for textarea
$maximum_chars= intval(trim($aQuestionAttributes['maximum_chars']));
$maxlength= "maxlength='{$maximum_chars}' ";
$extraclass .=" maxchars maxchars-".$maximum_chars;
}
else
{
$maxlength= "";
}
if (trim($aQuestionAttributes['text_input_width'])!='')
{
$tiwidth=$aQuestionAttributes['text_input_width'];
$extraclass .=" inputwidth-".trim($aQuestionAttributes['text_input_width']);
}
else
{
$tiwidth=50;
}
if (trim($aQuestionAttributes['prefix'][$_SESSION['survey_'.Yii::app()->getConfig('surveyID')]['s_lang']])!='') {
$prefix=$aQuestionAttributes['prefix'][$_SESSION['survey_'.Yii::app()->getConfig('surveyID')]['s_lang']];
$extraclass .=" withprefix";
}
else
{
$prefix = '';
}
if (trim($aQuestionAttributes['suffix'][$_SESSION['survey_'.Yii::app()->getConfig('surveyID')]['s_lang']])!='') {
$suffix=$aQuestionAttributes['suffix'][$_SESSION['survey_'.Yii::app()->getConfig('surveyID')]['s_lang']];
$extraclass .=" withsuffix";
}
else
{
$suffix = '';
}
if ($thissurvey['nokeyboard']=='Y')
{
includeKeypad();
$kpclass = "text-keypad";
$extraclass .=" inputkeypad";
}
else
{
$kpclass = "";
}
if (trim($aQuestionAttributes['display_rows'])!='')
{
//question attribute "display_rows" is set -> we need a textarea to be able to show several rows
$drows=$aQuestionAttributes['display_rows'];
//if a textarea should be displayed we make it equal width to the long text question
//this looks nicer and more continuous
if($tiwidth == 50)
{
$tiwidth=40;
}
//NEW: textarea instead of input=text field
// --> START NEW FEATURE - SAVE
$answer ="\n";
}
elseif((int)($aQuestionAttributes['location_mapservice'])!=0){
$mapservice = $aQuestionAttributes['location_mapservice'];
$currentLocation = $_SESSION['survey_'.Yii::app()->getConfig('surveyID')][$ia[1]];
$currentLatLong = null;
$floatLat = 0;
$floatLng = 0;
// Get the latitude/longtitude for the point that needs to be displayed by default
if (strlen($currentLocation) > 2){
$currentLatLong = explode(';',$currentLocation);
$currentLatLong = array($currentLatLong[0],$currentLatLong[1]);
}
else{
if ((int)($aQuestionAttributes['location_nodefaultfromip'])==0)
$currentLatLong = getLatLongFromIp(getIPAddress());
if (!isset($currentLatLong) || $currentLatLong==false){
$floatLat = 0;
$floatLng = 0;
$LatLong = explode(" ",trim($aQuestionAttributes['location_defaultcoordinates']));
if (isset($LatLong[0]) && isset($LatLong[1])){
$floatLat = $LatLong[0];
$floatLng = $LatLong[1];
}
$currentLatLong = array($floatLat,$floatLng);
}
}
// 2 - city; 3 - state; 4 - country; 5 - postal
$strBuild = "";
if ($aQuestionAttributes['location_city'])
$strBuild .= "2";
if ($aQuestionAttributes['location_state'])
$strBuild .= "3";
if ($aQuestionAttributes['location_country'])
$strBuild .= "4";
if ($aQuestionAttributes['location_postal'])
$strBuild .= "5";
$currentLocation = $currentLatLong[0] . " " . $currentLatLong[1];
$answer = "
";
Yii::app()->getClientScript()->registerScriptFile(Yii::app()->getConfig('generalscripts')."map.js");
if ($aQuestionAttributes['location_mapservice']==1 && !empty($_SERVER['HTTPS']) && $_SERVER['HTTPS'] != "off")
Yii::app()->getClientScript()->registerScriptFile("https://maps.googleapis.com/maps/api/js?sensor=false$sGoogleMapsAPIKey");
else if ($aQuestionAttributes['location_mapservice']==1)
Yii::app()->getClientScript()->registerScriptFile("http://maps.googleapis.com/maps/api/js?sensor=false$sGoogleMapsAPIKey");
elseif ($aQuestionAttributes['location_mapservice']==2)
Yii::app()->getClientScript()->registerScriptFile("http://www.openlayers.org/api/OpenLayers.js");
if (isset($aQuestionAttributes['hide_tip']) && $aQuestionAttributes['hide_tip']==0)
{
$answer .= ""
. $clang->gT('Drag and drop the pin to the desired location. You may also right click on the map to move the pin.').'
';
$question_text['help'] = $clang->gT('Drag and drop the pin to the desired location. You may also right click on the map to move the pin.');
}
}
else
{
//no question attribute set, use common input text field
$answer = "\n"
."{$clang->gT('Answer')} "
."$prefix\t
\n";
}
if (trim($aQuestionAttributes['time_limit'])!='')
{
$answer .= return_timer_script($aQuestionAttributes, $ia, "answer".$ia[1]);
}
$inputnames[]=$ia[1];
return array($answer, $inputnames);
}
function getLatLongFromIp($sIPAddress){
$ipInfoDbAPIKey = Yii::app()->getConfig("ipInfoDbAPIKey");
$oXML = simplexml_load_file("http://api.ipinfodb.com/v3/ip-city/?key=$ipInfoDbAPIKey&ip=$sIPAddress&format=xml");
if ($oXML->{'statusCode'} == "OK"){
$lat = (float)$oXML->{'latitude'};
$lng = (float)$oXML->{'longitude'};
return(array($lat,$lng));
}
else
return false;
}
// ---------------------------------------------------------------
function do_longfreetext($ia)
{
global $thissurvey;
$extraclass ="";
$clang=Yii::app()->lang;
if ($thissurvey['nokeyboard']=='Y')
{
includeKeypad();
$kpclass = "text-keypad";
$extraclass .=" inputkeypad";
}
else
{
$kpclass = "";
}
$checkconditionFunction = "checkconditions";
$aQuestionAttributes = getQuestionAttributeValues($ia[0], $ia[4]);
if (intval(trim($aQuestionAttributes['maximum_chars']))>0)
{
// Only maxlength attribute, use textarea[maxlength] jquery selector for textarea
$maximum_chars= intval(trim($aQuestionAttributes['maximum_chars']));
$maxlength= "maxlength='{$maximum_chars}' ";
$extraclass .=" maxchars maxchars-".$maximum_chars;
}
else
{
$maxlength= "";
}
// --> START ENHANCEMENT - DISPLAY ROWS
if (trim($aQuestionAttributes['display_rows'])!='')
{
$drows=$aQuestionAttributes['display_rows'];
}
else
{
$drows=5;
}
// <-- END ENHANCEMENT - DISPLAY ROWS
// --> START ENHANCEMENT - TEXT INPUT WIDTH
if (trim($aQuestionAttributes['text_input_width'])!='')
{
$tiwidth=$aQuestionAttributes['text_input_width'];
$extraclass .=" inputwidth-".trim($aQuestionAttributes['text_input_width']);
}
else
{
$tiwidth=40;
}
// <-- END ENHANCEMENT - TEXT INPUT WIDTH
// --> START NEW FEATURE - SAVE
$answer = "\n";
if (trim($aQuestionAttributes['time_limit'])!='')
{
$answer .= return_timer_script($aQuestionAttributes, $ia, "answer".$ia[1]);
}
$inputnames[]=$ia[1];
return array($answer, $inputnames);
}
// ---------------------------------------------------------------
function do_hugefreetext($ia)
{
global $thissurvey;
$clang =Yii::app()->lang;
$extraclass ="";
if ($thissurvey['nokeyboard']=='Y')
{
includeKeypad();
$kpclass = "text-keypad";
$extraclass .=" inputkeypad";
}
else
{
$kpclass = "";
}
$checkconditionFunction = "checkconditions";
$aQuestionAttributes = getQuestionAttributeValues($ia[0], $ia[4]);
if (intval(trim($aQuestionAttributes['maximum_chars']))>0)
{
// Only maxlength attribute, use textarea[maxlength] jquery selector for textarea
$maximum_chars= intval(trim($aQuestionAttributes['maximum_chars']));
$maxlength= "maxlength='{$maximum_chars}' ";
$extraclass .=" maxchars maxchars-".$maximum_chars;
}
else
{
$maxlength= "";
}
// --> START ENHANCEMENT - DISPLAY ROWS
if (trim($aQuestionAttributes['display_rows'])!='')
{
$drows=$aQuestionAttributes['display_rows'];
}
else
{
$drows=30;
}
// <-- END ENHANCEMENT - DISPLAY ROWS
// --> START ENHANCEMENT - TEXT INPUT WIDTH
if (trim($aQuestionAttributes['text_input_width'])!='')
{
$tiwidth=$aQuestionAttributes['text_input_width'];
$extraclass .=" inputwidth-".trim($aQuestionAttributes['text_input_width']);
}
else
{
$tiwidth=70;
}
// <-- END ENHANCEMENT - TEXT INPUT WIDTH
// --> START NEW FEATURE - SAVE
$answer = "{$clang->gT('Answer')} ";
$answer .='\n";
$answer .="
";
if (trim($aQuestionAttributes['time_limit']) != '')
{
$answer .= return_timer_script($aQuestionAttributes, $ia, "answer".$ia[1]);
}
$inputnames[]=$ia[1];
return array($answer, $inputnames);
}
// ---------------------------------------------------------------
function do_yesno($ia)
{
$clang = Yii::app()->lang;
$checkconditionFunction = "checkconditions";
$answer = "\n\n\n"
. "\t\n"
. "\t \n\n"
. "\t\n\n"
. "\t \n";
for ($xc=1; $xc<=5; $xc++)
{
$answer .= "\t$xc \n";
}
if ($right_exists) {$answer .= "\t \n";}
if ($ia[6] != 'Y' && SHOW_NO_ANSWER == 1) //Question is not mandatory
{
$answer .= "\t".$clang->gT('No answer')." \n";
}
$answer .= " \n";
$answer_t_content = '';
$trbc = '';
$n=0;
//return array($answer, $inputnames);
foreach ($aSubquestions as $ansrow)
{
$myfname = $ia[1].$ansrow['title'];
$answertext = $ansrow['question'];
if (strpos($answertext,'|')) {$answertext=substr($answertext,0,strpos($answertext,'|'));}
/* Check if this item has not been answered: the 'notanswered' variable must be an array,
containing a list of unanswered questions, the current question must be in the array,
and there must be no answer available for the item in this session. */
if ($ia[6]=='Y' && (is_array($notanswered)) && (array_search($myfname, $notanswered) !== FALSE) && ($_SESSION['survey_'.Yii::app()->getConfig('surveyID')][$myfname] == '') ) {
$answertext = "{$answertext} ";
}
$trbc = alternation($trbc , 'row');
// Get array_filter stuff
list($htmltbody2, $hiddenfield)=return_array_filter_strings($ia, $aQuestionAttributes, $thissurvey, $ansrow, $myfname, $trbc, $myfname,"tr","$trbc answers-list radio-list");
$answer_t_content .= $htmltbody2
. "\t\n$answertext\n"
. $hiddenfield
. " \n";
for ($i=1; $i<=5; $i++)
{
$answer_t_content .= "\t\n"
. "{$i} \n"
."\n\t \n";
}
$answertext2 = $ansrow['question'];
if (strpos($answertext2,'|'))
{
$answertext2=substr($answertext2,strpos($answertext2,'|')+1);
$answer_t_content .= "\t$answertext2 \n";
}
elseif ($right_exists)
{
$answer_t_content .= "\t \n";
}
if ($ia[6] != 'Y' && SHOW_NO_ANSWER == 1)
{
$answer_t_content .= "\t\n"
."".$clang->gT('No answer')." "
."\n\t \n";
}
$answer_t_content .= "\n";
$fn++;
$inputnames[]=$myfname;
}
$answer .= $answer_t_content . "\n \t
\n";
return array($answer, $inputnames);
}
// ---------------------------------------------------------------
/**
* DONE: well-formed valid HTML is appreciated
* Enter description here...
* @param $ia
* @return unknown_type
*/
// TMSW TODO - Can remove DB query by passing in answer list from EM
function do_array_10point($ia)
{
global $notanswered, $thissurvey;
$extraclass ="";
$clang = Yii::app()->lang;
$caption=$clang->gT("An array with sub-question on each line. The answers are value from 1 to 10 and are contained in the table header. ");
$checkconditionFunction = "checkconditions";
$qquery = "SELECT other FROM {{questions}} WHERE qid=".$ia[0]." AND language='".$_SESSION['survey_'.Yii::app()->getConfig('surveyID')]['s_lang']."'";
$other = Yii::app()->db->createCommand($qquery)->queryScalar(); //Checked
$aQuestionAttributes = getQuestionAttributeValues($ia[0], $ia[4]);
if (trim($aQuestionAttributes['answer_width'])!='')
{
$answerwidth=$aQuestionAttributes['answer_width'];
}
else
{
$answerwidth = 20;
}
$cellwidth = 10; // number of columns
if ($ia[6] != 'Y' && SHOW_NO_ANSWER == 1) //Question is not mandatory
{
++$cellwidth; // add another column
$caption.=$clang->gT("The last cell are for no answer. ");
}
$cellwidth = round((( 100 - $answerwidth ) / $cellwidth) , 1); // convert number of columns to percentage of table width
if ($aQuestionAttributes['random_order']==1) {
$ansquery = "SELECT * FROM {{questions}} WHERE parent_qid=$ia[0] AND language='".$_SESSION['survey_'.Yii::app()->getConfig('surveyID')]['s_lang']."' ORDER BY ".dbRandom();
}
else
{
$ansquery = "SELECT * FROM {{questions}} WHERE parent_qid=$ia[0] AND language='".$_SESSION['survey_'.Yii::app()->getConfig('surveyID')]['s_lang']."' ORDER BY question_order";
}
$ansresult = dbExecuteAssoc($ansquery); //Checked
$aSubquestions = $ansresult->readAll();
$anscount = count($aSubquestions);
$fn = 1;
$answer = "\n\n"
. "\t\n"
. "\t \n\n"
. "\t\n\n"
. "\t \n";
for ($xc=1; $xc<=10; $xc++)
{
$answer .= "\t$xc \n";
}
if ($ia[6] != 'Y' && SHOW_NO_ANSWER == 1) //Question is not mandatory
{
$answer .= "\t".$clang->gT('No answer')." \n";
}
$answer .= " \n ";
$answer_t_content = '';
$trbc = '';
foreach ($aSubquestions as $ansrow)
{
$myfname = $ia[1].$ansrow['title'];
$answertext = $ansrow['question'];
/* Check if this item has not been answered: the 'notanswered' variable must be an array,
containing a list of unanswered questions, the current question must be in the array,
and there must be no answer available for the item in this session. */
if ($ia[6]=='Y' && (is_array($notanswered)) && (array_search($myfname, $notanswered) !== FALSE) && ($_SESSION['survey_'.Yii::app()->getConfig('surveyID')][$myfname] == "") ) {
$answertext = "{$answertext} ";
}
$trbc = alternation($trbc , 'row');
//Get array filter stuff
list($htmltbody2, $hiddenfield)=return_array_filter_strings($ia, $aQuestionAttributes, $thissurvey, $ansrow, $myfname, $trbc, $myfname,"tr","$trbc answers-list radio-list");
$answer_t_content .= $htmltbody2
. "\t\n$answertext\n"
. $hiddenfield
. " \n";
for ($i=1; $i<=10; $i++)
{
$answer_t_content .= "\t\n"
."{$i} \n"
."\t \n";
// --> END NEW FEATURE - SAVE
}
if ($ia[6] != "Y" && SHOW_NO_ANSWER == 1)
{
$answer_t_content .= "\t\n"
."".$clang->gT('No answer')." "
."\t \n";
}
$answer_t_content .= "\n";
$inputnames[]=$myfname;
$fn++;
}
$answer .= $answer_t_content . "\t\n \n
\n";
return array($answer, $inputnames);
}
// ---------------------------------------------------------------
// TMSW TODO - Can remove DB query by passing in answer list from EM
function do_array_yesnouncertain($ia)
{
global $notanswered, $thissurvey;
$extraclass ="";
$clang = Yii::app()->lang;
$caption=$clang->gT("An array with sub-question on each line. The answers are yes, no, uncertain and are in the table header. ");
$checkconditionFunction = "checkconditions";
$qquery = "SELECT other FROM {{questions}} WHERE qid=".$ia[0]." AND language='".$_SESSION['survey_'.Yii::app()->getConfig('surveyID')]['s_lang']."'";
$qresult = dbExecuteAssoc($qquery); //Checked
$qrow = $qresult->readAll();
$other = isset($qrow['other']) ? $qrow['other'] : '';
$aQuestionAttributes=getQuestionAttributeValues($ia[0],$ia[4]);
if (trim($aQuestionAttributes['answer_width'])!='')
{
$answerwidth=$aQuestionAttributes['answer_width'];
}
else
{
$answerwidth = 20;
}
$cellwidth = 3; // number of columns
if ($ia[6] != 'Y' && SHOW_NO_ANSWER == 1) //Question is not mandatory
{
++$cellwidth; // add another column
$caption.=$clang->gT("The last cell are for no answer. ");
}
$cellwidth = round((( 100 - $answerwidth ) / $cellwidth) , 1); // convert number of columns to percentage of table width
if ($aQuestionAttributes['random_order']==1) {
$ansquery = "SELECT * FROM {{questions}} WHERE parent_qid=$ia[0] AND language='".$_SESSION['survey_'.Yii::app()->getConfig('surveyID')]['s_lang']."' ORDER BY ".dbRandom();
}
else
{
$ansquery = "SELECT * FROM {{questions}} WHERE parent_qid=$ia[0] AND language='".$_SESSION['survey_'.Yii::app()->getConfig('surveyID')]['s_lang']."' ORDER BY question_order";
}
$ansresult = dbExecuteAssoc($ansquery); //Checked
$aSubquestions = $ansresult->readAll();
$anscount = count($aSubquestions);
$fn = 1;
$answer = "\n\n"
. "\t\n"
. "\n\t \n\n"
. "\t\n\n"
. "\t \n"
. "\t".$clang->gT('Yes')." \n"
. "\t".$clang->gT('Uncertain')." \n"
. "\t".$clang->gT('No')." \n";
if ($ia[6] != 'Y' && SHOW_NO_ANSWER == 1) //Question is not mandatory
{
$answer .= "\t".$clang->gT('No answer')." \n";
}
$answer .= " \n\t ";
$answer_t_content = '';
if ($anscount==0)
{
$inputnames=array();
$answer.="\t".$clang->gT('Error: This question has no answers.')." \n \n";
}
else
{
$trbc = '';
foreach($aSubquestions as $ansrow)
{
$myfname = $ia[1].$ansrow['title'];
$answertext = $ansrow['question'];
/* Check if this item has not been answered: the 'notanswered' variable must be an array,
containing a list of unanswered questions, the current question must be in the array,
and there must be no answer available for the item in this session. */
if ($ia[6]=='Y' && (is_array($notanswered)) && (array_search($myfname, $notanswered) !== FALSE) && ($_SESSION['survey_'.Yii::app()->getConfig('surveyID')][$myfname] == '') ) {
$answertext = "{$answertext} ";
}
$trbc = alternation($trbc , 'row');
// Get array_filter stuff
list($htmltbody2, $hiddenfield)=return_array_filter_strings($ia, $aQuestionAttributes, $thissurvey, $ansrow, $myfname, $trbc, $myfname,"tr","$trbc answers-list radio-list");
$answer_t_content .= $htmltbody2;
$answer_t_content .= "\t\n"
. $hiddenfield
. "\t\t\t\t$answertext \n"
. "\t\n"
. "".$clang->gT('Yes')." \n"
. "\t \n"
. "\t\n"
. "".$clang->gT('Uncertain')." \n"
. " \n"
. "\t\n"
. "".$clang->gT('No')." \n"
. " \n";
if ($ia[6] != 'Y' && SHOW_NO_ANSWER == 1)
{
$answer_t_content .= "\t\n"
. "\t".$clang->gT('No answer')." \n"
. "\t \n";
// --> END NEW FEATURE - SAVE
}
$answer_t_content .= "";
$inputnames[]=$myfname;
$fn++;
}
}
$answer .= $answer_t_content . "\t\n \n
\n";
return array($answer, $inputnames);
}
// TMSW TODO - Can remove DB query by passing in answer list from EM
function do_array_increasesamedecrease($ia)
{
global $thissurvey;
global $notanswered;
$extraclass ="";
$clang = Yii::app()->lang;
$caption=$clang->gT("An array with sub-question on each line. The answers are increase, same, decrease and are contained in the table header. ");
$checkconditionFunction = "checkconditions";
$qquery = "SELECT other FROM {{questions}} WHERE qid=".$ia[0]." AND language='".$_SESSION['survey_'.Yii::app()->getConfig('surveyID')]['s_lang']."'";
$qresult = dbExecuteAssoc($qquery); //Checked
$aQuestionAttributes = getQuestionAttributeValues($ia[0], $ia[4]);
if (trim($aQuestionAttributes['answer_width'])!='')
{
$answerwidth=$aQuestionAttributes['answer_width'];
}
else
{
$answerwidth = 20;
}
$cellwidth = 3; // number of columns
if ($ia[6] != 'Y' && SHOW_NO_ANSWER == 1) //Question is not mandatory
{
++$cellwidth; // add another column
$caption.=$clang->gT("The last cell are for no answer. ");
}
$cellwidth = round((( 100 - $answerwidth ) / $cellwidth) , 1); // convert number of columns to percentage of table width
foreach($qresult->readAll() as $qrow)
{
$other = $qrow['other'];
}
if ($aQuestionAttributes['random_order']==1) {
$ansquery = "SELECT * FROM {{questions}} WHERE parent_qid=$ia[0] AND language='".$_SESSION['survey_'.Yii::app()->getConfig('surveyID')]['s_lang']."' ORDER BY ".dbRandom();
}
else
{
$ansquery = "SELECT * FROM {{questions}} WHERE parent_qid=$ia[0] AND language='".$_SESSION['survey_'.Yii::app()->getConfig('surveyID')]['s_lang']."' ORDER BY question_order";
}
$ansresult = dbExecuteAssoc($ansquery); //Checked
$aSubquestions = $ansresult->readAll();
$anscount = count($aSubquestions);
$fn = 1;
$answer = "\n\n"
. "\t\n"
. "\t \n"
. "\t\n"
. "\n"
. "\t \n"
. "\t".$clang->gT('Increase')." \n"
. "\t".$clang->gT('Same')." \n"
. "\t".$clang->gT('Decrease')." \n";
if ($ia[6] != 'Y' && SHOW_NO_ANSWER == 1) //Question is not mandatory
{
$answer .= "\t".$clang->gT('No answer')." \n";
}
$answer .= " \n"
."\t \n";
$answer_body = '';
$trbc = '';
foreach($aSubquestions as $ansrow)
{
$myfname = $ia[1].$ansrow['title'];
$answertext = $ansrow['question'];
/* Check if this item has not been answered: the 'notanswered' variable must be an array,
containing a list of unanswered questions, the current question must be in the array,
and there must be no answer available for the item in this session. */
if ($ia[6]=='Y' && (is_array($notanswered)) && (array_search($myfname, $notanswered) !== FALSE) && ($_SESSION['survey_'.Yii::app()->getConfig('surveyID')][$myfname] == "") )
{
$answertext = "{$answertext} ";
}
$trbc = alternation($trbc , 'row');
// Get array_filter stuff
list($htmltbody2, $hiddenfield)=return_array_filter_strings($ia, $aQuestionAttributes, $thissurvey, $ansrow, $myfname, $trbc, $myfname,'tr',"$trbc answers-list radio-list");
$answer_body .= $htmltbody2;
$answer_body .= "\t\n"
. "$answertext\n"
. $hiddenfield
. " \n";
$answer_body .= "\t\n"
. "".$clang->gT('Increase')." \n"
."\t \n"
. "\t\n"
. "".$clang->gT('Same')." \n"
. "\t \n"
. "\t\n"
. "".$clang->gT('Decrease')." \n"
. "\t \n";
if ($ia[6] != 'Y' && SHOW_NO_ANSWER == 1)
{
$answer_body .= "\t\n"
. "".$clang->gT('No answer')." \n"
. "\t \n";
}
$answer_body .= "\n";
$inputnames[]=$myfname;
$fn++;
}
$answer .= $answer_body . "\t \n
\n";
return array($answer, $inputnames);
}
// ---------------------------------------------------------------
// TMSW TODO - Can remove DB query by passing in answer list from EM
function do_array($ia)
{
global $thissurvey;
global $notanswered;
$repeatheadings = Yii::app()->getConfig("repeatheadings");
$minrepeatheadings = Yii::app()->getConfig("minrepeatheadings");
$extraclass ="";
$clang = Yii::app()->lang;
$caption="";// Just leave empty, are replaced after
$checkconditionFunction = "checkconditions";
$qquery = "SELECT other FROM {{questions}} WHERE qid={$ia[0]} AND language='".$_SESSION['survey_'.Yii::app()->getConfig('surveyID')]['s_lang']."'";
$other = Yii::app()->db->createCommand($qquery)->queryScalar(); //Checked
$aQuestionAttributes = getQuestionAttributeValues($ia[0], $ia[4]);
if (trim($aQuestionAttributes['answer_width'])!='')
{
$answerwidth=$aQuestionAttributes['answer_width'];
}
else
{
$answerwidth=20;
}
$columnswidth=100-$answerwidth;
if ($aQuestionAttributes['use_dropdown'] == 1)
{
$useDropdownLayout = true;
$extraclass .=" dropdown-list";
$caption=$clang->gT("An array with sub-question on each line. You have to select your answer.");
}
else
{
$useDropdownLayout = false;
$caption=$clang->gT("An array with sub-question on each line. The answers are contained in the table header. ");
}
if(ctype_digit(trim($aQuestionAttributes['repeat_headings'])) && trim($aQuestionAttributes['repeat_headings']!=""))
{
$repeatheadings = intval($aQuestionAttributes['repeat_headings']);
$minrepeatheadings = 0;
}
$lresult= Answer::model()->findAll(array('order'=>'sortorder, code', 'condition'=>'qid=:qid AND language=:language AND scale_id=0', 'params'=>array(':qid'=>$ia[0],':language'=>$_SESSION['survey_'.Yii::app()->getConfig('surveyID')]['s_lang'])));
$labelans=array();
$labelcode=array();
foreach ($lresult as $lrow)
{
$labelans[]=$lrow->answer;
$labelcode[]=$lrow->code;
}
if ($useDropdownLayout === false && count($lresult) > 0)
{
$sQuery = "SELECT count(qid) FROM {{questions}} WHERE parent_qid={$ia[0]} AND question like '%|%' ";
$iCount = Yii::app()->db->createCommand($sQuery)->queryScalar();
if ($iCount>0) {
$right_exists=true;
$answerwidth=$answerwidth/2;
}
else
{
$right_exists=false;
}
// $right_exists is a flag to find out if there are any right hand answer parts. If there arent we can leave out the right td column
if ($aQuestionAttributes['random_order']==1) {
$ansquery = "SELECT * FROM {{questions}} WHERE parent_qid={$ia[0]} AND language='".$_SESSION['survey_'.Yii::app()->getConfig('surveyID')]['s_lang']."' ORDER BY ".dbRandom();
}
else
{
$ansquery = "SELECT * FROM {{questions}} WHERE parent_qid={$ia[0]} AND language='".$_SESSION['survey_'.Yii::app()->getConfig('surveyID')]['s_lang']."' ORDER BY question_order";
}
$ansresult = dbExecuteAssoc($ansquery); //Checked
$aQuestions=$ansresult->readAll();
$anscount = count($aQuestions);
$fn=1;
$numrows = count($labelans);
if ($right_exists)
{
++$numrows;
$caption.=$clang->gT("After answers, a cell give some information. ");
}
if ($ia[6] != 'Y' && SHOW_NO_ANSWER == 1)
{
++$numrows;
$caption.=$clang->gT("The last cell are for no answer. ");
}
$cellwidth = round( ($columnswidth / $numrows ) , 1 );
$answer_start = "\n\n";
$answer_head_line= "\t \n";
foreach ($labelans as $ld)
{
$answer_head_line .= "\t".$ld." \n";
}
if ($right_exists) {$answer_head_line .= "\t \n";}
if ($ia[6] != 'Y' && SHOW_NO_ANSWER == 1) //Question is not mandatory and we can show "no answer"
{
$answer_head_line .= "\t".$clang->gT('No answer')." \n";
}
$answer_head = "\t\n".$answer_head_line." ';
$trbc = '';
$inputnames=array();
foreach($aQuestions as $ansrow)
{
if (isset($repeatheadings) && $repeatheadings > 0 && ($fn-1) > 0 && ($fn-1) % $repeatheadings == 0)
{
if ( ($anscount - $fn + 1) >= $minrepeatheadings )
{
$answer .= " \n";// Close actual body and open another one
$answer .= "{$answer_head_line} ";
}
}
$myfname = $ia[1].$ansrow['title'];
$answertext = $ansrow['question'];
$answertextsave=$answertext;
if (strpos($answertext,'|'))
{
$answertext=substr($answertext,0, strpos($answertext,'|'));
}
/* Check if this item has not been answered: the 'notanswered' variable must be an array,
containing a list of unanswered questions, the current question must be in the array,
and there must be no answer available for the item in this session. */
if (strpos($answertext,'|')) {$answerwidth=$answerwidth/2;}
if ($ia[6]=='Y' && (is_array($notanswered)) && (array_search($myfname, $notanswered) !== FALSE) && ($_SESSION['survey_'.Yii::app()->getConfig('surveyID')][$myfname] == '') ) {
$answertext = ''.$answertext.' ';
}
// Get array_filter stuff
//
// TMSW - is this correct?
$trbc = alternation($trbc , 'row');
list($htmltbody2, $hiddenfield)=return_array_filter_strings($ia, $aQuestionAttributes, $thissurvey, $ansrow, $myfname, $trbc, $myfname,"tr","$trbc answers-list radio-list");
$fn++;
$answer .= $htmltbody2;
$answer .= "\t\n$answertext"
. $hiddenfield
. " \n";
$thiskey=0;
foreach ($labelcode as $ld)
{
$answer .= "\t\t\t\n"
. "{$labelans[$thiskey]} \n"
. "\t \n";
// --> END NEW FEATURE - SAVE
$thiskey++;
}
if (strpos($answertextsave,'|'))
{
$answertext=substr($answertextsave,strpos($answertextsave,'|')+1);
$answer .= "\t$answertext \n";
}
elseif ($right_exists)
{
$answer .= "\t \n";
}
if ($ia[6] != 'Y' && SHOW_NO_ANSWER == 1)
{
$answer .= "\t\n"
."".$clang->gT('No answer')." \n"
."\t \n";
// --> END NEW FEATURE - SAVE
}
$answer .= "\n";
$inputnames[]=$myfname;
//IF a MULTIPLE of flexi-redisplay figure, repeat the headings
}
$answer .= " \n";
$answer_cols = "\t\n"
."\t \n";
$answer = $answer_start . $answer_cols . $answer_head .$answer ."
\n";
}
elseif ($useDropdownLayout === true && count($lresult)> 0)
{
foreach($lresult as $lrow)
$labels[]=Array('code' => $lrow->code,
'answer' => $lrow->answer);
$sQuery = "SELECT count(question) FROM {{questions}} WHERE parent_qid={$ia[0]} AND question like '%|%' ";
$iCount = Yii::app()->db->createCommand($sQuery)->queryScalar();
if ($iCount>0) {
$right_exists=true;
$answerwidth=$answerwidth/2;
} else {
$right_exists=false;
}
// $right_exists is a flag to find out if there are any right hand answer parts. If there arent we can leave out the right td column
if ($aQuestionAttributes['random_order']==1) {
$ansquery = "SELECT * FROM {{questions}} WHERE parent_qid={$ia[0]} AND language='".$_SESSION['survey_'.Yii::app()->getConfig('surveyID')]['s_lang']."' ORDER BY ".dbRandom();
}
else
{
$ansquery = "SELECT * FROM {{questions}} WHERE parent_qid={$ia[0]} AND language='".$_SESSION['survey_'.Yii::app()->getConfig('surveyID')]['s_lang']."' ORDER BY question_order";
}
$ansresult = dbExecuteAssoc($ansquery); //Checked
$aQuestions = $ansresult->readAll();
$anscount = count($aQuestions);
$fn=1;
$numrows = count($labels);
if ($ia[6] != 'Y' && SHOW_NO_ANSWER == 1)
{
++$numrows;
}
if ($right_exists)
{
++$numrows;
}
$cellwidth = round( ($columnswidth / $numrows ) , 1 );
$answer_start = "\n\n";
$answer = "\t\n";
$trbc = '';
$inputnames=array();
foreach ($aQuestions as $ansrow)
{
$myfname = $ia[1].$ansrow['title'];
$trbc = alternation($trbc , 'row');
$answertext=$ansrow['question'];
$answertextsave=$answertext;
if (strpos($answertext,'|'))
{
$answertext=substr($answertext,0, strpos($answertext,'|'));
}
/* Check if this item has not been answered: the 'notanswered' variable must be an array,
containing a list of unanswered questions, the current question must be in the array,
and there must be no answer available for the item in this session. */
if (strpos($answertext,'|')) {$answerwidth=$answerwidth/2;}
if ($ia[6]=='Y' && (is_array($notanswered)) && (array_search($myfname, $notanswered) !== FALSE) && ($_SESSION['survey_'.Yii::app()->getConfig('surveyID')][$myfname] == '') ) {
$answertext = ''.$answertext.' ';
}
// Get array_filter stuff
list($htmltbody2, $hiddenfield)=return_array_filter_strings($ia, $aQuestionAttributes, $thissurvey, $ansrow, $myfname, $trbc, $myfname,"tr","$trbc question-item answer-item dropdown-item");
$answer .= $htmltbody2;
$answer .= "\t\n$answertext"
. $hiddenfield
. " \n";
$answer .= "\t\n"
. "\n";
// Dropdown representation is en exception - even if mandatory or SHOW_NO_ANSWER is disable a neutral option needs to be shown where the mandatory case asks actively
if ($ia[6] != 'Y' && SHOW_NO_ANSWER == 1)
{
$sOptionText=$clang->gT('No answer');
}
else
{
$sOptionText=$clang->gT('Please choose...');
}
$answer .= "\tgetConfig('surveyID')][$myfname]) || $_SESSION['survey_'.Yii::app()->getConfig('surveyID')][$myfname] == '')
{
$answer .= SELECTED;
}
$answer .= '>'.$sOptionText." \n";
foreach ($labels as $lrow)
{
$answer .= "\tgetConfig('surveyID')][$myfname]) && $_SESSION['survey_'.Yii::app()->getConfig('surveyID')][$myfname] == $lrow['code'])
{
$answer .= SELECTED;
}
$answer .= '>'.flattenText($lrow['answer'])." \n";
}
$answer .= " \n";
if (strpos($answertextsave,'|'))
{
$answertext=substr($answertextsave,strpos($answertextsave,'|')+1);
$answer .= "\t $answertext \n";
}
elseif ($right_exists)
{
$answer .= "\t \n";
}
$answer .= "\n";
$inputnames[]=$myfname;
//IF a MULTIPLE of flexi-redisplay figure, repeat the headings
$fn++;
}
$answer .= "\t ";
$answer = $answer_start . $answer . "\n
\n";
}
else
{
$answer = "\n".$clang->gT("Error: There are no answer options for this question and/or they don't exist in this language.")."
\n";
$inputnames='';
}
return array($answer, $inputnames);
}
// ---------------------------------------------------------------
// TMSW TODO - Can remove DB query by passing in answer list from EM
function do_array_multitext($ia)
{
global $thissurvey;
global $notanswered;
$repeatheadings = Yii::app()->getConfig("repeatheadings");
$minrepeatheadings = Yii::app()->getConfig("minrepeatheadings");
$extraclass ="";
$clang = Yii::app()->lang;
$caption=$clang->gT("An array of sub-question on each cell. The sub-question text are in the table header and concerns line header. ");
if ($thissurvey['nokeyboard']=='Y')
{
includeKeypad();
$kpclass = "text-keypad";
}
else
{
$kpclass = "";
}
$checkconditionFunction = "checkconditions";
$sSeparator = getRadixPointData($thissurvey['surveyls_numberformat']);
$sSeparator = $sSeparator['separator'];
$defaultvaluescript = "";
$qquery = "SELECT other FROM {{questions}} WHERE qid={$ia[0]} AND language='".$_SESSION['survey_'.Yii::app()->getConfig('surveyID')]['s_lang']."'";
$other = Yii::app()->db->createCommand($qquery)->queryScalar(); //Checked
$aQuestionAttributes = getQuestionAttributeValues($ia[0], $ia[4]);
$show_grand = $aQuestionAttributes['show_grand_total'];
$totals_class = '';
$num_class = '';
$show_totals = '';
$col_total = '';
$row_total = '';
$total_col = '';
$col_head = '';
$row_head = '';
$grand_total = '';
$q_table_id = '';
$q_table_id_HTML = '';
if(ctype_digit(trim($aQuestionAttributes['repeat_headings'])) && trim($aQuestionAttributes['repeat_headings']!=""))
{
$repeatheadings = intval($aQuestionAttributes['repeat_headings']);
$minrepeatheadings = 0;
}
if (intval(trim($aQuestionAttributes['maximum_chars']))>0)
{
// Only maxlength attribute, use textarea[maxlength] jquery selector for textarea
$maximum_chars= intval(trim($aQuestionAttributes['maximum_chars']));
$maxlength= "maxlength='{$maximum_chars}' ";
$extraclass .=" maxchars maxchars-".$maximum_chars;
}
else
{
$maxlength= "";
}
if ($aQuestionAttributes['numbers_only']==1)
{
$checkconditionFunction = "fixnum_checkconditions";
if(in_array($aQuestionAttributes['show_totals'],array("R","C","B")))
{
$q_table_id = 'totals_'.$ia[0];
$q_table_id_HTML = ' id="'.$q_table_id.'"';
}
$num_class = ' numbers-only';
$extraclass.=" numberonly";
$caption.=$clang->gT("Each answers are number. ");
switch ($aQuestionAttributes['show_totals'])
{
case 'R':
$totals_class = $show_totals = 'row';
$row_total = '
';
$col_head = ' Total ';
if($show_grand == true)
{
$row_head = '
Grand total ';
$col_total = '
';
$grand_total = '
';
};
$caption.=$clang->gT("The last row show the total for the column. ");
break;
case 'C':
$totals_class = $show_totals = 'col';
$col_total = '
';
$row_head = '
Total ';
if($show_grand == true)
{
$row_total = '
';
$col_head = ' Grand Total ';
$grand_total = '
';
};
$caption.=$clang->gT("The last column show the total for the row. ");
break;
case 'B':
$totals_class = $show_totals = 'both';
$row_total = '
';
$col_total = '
';
$col_head = ' Total ';
$row_head = '
Total ';
if($show_grand == true)
{
$grand_total = '
';
}
else
{
$grand_total = '
';
};
$caption.=$clang->gT("The last row show the total for the column and the last column show the total for the row. ");
break;
};
if(!empty($totals_class))
{
$totals_class = ' show-totals '.$totals_class;
if($aQuestionAttributes['show_grand_total'])
{
$totals_class .= ' grand';
$show_grand = true;
};
};
}
else
{
};
if (trim($aQuestionAttributes['answer_width'])!='')
{
$answerwidth=$aQuestionAttributes['answer_width'];
}
else
{
$answerwidth=20;
};
if (trim($aQuestionAttributes['text_input_width'])!='')
{
$inputwidth=$aQuestionAttributes['text_input_width'];
$extraclass .=" inputwidth-".trim($aQuestionAttributes['text_input_width']);
}
else
{
$inputwidth = 20;
}
$columnswidth=100-($answerwidth*2);
$lquery = "SELECT * FROM {{questions}} WHERE parent_qid={$ia[0]} AND language='".$_SESSION['survey_'.Yii::app()->getConfig('surveyID')]['s_lang']."' and scale_id=1 ORDER BY question_order";
$lresult = Yii::app()->db->createCommand($lquery)->query();
$labelans=array();
$labelcode=array();
foreach($lresult->readAll() as $lrow)
{
$labelans[]=$lrow['question'];
$labelcode[]=$lrow['title'];
}
if ($numrows=count($labelans))
{
if ($ia[6] != 'Y' && SHOW_NO_ANSWER == 1) {$numrows++;}
if( ($show_grand == true && $show_totals == 'col' ) || $show_totals == 'row' || $show_totals == 'both' )
{
++$numrows;
};
$cellwidth=$columnswidth/$numrows;
$cellwidth=sprintf('%02d', $cellwidth);
$ansquery = "SELECT count(question) FROM {{questions}} WHERE parent_qid={$ia[0]} and scale_id=0 AND question like '%|%'";
$ansresult = Yii::app()->db->createCommand($ansquery)->queryScalar(); //Checked
if ($ansresult>0)
{
$right_exists=true;
$answerwidth=$answerwidth/2;
$caption.=$clang->gT("The last cell give some information. ");
}
else
{
$right_exists=false;
}
// $right_exists is a flag to find out if there are any right hand answer parts. If there arent we can leave out the right td column
if ($aQuestionAttributes['random_order']==1) {
$ansquery = "SELECT * FROM {{questions}} WHERE parent_qid=$ia[0] and scale_id=0 AND language='".$_SESSION['survey_'.Yii::app()->getConfig('surveyID')]['s_lang']."' ORDER BY ".dbRandom();
}
else
{
$ansquery = "SELECT * FROM {{questions}} WHERE parent_qid=$ia[0] and scale_id=0 AND language='".$_SESSION['survey_'.Yii::app()->getConfig('surveyID')]['s_lang']."' ORDER BY question_order";
}
$ansresult = dbExecuteAssoc($ansquery);
$aQuestions = $ansresult->readAll();
$anscount = count($aQuestions);
$fn=1;
$answer_cols = "\t\n"
."\n\t\t \n";
$odd_even = '';
foreach ($labelans as $ld)
{
$answer_head_line .= "\t".$ld." \n";
$odd_even = alternation($odd_even);
$answer_cols .= " \n";// class=\"answertextright\"
$odd_even = alternation($odd_even);
$answer_cols .= " \n";
$answer_head = "\n\t\n\t\t\n"
. $answer_head_line
. " \n\t \n";
$answer = "\n\n"
. $answer_cols
. $answer_head;
$answer .= "";
$trbc = '';
foreach ($aQuestions as $ansrow)
{
if (isset($repeatheadings) && $repeatheadings > 0 && ($fn-1) > 0 && ($fn-1) % $repeatheadings == 0)
{
if ( ($anscount - $fn + 1) >= $minrepeatheadings )
{
$answer .= " \n";// Close actual body and open another one
$answer .= "\n"
. $answer_head_line
. " \n";
}
}
$myfname = $ia[1].$ansrow['title'];
$answertext = $ansrow['question'];
$answertextsave=$answertext;
/* Check if this item has not been answered: the 'notanswered' variable must be an array,
containing a list of unanswered questions, the current question must be in the array,
and there must be no answer available for the item in this session. */
if ($ia[6]=='Y' && is_array($notanswered))
{
//Go through each labelcode and check for a missing answer! If any are found, highlight this line
$emptyresult=0;
foreach($labelcode as $ld)
{
$myfname2=$myfname.'_'.$ld;
if((array_search($myfname2, $notanswered) !== FALSE) && $_SESSION['survey_'.Yii::app()->getConfig('surveyID')][$myfname2] == '')
{
$emptyresult=1;
}
}
if ($emptyresult == 1)
{
$answertext = "{$answertext} ";
}
}
// Get array_filter stuff
$trbc = alternation($trbc , 'row');
list($htmltbody2, $hiddenfield)=return_array_filter_strings($ia, $aQuestionAttributes, $thissurvey, $ansrow, $myfname, $trbc, $myfname,"tr","$trbc subquestion-list questions-list");
$answer .= $htmltbody2;
if (strpos($answertext,'|')) {$answertext=substr($answertext,0, strpos($answertext,'|'));}
$answer .= "\t\t\t\n"
. "\t\t\t\t".$hiddenfield
. "$answertext\n"
. "\t\t\t\t \n";
$thiskey=0;
foreach ($labelcode as $ld)
{
$myfname2=$myfname."_$ld";
$myfname2value = isset($_SESSION['survey_'.Yii::app()->getConfig('surveyID')][$myfname2]) ? $_SESSION['survey_'.Yii::app()->getConfig('surveyID')][$myfname2] : "";
if ($aQuestionAttributes['numbers_only']==1)
{
$myfname2value = str_replace('.',$sSeparator,$myfname2value);
}
$answer .= "\t\n"
. "\t\t\t\t{$labelans[$thiskey]} \n"
. "\t\t\t\t \n";
$thiskey += 1;
}
if (strpos($answertextsave,'|'))
{
$answertext=substr($answertextsave,strpos($answertextsave,'|')+1);
$answer .= "\t\t\t$answertext \n";
}
elseif ($right_exists)
{
$answer .= "\t\t\t \n";
}
$answer .= str_replace(array('[[ROW_NAME]]','[[INPUT_WIDTH]]') , array(strip_tags($answertext),$inputwidth) , $row_total);
$answer .= "\n\t\t\n";
//IF a MULTIPLE of flexi-redisplay figure, repeat the headings
$fn++;
}
if($show_totals == 'col' || $show_totals == 'both' || $grand_total == true)
{
$answer .= "\t\t$row_head";
for( $a = 0; $a < count($labelcode) ; ++$a )
{
$answer .= str_replace(array('[[ROW_NAME]]','[[INPUT_WIDTH]]') , array(strip_tags($answertext),$inputwidth) , $col_total);
};
$answer .= str_replace(array('[[ROW_NAME]]','[[INPUT_WIDTH]]') , array(strip_tags($answertext),$inputwidth) , $grand_total)."\n\t\t \n";
}
$answer .= "\t \n\n";
if(!empty($q_table_id))
{
if ($aQuestionAttributes['numbers_only']==1)
{
$radix = $sSeparator;
}
else {
$radix = 'X'; // to indicate that should not try to change entered values
}
Yii::app()->getClientScript()->registerScriptFile(Yii::app()->getConfig('generalscripts')."array-totalsum.js");
$answer .= "\n\n";
}
else
{
$addcheckcond = <<< EOD
EOD;
$answer .= $addcheckcond;
}
}
else
{
$answer = "\n".$clang->gT("Error: There are no answer options for this question and/or they don't exist in this language.")."
\n";
$inputnames='';
}
return array($answer, $inputnames);
}
// ---------------------------------------------------------------
// TMSW TODO - Can remove DB query by passing in answer list from EM
function do_array_multiflexi($ia)
{
global $thissurvey;
global $notanswered;
$repeatheadings = Yii::app()->getConfig("repeatheadings");
$minrepeatheadings = Yii::app()->getConfig("minrepeatheadings");
$extraclass ="";
$answertypeclass = "";
$clang = Yii::app()->lang;
$caption=$clang->gT("An array of sub-question on each cell. The sub-question text are in the table header and concerns line header. ");
$checkconditionFunction = "fixnum_checkconditions";
//echo ''; print_r($_POST); echo ' ';
$defaultvaluescript = '';
$qquery = "SELECT other FROM {{questions}} WHERE qid=".$ia[0]." AND language='".$_SESSION['survey_'.Yii::app()->getConfig('surveyID')]['s_lang']."' and parent_qid=0";
$other = Yii::app()->db->createCommand($qquery)->queryScalar(); //Checked
$aQuestionAttributes = getQuestionAttributeValues($ia[0], $ia[4]);
if (trim($aQuestionAttributes['multiflexible_max'])!='' && trim($aQuestionAttributes['multiflexible_min']) ==''){
$maxvalue=$aQuestionAttributes['multiflexible_max'];
$extraclass .=" maxvalue maxvalue-".trim($aQuestionAttributes['multiflexible_max']);
if(isset($minvalue['value']) && $minvalue['value'] == 0) {$minvalue = 0;} else {$minvalue=1;}
}
if (trim($aQuestionAttributes['multiflexible_min'])!='' && trim($aQuestionAttributes['multiflexible_max']) ==''){
$minvalue=$aQuestionAttributes['multiflexible_min'];
$extraclass .=" minvalue minvalue-".trim($aQuestionAttributes['multiflexible_max']);
$maxvalue=$aQuestionAttributes['multiflexible_min'] + 10;
}
if (trim($aQuestionAttributes['multiflexible_min'])=='' && trim($aQuestionAttributes['multiflexible_max']) ==''){
if(isset($minvalue['value']) && $minvalue['value'] == 0) {$minvalue = 0;} else {$minvalue=1;}
$maxvalue=10;
}
if (trim($aQuestionAttributes['multiflexible_min']) !='' && trim($aQuestionAttributes['multiflexible_max']) !=''){
if($aQuestionAttributes['multiflexible_min'] < $aQuestionAttributes['multiflexible_max']){
$minvalue=$aQuestionAttributes['multiflexible_min'];
$maxvalue=$aQuestionAttributes['multiflexible_max'];
}
}
if (trim($aQuestionAttributes['multiflexible_step'])!='' && $aQuestionAttributes['multiflexible_step'] > 0)
{
$stepvalue=$aQuestionAttributes['multiflexible_step'];
}
else
{
$stepvalue=1;
}
if($aQuestionAttributes['reverse']==1)
{
$tmp = $minvalue;
$minvalue = $maxvalue;
$maxvalue = $tmp;
$reverse=true;
$stepvalue=-$stepvalue;
}
else
{
$reverse=false;
}
$checkboxlayout=false;
$inputboxlayout=false;
if ($aQuestionAttributes['multiflexible_checkbox']!=0)
{
$minvalue=0;
$maxvalue=1;
$checkboxlayout=true;
$answertypeclass =" checkbox";
$caption.=$clang->gT("Check or uncheck the answer for each subquestion. ");
}
elseif ($aQuestionAttributes['input_boxes']!=0 )
{
$inputboxlayout=true;
$answertypeclass .=" numeric-item text";
$extraclass .= " numberonly";
$caption.=$clang->gT("Each answers are a number. ");
}
else
{
$answertypeclass =" dropdown";
$caption.=$clang->gT("Select the answer for each subquestion. ");
}
if(ctype_digit(trim($aQuestionAttributes['repeat_headings'])) && trim($aQuestionAttributes['repeat_headings']!=""))
{
$repeatheadings = intval($aQuestionAttributes['repeat_headings']);
$minrepeatheadings = 0;
}
if (intval(trim($aQuestionAttributes['maximum_chars']))>0)
{
// Only maxlength attribute, use textarea[maxlength] jquery selector for textarea
$maximum_chars= intval(trim($aQuestionAttributes['maximum_chars']));
$maxlength= "maxlength='{$maximum_chars}' ";
$extraclass .=" maxchars maxchars-".$maximum_chars;
}
else
{
$maxlength= "";
}
if ($thissurvey['nokeyboard']=='Y')
{
includeKeypad();
$kpclass = " num-keypad";
$extraclass .=" inputkeypad";
}
else
{
$kpclass = "";
}
if (trim($aQuestionAttributes['answer_width'])!='')
{
$answerwidth=$aQuestionAttributes['answer_width'];
}
else
{
$answerwidth=20;
}
$columnswidth=100-($answerwidth*2);
$lquery = "SELECT * FROM {{questions}} WHERE parent_qid={$ia[0]} AND language='".$_SESSION['survey_'.Yii::app()->getConfig('surveyID')]['s_lang']."' and scale_id=1 ORDER BY question_order";
$lresult = dbExecuteAssoc($lquery);
$aQuestions=$lresult->readAll();
$labelans=array();
$labelcode=array();
foreach ($aQuestions as $lrow)
{
$labelans[]=$lrow['question'];
$labelcode[]=$lrow['title'];
}
if ($numrows=count($labelans))
{
if ($ia[6] != 'Y' && SHOW_NO_ANSWER == 1) {$numrows++;}
$cellwidth=$columnswidth/$numrows;
$cellwidth=sprintf('%02d', $cellwidth);
$sQuery = "SELECT count(question) FROM {{questions}} WHERE parent_qid=".$ia[0]." AND scale_id=0 AND question like '%|%'";
$iCount = Yii::app()->db->createCommand($sQuery)->queryScalar();
if ($iCount>0) {
$right_exists=true;
$answerwidth=$answerwidth/2;
$caption.=$clang->gT("The last cell give some information. ");
} else {
$right_exists=false;
}
// $right_exists is a flag to find out if there are any right hand answer parts. If there arent we can leave out the right td column
if ($aQuestionAttributes['random_order']==1) {
$ansquery = "SELECT * FROM {{questions}} WHERE parent_qid=$ia[0] AND scale_id=0 AND language='".$_SESSION['survey_'.Yii::app()->getConfig('surveyID')]['s_lang']."' ORDER BY ".dbRandom();
}
else
{
$ansquery = "SELECT * FROM {{questions}} WHERE parent_qid=$ia[0] AND scale_id=0 AND language='".$_SESSION['survey_'.Yii::app()->getConfig('surveyID')]['s_lang']."' ORDER BY question_order";
}
$ansresult = dbExecuteAssoc($ansquery)->readAll(); //Checked
if (trim($aQuestionAttributes['parent_order']!=''))
{
$iParentQID=(int) $aQuestionAttributes['parent_order'];
$aResult=array();
$sessionao = $_SESSION['survey_'.Yii::app()->getConfig('surveyID')]['answer_order'];
foreach ($sessionao[$iParentQID] as $aOrigRow)
{
$sCode=$aOrigRow['title'];
foreach ($ansresult as $aRow)
{
if ($sCode==$aRow['title'])
{
$aResult[]=$aRow;
}
}
}
$ansresult=$aResult;
}
$anscount = count($ansresult);
$fn=1;
$mycols = "\t\n"
. "\n\t \n";
$odd_even = '';
foreach ($labelans as $ld)
{
$answer_head_line .= "\t".$ld." \n";
$odd_even = alternation($odd_even);
$mycols .= " ";
$odd_even = alternation($odd_even);
$mycols .= " \n\n"
. $answer_head_line
. " \n\t \n";
$mycols .= "\t\n";
$trbc = '';
$answer = "\n\n"
. $mycols
. $answer_head . "\n";
$answer .= "";
foreach ($ansresult as $ansrow)
{
if (isset($repeatheadings) && $repeatheadings > 0 && ($fn-1) > 0 && ($fn-1) % $repeatheadings == 0)
{
if ( ($anscount - $fn + 1) >= $minrepeatheadings )
{
$answer .= " \n";// Close actual body and open another one
$answer .= "\n"
. $answer_head_line
. " \n\n";
}
}
$myfname = $ia[1].$ansrow['title'];
$answertext = $ansrow['question'];
$answertextsave=$answertext;
/* Check if this item has not been answered: the 'notanswered' variable must be an array,
containing a list of unanswered questions, the current question must be in the array,
and there must be no answer available for the item in this session. */
if ($ia[6]=='Y' && is_array($notanswered))
{
//Go through each labelcode and check for a missing answer! If any are found, highlight this line
$emptyresult=0;
foreach($labelcode as $ld)
{
$myfname2=$myfname.'_'.$ld;
if((array_search($myfname2, $notanswered) !== FALSE) && $_SESSION['survey_'.Yii::app()->getConfig('surveyID')][$myfname2] == "")
{
$emptyresult=1;
}
}
if ($emptyresult == 1)
{
$answertext = ''.$answertext.' ';
}
}
// Get array_filter stuff
$trbc = alternation($trbc , 'row');
list($htmltbody2, $hiddenfield)=return_array_filter_strings($ia, $aQuestionAttributes, $thissurvey, $ansrow, $myfname, $trbc, $myfname,"tr","$trbc subquestions-list questions-list {$answertypeclass}-list");
$answer .= $htmltbody2;
if (strpos($answertext,'|')) {$answertext=substr($answertext,0, strpos($answertext,'|'));}
$answer .= "\t\n"
. "$answertext\n"
. $hiddenfield
. " \n";
$first_hidden_field = '';
$thiskey=0;
foreach ($labelcode as $ld)
{
if ($checkboxlayout == false)
{
$myfname2=$myfname."_$ld";
if(isset($_SESSION['survey_'.Yii::app()->getConfig('surveyID')][$myfname2]))
{
$myfname2_java_value = " value=\"{$_SESSION['survey_'.Yii::app()->getConfig('surveyID')][$myfname2]}\" ";
}
else
{
$myfname2_java_value = "";
}
$answer .= "\t\n"
. "\t{$labelans[$thiskey]} \n";
$sSeparator = getRadixPointData($thissurvey['surveyls_numberformat']);
$sSeparator = $sSeparator['separator'];
if($inputboxlayout == false) {
$answer .= "\t\n"
. "".$clang->gT('...')." \n";
for($ii=$minvalue; ($reverse? $ii>=$maxvalue:$ii<=$maxvalue); $ii+=$stepvalue) {
$answer .= 'getConfig('surveyID')][$myfname2]) && $_SESSION['survey_'.Yii::app()->getConfig('surveyID')][$myfname2] == $ii) {
$answer .= SELECTED;
}
$answer .= ">".str_replace('.',$sSeparator,$ii)." \n";
}
$answer .= "\t \n";
} elseif ($inputboxlayout == true)
{
$answer .= "\t \n";
$inputnames[]=$myfname2;
$thiskey++;
}
else
{
$myfname2=$myfname."_$ld";
if(isset($_SESSION['survey_'.Yii::app()->getConfig('surveyID')][$myfname2]) && $_SESSION['survey_'.Yii::app()->getConfig('surveyID')][$myfname2] == '1')
{
$myvalue = '1';
$setmyvalue = CHECKED;
}
else
{
$myvalue = '';
$setmyvalue = '';
}
$answer .= "\t\n"
. "\t{$labelans[$thiskey]} \n";
$inputnames[]=$myfname2;
// $answer .= "\n"
$answer .= ""
. "\t \n";
$thiskey++;
}
}
if (strpos($answertextsave,'|'))
{
$answertext=substr($answertextsave,strpos($answertextsave,'|')+1);
$answer .= "\t$answertext \n";
}
elseif ($right_exists)
{
$answer .= "\t \n";
}
$answer .= "\n";
//IF a MULTIPLE of flexi-redisplay figure, repeat the headings
$fn++;
}
$answer .= "\t \n
\n";
}
else
{
$answer = "\n".$clang->gT("Error: There are no answer options for this question and/or they don't exist in this language.")."
\n";
$inputnames = '';
}
return array($answer, $inputnames);
}
// ---------------------------------------------------------------
// TMSW TODO - Can remove DB query by passing in answer list from EM
function do_arraycolumns($ia)
{
global $notanswered;
$clang = Yii::app()->lang;
$extraclass = "";
$checkconditionFunction = "checkconditions";
$caption=$clang->gT("An array with sub-question on each column. The sub-question are on table header, the answers are in each line header. ");
$aQuestionAttributes = getQuestionAttributeValues($ia[0], $ia[4]);
$qquery = "SELECT other FROM {{questions}} WHERE qid=".$ia[0]." AND language='".$_SESSION['survey_'.Yii::app()->getConfig('surveyID')]['s_lang']."'";
$other = Yii::app()->db->createCommand($qquery)->queryScalar(); //Checked
$lquery = "SELECT * FROM {{answers}} WHERE qid=".$ia[0]." AND language='".$_SESSION['survey_'.Yii::app()->getConfig('surveyID')]['s_lang']."' and scale_id=0 ORDER BY sortorder, code";
$oAnswers = dbExecuteAssoc($lquery);
$aAnswers = $oAnswers->readAll();
$labelans=array();
$labelcode=array();
$labels=array();
foreach ($aAnswers as $lrow)
{
$labelans[]=$lrow['answer'];
$labelcode[]=$lrow['code'];
$labels[]=array("answer"=>$lrow['answer'], "code"=>$lrow['code']);
}
if (count($labelans) > 0)
{
if ($ia[6] != 'Y' && SHOW_NO_ANSWER == 1)
{
$labelcode[]='';
$labelans[]=$clang->gT('No answer');
$labels[]=array('answer'=>$clang->gT('No answer'), 'code'=>'');
}
if ($aQuestionAttributes['random_order']==1) {
$ansquery = "SELECT * FROM {{questions}} WHERE parent_qid=$ia[0] AND language='".$_SESSION['survey_'.Yii::app()->getConfig('surveyID')]['s_lang']."' ORDER BY ".dbRandom();
}
else
{
$ansquery = "SELECT * FROM {{questions}} WHERE parent_qid=$ia[0] AND language='".$_SESSION['survey_'.Yii::app()->getConfig('surveyID')]['s_lang']."' ORDER BY question_order";
}
$ansresult = dbExecuteAssoc($ansquery); //Checked
$aQuestions = $ansresult->readAll();
$anscount = count($aQuestions);
if ($anscount>0)
{
$fn=1;
$cellwidth=$anscount;
$cellwidth=round(( 50 / $cellwidth ) , 1);
$answer = "\n\n";
foreach($anscode as $ld)
{
$myfname=$ia[1].$ld;
$answer .= ''.$clang->gT('Error: There are no answers defined for this question.')."
";
$inputnames="";
}
}
else
{
$answer = "".$clang->gT("Error: There are no answer options for this question and/or they don't exist in this language.")."
\n";
$inputnames = '';
}
return array($answer, $inputnames);
}
// ---------------------------------------------------------------
function do_array_dual($ia)
{
$clang = Yii::app()->lang;
global $thissurvey;
global $notanswered;
$repeatheadings = Yii::app()->getConfig("repeatheadings");
$minrepeatheadings = Yii::app()->getConfig("minrepeatheadings");
$extraclass ="";
$answertypeclass = ""; // Maybe not
$caption="";// Just leave empty, are replaced after
$inputnames=array();
$labelans1=array();
$labelans=array();
$aQuestionAttributes = getQuestionAttributeValues($ia[0], $ia[4]);
if ($aQuestionAttributes['random_order']==1) {
$ansquery = "SELECT * FROM {{questions}} WHERE parent_qid=$ia[0] AND language='".$_SESSION['survey_'.Yii::app()->getConfig('surveyID')]['s_lang']."' and scale_id=0 ORDER BY ".dbRandom();
}
else
{
$ansquery = "SELECT * FROM {{questions}} WHERE parent_qid=$ia[0] AND language='".$_SESSION['survey_'.Yii::app()->getConfig('surveyID')]['s_lang']."' and scale_id=0 ORDER BY question_order";
}
$ansresult = dbExecuteAssoc($ansquery); //Checked
$aSubQuestions=$ansresult->readAll();
$anscount = count($aSubQuestions);
$lquery = "SELECT * FROM {{answers}} WHERE scale_id=0 AND qid={$ia[0]} AND language='".$_SESSION['survey_'.Yii::app()->getConfig('surveyID')]['s_lang']."' ORDER BY sortorder, code";
$lresult = dbExecuteAssoc($lquery); //Checked
$aAnswersScale0=$lresult->readAll();
$lquery1 = "SELECT * FROM {{answers}} WHERE scale_id=1 AND qid={$ia[0]} AND language='".$_SESSION['survey_'.Yii::app()->getConfig('surveyID')]['s_lang']."' ORDER BY sortorder, code";
$lresult1 = dbExecuteAssoc($lquery1); //Checked
$aAnswersScale1=$lresult1->readAll();
if ($aQuestionAttributes['use_dropdown']==1)
{
$useDropdownLayout = true;
$extraclass .=" dropdown-list";
$answertypeclass .=" dropdown";
$doDualScaleFunction="doDualScaleDropDown";// javascript funtion to lauch at end of answers
$caption=$clang->gT("An array with sub-question on each line, with 2 answers to provide on each line. You have to select the answer.");
}
else
{
$useDropdownLayout = false;
$extraclass .=" radio-list";
$answertypeclass .=" radio";
$doDualScaleFunction="doDualScaleRadio";
$caption=$clang->gT("An array with sub-question on each line, with 2 answers to provide on each line. The answers are contained in the table header. ");
}
if(ctype_digit(trim($aQuestionAttributes['repeat_headings'])) && trim($aQuestionAttributes['repeat_headings']!=""))
{
$repeatheadings = intval($aQuestionAttributes['repeat_headings']);
$minrepeatheadings = 0;
}
if (trim($aQuestionAttributes['dualscale_headerA'][$_SESSION['survey_'.Yii::app()->getConfig('surveyID')]['s_lang']])!='') {
$leftheader= $aQuestionAttributes['dualscale_headerA'][$_SESSION['survey_'.Yii::app()->getConfig('surveyID')]['s_lang']];
}
else
{
$leftheader ='';
}
if (trim($aQuestionAttributes['dualscale_headerB'][$_SESSION['survey_'.Yii::app()->getConfig('surveyID')]['s_lang']])!='')
{
$rightheader= $aQuestionAttributes['dualscale_headerB'][$_SESSION['survey_'.Yii::app()->getConfig('surveyID')]['s_lang']];
}
else
{
$rightheader ='';
}
if (trim($aQuestionAttributes['answer_width'])!='')
{
$answerwidth=$aQuestionAttributes['answer_width'];
}
else
{
$answerwidth=20;
}
// Find if we have rigth and center text
// TODO move "|" to attribute
$sQuery = "SELECT count(question) FROM {{questions}} WHERE parent_qid=".$ia[0]." and scale_id=0 AND question like '%|%'";
$rigthCount = Yii::app()->db->createCommand($sQuery)->queryScalar();
$rightexists= ($rigthCount>0);// $right_exists: flag to find out if there are any right hand answer parts. leaving right column but don't force with
$sQuery = "SELECT count(question) FROM {{questions}} WHERE parent_qid=".$ia[0]." and scale_id=0 AND question like '%|%|%'";
$centerCount = Yii::app()->db->createCommand($sQuery)->queryScalar();
$centerexists= ($centerCount>0);// $center_exists: flag to find out if there are any center hand answer parts. leaving center column but don't force with
// Label and code for input
foreach ($aAnswersScale0 as $lrow)
{
$labels0[]=Array('code' => $lrow['code'],
'title' => $lrow['answer']);
}
foreach ($aAnswersScale1 as $lrow)
{
$labels1[]=Array('code' => $lrow['code'],
'title' => $lrow['answer']);
}
if (count($aAnswersScale0) > 0 && $anscount)
{
$answer = "";
$fn=1;// Used by repeat_heading
if ($useDropdownLayout === false)
{
$columnswidth = 100 - $answerwidth;
foreach ($aAnswersScale0 as $lrow)
{
$labelans0[]=$lrow['answer'];
$labelcode0[]=$lrow['code'];
}
foreach ($aAnswersScale1 as $lrow)
{
$labelans1[]=$lrow['answer'];
$labelcode1[]=$lrow['code'];
}
$numrows=count($labelans0) + count($labelans1);
// Add needed row and fill some boolean: shownoanswer, rightexists, centerexists
$shownoanswer=($ia[6] != "Y" && SHOW_NO_ANSWER == 1);
if($shownoanswer) {
$numrows++;
$caption.=$clang->gT("The last cell are for no answer. ");
}
if($rightexists) {$numrows++;}
if($centerexists) {$numrows++;}
$cellwidth=$columnswidth/$numrows;
//$cellwidth=sprintf("%02d", $cellwidth); // No reason to do this, except to leave place for separator ? But then table can not be the same in all browser
// Header row and colgroups
$mycolumns = "\t\n";
$odd_even = '';
foreach ($labelans0 as $ld)
{
$answer_head_line .= "\t".$ld." \n";
$odd_even = alternation($odd_even);
$mycolumns .= " \n";
if (count($labelans1)>0) // if second label set is used
{
$separatorwidth=($centerexists)? "width=\"$cellwidth%\" ":"";
$mycolumns .= "\t\n";
$answer_head_line .= "\n\t\n\n"; // Separator : and No answer for accessibility for first colgroup
foreach ($labelans1 as $ld)
{
$answer_head_line .= "\t".$ld." \n";
$odd_even = alternation($odd_even);
$mycolumns .= " \n";
}
if($shownoanswer || $rightexists)
{
$rigthwidth=($rightexists)? "width=\"$cellwidth%\" ":"";
$mycolumns .= "\t\n"
. $answer_head_line
. " \n";
// build first row of header if needed
if ($leftheader != '' || $rightheader !='')
{
$answer_head1 = "\n"
. "\t\n"
. "\t\n";
if (count($labelans1)>0)
{
$answer_head1 .= "\t\n" // Separator
."\t\n";
}
if($shownoanswer || $rightexists)
{
$rigthclass=($rightexists)?" header_answer_text_right":"";
$answer_head1 .= "\t\n";
if($shownoanswer)
{
$answer_head1 .= "\t\n";
}
}
$answer_head1 .= " \n";
}
else
{
$answer_head1 = "";
}
$answer .= "\n\n"
. $mycolumns
. "\n\t\n"
. $answer_head1
. $answer_head2
. "\n\t \n"
. "\n";
// And no each line of body
$trbc = '';
foreach ($aSubQuestions as $ansrow)
{
// Build repeat headings if needed
if (isset($repeatheadings) && $repeatheadings > 0 && ($fn-1) > 0 && ($fn-1) % $repeatheadings == 0)
{
if ( ($anscount - $fn + 1) >= $minrepeatheadings )
{
$answer .= " \n";// Close actual body and open another one
//$answer .= $answer_head1;
$answer .= "\n\n"
. $answer_head_line
. " \n";
}
}
$trbc = alternation($trbc , 'row');
$answertext=$ansrow['question'];
// rigth and center answertext: not explode for ? Why not
if(strpos($answertext,'|'))
{
$answertextrigth=substr($answertext,strpos($answertext,'|')+1);
$answertext=substr($answertext,0, strpos($answertext,'|'));
}
else
{
$answertextrigth="";
}
if($centerexists)
{
$answertextcenter=substr($answertextrigth,0, strpos($answertextrigth,'|'));
$answertextrigth=substr($answertextrigth,strpos($answertextrigth,'|')+1);
}
else
{
$answertextcenter="";
}
$myfname= $ia[1].$ansrow['title'];
$myfname0 = $ia[1].$ansrow['title'].'#0';
$myfid0 = $ia[1].$ansrow['title'].'_0';
$myfname1 = $ia[1].$ansrow['title'].'#1'; // new multi-scale-answer
$myfid1 = $ia[1].$ansrow['title'].'_1';
/* Check if this item has not been answered: the 'notanswered' variable must be an array,
containing a list of unanswered questions, the current question must be in the array,
and there must be no answer available for the item in this session. */
if ($ia[6]=='Y' && (is_array($notanswered)) && ((array_search($myfname0, $notanswered) !== FALSE) || (array_search($myfname1, $notanswered) !== FALSE)) && (($_SESSION['survey_'.Yii::app()->getConfig('surveyID')][$myfname0] == '') || ($_SESSION['survey_'.Yii::app()->getConfig('surveyID')][$myfname1] == '')) )
{
$answertext = "{$answertext} ";
}
// Get array_filter stuff
list($htmltbody2, $hiddenfield)=return_array_filter_strings($ia, $aQuestionAttributes, $thissurvey, $ansrow, $myfname, $trbc, $myfname,"tr","$trbc answers-list radio-list");
$answer .= $htmltbody2;
array_push($inputnames,$myfname0);
$answer .= "\t\n"
. $hiddenfield
. "$answertext\n";
// Hidden answers used by EM: sure can be added in javascript
$answer .= " \n";
$hiddenanswers='';
$thiskey=0;
foreach ($labelcode0 as $ld)
{
$answer .= "\t\n"
. "$labelans0[$thiskey] \n"
. "\t \n";
$thiskey++;
}
if (count($labelans1)>0) // if second label set is used
{
$answer .= "\t";
if ($shownoanswer)// No answer for accessibility and no javascript (but hide hide even with no js: need reworking)
{
$answer .= "".$clang->gT("No answer")." "
. "\t \n"; // separator
array_push($inputnames,$myfname1);
$thiskey=0;
foreach ($labelcode1 as $ld) // second label set
{
$answer .= "\t\n";
$answer .= "{$labelans1[$thiskey]} \n"
. "\t \n";
$thiskey++;
}
}
if ($shownoanswer || $rightexists)
{
$answer .= "\t{$answertextrigth} \n";
}
if ($shownoanswer)
{
$answer .= "\t\n";
if (count($labelans1)>0)
{
$answer .= "".$clang->gT("No answer")." "
. "\t".$clang->gT("No answer")."\n"
. "\t \n";
}
$answer .= "\n";
$fn++;
}
$answer.=" \n";
$answer.="
";
}
elseif($useDropdownLayout === true)
{
$separatorwidth=(100-$answerwidth)/10;
$cellwidth=(100-$answerwidth-$separatorwidth)/2;
$answer = "";
// Get attributes for Headers and Prefix/Suffix
if (trim($aQuestionAttributes['dropdown_prepostfix'][$_SESSION['survey_'.Yii::app()->getConfig('surveyID')]['s_lang']])!='') {
list ($ddprefix, $ddsuffix) =explode("|",$aQuestionAttributes['dropdown_prepostfix'][$_SESSION['survey_'.Yii::app()->getConfig('surveyID')]['s_lang']]);
$ddprefix = $ddprefix;
$ddsuffix = $ddsuffix;
}
else
{
$ddprefix ='';
$ddsuffix='';
}
if (trim($aQuestionAttributes['dropdown_separators'])!='') {
$aSeparator =explode('|',$aQuestionAttributes['dropdown_separators']);
if (isset($aSeparator[1])) {
$interddSep=$aSeparator[1];
}
else {
$interddSep=$aSeparator[0];
}
}
else {
$interddSep = '';
}
$colspan_1 = '';
$colspan_2 = '';
$suffix_cell = '';
$answer .= "\n\n"
. "\t\n";
}
if($ddprefix != '')
{
$answer .= "\t\t \n";
}
$answer .= "\t\n";
}
if($ddprefix != '')
{
$answer .= "\t\t \n";
}
// colspan : for header only
if($ddprefix != '' && $ddsuffix != '')
$colspan=' colspan="3"';
elseif($ddprefix != '' || $ddsuffix != '')
$colspan=' colspan="2"';
else
$colspan="";
// headers
$answer .= "\n\t\n"
. "\n"
. "\t \n"
. "\t$leftheader\n"
. "\t \n"
. "\t$rightheader\n";
$answer .="\t \n"
. "\t \n";
$answer .= "\n\n";
$trbc = '';
foreach ($aSubQuestions as $ansrow)
{
$myfname = $ia[1].$ansrow['title'];
$myfname0 = $ia[1].$ansrow['title']."#0";
$myfid0 = $ia[1].$ansrow['title']."_0";
$myfname1 = $ia[1].$ansrow['title']."#1";
$myfid1 = $ia[1].$ansrow['title']."_1";
if ($ia[6]=='Y' && (is_array($notanswered)) && ((array_search($myfname0, $notanswered) !== FALSE) || (array_search($myfname1, $notanswered) !== FALSE)) && (($_SESSION['survey_'.Yii::app()->getConfig('surveyID')][$myfname0] == '') || ($_SESSION['survey_'.Yii::app()->getConfig('surveyID')][$myfname1] == '')) )
{
$answertext="".$ansrow['question']." ";
}
else
{
$answertext=$ansrow['question'];
}
list($htmltbody2, $hiddenfield)=return_array_filter_strings($ia, $aQuestionAttributes, $thissurvey, $ansrow, $myfname, $trbc, $myfname,"tr","$trbc subquestion-list questions-list dropdown-list");
$answer .= $htmltbody2;
$answer .= "\t\n"
. "{$answertext} \n";
// Hidden answers used by EM: sure can be added in javascript
$answer .= " \n";
// Selector 0
if($ddprefix != '')
{
$answer .= "\t$ddprefix \n";
}
$answer .= "\t\n"
. "\n";
// If not mandatory and showanswer, show 'Please choose'
if (SHOW_NO_ANSWER == 1)
{
$answer .= "\tgetConfig('surveyID')][$myfname0]) || $_SESSION['survey_'.Yii::app()->getConfig('surveyID')][$myfname0] == '')
{
$answer .= SELECTED;
}
$answer .='>';
if ($ia[6] != 'Y')
{
$answer .=$clang->gT('No answer');
}
else
{
$answer .=$clang->gT('Please choose...');
}
$answer .=" \n";
}
foreach ($labels0 as $lrow)
{
$answer .= "\tgetConfig('surveyID')][$myfname0]) && $_SESSION['survey_'.Yii::app()->getConfig('surveyID')][$myfname0] == $lrow['code'])
{
$answer .= SELECTED;
}
$answer .= '>'.flattenText($lrow['title'])." \n";
}
$answer .= " \n";
$answer .= " \n";
if($ddsuffix != '')
{
$answer .= "\t$ddsuffix \n";
}
$inputnames[]=$myfname0;
$answer .= "\t$interddSep \n"; //Separator
// Selector 1
if($ddprefix != '')
{
$answer .= "\t$ddprefix \n";
}
$answer .= "\t\n"
. "{$answertext} "
. "\n";
// If not mandatory and showanswer, show 'Please choose'
if (SHOW_NO_ANSWER == 1)
{
$answer .= "\tgetConfig('surveyID')][$myfname1]) || $_SESSION['survey_'.Yii::app()->getConfig('surveyID')][$myfname1] == '')
{
$answer .= SELECTED;
}
$answer .='>';
if ($ia[6] != 'Y')
{
$answer .=$clang->gT('No answer');
}
else
{
$answer .=$clang->gT('Please choose...');
}
$answer .=" \n";
}
foreach ($labels1 as $lrow1)
{
$answer .= "\tgetConfig('surveyID')][$myfname1]) && $_SESSION['survey_'.Yii::app()->getConfig('surveyID')][$myfname1] == $lrow1['code'])
{
$answer .= SELECTED;
}
$answer .= '>'.flattenText($lrow1['title'])." \n";
}
$answer .= " \n";
$answer .= " \n";
if($ddsuffix != '')
{
$answer .= "\t$ddsuffix \n";
}
$inputnames[]=$myfname1;
$answer .= "\n";
}
$answer .= "\t \n";
$answer .= "
\n";
}
}
else
{
$answer = "".$clang->gT("Error: There are no answer options for this question and/or they don't exist in this language.")."
\n";
$inputnames="";
}
Yii::app()->getClientScript()->registerScriptFile(Yii::app()->getConfig('generalscripts')."dualscale.js");
$answer .= "\n";
return array($answer, $inputnames);
}