open_ehr 0.9.1 → 0.9.2

data/spec/lib/open_ehr/parser/adl14/openEHR-EHR-CLUSTER.auscultation.v1.adl

@@ -0,0 +1,48 @@
+archetype (adl_version=1.4)
+	openEHR-EHR-CLUSTER.auscultation.v1
+
+concept
+	[at0000]	-- Auscultation
+language
+	original_language = <[ISO_639-1::en]>
+
+definition
+	CLUSTER[at0000] matches {	-- Auscultation
+		items cardinality matches {0..*; unordered} matches {
+			CLUSTER[at0002] occurrences matches {0..1} matches {	-- Findings
+				items cardinality matches {0..*; unordered} matches {
+					CLUSTER[at0009] occurrences matches {0..1} matches {	-- Bowel sounds
+						items cardinality matches {0..*; unordered} matches {
+							ELEMENT[at0074] occurrences matches {0..*} matches {	-- Specific Findings
+								value matches {
+									DV_CODED_TEXT matches {
+										defining_code matches {
+											[local::
+											at0078, 	-- Absent bowel sounds
+											at0079, 	-- Decreased bowel sounds
+											at0080, 	-- Increased bowel sounds
+											at0081]	-- Tinkling bowel sounds
+										}
+									}
+								}
+							}
+							use_node ELEMENT /items[at0004]	-- /items[Clinical Description]
+						}
+					}
+					
+				}
+			}
+		}
+	}
+
+ontology
+	term_definitions = <
+		["en"] = <
+			items = <
+				["at0000"] = <
+					text = <"Auscultation">
+					description = <"Findings on Auscultation">
+				>				
+			>
+		>
+	>

data/spec/lib/open_ehr/parser/adl14/openEHR-EHR-EVALUATION.columna_vertebral.v1.adl

@@ -0,0 +1,85 @@
+archetype (adl_version=1.4)
+	openEHR-EHR-EVALUATION.columna_vertebral.v1
+
+concept
+	[at0000]	-- Columna vertebral
+language
+	original_language = <[ISO_639-1::es]>
+description
+	original_author = <
+		["name"] = <"">
+	>
+	details = <
+		["es"] = <
+			language = <[ISO_639-1::es]>
+			purpose = <"Evaluacion de columna vertebral">
+			use = <"Evaluacion de columna vertebral">
+			misuse = <"">
+		>
+	>
+	lifecycle_state = <"0">
+	other_contributors = <>
+	other_details = <
+		["references"] = <"">
+		["MD5-CAM-1.0.1"] = <"0CD148BEA5220C93A938A3038D526998">
+	>
+
+definition
+	EVALUATION[at0000] matches {	-- Columna vertebral
+		data matches {
+			ITEM_LIST[at0001] matches {	-- Lista
+				items cardinality matches {0..*; unordered} matches {
+					ELEMENT[at0002] occurrences matches {0..1} matches {	-- Exploracion clinica cervical anormal
+						value matches {
+							DV_BOOLEAN matches {
+								value matches {True, False; True}
+							}
+						}
+					}
+					ELEMENT[at0003] occurrences matches {0..1} matches {	-- Indicacion de collar cervical
+						value matches {
+							DV_CODED_TEXT matches {
+								defining_code matches {
+									[local::
+									at0004, 	-- Si
+									at0005]	-- No
+								}
+							}
+						}
+					}
+				}
+			}
+		}
+	}
+
+ontology
+	term_definitions = <
+		["es"] = <
+			items = <
+				["at0000"] = <
+					text = <"Columna vertebral">
+					description = <"Columna vertebral">
+				>
+				["at0001"] = <
+					text = <"Lista">
+					description = <"@ internal @">
+				>
+				["at0002"] = <
+					text = <"Exploracion clinica cervical anormal">
+					description = <"Exploracion clinica cervical anormal">
+				>
+				["at0003"] = <
+					text = <"Indicacion de collar cervical">
+					description = <"Indicacion de collar cervical">
+				>
+				["at0004"] = <
+					text = <"Si">
+					description = <"hay indicacion de collar cervical">
+				>
+				["at0005"] = <
+					text = <"No">
+					description = <"no hay indicacion de collar cervical">
+				>
+			>
+		>
+	>

data/spec/lib/open_ehr/parser/adl14/openEHR-EHR-OBSERVATION.testassumedvalue.v1.adl

@@ -0,0 +1,99 @@
+archetype (adl_version=1.4)
+	openEHR-EHR-OBSERVATION.testassumedvalue.v1
+
+concept
+	[at0000]	-- Test assumed value
+language
+	original_language = <[ISO_639-1::en]>
+description
+	original_author = <
+		["name"] = <"">
+	>
+	details = <
+		["en"] = <
+			language = <[ISO_639-1::en]>
+			purpose = <"">
+			use = <"">
+			misuse = <"">
+		>
+	>
+	lifecycle_state = <"0">
+	other_contributors = <>
+	other_details = <
+		["references"] = <"">
+		["MD5-CAM-1.0.1"] = <"0B09C5A77713C376B458BDB09F83F018">
+	>
+
+definition
+	OBSERVATION[at0000] matches {	-- Test assumed value
+		data matches {
+			HISTORY[at0001] matches {	-- Event Series
+				events cardinality matches {1..*; unordered} matches {
+					EVENT[at0002] occurrences matches {0..1} matches {	-- Any event
+						data matches {
+							ITEM_TREE[at0003] matches {	-- Tree
+								items cardinality matches {0..*; unordered} matches {
+									ELEMENT[at0004] occurrences matches {0..1} matches {	-- New element
+										value matches {
+											DV_BOOLEAN matches {
+												value matches {True, False; True}
+											}
+										}
+									}
+								}
+							}
+						}
+						state matches {
+							ITEM_TREE[at0005] matches {	-- Tree
+								items cardinality matches {0..*; unordered} matches {
+									ELEMENT[at0006] occurrences matches {0..1} matches {	-- New element
+										value matches {
+											DV_BOOLEAN matches {
+												value matches {True, False; True}
+											}
+										}
+									}
+								}
+							}
+						}
+					}
+				}
+			}
+		}
+	}
+
+ontology
+	term_definitions = <
+		["en"] = <
+			items = <
+				["at0000"] = <
+					text = <"Test assumed value">
+					description = <"unknown">
+				>
+				["at0001"] = <
+					text = <"Event Series">
+					description = <"@ internal @">
+				>
+				["at0002"] = <
+					text = <"Any event">
+					description = <"*">
+				>
+				["at0003"] = <
+					text = <"Tree">
+					description = <"@ internal @">
+				>
+				["at0004"] = <
+					text = <"New element">
+					description = <"*">
+				>
+				["at0005"] = <
+					text = <"Tree">
+					description = <"@ internal @">
+				>
+				["at0006"] = <
+					text = <"New element">
+					description = <"*">
+				>
+			>
+		>
+	>

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

@@ -8,7 +8,7 @@ include OpenEHR::AM::Archetype::Ontology
 describe ADLParser do
 
   before (:all) do
-    @adl_dir = File.dirname(__FILE__) + '/adl/'
+    @adl_dir = File.dirname(__FILE__) + '/adl14/'
   end
 
   context 'openEHR-EHR-SECTION-summary.v1.adl' do
@@ -39,7 +39,7 @@ describe ADLParser do
           @archetype.adl_version.should == '1.4'
         end
 
-        it 'concept should be at0000]' do
+        it 'concept should be at0000' do
           @archetype.concept.should == 'at0000'
         end
 

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

@@ -0,0 +1,180 @@
+require File.dirname(__FILE__) + '/../../../spec_helper'
+include OpenEHR::Parser
+include OpenEHR::AM::Archetype
+include OpenEHR::AM::Archetype::ConstraintModel
+include OpenEHR::AM::Archetype::Assertion
+include OpenEHR::AM::Archetype::Ontology
+
+describe ADLParser do
+  before(:all) do
+    adl_dir = File.dirname(__FILE__) + '/adl14/'
+    adl_path_test_file = 'adl-test-car.paths.test.adl'
+    ap = OpenEHR::Parser::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