Changeset 372 for ruby/trunk/lib

Timestamp:

Dec 10, 2009, 6:17:17 PM (14 years ago)

Author:

KOBAYASHI, Shinji

Message:

refs #74 archetype
rails updated

Location:

ruby/trunk/lib/open_ehr

Files:

• am.rb (deleted)
• am/archetype.rb (moved) (moved from ruby/trunk/lib/open_ehr/am/archetype/archetype.rb ) (3 diffs)
• am/archetype/constraint_model.rb (moved) (moved from ruby/trunk/lib/open_ehr/am/archetype/constraint_model/archetype_constraint.rb ) (10 diffs)
• am/archetype/ontology.rb (modified) (1 diff)

ruby/trunk/lib/open_ehr/am/archetype.rb

@@ -1 @@
-require 'rm/support/terminology.rb'
+include OpenEHR::RM::Common::Resource
 
-module OpenEhr
+module OpenEHR
   module AM
     module Archetype
-      module ADL_Definition
+      module ADLDefinition
+        include OpenEHR::RM::Support::Terminology
 #        include OpenEHR::RM::Support::Terminology::OpenEHR_Code_Set_Identifier
-        include OpenEhr::RM::Support::Terminology
         CURRENT_ADL_VERSION = "1.4"
       end
 
-      class ARCHETYPE < OpenEhr::RM::Common::Resource::AuthoredResource
-        include ADL_Definition
-        attr_accessor :archetype_id, :concept_code, :is_controlled, :original_language, :parent_archtype_id, :uid
-
-        attr_reader :parent_id,:concept, :definition, :ontology
-        attr_accessor :adl_version,:description,:original_language
-        attr_accessor :revision_history, :translation
+      class Archetype < AuthoredResource
+        include ADLDefinition
+        attr_reader :archetype_id, :concept, :definition, :ontology
+        attr_accessor :uid, :adl_version, :parent_archetype_id, :invariants
 
         def initialize(args = {})
-          @adl_version = args[:adl_version] if args[:adl_version]
-          @archetype_id = args[:archetype_id] ? args[:archetype_id] : nil
-          @parent_id = args[:parent_id] if args[:parent_id]
-          @concept = args[:concept] if args[:concept]
-          @is_controled = args[:is_controled] if args[:is_controled]
-          @definition = args[:definition] if args[:definition]
-          @ontology = args[:ontology] if args[:ontology]
- #         loadMaps(definition)
-          super
+          super(args)
+          self.adl_version = args[:adl_version] 
+          self.archetype_id = args[:archetype_id]
+          self.uid = args[:uid]
+          self.concept = args[:concept]
+          self.parent_archetype_id = args[:parent_archetype_id]
+          self.definition = args[:definition]
+          self.ontology = args[:ontology]
+          self.invariants = args[:invariants]
+        end
+
+        def archetype_id=(archetype_id)
+          if archetype_id.nil?
+            raise ArgumentError, 'archetype_id is mandatory'
+          end
+          @archetype_id = archetype_id
+        end
+
+        def concept=(concept)
+          if concept.nil?
+            raise ArgumentError, 'concept is mandatory'
+          end
+          @concept = concept
+        end
+
+        def definition=(definition)
+          if definition.nil?
+            raise ArgumentError, 'definition is mandatory'
+          end
+          @definition = definition
+        end
+
+        def ontology=(ontology)
+          if ontology.nil?
+            raise ArgumentError, 'ontology is mandatory'
+          end
+          @ontology = ontology
+        end
+
+        def version
+          return @archetype_id.version_id
+        end
+
+        def short_concept_name
+          return @archetype_id.concept_name
         end
 
@@ -65 +98 @@
         end
 
-        def short_concept_name
-        end
-
         def specialisation_depth
         end
         
-        def version
-        end
-      end # end of ARCHETYPE
+      end # end of Archetype
       # original file:
       # ref_imple_eiffel/components/adl_parser/src/interface/adl_definition.e
@@ -80 +108 @@
       end
     end
-
-
-  end # end of AM
-end # end of OpenEHR
+  end # of AM
+end # of OpenEHR

ruby/trunk/lib/open_ehr/am/archetype/constraint_model.rb

@@ -1 +1 @@
 
-module OpenEhr
+module OpenEHR
   module AM
     module Archetype
-      module Constraint_Model
-        class ARCHETYPE_CONSTRAINT
-          
+      module ConstraintModel
+        class ArchetypeConstraint
+
         end
 
-        class CARDINALITY
+        class Cardinality
           attr_accessor :interval, :is_ordered, :is_unique
 
@@ -18 +18 @@
         end
 
-        class C_OBJECT < ARCHETYPE_CONSTRAINT
+        class CObject < ArchetypeConstraint
           attr_accessor :node_id, :occurrences, :rm_type_name
 
@@ -36 +36 @@
         end
 
-        class C_ATTRIBUTE < ARCHETYPE_CONSTRAINT
+        class CAttribute < ArchetypeConstraint
           attr_accessor :rm_attribute_name, :existence, :children
 
@@ -47 +47 @@
         end
 
-        class C_DEFINED_OBJECT < C_OBJECT
+        class CDefinedObject < CObject
           attr_accessor :assumed_value
           
@@ -56 +56 @@
         end
 
-        class C_PRIMITIVE_OBJECT < C_DEFINED_OBJECT
+        class CPrimitiveObject < CDefinedObject
           attr_accessor :item
 
@@ -65 +65 @@
         end
 
-        class C_COMPLEX_OBJECT < C_DEFINED_OBJECT
+        class CComplexObject < CDefinedObject
           attr_accessor :attributes, :attributes_valid
 
@@ -82 +82 @@
         end
 
-        class C_DOMAIN_TYPE < C_DEFINED_OBJECT
+        class CDomainType < CDefinedObject
           
         end
 
-        class C_REFERENCE_OBJECT < C_OBJECT
+        class CReferenceObject < CObject
         end
 
-        class ARCHETYPE_INTERNAL_REF < C_REFERENCE_OBJECT
+        class ArchetypeInternalRef < CReferenceObject
           attr_accessor :target_path
         end
 
-        class ARCHETYPE_SLOT < C_REFERENCE_OBJECT
+        class ArchetypeSlot < CReferenceObject
           attr_accessor :includes, :excludes
 
@@ -107 +107 @@
         end
 
-        class CONSTRAINT_REF < C_REFERENCE_OBJECT
+        class ConstantRef < CReferenceObject
           attr_accessor :reference
 
@@ -120 +120 @@
         end
 
-        class C_SINGLE_ATTRIBUTE < C_ATTRIBUTE
+        class CSingleAttribute < CAttribute
           attr_accessor :alternatives
 
@@ -129 +129 @@
         end
 
-        class C_MULTIPLE_ATTRIBUTE < C_ATTRIBUTE
+        class CMultipleAttribute < CAttribute
           attr_accessor :members, :cardinality
           

ruby/trunk/lib/open_ehr/am/archetype/ontology.rb

@@ -1 @@
-module OpenEhr
+module OpenEHR
   module AM
     module Archetype
       module Ontology
-        class ARCHETYPE_ONTOLOGY
+        class ArchetypeOntology
           attr_accessor :constraint_codes, :specialisation_depth
           attr_accessor :term_attribute_names, :term_codes