New feature #17226: Ability to export to SPSS .sav format (#1877)

application/config/config-defaults.php

@@ -791,6 +791,7 @@
     'AuditLog',
     'ExportR',
     'ExportSTATAxml',
+    'ExportSPSSsav',
     'extendedStartPage',
     'oldUrlCompat',
     'AuthLDAP',

application/config/version.php

@@ -12,7 +12,7 @@
  */
 
 $config['versionnumber'] = '5.1.0-dev';
-$config['dbversionnumber'] = 449;
+$config['dbversionnumber'] = 450;
 $config['buildnumber'] = '';
 $config['updatable'] = true;
 $config['templateapiversion']  = 3;

application/core/LsDefaultDataSets.php

@@ -1748,6 +1748,7 @@ public static function getDefaultPluginsData()
             $addRow('Authwebserver'),
             $addRow('ExportR', 1),
             $addRow('ExportSTATAxml', 1),
+            $addRow('ExportSPSSsav', 1),
             $addRow('oldUrlCompat'),
             $addRow('expressionQuestionHelp'),
             $addRow('expressionQuestionForAll'),

application/core/plugins/ExportSPSSsav/ExportSPSSsav.php

@@ -0,0 +1,81 @@
+<?php
+class ExportSPSSsav extends \LimeSurvey\PluginManager\PluginBase
+{
+
+    protected $storage = 'DbStorage';
+
+    static protected $description = 'Core: Export survey results to an SPSS sav file';
+    static protected $name = 'SPSS Export';
+
+    public function init()
+    {
+        /**
+         * Here you should handle subscribing to the events your plugin will handle
+         */
+        $this->subscribe('listExportPlugins');
+        $this->subscribe('listExportOptions');
+        $this->subscribe('newExport');
+    }
+
+    protected $settings = array(
+        'spssfileversion' => array(
+            'type' => 'select',
+            'label' => 'Export for SPSS',
+            'options' => array('16' => 'versions 14 and above', '13'  => 'version 13 and below (limited string length)'),
+            'default' => '16',
+            'submitonchange'=> false
+            )
+        );
+
+    public function listExportOptions()
+    {
+        $event = $this->getEvent();
+        $type = $event->get('type');
+
+        switch ($type) {
+            case 'spsssav':
+                $event->set('label', gT("SPSS (.sav)"));
+                $event->set('onclick', '
+                 document.getElementById("answers-short").checked=true;
+                 document.getElementById("answers-long").disabled=true;
+                     document.getElementById("converty").checked=true;
+                     document.getElementById("convertn").checked=true;
+                     document.getElementById("convertnto").value=0;
+                     document.getElementById("convertyto").value=1;
+                     document.getElementById("headstyle-code").disabled=true;
+                     document.getElementById("headstyle-abbreviated").disabled=true;
+                     document.getElementById("headstyle-full").checked=true;
+                     document.getElementById("headstyle-codetext").disabled=true;
+                 ');
+                break;
+
+            default:
+                break;
+        }
+    }
+
+    /**
+     * Registers this export type
+     */
+    public function listExportPlugins()
+    {
+        $event = $this->getEvent();
+        $exports = $event->get('exportplugins');
+
+        // Yes we overwrite existing classes if available
+        $exports['spsssav'] = get_class();
+        $event->set('exportplugins', $exports);
+    }
+
+    /**
+     * Returns the required IWriter
+     */
+    public function newExport()
+    {
+        $event = $this->getEvent();
+
+        $pluginsettings = $this->getPluginSettings(true);
+        $writer = new SPSSWriter($pluginsettings);
+        $event->set('writer', $writer);
+    }
+}