openehr 1.2.8 → 1.2.9

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

@@ -1,46 +0,0 @@
-require File.dirname(__FILE__) + '/../../../spec_helper'
-require File.dirname(__FILE__) + '/parser_spec_helper'
-include OpenEHR::Parser
-
-describe ADLParser do
-  context 'Language author parsing behavior' do
-    before(:all) do
-      TARGET_ADL_FILE = 'adl-test-entry.translations_language_author.test.adl'
-      ap = ADLParser.new(ADL14DIR + TARGET_ADL_FILE)
-      archetype = ap.parse
-      @translations = archetype.translations
-    end
-
-    it 'translations exists' do
-      @translations.should_not be_nil
-    end
-
-    context 'German translation' do
-      before(:all) do
-        @de = @translations['de']
-      end
-
-      it 'exists' do
-        @de.should_not be_nil
-      end
-
-      it 'language code string is de' do
-        @de.language.code_string.should == 'de'
-      end
-
-      context 'author' do
-        before(:all) do
-          @author = @de.author
-        end
-
-        it 'name is Harry Potter' do
-          @author['name'].should == 'Harry Potter'
-        end
-
-        it 'email is harry@something.somewhere.co.uk' do
-          @author['email'].should == 'harry@something.somewhere.co.uk'
-        end
-      end
-    end
-  end
-end

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

@@ -1,342 +0,0 @@
-require File.dirname(__FILE__) + '/../../../spec_helper'
-
-describe OpenEHR::Parser::ADLParser do
-
-  before (:all) do
-    @adl_dir = File.dirname(__FILE__) + '/adl14/'
-  end
-
-  context 'openEHR-EHR-SECTION-summary.v1.adl' do
-    before(:all) do
-      @ap = OpenEHR::Parser::ADLParser.new(@adl_dir + 'openEHR-EHR-SECTION.summary.v1.adl')
-    end
-
-    it 'is an instance fo ADLParser' do
-      @ap.should be_an_instance_of OpenEHR::Parser::ADLParser
-    end
-
-    context 'openEHR-EHR-SECTION.summary.v1 parse' do
-      context 'ADL parser generates archetype from ADL' do
-        before(:all) do
-          @archetype = @ap.parse
-        end
-
-        it 'archetype is an instance of Archetype' do
-          @archetype.should be_an_instance_of OpenEHR::AM::Archetype::Archetype
-        end
-
-        it 'archetype_id should be openEHR-EHR-SECTION-summary' do
-          @archetype.archetype_id.value.should == 
-            'openEHR-EHR-SECTION.summary.v1'
-        end
-
-        it 'adl_version should be 1.4' do
-          @archetype.adl_version.should == '1.4'
-        end
-
-        it 'concept should be at0000' do
-          @archetype.concept.should == 'at0000'
-        end
-
-        it 'original language is en' do
-          @archetype.original_language.code_string.should == 'en'
-        end
-
-        context 'description' do
-          before(:all) do
-            @description = @archetype.description
-          end
-
-          context 'original author' do
-            before(:all) do
-              @original_author = @description.original_author
-            end
-
-            it 'name is Sam Heard' do
-              @original_author['name'].should == 'Sam Heard'
-            end
-
-            it 'organisation is Ocean Informatics' do
-              @original_author['organisation'].should == 'Ocean Informatics'
-            end
-
-            it 'date is 9/01/2007' do
-              @original_author['date'].should == '9/01/2007'
-            end
-
-            it 'email is sam.heard@oceaninformatics.biz' do
-              @original_author['email'].should == 'sam.heard@oceaninformatics.biz'
-            end
-          end
-
-          context 'details' do
-            before(:all) do
-              @details = @description.details
-            end
-
-            context 'en details' do
-              before(:all) do
-                @en = @details['en']
-              end
-
-              it 'language is en' do
-                @en.language.code_string.should == 'en'
-              end 
-
-              it 'purpose is A heading...' do
-                @en.purpose.should == "A heading containing summary information based on particular evaluation entries"
-              end
-
-              it 'use is A heading for...' do
-                @en.use.should == "A heading for organising clinical data under a heading of summary"
-              end
-
-              it 'keywords are review, conclusions, risk' do
-                @en.keywords.should == ['review', 'conclusions', 'risk']
-              end
-
-              it 'misuse should be nil' do
-                @en.misuse.should be_nil
-              end
-            end
-
-            it 'lifecycle_state is Initial' do
-              @description.lifecycle_state.should == 'Initial'
-            end
-
-            it 'other_contributors is nil' do
-              @description.other_contributors.should be_nil
-            end
-          end # of details
-        end # of description
-
-        context 'definition section' do
-          before(:all) do
-            @definition = @archetype.definition
-          end
-
-          it 'rm_type is SECTION' do
-            @definition.rm_type_name.should == 'SECTION'
-          end
-
-          it 'node_id is at0000' do
-            @definition.node_id.should == 'at0000'
-          end
-
-          it 'root path is /' do
-            @definition.path.should == '/'
-          end
-
-          it 'not any allowed' do
-            @definition.any_allowed?.should == false
-          end
-
-          context 'c_attribute specs' do
-            before(:all) do
-              @attribute = @definition.attributes[0]
-            end
-
-            it 'attribute is instance of CMultipleAttribute' do
-              @attribute.should be_an_instance_of OpenEHR::AM::Archetype::ConstraintModel::CMultipleAttribute
-            end
-
-            it 'rm_attribute_name is items' do
-              @attribute.rm_attribute_name.should == 'items'
-            end
-
-            it 'path is /items' do
-              @attribute.path.should == '/items'
-            end
-
-            it 'cardinarity is unorderd' do
-              @attribute.cardinality.should_not be_ordered
-            end
-
-            it 'lower interval of cardinality is 0' do
-              @attribute.cardinality.interval.lower.should be 0
-            end
-
-            it 'interval of cardinality is upper unbounded' do
-              @attribute.cardinality.interval.should be_upper_unbounded
-            end
-            context 'children archetype slot specs' do
-              before(:all) do
-                @archetype_slot = @attribute.children[0]
-              end
-
-              it 'is an instance of ArchetypeSlot' do
-                @archetype_slot.should be_an_instance_of OpenEHR::AM::Archetype::ConstraintModel::ArchetypeSlot
-              end
-
-              it 's rm type name is EVALUATION' do
-                @archetype_slot.rm_type_name.should == 'EVALUATION'
-              end
-
-              it 's lower of occurrences should be 0' do
-                @archetype_slot.occurrences.lower.should be 0
-              end
-
-              it 's upper of occurrences should be 1' do
-                @archetype_slot.occurrences.upper.should be 1
-              end
-
-              context 'assertions' do
-                before(:all) do
-                  @includes = @archetype_slot.includes
-                end
-
-                context '1st assertion' do
-                  before(:all) do
-                    @assertion0 = @includes[0]
-                  end
-
-                  it 'assertion0 should be an instance of Assertion' do
-                    @assertion0.should be_an_instance_of OpenEHR::AM::Archetype::Assertion::Assertion
-                  end
-
-                  it 'expression type of assertion0 is Boolean' do
-                    @assertion0.expression.type.should == 'Boolean'
-                  end
-
-                  it 'expression value of assertion0 is /clinical_synopsis\.v1/' do
-                    @assertion0.expression.right_operand.item.pattern.should == '/clinical_synopsis\.v1/'
-                  end
-                end
-
-                context '2nd assertion' do
-                  before(:all) do
-                    @assertion1 = @includes[1]
-                  end
-
-                  it 'assertion1 is an instanse of Assertion' do
-                    @assertion1.should be_an_instance_of OpenEHR::AM::Archetype::Assertion::Assertion
-                  end
-
-                  it 'Assertion1 type is Boolean' do
-                    @assertion1.expression.type.should == 'Boolean'
-                  end
-
-                  it 'expression value of assertion1 is /problem\.v1/' do
-                    @assertion1.expression.right_operand.item.pattern.should ==
-                      '/problem\.v1/'
-                  end
-                end
-
-                context '3rd assertion' do
-                  before(:all) do
-                    @assertion2 = @includes[2]
-                  end
-
-                  it 'assertion2 is an instanse of Assertion' do
-                    @assertion2.should be_an_instance_of OpenEHR::AM::Archetype::Assertion::Assertion
-                  end
-
-                  it 'Assertion2 type is Boolean' do
-                    @assertion2.expression.type.should == 'Boolean'
-                  end
-
-                  it 'expression value of Assertion2 is /problem\.v1/' do
-                    @assertion2.expression.right_operand.item.pattern.should ==
-                      '/problem-diagnosis\.v1/'
-                  end
-                end
-
-                context '4th assertion' do
-                  before(:all) do
-                    @assertion3 = @includes[3]
-                  end
-
-                  it 'assertion3 is an instanse of Assertion' do
-                    @assertion3.should be_an_instance_of OpenEHR::AM::Archetype::Assertion::Assertion
-                  end
-
-                  it 'Assertion3 type is Boolean' do
-                    @assertion3.expression.type.should == 'Boolean'
-                  end
-
-                  it 'expression value of assertion3 is /problem\.v1/' do
-                    @assertion3.expression.right_operand.item.pattern.should ==
-                      '/problem-diagnosis-histological\.v1/'
-                  end
-                end
-
-                context '5th assertion' do
-                  before(:all) do
-                    @assertion4 = @includes[4]
-                  end
-
-                  it 'assertion4 is an instanse of Assertion' do
-                    @assertion4.should be_an_instance_of OpenEHR::AM::Archetype::Assertion::Assertion
-                  end
-
-                  it 'Assertion4 type is Boolean' do
-                    @assertion4.expression.type.should == 'Boolean'
-                  end
-
-                  it 'expression value of assertion4 is /problem\.v1/' do
-                    @assertion4.expression.right_operand.item.pattern.should ==
-                      '/problem-genetic\.v1/'
-                  end
-                end
-
-                context '6th assertion' do
-                  before(:all) do
-                    @assertion5 = @includes[5]
-                  end
-
-                  it 'assertion5 is an instanse of Assertion' do
-                    @assertion5.should be_an_instance_of OpenEHR::AM::Archetype::Assertion::Assertion
-                  end
-
-                  it 'Assertion5 type is Boolean' do
-                    @assertion5.expression.type.should == 'Boolean'
-                  end
-
-                  it 'expression value of assertion5 is /problem\.v1/' do
-                    @assertion5.expression.right_operand.item.pattern.should ==
-                      '/risk\.v1/'
-                  end
-                end
-
-                context '7th assertion(is null)' do
-                  it '7th assersion is nil' do
-                    @includes[6].should be_nil
-                  end
-                end
-              end
-            end
-          end
-        end #definition
-
-        context 'ontology section' do
-          before(:all) do
-            @archetype_ontology = @archetype.ontology
-          end
-
-          it 'is an ArchtypeOntology instance' do
-            @archetype_ontology.should be_an_instance_of OpenEHR::AM::Archetype::Ontology::ArchetypeOntology
-          end
-
-          it 'term_definitions parsed and assigned properly' do
-            @archetype_ontology.term_definition(:lang => 'en',
-               :code => 'at0000').items['text'].should == 'Summary'
-          end
-
-          it 'description term_definitions parsed and assigned properly' do
-            @archetype_ontology.term_definition(:lang => 'en',
-               :code => 'at0000').items['description'].should ==
-                 'A heading for conclusions and other evaluations'
-          end
-
-          it 'term_codes should be assigned properly' do
-            @archetype_ontology.term_codes.should == ['at0000']
-          end
-
-          it 'ArchetypeOntology has en lang' do
-            @archetype_ontology.should have_language 'en'
-          end
-        end
-      end
-    end
-  end
-end

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

@@ -1,176 +0,0 @@
-require File.dirname(__FILE__) + '/../../../spec_helper'
-include OpenEHR::Parser
-
-
-describe ADLParser do
-  before(:all) do
-    adl_dir = File.dirname(__FILE__) + '/adl14/'
-    adl_path_test_file = 'adl-test-car.paths.test.adl'
-    ap = ADLParser.new(adl_dir + adl_path_test_file)
-    @root = ap.parse.definition
-  end
-
-  it 'root path is /' do
-    @root.path.should == '/'
-  end
-
-  context 'wheels' do
-    before(:all) do
-     @wheels = @root.attributes[0]
-    end
-
-    it 'wheels path is /wheels' do
-      @wheels.path.should == '/wheels'
-    end
-
-    context 'first wheel' do
-      before(:all) do
-        @first_wheel = @wheels.children[0]
-      end
-
-      it 'path is /wheels[at0001]' do
-        @first_wheel.path.should == '/wheels[at0001]'
-      end
-
-      it 'description path is /wheels[at0001]/description' do
-        description = @first_wheel.attributes[0]
-        description.path.should == '/wheels[at0001]/description'
-      end
-
-      it 'wheel parts path is /wheels[at0001]/parts' do
-        wheel_parts = @first_wheel.attributes[1]
-        wheel_parts.path.should == '/wheels[at0001]/parts'
-      end
-
-      context 'parts node' do
-        before(:all) do
-          @parts_node = @first_wheel.attributes[1].children[0]
-        end
-        
-        it 'parts node path is /wheels[at0001]/parts[at0002]' do
-          @parts_node.path.should == '/wheels[at0001]/parts[at0002]'
-        end
-
-        context 'somthing of wheel part' do
-          before(:all) do
-            @something = @parts_node.attributes[0]
-          end
-
-          it 'something of WHEEL_PART path is /wheels[at0001]/parts[at0002]/something' do
-            @something.path.should == '/wheels[at0001]/parts[at0002]/something'
-          end
-        end
-
-        context 'somthing else of wheel part' do
-          before(:all) do
-            @something_else = @parts_node.attributes[1]
-          end
-
-          it 'something else of WHEEL_PART path is /wheels[at0001]/parts[at0002]/something_else' do
-            @something_else.path.should ==
-              '/wheels[at0001]/parts[at0002]/something_else'
-          end
-        end
-      end
-    end
-
-    context 'second wheel' do
-      before(:all) do
-        @second_wheel = @wheels.children[1]
-      end
-
-      it 'path is /wheels[at0003]' do
-        @second_wheel.path.should == '/wheels[at0003]'
-      end
-
-      it 'description path is /wheels[at0003]/description' do
-        description = @second_wheel.attributes[0]
-        description.path.should == '/wheels[at0003]/description'
-      end
-
-      it 'wheel parts path is /wheels[at0003]/parts' do
-        wheel_parts = @second_wheel.attributes[1]
-        wheel_parts.path.should == '/wheels[at0003]/parts'
-      end
-
-      context 'parts node' do
-        before(:all) do
-          @parts_node = @second_wheel.attributes[1].children[0]
-        end
-
-        it 'wheel parts node path is /wheels[at0003]/parts' do
-          @parts_node.path.should == '/wheels[at0003]/parts'
-        end
-
-        it 'wheel parts node target path is /wheels[at0001]/parts[at0002]' do
-          @parts_node.target_path.should == '/wheels[at0001]/parts[at0002]'
-        end
-      end
-    end
-
-    context 'third wheel' do
-      before(:all) do
-        @third_wheel = @wheels.children[2]
-      end
-
-      it 'path is /wheels[at0004]' do
-        @third_wheel.path.should == '/wheels[at0004]'
-      end
-
-      it 'description path is /wheels[at0004]/description' do
-        description = @third_wheel.attributes[0]
-        description.path.should == '/wheels[at0004]/description'
-      end
-
-      context 'parts node' do
-        before(:all) do
-          @parts_node = @third_wheel.attributes[1].children[0]
-        end
-
-        it 'parts node path is /wheels[at0004]/parts' do
-          @parts_node.path.should == '/wheels[at0004]/parts'
-        end
-
-        it 'parts node target path is /wheels[at0001]/parts[at0002]' do
-          @parts_node.target_path.should == '/wheels[at0001]/parts[at0002]'
-        end
-      end
-    end
-
-    context 'fourth wheel' do
-      before(:all) do
-        @fourth_wheel = @wheels.children[3]
-      end
-
-      it 'path is /wheels[at0005]' do
-        @fourth_wheel.path.should == '/wheels[at0005]'
-      end
-
-      it 'description path is /wheels[at0005]/description' do
-        description = @fourth_wheel.attributes[0]
-        description.path.should == '/wheels[at0005]/description'
-      end
-
-      context 'parts node' do
-        before(:all) do
-          @parts_node = @fourth_wheel.attributes[1].children[0]
-        end
-
-        it 'parts node path is /wheels[at0005]/parts' do
-          @parts_node.path.should == '/wheels[at0005]/parts'
-        end
-
-        it 'parts node target path is /engine[at0001]/parts[at0002]' do
-          @parts_node.target_path.should == '/engine[at0001]/parts[at0002]'
-        end
-      end
-    end
-
-    context 'fifhth wheel' do
-      it 'fifth wheel is nil' do
-        fifth_wheel = @wheels.children[4]
-        fifth_wheel.should be_nil
-      end
-    end
-  end
-end