openehr 1.2.8 → 1.2.9

data/spec/lib/openehr/parser/adl14/openEHR-EHR-SECTION.findings.v1.adl

@@ -1,47 +0,0 @@
-archetype (adl_version=1.4)
-	openEHR-EHR-SECTION.findings.v1
-
-concept
-	[at0000]	-- Clinical findings
-language
-	original_language = <[ISO_639-1::en]>
-description
-	original_author = <
-		["name"] = <"Sam Heard">
-		["organisation"] = <"Ocean Informatics">
-		["date"] = <"9/01/2007">
-		["email"] = <"sam.heard@oceaninformatics.biz">
-	>
-	details = <
-		["en"] = <
-			language = <[ISO_639-1::en]>
-			purpose = <"A heading to contain clinical findings">
-			use = <"A section which only contains observations">
-			keywords = <"findings", ...>
-			misuse = <"">
-		>
-	>
-	lifecycle_state = <"Initial">
-	other_contributors = <>
-
-definition
-	SECTION[at0000] matches {	-- Clinical findings
-		items cardinality matches {0..*; unordered} matches {
-			allow_archetype OBSERVATION occurrences matches {0..1} matches {
-				include
-					archetype_id/value matches {/.*/}
-			}
-		}
-	}
-
-ontology
-	term_definitions = <
-		["en"] = <
-			items = <
-				["at0000"] = <
-					description = <"The findings at this contact">
-					text = <"Clinical findings">
-				>
-			>
-		>
-	>

data/spec/lib/openehr/parser/adl14/openEHR-EHR-SECTION.reason_for_encounter.v1.adl

@@ -1,51 +0,0 @@
-archetype (adl_version=1.4)
-	openEHR-EHR-SECTION.reason_for_encounter.v1
-
-concept
-	[at0000]	-- Reason for encounter
-language
-	original_language = <[ISO_639-1::en]>
-description
-	original_author = <
-		["name"] = <"Sam Heard">
-		["organisation"] = <"Ocean Informatics">
-		["date"] = <"9/01/2007">
-		["email"] = <"sam.heard@oceaninformatics.biz">
-	>
-	details = <
-		["en"] = <
-			language = <[ISO_639-1::en]>
-			purpose = <"A heading to display the reason for encounter">
-			use = <"To record a symptom, problem or other reason for encounter">
-			keywords = <"rfe", "reason">
-			misuse = <"">
-		>
-	>
-	lifecycle_state = <"Initial">
-	other_contributors = <>
-
-definition
-	SECTION[at0000] matches {	-- Reason for encounter
-		items cardinality matches {0..*; unordered} matches {
-			allow_archetype OBSERVATION occurrences matches {1..*} matches {
-				include
-					archetype_id/value matches {/.*/}
-			}
-			allow_archetype EVALUATION occurrences matches {0..1} matches {
-				include
-					archetype_id/value matches {/.*/}
-			}
-		}
-	}
-
-ontology
-	term_definitions = <
-		["en"] = <
-			items = <
-				["at0000"] = <
-					description = <"The reason(s) for this particular encounter">
-					text = <"Reason for encounter">
-				>
-			>
-		>
-	>

data/spec/lib/openehr/parser/adl14/openEHR-EHR-SECTION.summary.v1.adl

@@ -1,52 +0,0 @@
-archetype (adl_version=1.4)
-	openEHR-EHR-SECTION.summary.v1
-
-concept
-	[at0000]	-- Summary
-language
-	original_language = <[ISO_639-1::en]>
-description
-	original_author = <
-		["name"] = <"Sam Heard">
-		["organisation"] = <"Ocean Informatics">
-		["date"] = <"9/01/2007">
-		["email"] = <"sam.heard@oceaninformatics.biz">
-	>
-	details = <
-		["en"] = <
-			language = <[ISO_639-1::en]>
-			purpose = <"A heading containing summary information based on particular evaluation entries">
-			use = <"A heading for organising clinical data under a heading of summary">
-			keywords = <"review", "conclusions", "risk">
-			misuse = <"">
-		>
-	>
-	lifecycle_state = <"Initial">
-	other_contributors = <>
-
-definition
-	SECTION[at0000] matches {	-- Summary
-		items cardinality matches {0..*; unordered} matches {
-			allow_archetype EVALUATION occurrences matches {0..1} matches {
-				include
-					archetype_id/value matches {/clinical_synopsis\.v1/}
-					archetype_id/value matches {/problem\.v1/}
-					archetype_id/value matches {/problem-diagnosis\.v1/}
-					archetype_id/value matches {/problem-diagnosis-histological\.v1/}
-					archetype_id/value matches {/problem-genetic\.v1/}
-					archetype_id/value matches {/risk\.v1/}
-			}
-		}
-	}
-
-ontology
-	term_definitions = <
-		["en"] = <
-			items = <
-				["at0000"] = <
-					description = <"A heading for conclusions and other evaluations">
-					text = <"Summary">
-				>
-			>
-		>
-	>

data/spec/lib/openehr/parser/adl14/openEHR-EHR-SECTION.vital_signs.v1.adl

@@ -1,54 +0,0 @@
-archetype (adl_version=1.4)
-	openEHR-EHR-SECTION.vital_signs.v1
-
-concept
-	[at0000]	-- Vital signs
-language
-	original_language = <[ISO_639-1::en]>
-description
-	original_author = <
-		["name"] = <"Sam Heard">
-		["organisation"] = <"Ocean Informatics">
-		["date"] = <"14/03/2006">
-		["email"] = <"sam.heard@oceaninformatics.biz">
-	>
-	details = <
-		["en"] = <
-			language = <[ISO_639-1::en]>
-			purpose = <"A heading or section which can only contain observations considered to be vital signs. This group of observations is a common set in medicine, and while these often occur separately in health records, when they are measured together this is a significant assessment of wellbeing.">
-			use = <"An organisational heading for vital signs">
-			keywords = <"blood pressure", "temperature", "pulse", "oxygen saturation", "respirations", "observations", "vital", "signs">
-			misuse = <"Does not need to be used to record these entries separately">
-		>
-	>
-	lifecycle_state = <"AuthorDraft">
-	other_contributors = <>
-
-definition
-	SECTION[at0000] matches {	-- Vital signs
-		items cardinality matches {0..*; unordered} matches {
-			allow_archetype OBSERVATION occurrences matches {1..5} matches {
-				include
-					archetype_id/value matches {/blood_pressure\.v1/}
-					archetype_id/value matches {/heart_rate-pulse\.v1/}
-					archetype_id/value matches {/respiration\.v1/}
-					archetype_id/value matches {/body_temperature\.v1/}
-					archetype_id/value matches {/oximetry\.v1/}
-					archetype_id/value matches {/heart_rate\.v1/}
-				exclude
-					archetype_id/value matches {/.*/}
-			}
-		}
-	}
-
-ontology
-	term_definitions = <
-		["en"] = <
-			items = <
-				["at0000"] = <
-					description = <"A group of observations that are recorded at the same time and record the blood pressure, pulse, temperature and other readings">
-					text = <"Vital signs">
-				>
-			>
-		>
-	>

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

@@ -1,42 +0,0 @@
-require File.dirname(__FILE__) + '/../../../spec_helper'
-require File.dirname(__FILE__) + '/parser_spec_helper'
-include OpenEHR::AM::Archetype
-include OpenEHR::AM::Archetype::ConstraintModel
-
-describe ADLParser do
-  context 'test with slash in comment after use node' do
-    before(:all) do
-      @archetype = adl14_archetype('adl-test-entry.archetype_internal_ref2.test.adl')
-    end
-
-    it 'is an instance of Archetype' do
-      @archetype.should be_an_instance_of Archetype
-    end
-
-    context 'attribute2' do
-      before(:all) do
-        @attribute2 = @archetype.definition.attributes[1].children[0]
-      end
-
-      it 'is ArchetypeInternalRef' do
-        @attribute2.should be_an_instance_of ArchetypeInternalRef
-      end
-
-      it 's occurrences upper 2' do
-        @attribute2.occurrences.upper.should be 2
-      end
-
-      it 's occurrences lower 1' do
-        @attribute2.occurrences.lower.should be 1
-      end
-
-      it 's path is /attribute2' do
-        @attribute2.path.should == '/attribute2'
-      end
-
-      it 's target_path is /attribute1' do
-        @attribute2.target_path.should == '/attribute1'
-      end
-    end
-  end
-end

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

@@ -1,125 +0,0 @@
-require File.dirname(__FILE__) + '/../../../spec_helper'
-require File.dirname(__FILE__) + '/parser_spec_helper'
-include OpenEHR::Parser
-include OpenEHR::AM::Archetype
-include OpenEHR::AM::Archetype::ConstraintModel
-
-describe ADLParser do
-  context 'ArchetypeInternalRef behavior test' do
-    before(:all) do
-      target_adl_file = 'adl-test-entry.archetype_internal_ref.test.adl'
-      ap = ADLParser.new(ADL14DIR + target_adl_file)
-      @archetype = ap.parse
-    end
-
-    it 'Archetype instance is generated' do
-      @archetype.should be_instance_of Archetype
-    end
-
-    context 'attribute 1 node' do
-      before(:all) do
-        @node = @archetype.definition.attributes[0]
-      end
-
-      it 's path is attribute 1' do
-        @node.path.should == '/attribute1'
-      end
-
-      it 's rm attribute name is SECTION' do
-        @node.rm_attribute_name.should == 'attribute1'
-      end
-
-      context 'children' do
-        before(:all) do
-          @child = @node.children[0]
-        end
-
-        it 's rm type name is SECTION' do
-          @child.rm_type_name.should == 'SECTION'
-        end
-      end
-    end
-
-    context 'attrubute 2 node' do
-      before(:all) do
-        @node = @archetype.definition.attributes[1]
-      end
-
-      it 's path is attribute 2' do
-        @node.path.should == '/attribute2'
-      end
-
-      context 'child' do
-        before(:all) do
-          @child = @node.children[0]
-        end
-
-        it 'is instance of ArchetypeInternalRef' do
-          @child.should be_an_instance_of ArchetypeInternalRef
-        end
-
-        it 's target path is /attribute1' do
-          @child.target_path.should == '/attribute1'
-        end
-
-        it 'path is /attribute2' do
-          @child.path.should == '/attribute2'
-        end
-
-        it 's occurrences upper is 2' do
-          @child.occurrences.upper.should be 2
-        end
-
-        it 's occurrences lower is 1' do
-          @child.occurrences.lower.should be 1
-        end
-      end
-
-      context 'attribute 3 node' do
-        before(:all) do
-          @node = @archetype.definition.attributes[2]
-        end
-
-        it 's path is /attribute3' do
-          @node.path.should == '/attribute3'
-        end
-
-        context 'child1' do
-          before(:all) do
-            @child1 = @node.children[0]
-          end
-
-          it 's path is /attribute3' do
-            @child1.path.should == '/attribute3'
-          end
-
-          it 's target path is /items[at0001]' do
-            @child1.target_path.should == '/items[at0001]'
-          end
-
-          it 's rm type name is COMPLEX_OBJECT' do
-            @child1.rm_type_name.should == 'COMPLEX_OBJECT'
-          end
-        end
-
-        context 'child2' do
-          before(:all) do
-            @child2 = @node.children[1]
-          end
-
-          it 's path is /attribute3' do
-            @child2.path.should == '/attribute3'
-          end
-
-          it 's target path is /items[at0002]' do
-            @child2.target_path.should == '/items[at0002]'
-          end
-
-          it 's rm_type_name is COMPLEX_OBJECT' do
-            @child2.rm_type_name.should == 'COMPLEX_OBJECT'
-          end
-        end
-      end
-    end
-  end
-end

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

@@ -1,258 +0,0 @@
-require File.dirname(__FILE__) + '/../../../spec_helper'
-require File.dirname(__FILE__) + '/parser_spec_helper'
-include OpenEHR::AM::Archetype
-include OpenEHR::AM::Archetype::ConstraintModel
-
-describe ADLParser do
-  context 'ArchetypeInternalRef with generics' do
-    before(:all) do
-      @archetype = adl14_archetype('adl-test-SOME_TYPE.generic_type_use_node.draft.adl')
-    end
-
-    it 'is a instance of Archetype' do
-      @archetype.should be_an_instance_of Archetype
-    end
-
-    context 'interval_attr1 node' do
-      before(:all) do
-        @node = @archetype.definition.attributes[0].children[0]
-      end
-
-     
-      it 's path is /iterval_attr[at0001]' do
-        @node.path.should == '/interval_attr[at0001]'
-      end
-
-      it 's rm type dis INTERVAL<QUANTITY>' do
-        @node.rm_type_name.should == 'INTERVAL<QUANTITY>'
-      end
-
-      context 'attributes' do
-        before(:all) do
-          @attributes = @node.attributes
-        end
-
-        context 'lower attribute' do
-          before(:all) do
-            @attribute = @attributes[0]
-          end
-
-          it 'path is /interval_attr[at0001]/lower' do
-            @attribute.path.should == '/interval_attr[at0001]/lower'
-          end
-
-          context 'lower node' do
-            before(:all) do
-              @lower = @attribute.children[0]
-            end
-
-            it 'rm type name is QUANTITY' do
-              @lower.rm_type_name.should == 'QUANTITY'
-            end
-
-            context 'lower attributes' do
-              before(:all) do
-                @lower_attributes = @lower.attributes
-              end
-
-              context 'property' do
-                before(:all) do
-                  @property = @lower_attributes[0]
-                end
-
-                it 's path is /interval_attr[at0001]/lower/property' do
-                  @property.path.should == '/interval_attr[at0001]/lower/property'
-                end
-
-                it 's rm attribute name is property' do
-                  @property.rm_attribute_name.should == 'property'
-                end
-
-                it 'is temprature' do
-                  @property.children[0].list.should == ['temperature']
-                end
-              end
-
-              context 'unit' do
-                before(:all) do
-                  @unit = @lower_attributes[1]
-                end
-
-                it 's rm_attribute_name is unit' do
-                  @unit.rm_attribute_name.should == 'unit'
-                end
-
-                it 'matches C' do
-                  @unit.children[0].list.should == ['C']
-                end
-              end
-
-              context 'magnitude' do
-                before(:all) do
-                  @magnitude = @lower_attributes[2]
-                end
-
-                it 's rm_attribute_name is magnitude' do
-                  @magnitude.rm_attribute_name.should == 'magnitude'
-                end
-
-                it 's lower is 37.0' do
-                  @magnitude.children[0].range.lower.should == 37.0
-                end
-
-                it 'is lower included' do
-                  @magnitude.children[0].range.should be_lower_included
-                end
-
-                it 'is upper unbounded' do
-                  @magnitude.children[0].range.should be_upper_unbounded
-                end
-              end
-            end
-          end
-        end
-
-        context 'upper attributes' do
-          before(:all) do
-            @attribute = @attributes[1]
-          end
-          
-          it 'path is /interval_attr[at0001]/lower' do
-            @attribute.path.should == '/interval_attr[at0001]/upper'
-          end
-
-          context 'upper node' do
-            before(:all) do
-              @upper = @attribute.children[0]
-            end
-
-            it 'rm type name is QUANTITY' do
-              @upper.rm_type_name.should == 'QUANTITY'
-            end
-
-            context 'upper attributes' do
-              before(:all) do
-                @upper_attributes = @upper.attributes
-              end
-
-              context 'property' do
-                before(:all) do
-                  @property = @upper.attributes[0]
-                end
-
-                it 's path is /interval_attr[at0001]/upper/property' do
-                  @property.path.should == '/interval_attr[at0001]/upper/property'
-                end
-
-                it 's rm attribute name is property' do
-                  @property.rm_attribute_name.should == 'property'
-                end
-
-                it 'matches [temperature]' do
-                  @property.children[0].list.should == ['temperature']
-                end
-              end
-
-              context 'unit' do
-                before(:all) do
-                  @unit = @upper_attributes[1]
-                end
-
-                it 's rm_attribute_name is unit' do
-                  @unit.rm_attribute_name.should == 'unit'
-                end
-
-                it 's matches C' do
-                  @unit.children[0].list.should == ['C']
-                end
-              end
-
-              context 'magnitude' do
-                before(:all) do
-                  @magnitude = @upper_attributes[2]
-                end
-
-                it 's rm_attribute_name is magnitude' do
-                  @magnitude.rm_attribute_name.should == 'magnitude'
-                end
-
-                it 's magnitude lower is 39.0' do
-                  @magnitude.children[0].range.lower.should == 39.0
-                end
-
-                it 's magnitude lower included' do
-                  @magnitude.children[0].range.should be_lower_included
-                end
-
-                it 's upper unbounded' do
-                  @magnitude.children[0].range.should be_upper_unbounded
-                end
-              end
-            end
-          end
-        end
-        context 'lower_included attribute' do
-          before(:all) do
-            @attribute = @attributes[2]
-          end
-
-          it 's path is /interval_attr[at0001]/lower_included' do
-            @attribute.path.should == '/interval_attr[at0001]/lower_included'
-          end
-
-          context 'lower_included node' do
-            before(:all) do
-              @lower_included = @attribute.children[0]
-            end
-
-            it 'matches true valid' do
-              @lower_included.should be_true_valid
-            end
-          end
-        end
-
-        context 'upper_included attribute' do
-          before(:all) do
-            @attribute = @attributes[3]
-          end
-
-          it 's path is /interval_attr[at0001]/upper_included' do
-            @attribute.path.should == '/interval_attr[at0001]/upper_included'
-          end
-
-          context 'upper_include node' do
-            before(:all) do
-              @upper_included = @attribute.children[0]
-            end
-
-            it 'matches true valid' do
-              @upper_included.should be_true_valid
-            end
-          end
-        end
-      end
-    end
-
-    context 'interval_attr2 node' do
-      before(:all) do
-        @node = @archetype.definition.attributes[1].children[0]
-      end
-
-      it 'is an instance of ArchetypeInternalRef' do
-        @node.should be_an_instance_of ArchetypeInternalRef
-      end
-
-      it 's rm type name is INTERVAL<QUANTITY>' do
-        @node.rm_type_name.should == 'INTERVAL<QUANTITY>'
-      end
-
-      it 's target path is /interval_attr[at0001]' do
-        @node.target_path.should == '/interval_attr[at0001]'
-      end
-
-      it 's path is /interval_attr2' do
-        @node.path.should == '/interval_attr2'
-      end
-    end
-  end
-end