diff --git a/lib/quby/compiler/entities/subscore_schema.rb b/lib/quby/compiler/entities/subscore_schema.rb index 8091d9deab6db18c8b483e0f65c52419ea9b5999..4c39f938eabbffd6001ed9380380a631f27f99fc 100644 --- a/lib/quby/compiler/entities/subscore_schema.rb +++ b/lib/quby/compiler/entities/subscore_schema.rb @@ -14,6 +14,10 @@ module Quby attribute :only_for_export?, Types::Bool # [Optional] The key of the variable definition used to calculate the subscore result. attribute :calculation_key?, Types::Symbol + # [Optional] The name of the outcome table where this subscore should be shown. Used for cases where scores + # differ in subscores too much to be shown as one table. Any name can be used, as long as they match between + # subscores that should be shown in the same table. + attribute :outcome_table?, Types::Symbol end end end diff --git a/lib/quby/compiler/outputs/roqua_serializer.rb b/lib/quby/compiler/outputs/roqua_serializer.rb index 9238afb499f8d136b307e5714894e7fe1016752b..85dca6ef5b6ba6362d5e9f11203c2d6969c8a9e5 100644 --- a/lib/quby/compiler/outputs/roqua_serializer.rb +++ b/lib/quby/compiler/outputs/roqua_serializer.rb @@ -21,6 +21,7 @@ module Quby respondent_types: questionnaire.respondent_types, tags: questionnaire.tags.to_h.keys, charts: charts, + outcome_schema: outcome_schema, } end @@ -73,6 +74,30 @@ module Quby end } end + + def outcome_schema + # hash of tables, with the score keys (rows) and subscore keys (columns) used for each + tables = Hash.new{ |hash, key| hash[key] = {score_keys: [], subscore_keys: []} } + # hash of `subscore_key: subscore_label` pairs used in tables + headers = {} + + questionnaire.score_schemas.values.each do |schema| + schema.subscore_schemas.each do |subschema| + next unless subschema.outcome_table + tables[subschema.outcome_table][:subscore_keys] << subschema.key + tables[subschema.outcome_table][:score_keys] << schema.key + headers[subschema.key] = subschema.label + end + end + + tables.values.each { |table| table[:score_keys].uniq! } + tables.values.each { |table| table[:subscore_keys].uniq! } + + { + headers: headers, + tables: tables.values, + } + end end end end diff --git a/spec/quby/compiler/outputs/roqua_serializer_spec.rb b/spec/quby/compiler/outputs/roqua_serializer_spec.rb new file mode 100644 index 0000000000000000000000000000000000000000..3cccaee81542c0564a3b29fc81eefc4c170feef6 --- /dev/null +++ b/spec/quby/compiler/outputs/roqua_serializer_spec.rb @@ -0,0 +1,43 @@ +require 'spec_helper' + +describe Quby::Compiler::Outputs::RoquaSerializer do + it 'generates outcome schemas' do + questionnaire = dsl("test") do + title "Test Quest" + + score_schema :score1, 'Score 1' do + subscore :value, 'Waarde', export_key: :score1, outcome_table: :values do + 1 + end + subscore :int, 'Interpretatie', export_key: :score1_i do + 'Wah' + end + end + + score_schema :score2, 'Score 2' do + subscore :value, 'Waarde', export_key: :score2, outcome_table: :values do + 2 + end + end + + score_schema :score3, 'Score 3' do + subscore :mean, 'Gemiddelde', export_key: :score3, outcome_table: :means do + 1 + end + end + end + serializer = described_class.new(questionnaire) + expect(serializer.as_json).to \ + include({ + outcome_schema: { + tables: [{:score_keys => [:score1, :score2], :subscore_keys => [:value]}, + {:score_keys => [:score3], :subscore_keys => [:mean]}], + headers: {mean: "Gemiddelde", value: "Waarde"} + } + }) + end + + def dsl(key, &block) + Quby::Compiler::DSL.build(key, nil, &block) + end +end \ No newline at end of file