openehr 1.2.8 → 1.2.9

data/spec/lib/openehr/parser/c_dv_quantity_any_allowed_spec.rb

@@ -1,34 +0,0 @@
-# ticket 174
-require File.dirname(__FILE__) + '/../../../spec_helper'
-require File.dirname(__FILE__) + '/parser_spec_helper'
-require 'openehr/am/openehr_profile/data_types/quantity'
-include ::OpenEHR::AM::OpenEHRProfile::DataTypes::Quantity
-require 'openehr/rm/data_types/quantity'
-include ::OpenEHR::RM::DataTypes::Quantity
-
-describe 'CDvQuantity empty' do
-  before(:all) do
-    archetype = adl14_archetype('adl-test-entry.c_dv_quantity_empty.test.adl')
-    @c_dv_quantity = archetype.definition.attributes[0].children[0].attributes[0].children[0].attributes[0].children[0]
-  end
-
-  it 'is an instance of CDvQuantity' do
-    @c_dv_quantity.should be_an_instance_of CDvQuantity
-  end
-
-  it 'list is nil' do
-    @c_dv_quantity.list.should be_nil
-  end
-
-  it 'property is nil' do
-    @c_dv_quantity.property.should be_nil
-  end
-
-  it 'assumed value is nil' do
-    @c_dv_quantity.assumed_value.should be_nil
-  end
-
-  it 'is any allowed' do
-    @c_dv_quantity.should be_any_allowed
-  end
-end

data/spec/lib/openehr/parser/c_dv_quantity_shared_example_for_lacked_items_spec.rb

@@ -1,36 +0,0 @@
-# ticket 174
-require File.dirname(__FILE__) + '/../../../spec_helper'
-require File.dirname(__FILE__) + '/parser_spec_helper'
-require 'openehr/am/openehr_profile/data_types/quantity'
-include ::OpenEHR::AM::OpenEHRProfile::DataTypes::Quantity
-require 'openehr/rm/data_types/quantity'
-include ::OpenEHR::RM::DataTypes::Quantity
-
-shared_examples 'c_dv_quantity lacked items' do
-  it 'parsed to archetypes' do
-    archetype.should be_an_instance_of Archetype
-  end
-end
-
-describe 'items only with property' do
-  it_behaves_like 'c_dv_quantity lacked items' do
-    let(:archetype) {adl14_archetype('adl-test-entry.c_dv_quantity_property.test.adl')}
-  end
-end
-
-describe 'items only with list' do
-  it_behaves_like 'c_dv_quantity lacked items' do
-    let(:archetype) {adl14_archetype('adl-test-entry.c_dv_quantity_list.test.adl')}
-  end
-end
-
-describe 'reversed items' do
-  it_behaves_like 'c_dv_quantity lacked items' do
-    let(:archetype) {adl14_archetype('adl-test-entry.c_dv_quantity_reversed.test.adl')}
-  end
-end
-describe 'units only' do
-  it_behaves_like 'c_dv_quantity lacked items' do
-    let(:archetype) {adl14_archetype('adl-test-entry.c_dv_quantity_item_units_only.test.adl')}
-  end
-end

data/spec/lib/openehr/parser/c_dv_quantity_shared_example_spec.rb

@@ -1,134 +0,0 @@
-# ticket 174
-require File.dirname(__FILE__) + '/../../../spec_helper'
-require File.dirname(__FILE__) + '/parser_spec_helper'
-require 'openehr/am/openehr_profile/data_types/quantity'
-include ::OpenEHR::AM::OpenEHRProfile::DataTypes::Quantity
-require 'openehr/rm/data_types/quantity'
-include ::OpenEHR::RM::DataTypes::Quantity
-
-shared_examples 'c_dv_quantity' do
-  context 'CDvQuantity item order change' do
-    let(:c_dv_quantity) {archetype.definition.attributes[0].children[0].attributes[0].children[0].attributes[0].children[0]}
-
-    it 'is an instance of CDvQuantity' do
-      c_dv_quantity.should be_an_instance_of CDvQuantity
-    end
-
-    context 'property' do
-      let (:property) { c_dv_quantity.property}
-
-      it 'property should not be nil' do
-        property.should_not be_nil
-      end
-
-      it 'property terminology id should openehr' do
-        property.terminology_id.name.should == 'openehr'
-      end
-
-      it 'property code_string is 128' do
-        property.code_string.should == '128'
-      end
-    end
-
-    context 'item list' do
-      let(:list) { c_dv_quantity.list }
-
-      it 'size is 2' do
-        list.size.should be 2
-      end
-
-      context 'first item' do
-        let(:first) { list[0] }
-
-        it 'first is an isntance of CQuantityItem' do
-          first.should be_an_instance_of CQuantityItem
-        end
-        it 'units is yr' do
-          first.units.should == 'yr'
-        end
-
-        it 'magnitude lower is 0.0' do
-          first.magnitude.lower.should == 0.0
-        end
-
-        it 'magnitude upper is 200.0' do
-          first.magnitude.upper.should == 200.0
-        end
-
-        it 'precision upper is 2' do
-          first.precision.upper.should be 2
-        end
-
-        it 'precision lower is 2, too' do
-          first.precision.lower.should be 2
-        end
-      end
-
-      context 'secocond item' do
-        let(:second) { list[1] }
-
-        it 'is an instance of CQuantityItem' do
-          second.should be_an_instance_of CQuantityItem
-        end
-
-        it 'unit is mth' do
-          second.units.should == 'mth'
-        end
-
-        it 'magnitude lower is 1.0' do
-          second.magnitude.lower.should == 1.0
-        end
-
-        it 'magnitude upper is 36.0' do
-          second.magnitude.upper.should == 36.0
-        end
-
-        it 'precision upper is 2' do
-          second.precision.upper.should == 2
-        end
-
-        it 'precision lower is 2' do
-          second.precision.lower.should == 2
-        end
-      end
-
-      context 'assumed value' do
-        let(:assumed_value) { c_dv_quantity.assumed_value }
-
-        it 'is an instance of CQuantityItem' do
-          assumed_value.should be_an_instance_of DvQuantity
-        end
-
-        it 'units is yr' do
-          assumed_value.units.should == 'yr'
-        end
-
-        it 'magnitude is 8.0' do
-          assumed_value.magnitude.should == 8.0
-        end
-
-        it 'precision is 2' do
-          assumed_value.precision.should be 2
-        end
-      end
-    end
-  end
-end
-
-describe 'items start with property' do
-  it_behaves_like 'c_dv_quantity' do
-    let(:archetype) {adl14_archetype('adl-test-entry.c_dv_quantity_full.test.adl')}
-  end
-end
-
-describe 'items start with list' do
-  it_behaves_like 'c_dv_quantity' do
-    let(:archetype) { adl14_archetype('adl-test-entry.c_dv_quantity_full2.test.adl') }
-  end
-end
-
-describe 'items start with assumed_value' do
-  it_behaves_like 'c_dv_quantity' do
-    let(:archetype) { adl14_archetype('adl-test-entry.c_dv_quantity_full3.test.adl') }
-  end
-end

data/spec/lib/openehr/parser/cdv_ordinal_parse_spec.rb

@@ -1,231 +0,0 @@
-require File.dirname(__FILE__) + '/../../../spec_helper'
-require File.dirname(__FILE__) + '/parser_spec_helper'
-require 'openehr/am/openehr_profile/data_types/quantity'
-include OpenEHR::AM::OpenEHRProfile::DataTypes::Quantity
-
-describe ADLParser do
-  describe CDvOrdinal do
-    before(:all) do
-      archetype = adl14_archetype('adl-test-entry.c_dv_ordinal.test.adl')
-      @attributes = archetype.definition.attributes
-    end
-
-    def attr(index)
-      return @attributes[0].children[0].attributes[0].children[index-1].attributes[0].children[0]
-    end
-
-    context '1st ordinals' do
-      before(:all) do
-        @at = attr(1)
-      end
-
-      it 'is an instance of CDvOrdinal' do
-        @at.should be_an_instance_of CDvOrdinal
-      end
-
-      context '1st item' do
-        before(:all) do
-          @item = @at.list[0]
-        end
-
-        it 'value is 0' do
-          @item.value.should be 0
-        end
-
-        it 'symbol value is local::at0003.0]' do
-          @item.symbol.value.should == '[local::at0003.0]'
-        end
-
-        it 'defining code terminology is local' do
-          @item.symbol.defining_code.terminology_id.value.should == 'local'
-        end
-
-        it 'defining code string is at0003.0' do
-          @item.symbol.defining_code.code_string.should == 'at0003.0'
-        end
-      end
-
-      context '2nd item' do
-        before(:all) do
-          @item = @at.list[1]
-        end
-
-        it 'value is 1' do
-          @item.value.should be 1
-        end
-
-        it 'symbol value is local::at0003.1' do
-          @item.symbol.value.should == '[local::at0003.1]'
-        end
-      end
-
-      context '3nd item' do
-        before(:all) do
-          @item = @at.list[2]
-        end
-
-        it 'value is 2' do
-          @item.value.should be 2
-        end
-
-        it 'symbol value is local::at0003.2' do
-          @item.symbol.value.should == '[local::at0003.2]'
-        end
-      end
-
-      context '4th item' do
-        before(:all) do
-          @item = @at.list[3]
-        end
-
-        it 'value is 3' do
-          @item.value.should be 3
-        end
-
-        it 'symbol value is local::at0003.3' do
-          @item.symbol.value.should == '[local::at0003.3]'
-        end
-      end
-
-      context '5th item' do
-        before(:all) do
-          @item = @at.list[4]
-        end
-
-        it 'value is 4' do
-          @item.value.should be 4
-        end
-
-        it 'symbol value is local::at0003.4' do
-          @item.symbol.value.should == '[local::at0003.4]'
-        end
-      end
-
-      context '6th item' do
-        before(:all) do
-          @item = @at.list[5]
-        end
-
-        it 'item is nil' do
-          @item.should be_nil
-        end
-      end
-    end
-
-    context '2nd ordinals chunk' do
-      before(:all) do
-        @at = attr(2)
-      end
-
-      it 'is an instance of CDvOrdinal' do
-        @at.should be_an_instance_of CDvOrdinal
-      end
-
-      context '1st item' do
-        before(:all) do
-          @item = @at.list[0]
-        end
-
-        it 'value is 0' do
-          @item.value.should be 0
-        end
-
-        it 'symbol value is local::at0003.0]' do
-          @item.symbol.value.should == '[local::at0003.0]'
-        end
-
-        it 'defining code terminology is local' do
-          @item.symbol.defining_code.terminology_id.value.should == 'local'
-        end
-
-        it 'defining code string is at0003.0' do
-          @item.symbol.defining_code.code_string.should == 'at0003.0'
-        end
-      end
-
-      context '2nd item' do
-        before(:all) do
-          @item = @at.list[1]
-        end
-
-        it 'value is 1' do
-          @item.value.should be 1
-        end
-
-        it 'symbol value is local::at0003.1' do
-          @item.symbol.value.should == '[local::at0003.1]'
-        end
-      end
-
-      context '3nd item' do
-        before(:all) do
-          @item = @at.list[2]
-        end
-
-        it 'value is 2' do
-          @item.value.should be 2
-        end
-
-        it 'symbol value is local::at0003.2' do
-          @item.symbol.value.should == '[local::at0003.2]'
-        end
-      end
-
-      context '4th item' do
-        before(:all) do
-          @item = @at.list[3]
-        end
-
-        it 'value is 3' do
-          @item.value.should be 3
-        end
-
-        it 'symbol value is local::at0003.3' do
-          @item.symbol.value.should == '[local::at0003.3]'
-        end
-      end
-
-      context '5th item' do
-        before(:all) do
-          @item = @at.list[4]
-        end
-
-        it 'value is 3' do
-          @item.value.should be 4
-        end
-
-        it 'symbol value is local::at0003.4' do
-          @item.symbol.value.should == '[local::at0003.4]'
-        end
-      end
-
-      context '6th item' do
-        before(:all) do
-          @item = @at.list[5]
-        end
-
-        it 'item is nil' do
-          @item.should be_nil
-        end
-      end
-
-      it 'has assumed value' do
-        @at.should have_assumed_value
-      end
-
-      it 'assumed_value is 0' do
-        @at.assumed_value.should be 0
-      end
-    end
-
-    context '3rd ordinal is any allowed' do
-      before(:all) do
-        @at = attr(3)
-      end
-
-      it 'is any allowed' do
-        @at.should be_any_allowed
-      end
-    end
-  end
-end

data/spec/lib/openehr/parser/code_phrase_spec.rb

@@ -1,96 +0,0 @@
-require File.dirname(__FILE__) + '/../../../spec_helper'
-require File.dirname(__FILE__) + '/parser_spec_helper'
-require 'openehr/am/openehr_profile/data_types/text'
-include ::OpenEHR::AM::OpenEHRProfile::DataTypes::Text
-# ticket 171
-
-describe ADLParser do
-  context 'CCodePhase type' do
-    before(:all) do
-      archetype = adl14_archetype('adl-test-entry.c_code_phrase.test.adl')
-      @attributes = archetype.definition.attributes
-    end
-
-    def attr(index)
-      @attributes[0].children[0].attributes[0].children[index-1].attributes[0].children[0]
-    end
-
-    context '1st constraint is icd10::F43.00,F43.01,F32.02' do
-      before(:all) do
-        @at = attr(1)
-      end
-
-      it 'at is an instance of CCodePhrase' do
-        @at.should be_an_instance_of CCodePhrase
-      end
-
-      it 'terminology id is icd10' do
-        @at.terminology_id.value.should == 'icd10'
-      end
-
-      it 'code_list is F43.00,F43.01,F32.02' do
-        @at.code_list.should == ['F43.00','F43.01','F32.02']
-      end
-    end
-
-    context '2nd constraint is local::at1311,at1312,at1313,at1314,at1315' do
-      before(:all) do
-        @at = attr(2)
-      end
-
-      it 'terminology id is local' do
-        @at.terminology_id.value.should == 'local'
-      end
-
-      it 'code_list is at1311,at1312,at1313,at1314,at1315' do
-        @at.code_list.should == ['at1311','at1312','at1313','at1314','at1315']
-      end
-    end
-
-    context '3rd constraint is icd10::' do
-      before(:all) do
-        @at = attr(3)
-      end
-
-      it 'terminology id is icd10' do
-        @at.terminology_id.value.should == 'icd10'
-      end
-
-      it 'code_list is empty' do
-        @at.code_list.should == []
-      end
-    end
-
-    context '4th constraint is icd10::F43.00,F43.01,F32.02;F43.00' do
-      before(:all) do
-        @at = attr(4)
-      end
-
-      it 'terminology id is icd10' do
-        @at.terminology_id.value.should == 'icd10'
-      end
-
-      it 'code_list is F43.00,F43.01,F32.02' do
-        @at.code_list.should == ['F43.00','F43.01','F32.02']
-      end
-
-      it 'assumed value is F43.00' do
-        @at.assumed_value.should == 'F43.00'
-      end
-    end
-
-    context '5th constraint is openehr::431' do
-      before(:all) do
-        @at = attr(5)
-      end
-
-      it 'terminology is openehr' do
-        @at.terminology_id.value.should == 'openehr'
-      end
-
-      it 'code_list is 431' do
-        @at.code_list.should == ['431']
-      end
-    end
-  end
-end