openehr 1.2.8 → 1.2.9

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

@@ -1,27 +0,0 @@
-require File.dirname(__FILE__) + '/../../../spec_helper'
-require File.dirname(__FILE__) + '/parser_spec_helper'
-include ::OpenEHR::RM::DataTypes::Text
-require 'openehr/am/openehr_profile/data_types/text'
-include ::OpenEHR::AM::OpenEHRProfile::DataTypes::Text
-
-describe ADLParser do
-  describe DvCodedText do
-    before(:all) do
-      archetype = adl14_archetype('adl-test-composition.dv_coded_text.test.adl')
-      @c_code_phrase = archetype.definition.attributes[0].children[0].
-        attributes[0].children[0]
-    end
-
-    it 'is an instance of CCodePhrase' do
-      @c_code_phrase.should be_an_instance_of CCodePhrase
-    end
-
-    it 'terminology is openehr' do
-      @c_code_phrase.terminology_id.value.should == 'openehr'
-    end
-
-    it 'code list is 431' do
-      @c_code_phrase.code_list.should == ['431']
-    end
-  end
-end

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

@@ -1,19 +0,0 @@
-# ticket 179
-require File.dirname(__FILE__) + '/../../../spec_helper'
-require File.dirname(__FILE__) + '/parser_spec_helper'
-
-describe ADLParser do
-  context 'Empty Other Contributors' do
-    before(:all) do
-      @archetype = adl14_archetype('adl-test-entry.empty_other_contributors.test.adl')
-    end
-
-    it 'archetype should be an instance of OpenEHR::AM::Archetype::Archetype' do
-      @archetype.should be_an_instance_of OpenEHR::AM::Archetype::Archetype
-    end
-
-    it 'other contributer should be nil' do
-      @archetype.description.other_contributors.should be_nil
-    end
-  end
-end

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

@@ -1,29 +0,0 @@
-require File.dirname(__FILE__) + '/../../../spec_helper'
-require File.dirname(__FILE__) + '/parser_spec_helper'
-
-shared_examples 'empty use archetypes' do
-  describe 'empty use is assigned nil to be valid archtype' do
-    it 'is not nil' do
-      subject.should_not be_nil
-    end
-  end
-
-  describe 'description for use is nil' do
-    it 'use is nil' do
-      subject.description.details['en'].use.should be_nil
-    end
-  end
-end
-
-describe 'Archetypes, which has empty use' do
-  adls = ['openEHR-EHR-OBSERVATION.operation_record.v1.adl',
-         'openEHR-EHR-CLUSTER.exam-abdomen.v1.adl',
-         'openEHR-EHR-OBSERVATION.uterine_contractions.v1.adl',
-         'openEHR-EHR-CLUSTER.exam-uterine_cervix.v1.adl',
-         'openEHR-EHR-CLUSTER.exam-uterus.v1.adl']
-
-  adls.each do |adl|
-    subject { adl14_archetype(adl) }
-    it_should_behave_like 'empty use archetypes'
-  end
-end

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

@@ -1,14 +0,0 @@
-require File.dirname(__FILE__) + '/../../../spec_helper'
-require File.dirname(__FILE__) + '/parser_spec_helper'
-
-describe ADLParser do
-  context 'lab_test parser error_check' do
-    before(:all) do
-      @archetype = adl14_archetype('openEHR-EHR-OBSERVATION.lab_test.v1.adl')
-    end
-
-    it 'is an instance of archetype' do
-      @archetype.should be_an_instance_of OpenEHR::AM::Archetype::Archetype
-    end
-  end
-end

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

@@ -1,20 +0,0 @@
-# ticket 180
-require File.dirname(__FILE__) + '/../../../spec_helper'
-require File.dirname(__FILE__) + '/parser_spec_helper'
-
-describe ADLParser do
-  context 'Missing language' do
-    before(:all) do
-      @archetype = adl14_archetype('adl-test-entry.missing_language.test.adl')
-    end
-
-    it 'is an instance of Archetype' do
-      @archetype.should be_an_instance_of OpenEHR::AM::Archetype::Archetype
-    end
-
-    it 'original language is alternated from primary language of ontology section' do
-      @archetype.original_language.code_string.should == 'zh'
-    end
-  end
-end
-

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

@@ -1,23 +0,0 @@
-# ticket 181
-require File.dirname(__FILE__) + '/../../../spec_helper'
-require File.dirname(__FILE__) + '/parser_spec_helper'
-
-describe ADLParser do
-  context 'Missing purpose' do
-    before(:all) do
-      @archetype = adl14_archetype('adl-test-entry.archetype_desc_missing_purpose.test.adl')
-    end
-
-    it 'is an instance of Archetype' do
-      @archetype.should be_an_instance_of OpenEHR::AM::Archetype::Archetype
-    end
-
-# If porpose in description section was nil, __unknown__ is altered
-# for backward compatibility
-
-    it 'purpose is __unknown__' do
-      @archetype.description.details['en'].purpose.should == '__unknown__'
-    end
-  end
-end
-

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

@@ -1,16 +0,0 @@
-# ticket 182
-require File.dirname(__FILE__) + '/../../../spec_helper'
-require File.dirname(__FILE__) + '/parser_spec_helper'
-
-describe ADLParser do
-  context 'Mixed node types' do
-    before(:all) do
-      @archetype = adl14_archetype('adl-test-entry.mixed_node_types.draft.adl')
-    end
-
-    it 'is an instance of Archetype' do
-      @archetype.should be_an_instance_of OpenEHR::AM::Archetype::Archetype
-    end
-  end
-end
-

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

@@ -1,19 +0,0 @@
-# ticket 183
-require File.dirname(__FILE__) + '/../../../spec_helper'
-require File.dirname(__FILE__) + '/parser_spec_helper'
-
-describe ADLParser do
-  context 'Most minimal ADL' do
-    before(:all) do
-      @archetype = adl14_archetype('adl-test-entry.most_minimal.test.adl')
-    end
-
-    it 'is an instance of Archetype' do
-      @archetype.should be_an_instance_of OpenEHR::AM::Archetype::Archetype
-    end
-
-    it 'original language is en' do
-      @archetype.original_language.code_string.should == 'en'
-    end
-  end
-end

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

@@ -1,58 +0,0 @@
-require File.dirname(__FILE__) + '/../../../spec_helper'
-require File.dirname(__FILE__) + '/parser_spec_helper'
-include ::OpenEHR::RM::DataTypes::Text
-
-describe ADLParser do
-  context do
-    before(:all) do
-      archetype = adl14_archetype('adl-test-entry.multi_language.test.adl')
-      @ontology = archetype.ontology
-    end
-
-    it 'primary language is en' do
-      @ontology.primary_language.should == 'en'
-    end
-
-    it 'languages available are sv and en' do
-      @ontology.languages_available.should == ['en', 'sv']
-    end
-
-    context 'term definition' do
-      before(:all) do
-        @term_def = @ontology.term_definitions
-      end
-
-      it 'languages defined are sv and en' do
-        @term_def.keys.should == ['en','sv']
-      end
-
-      context 'en items' do
-        before(:all) do
-          @en = @term_def['en']['at0000'].items
-        end
-
-        it 'text is most minimal' do
-          @en['text'].should == 'most minimal'
-        end
-
-        it 'description is most minimal' do
-          @en['description'].should == 'most minimal'
-        end
-      end
-
-      context 'sv items' do
-        before(:all) do
-          @en = @term_def['sv']['at0000'].items
-        end
-
-        it 'text is most minimal' do
-          @en['text'].should == 'mesta minimal'
-        end
-
-        it 'description is most minimal' do
-          @en['description'].should == 'mesta minimal'
-        end
-      end
-    end
-  end
-end

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

@@ -1,16 +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')
-    end
-
-    it 'archetype should be parsed' do
-      @archetype.should_not be_nil
-    end
-  end
-end

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

@@ -1,7 +0,0 @@
-ADL14DIR = File.dirname(__FILE__) + '/adl14/'
-include OpenEHR::Parser
-
-def adl14_archetype(file)
-  ap = ADLParser.new(ADL14DIR + file)
-  ap.parse
-end

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

@@ -1,30 +0,0 @@
-# ticket 188
-require File.dirname(__FILE__) + '/../../../spec_helper'
-require File.dirname(__FILE__) + '/parser_spec_helper'
-
-describe ADLParser do
-  context 'term bindings spec' do
-    before(:all) do
-      archetype = adl14_archetype('adl-test-entry.term_binding2.test.adl')
-      @item = archetype.ontology.term_bindings['LNC205']
-    end
-
-    it 'key is path' do
-      @item.should have_key '/data[at0002]/events[at0003]/data[at0001]/item[at0004]'
-    end
-
-    context 'term' do
-      before(:all) do
-        @term = @item['/data[at0002]/events[at0003]/data[at0001]/item[at0004]'][0]
-      end
-
-      it 'terminology id is LNC205' do
-        @term.terminology_id.name.should == 'LNC205'
-      end
-
-      it 'code is 8310-5' do
-        @term.code_string.should == '8310-5'
-      end
-    end
-  end
-end

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

@@ -1,20 +0,0 @@
-# ticket 186
-require File.dirname(__FILE__) + '/../../../spec_helper'
-require File.dirname(__FILE__) + '/parser_spec_helper'
-
-describe ADLParser do
-  context 'Special string' do
-    before(:all) do
-      archetype = adl14_archetype('adl-test-entry.special_string.test.adl')
-      @attr = archetype.definition.attributes[0].children[0].attributes
-    end
-
-    it '1st node string is some\"thing' do
-      @attr[0].children[0].list[0].should == 'some\"thing'
-    end
-
-    it '2nd node string is any\\thing' do
-      @attr[1].children[0].list[0].should == "any\\thing"
-    end
-  end
-end

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

@@ -1,21 +0,0 @@
-# ticket 187
-require File.dirname(__FILE__) + '/../../../spec_helper'
-require File.dirname(__FILE__) + '/parser_spec_helper'
-
-describe ADLParser do
-  context 'Structure spec' do
-    before(:all) do
-      archetype = adl14_archetype('adl-test-entry.structure_test2.test.adl')
-      @definition = archetype.definition
-    end
-
-    it 'rm type name is ENTRY' do
-      @definition.rm_type_name.should == 'ENTRY'
-    end
-
-    it '1st attribute type name is items' do
-      @definition.attributes[0].rm_attribute_name.should ==
-        'subject_relationship'
-    end
-  end
-end

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

@@ -1,22 +0,0 @@
-# ticket 187
-require File.dirname(__FILE__) + '/../../../spec_helper'
-require File.dirname(__FILE__) + '/parser_spec_helper'
-
-describe ADLParser do
-  context 'Structure spec' do
-    before(:all) do
-      archetype = adl14_archetype('openEHR-EHR-CLUSTER.auscultation.v1.adl')
-      @definition = archetype.definition
-    end
-
-    it 'rm type name is CLUSTER' do
-      @definition.rm_type_name.should == 'CLUSTER'
-    end
-
-    it '1st attribute type name is items' do
-      @definition.attributes[0].rm_attribute_name.should ==
-        'items'
-    end
-  end
-end
-

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

@@ -1,205 +0,0 @@
-# ticket 187
-require File.dirname(__FILE__) + '/../../../spec_helper'
-require File.dirname(__FILE__) + '/parser_spec_helper'
-
-describe ADLParser do
-  context 'Structure spec' do
-    before(:all) do
-      archetype = adl14_archetype('adl-test-entry.structure_test1.test.adl')
-      @definition = archetype.definition
-      @occurrences = OpenEHR::AssumedLibraryTypes::Interval.new(
-                       :upper => 1, :lower => 1, 
-                       :lower_included => true, :upper_included => true)
-    end
-
-    context 'root definition object' do
-      it 'rm_type_name is ENTRY' do
-        @definition.rm_type_name.should == 'ENTRY'
-      end
-
-      it 'path is /' do
-        @definition.path.should == '/'
-      end
-
-      it 'node_id is at0000' do
-        @definition.node_id.should == 'at0000'
-      end
-
-      it 'occurrences is default 1,1' do
-        @definition.occurrences.should == @occurrences
-      end
-
-      it 'attributes size is 2' do
-        @definition.attributes.size.should be 2
-      end
-    end
-
-    context 'first attribute' do
-      before(:all) do
-        @attr = @definition.attributes[0]
-      end
-
-      it 'rm_attribute_name is subject_relationship' do
-        @attr.rm_attribute_name.should == 'subject_relationship'
-      end
-
-      it 'has 1 child' do
-        @attr.children.size.should be 1
-      end
-
-      context '2nd level object' do
-        before(:all) do
-          @obj = @attr.children[0]
-        end
-
-        it 'rm type name is RELATED_PARTY' do
-          @obj.rm_type_name.should == 'RELATED_PARTY'
-        end
-
-        it 'node id shold be nil' do
-          @obj.node_id.should be_nil
-        end
-
-        it 'occurrences is default' do
-          @obj.occurrences.should == @occurrences
-        end
-
-        it 'attributes size is 1' do
-          @obj.attributes.size.should be 1
-        end
-
-        context 'attribute of 2nd level object' do
-          before(:all) do
-            @attr = @obj.attributes[0]
-          end
-
-          it 'rm attribute name is relationship' do
-            @attr.rm_attribute_name.should == 'relationship'
-          end
-
-          it 'children size is 1' do
-            @attr.children.size.should be 1
-          end
-
-          context 'leaf object' do
-            before(:all) do
-              @leaf = @attr.children[0]
-            end
-
-            it 'rm type name is TEXT' do
-              @leaf.rm_type_name.should == 'TEXT'
-            end
-
-            it 'occurences is default' do
-              @leaf.occurrences.should == @occurrences
-            end
-
-            it 'node id should be nil' do
-              @leaf.node_id.should be_nil
-            end
-
-            it 'attributes size is 1' do
-              @leaf.attributes.size.should be 1
-            end
-
-            context 'attribute of leaf object' do
-              before(:all) do
-                @attr = @leaf.attributes[0]
-              end
-
-              it 'rm attribute name is value' do
-                @attr.rm_attribute_name.should == 'value'
-              end
-
-              it 'children size is 1' do
-                @attr.children.size.should be 1
-              end
-
-              context 'primitive constraint of leaf object' do
-                before(:all) do
-                  @cstring = @attr.children[0]
-                end
-
-                it 'string constraint pattern is nil' do
-                  @cstring.pattern.should be_nil
-                end
-
-                it 'list constraint is self' do
-                  @cstring.list.should == ['self']
-                end
-
-                it 'list size is 1' do
-                  @cstring.list.size.should be 1
-                end
-              end
-            end
-          end
-        end
-      end
-    end
-
-    context 'second attribute of root' do
-      before(:all) do
-        @attr = @definition.attributes[1]
-      end
-
-      it 'rm attribute name is members' do
-        @attr.rm_attribute_name.should == 'members'
-      end
-
-      it 'existence are 0..1' do
-        existence = OpenEHR::AssumedLibraryTypes::Interval.new(
-                        :lower => 0, :upper => 1,
-                        :lower_included => true, :upper_included => true)
-        @attr.existence.should == existence
-      end
-
-      it 'cardinality interval is 0..8' do
-        interval = OpenEHR::AssumedLibraryTypes::Interval.new(
-                        :lower => 0, :upper => 8,
-                        :lower_included => true, :upper_included => true)
-        @attr.cardinality.interval.should == interval
-      end
-
-      it 'children size are 2' do
-        @attr.children.size.should be 2
-      end
-
-      context '1st person' do
-        before(:all) do
-          @first = @attr.children[0]
-        end
-
-        it 'rm type name is PERSON' do
-          @first.rm_type_name.should == 'PERSON'
-        end
-
-        it 'occurrences are default' do
-          @first.occurrences.should == @occurrences
-        end
-
-        it 'attributes size is 1' do
-          @first.attributes.size.should be 1
-        end
-      end
-
-      context '2nd person' do
-        before(:all) do
-          @second = @attr.children[1]
-        end
-
-        it 'rm type name is PERSON' do
-          @second.rm_type_name.should == 'PERSON'
-        end
-
-        it 'occurences is upper unbounded' do
-          occurrences = OpenEHR::AssumedLibraryTypes::Interval.new(
-                          :lower => 0, :lower_included => true)
-          @second.occurrences.should == occurrences
-        end
-
-        
-      end
-    end
-  end
-end