Contents

# $Id: test_obr_segment.rb 40 2007-06-30 01:29:19Z segfault $
$: << '../lib'
require 'test/unit'
require 'ruby-hl7'

class ObrSegment < Test::Unit::TestCase
  def setup
    @base = "OBR|2|^DMCRES|0000000567^RADIS1|37956^CT ABDOMEN^L|||199405021550|||||||||||||0000763|||||P||||||R/O TUMOR|202300^BAKER^MARK^E|||01^LOCHLEAR, JUDY"
  end

  def test_read
    obr = HL7::Message::Segment::OBR.new @base
    assert_equal( @base, obr.to_s )
    assert_equal( "2", obr.e1 )
    assert_equal( "2", obr.set_id )
    assert_equal( "^DMCRES", obr.placer_order_number )
    assert_equal( "0000000567^RADIS1", obr.filler_order_number )
    assert_equal( "37956^CT ABDOMEN^L", obr.priority )
  end

  def test_create
    obr = HL7::Message::Segment::OBR.new
    obr.set_id = 1
    assert_equal( "1", obr.set_id ) 
    obr.placer_order_number = "^DMCRES"
    assert_equal( "^DMCRES", obr.placer_order_number )
  end

end

Version data entries

2 entries across 2 versions & 1 rubygems

Version	Path
ruby-hl7-0.2.50	test/test_obr_segment.rb
ruby-hl7-0.2.44	test/test_obr_segment.rb