require File.dirname(__FILE__) + '/../../../../../../spec_helper'
require File.dirname(__FILE__) + '/shared_examples_spec'
include OpenEHR::RM::Composition::Content::Entry
include OpenEHR::RM::DataTypes::Text
include OpenEHR::RM::DataTypes::Quantity::DateTime
include OpenEHR::RM::DataTypes::Encapsulated

describe Instruction do
  it_should_behave_like 'entry'

  before(:each) do
    narrative = DvText.new(:value => 'instruction test')
    activities = stub(Array, :size => 5, :empty? => false)
    expiry_time = DvDateTime.new(:value => '2009-11-18T20:58:34')
    wf_definition = stub(DvParsable, :value => 'behavior driven')
    @instruction= Instruction.new(:archetype_node_id => 'at0001',
                                  :name => @name,
                                  :language => @language,
                                  :encoding => @encoding,
                                  :subject => @subject,
                                  :narrative => narrative,
                                  :activities => activities,
                                  :expiry_time => expiry_time,
                                  :wf_definition => wf_definition)
  end

  it 'should be an instance of Instruction' do
    @instruction.should be_an_instance_of Instruction
  end

  it 'narrative should be assigned properly' do
    @instruction.narrative.value.should == 'instruction test'
  end

  it 'should raise ArgumentError when narrative is assined with nil' do
    lambda {
      @instruction.narrative = nil
    }.should raise_error ArgumentError
  end

  it 'activities should be assigned properly' do
    @instruction.activities.size.should be_equal 5
  end

  it 'should raise ArgumentError with empty activities' do
    lambda {
      @instruction.activities = [ ]
    }.should raise_error ArgumentError
  end

  it 'expiry_time should be assigned properly' do
    @instruction.expiry_time.value.should == '2009-11-18T20:58:34'
  end

  it 'wf_definition should be assigned properly' do
    @instruction.wf_definition.value.should == 'behavior driven'
  end
end