Fixed issue #16833: new config setting for date format and question c…

…ode updates (#1684)

For questions with subquestion, the question code is shown without the subquestion part.
For date questions, the length of the placeholders is set accoding to the format of the question
Question Title Column width can be set from config-defaults

application/config/config-defaults.php

@@ -430,6 +430,9 @@
 // QueXML: If set to true, the Data/Time answers will be formated with the survey's date format
 $config['quexmlkeepsurveydateformat'] = false;
 
+// QueXML: Width of the question title column in MM
+$config['quexmlquestiontitlewidth'] = 14;
+
 $config['minlengthshortimplode'] = 20; // Min length required to use short_implode instead of standard implode
 $config['maxstringlengthshortimplode'] = 100; // short_implode: Max length of returned string
 

application/helpers/export_helper.php

@@ -1453,6 +1453,9 @@ function quexml_reformat_date(DOMElement $element, $qid, $iSurveyID)
 
     // Change the value in the DOM element
     $element->setAttribute("defaultValue", $value);
+
+    // Change length
+    $element->getElementsByTagName("free")->item(0)->getElementsByTagName("length")->item(0)->nodeValue = strlen($value);
 }
 
 

application/libraries/admin/quexmlpdf.php

@@ -799,6 +799,16 @@ public function setLanguage($language)
      */
     protected $cornerLines = true;
 
+    /**
+     * Initialize from config
+     *
+     */
+    public function __construct()
+    {
+        $this->questionTitleWidth = Yii::app()->getConfig('quexmlquestiontitlewidth', $this->questionTitleWidth);
+        parent::__construct();
+    }
+
     /**
      * Return the length of the longest word
      *
@@ -1967,7 +1977,7 @@ public function createqueXML($quexml)
                 }
 
                 if (Yii::app()->getConfig('quexmlusequestiontitleasid') == true) {
-                    $qtmp['title'] = ((string) $qu->response->attributes()->varName).$this->questionTitleSuffix;
+                    $qtmp['title'] = explode('_', (string) $qu->response->attributes()->varName)[0].$this->questionTitleSuffix;
                 } else {
                     $qtmp['title'] = $sl.$qcount.$this->questionTitleSuffix;
                 }