Changeset 195

Timestamp:

Aug 14, 2009, 8:11:44 PM (15 years ago)

Author:

KOBAYASHI, Shinji

Message:

refs #54

Location:

ruby/branches/0.5

Files:

• lib/open_ehr/rm/data_structures/item_structure.rb (modified) (2 diffs)
• lib/open_ehr/rm/data_types/basic.rb (modified) (2 diffs)
• lib/tasks/rspec.rake (added)
• spec/lib/openehr/rm/data_structure/item_structure/item_list_spec.rb (modified) (2 diffs)

ruby/branches/0.5/lib/open_ehr/rm/data_structures/item_structure.rb

@@ -32 +32 @@
           attr_accessor :items
 
+          def initialize(args = {})
+            super(args)
+            self.items = args[:items]
+          end
+
           def item_count
             unless @items.nil?
@@ -39 +44 @@
             end
           end
+
+          def names
+            return @items.collect{|item| item.name}
+          end
+
+          def named_item(a_name)
+            @items.each do |item|
+              return item if item.name.value == a_name
+            end
+            retrun nil
+          end
+
+          def ith_item(i)
+            return @items[i]
+          end
+
+          def as_hierarchy
+            return Cluster.new(:name => @name,
+                               :archetype_node_id => @archetype_node_id,
+                               :items => @items)
+          end
         end
       end # of ItemStructure

ruby/branches/0.5/lib/open_ehr/rm/data_types/basic.rb

@@ -11 +11 @@
         class DataValue
           include OpenEhr::RM::Support::Definition::BasicDefinition
+          def ==(other)
+            return self.value == other.value
+          end
         end
 
@@ -25 +28 @@
             end
           end
+
           def value?
             @value == true

ruby/branches/0.5/spec/lib/openehr/rm/data_structure/item_structure/item_list_spec.rb

@@ -1 +1 @@
 require File.dirname(__FILE__) + '/../../../../../spec_helper'
 include OpenEhr::RM::DataStructures::ItemStructure
+include OpenEhr::RM::DataStructures::ItemStructure::Representation
 include OpenEhr::RM::DataTypes::Text
 
 describe ItemList do
   before(:each) do
+    items = %w{one two three}.collect do |n|
+      Element.new(:name => DvText.new(n),
+                  :archetype_node_id => 'test')
+    end
     item_list_name = DvText.new('item list')
     @item_list = ItemList.new(:name => item_list_name,
-                              :archetype_node_id => 'test')
+                              :archetype_node_id => 'test',
+                              :items => items)
+    
   end
 
@@ -14 +21 @@
   end
 
-  it 'count should be 0' do
-    @item_list.item_count.should equal 0
+  it 'count should be 3' do
+    @item_list.item_count.should be_equal 3
   end
 
-  it 'count should be change to 3' do
-    dummy_elements = [1,2,3]
-    @item_list.items = dummy_elements
-    @item_list.item_count.should equal 3
+  it 'count should be 0' do
+    @item_list.items = nil
+    @item_list.item_count.should be_equal 0
+  end
+
+
+  it 'retrieve the names of all items' do
+    @item_list.names.should == %w{one two three}.collect{|n| DvText.new(n)}
+  end
+
+  it 'retrieve the item with a name' do
+    @item_list.named_item('one').name.value.should == 'one'
+  end
+
+  it 'retrieve the ith item with number' do
+    @item_list.ith_item(1).name.value.should == 'two'
+  end
+
+  it 'generate cluster of items' do
+    @item_list.as_hierarchy.name.value.should == 'item list'
   end
 end