ruby-hl7 1.3.2 → 1.4.0

data/spec/default_segment_spec.rb

@@ -1,31 +0,0 @@
-# encoding: UTF-8
-require 'spec_helper'
-
-describe HL7::Message::Segment::Default do
-  context 'general' do
-
-    before :all do
-      @base_msa = "MSA|AR|ZZ9380 ERR"
-    end
-
-    it 'stores an existing segment' do
-      seg = HL7::Message::Segment::Default.new( @base_msa )
-      expect(seg.to_s).to eq @base_msa
-    end
-
-    it 'converts to a string' do
-      seg = HL7::Message::Segment::Default.new( @base_msa )
-      expect(seg.to_s).to eq @base_msa
-      expect(seg.to_hl7).to eq seg.to_s
-    end
-
-    it 'creates a raw segment' do
-      seg = HL7::Message::Segment::Default.new
-      seg.e0 = "NK1"
-      seg.e1 = "INFO"
-      seg.e2 = "MORE INFO"
-      seg.e5 = "LAST INFO"
-      expect(seg.to_s).to eq "NK1|INFO|MORE INFO|||LAST INFO"
-    end
-  end
-end

data/spec/dg1_spec.rb

@@ -1,42 +0,0 @@
-# encoding: UTF-8
-require "spec_helper"
-
-describe HL7::Message::Segment::DG1 do
-  context "reading" do
-    let(:base_string) do
-      "DG1|1|I9|71596^OSTEOARTHROS NOS-L/LEG ^I9|OSTEOARTHROS NOS-L/LEG |20170615140551-0800||A|"
-    end
-    let(:segment){ HL7::Message::Segment::DG1.new(base_string) }
-
-    it "allows access to an DG1 segment" do
-      expect(segment.set_id).to eq("1")
-      expect(segment.diagnosis_coding_method).to eq("I9")
-      expect(segment.diagnosis_code).to eq("71596^OSTEOARTHROS NOS-L/LEG ^I9")
-      expect(segment.diagnosis_description).to eq("OSTEOARTHROS NOS-L/LEG ")
-      expect(segment.diagnosis_date_time).to eq("20170615140551-0800")
-      expect(segment.diagnosis_type).to eq("")
-      expect(segment.major_diagnostic_category).to eq("A")
-      expect(segment.diagnosis_related_group).to eq("")
-      expect(segment.drg_approval_indicator).to eq(nil)
-      expect(segment.drg_grouper_review_code).to eq(nil)
-      expect(segment.outlier_type).to eq(nil)
-      expect(segment.outlier_days).to eq(nil)
-      expect(segment.outlier_cost).to eq(nil)
-      expect(segment.grouper_version_and_type).to eq(nil)
-      expect(segment.diagnosis_priority).to eq(nil)
-      expect(segment.diagnosis_clinician).to eq(nil)
-      expect(segment.diagnosis_classification).to eq(nil)
-      expect(segment.confidential_indicator).to eq(nil)
-      expect(segment.attestation_date_time).to eq(nil)
-    end
-  end
-
-  context "creating" do
-    let(:segment){ HL7::Message::Segment::DG1.new }
-
-    it "allows creation of an DGH segment" do
-      segment.set_id = "2"
-      expect(segment.set_id).to eq("2")
-    end
-  end
-end

data/spec/dynamic_segment_def_spec.rb

@@ -1,37 +0,0 @@
-# encoding: UTF-8
-require 'spec_helper'
-
-describe 'dynamic segment definition' do
-  context 'general' do
-    it 'accepts a block with a parameter' do
-      seg = HL7::Message::Segment.new do |s|
-        s.e0 = "MSK"
-        s.e1 = "1234"
-        s.e2 = "5678"
-      end
-
-      expect(seg.to_s).to eq "MSK|1234|5678"
-    end
-
-    it 'accepts a block without a parameter' do
-      seg = HL7::Message::Segment.new do
-        e0 "MSK"
-        e1 "1234"
-        e2 "5678"
-      end
-
-      expect(seg.to_s).to eq "MSK|1234|5678"
-    end
-
-    it "doesn't pollute the caller namespace" do
-      seg = HL7::Message::Segment.new do |s|
-        s.e0 = "MSK"
-        s.e1 = "1234"
-        s.e2 = "5678"
-      end
-
-      expect { e3 "TEST" }.to raise_error(NoMethodError)
-      expect(seg.to_s).to eq "MSK|1234|5678"
-    end
-  end
-end

data/spec/err_segment_spec.rb

@@ -1,26 +0,0 @@
-# encoding: UTF-8
-require 'spec_helper'
-
-describe HL7::Message::Segment::ERR do
-  context 'general' do
-    before :all do
-      @base_err = 'ERR||OBR^1|100^Segment sequence error^HL70357|E|||Missing required OBR segment|Email help desk for further information on this error||||^NET^Internet^helpdesk@hl7.org'
-    end
-
-    it 'creates an ERR segment' do
-      expect do
-        err = HL7::Message::Segment::ERR.new( @base_err )
-        expect(err).not_to be_nil
-        expect(err.to_s).to eq @base_err
-      end.not_to raise_error
-    end
-
-    it 'allows access to an ERR segment' do
-      expect do
-        err = HL7::Message::Segment::ERR.new( @base_err )
-        expect(err.severity).to eq 'E'
-        expect(err.error_location).to eq 'OBR^1'
-      end.not_to raise_error
-    end
-  end
-end

data/spec/evn_segment_spec.rb

@@ -1,23 +0,0 @@
-# encoding: UTF-8
-require 'spec_helper'
-
-describe HL7::Message::Segment::EVN do
-  context 'general' do
-    before :all do
-      @base = "EVN|A04|20060705000000"
-    end
-
-    it 'allows access to an EVN segment' do
-      evn = HL7::Message::Segment::EVN.new @base
-      expect(evn.type_code).to eq "A04"
-    end
-
-    it 'allows creation of an EVN segment' do
-      evn = HL7::Message::Segment::EVN.new
-      evn.event_facility="A Facility"
-      expect(evn.event_facility).to eq 'A Facility'
-      evn.recorded_date = Date.new 2001,2,3
-      expect(evn.recorded_date).to eq "20010203"
-    end
-  end
-end

data/spec/ft1_segment_spec.rb

@@ -1,35 +0,0 @@
-# encoding: UTF-8
-require 'spec_helper'
-
-describe HL7::Message::Segment::FT1 do
-  context 'general' do
-    before :all do
-      @base_ft1 = 'FT1|1|||20180705|20180705|||Description||1||||||123456^The Location|||R45.82^Worries~H18.892^Other specified disorders of cornea|1043312457^Provider^Testing^^^^|1043312457^Provider^Testing^^^^||||99392^HEART FAILURE COMPOSITE|'
-    end
-
-    it 'creates an FT1 segment' do
-      expect do
-        ft1 = HL7::Message::Segment::FT1.new( @base_ft1 )
-        expect(ft1).not_to be_nil
-        expect(ft1.to_s).to eq @base_ft1
-      end.not_to raise_error
-    end
-
-    it 'allows access to an FT1 segment' do
-      expect do
-        ft1 = HL7::Message::Segment::FT1.new( @base_ft1 )
-        expect(ft1.set_id).to eq '1'
-        expect(ft1.date_of_service).to eq '20180705'
-        expect(ft1.transaction_posting_date).to eq '20180705'
-        expect(ft1.transaction_description).to eq 'Description'
-        expect(ft1.transaction_quantity).to eq '1'
-        expect(ft1.assigned_patient_location).to eq '123456^The Location'
-        expect(ft1.diagnosis_code).to eq 'R45.82^Worries~H18.892^Other specified disorders of cornea'
-        expect(ft1.performed_by_provider).to eq '1043312457^Provider^Testing^^^^'
-        expect(ft1.ordering_provider).to eq '1043312457^Provider^Testing^^^^'
-        expect(ft1.procedure_code).to eq '99392^HEART FAILURE COMPOSITE'
-
-      end.not_to raise_error
-    end
-  end
-end

data/spec/fts_segment_spec.rb

@@ -1,19 +0,0 @@
-require 'spec_helper'
-
-describe HL7::Message::Segment::FTS do
-  context 'general' do
-    before :all do
-      base_string = 'FTS||End of File'
-      @fts = HL7::Message::Segment::FTS.new(base_string)
-    end
-
-    it 'creates an FTS segment' do
-      expect(@fts).to_not be_nil
-    end
-
-    it 'allows access to an FTS segment' do
-      expect(@fts.file_batch_count).to eq('')
-      expect(@fts.file_trailer_comment).to eq('End of File')
-    end
-  end
-end

data/spec/gt1_segment_spec.rb

@@ -1,32 +0,0 @@
-# encoding: UTF-8
-require 'spec_helper'
-
-describe HL7::Message::Segment::GT1 do
-  context 'general' do
-    before :all do
-      @base_gt1 = 'GT1||440|Crusher^Beverly||1003 Elm Street^^Enterprise^MD^29433|(330)644-1234^^^bcrusher@ufp.net^^330^6441234| |19600411000000|F||18|339-33-6657||||||||F||||||||||M'
-    end
-
-    it 'creates an GT1 segment' do
-      expect do
-        gt1 = HL7::Message::Segment::GT1.new( @base_gt1 )
-        expect(gt1).not_to be_nil
-        expect(gt1.to_s).to eq @base_gt1
-      end.not_to raise_error
-    end
-
-    it 'allows access to an GT1 segment' do
-      expect do
-        gt1 = HL7::Message::Segment::GT1.new( @base_gt1 )
-        expect(gt1.guarantor_number).to eq '440'
-        expect(gt1.guarantor_name).to eq 'Crusher^Beverly'
-        expect(gt1.guarantor_address).to eq '1003 Elm Street^^Enterprise^MD^29433'
-        expect(gt1.guarantor_date_of_birth).to eq '19600411000000'
-        expect(gt1.guarantor_sex).to eq 'F'
-        expect(gt1.guarantor_relationship).to eq '18'
-        expect(gt1.guarantor_ssn).to eq '339-33-6657'
-        expect(gt1.guarantor_employment_status).to eq 'F'
-      end.not_to raise_error
-    end
-  end
-end

data/spec/in1_segment_spec.rb

@@ -1,34 +0,0 @@
-# encoding: UTF-8
-require 'spec_helper'
-
-describe HL7::Message::Segment::IN1 do
-  context 'general' do
-    before :all do
-      @base_in1 = 'IN1|1||752|ACORDIA NATIONAL||||A|GRP|||||||SMITH^JOHN|19|19700102||||||||||||||||||WC23732763278A|||||||||||||||||X'
-    end
-
-    it 'creates an IN1 segment' do
-      expect do
-        in1 = HL7::Message::Segment::IN1.new( @base_in1 )
-        expect(in1).not_to be_nil
-        expect(in1.to_s).to eq @base_in1
-      end.not_to raise_error
-    end
-
-    it 'allows access to an IN1 segment' do
-      expect do
-        in1 = HL7::Message::Segment::IN1.new( @base_in1 )
-        expect(in1.set_id).to eq '1'
-        expect(in1.insurance_company_id).to eq '752'
-        expect(in1.insurance_company_name).to eq 'ACORDIA NATIONAL'
-        expect(in1.group_number).to eq 'A'
-        expect(in1.group_name).to eq 'GRP'
-        expect(in1.name_of_insured).to eq 'SMITH^JOHN'
-        expect(in1.insureds_relationship_to_patient).to eq '19'
-        expect(in1.insureds_date_of_birth).to eq '19700102'
-        expect(in1.policy_number).to eq 'WC23732763278A'
-        expect(in1.vip_indicator).to eq 'X'
-      end.not_to raise_error
-    end
-  end
-end

data/spec/message_spec.rb

@@ -1,53 +0,0 @@
-require 'spec_helper'
-
-describe HL7::Message do
-  describe "#correction?" do
-    let(:hl7) { HL7::Message.new data  }
-    subject { hl7.correction? }
-
-    context "when is a correction" do
-      let(:data) {
-        [
-          'OBR|1|A241Z^LAB||123456^A TEST^L|||201508181431||1234||||None|201502181432||||OMG123||||20150818143300',         # "F" final
-          'OBX|1|ST|123456^AA OBSERVATION^L^4567890^FIRST OBSERVATION^LN||42|ug/dL^Micrograms per Deciliter^UCUM|<10 ug/dL|H|||F||||OMG',
-          'NTE|1||SOME',
-          'NTE|2||THOUGHTS',
-          'OBR|2|A241Z^LAB||123456^A TEST^L|||201508181431||1234||||None|201502181432||||OMG123||||20150818143300',         # "C" corrected
-          'OBX|1|ST|123456^AA OBSERVATION^L^4567890^FIRST OBSERVATION^LN||42|ug/dL^Micrograms per Deciliter^UCUM|<10 ug/dL|H|||C||||OMG',
-          'NTE|1||SOME',
-          'NTE|2||THOUGHTS',
-        ].join("\r")
-      }
-
-      it { is_expected.to be true }
-    end
-
-    context "when is not a correction" do
-      let(:data) {
-        [
-          'OBR|1|A241Z^LAB||123456^A TEST^L|||201508181431||1234||||None|201502181432||||OMG123||||20150818143300',         # "F" final
-          'OBX|1|ST|123456^AA OBSERVATION^L^4567890^FIRST OBSERVATION^LN||42|ug/dL^Micrograms per Deciliter^UCUM|<10 ug/dL|H|||F||||OMG',
-          'NTE|1||SOME',
-          'NTE|2||THOUGHTS',
-          'OBR|2|A241Z^LAB||123456^A TEST^L|||201508181431||1234||||None|201502181432||||OMG123||||20150818143300',         # "F" final
-          'OBX|1|ST|123456^AA OBSERVATION^L^4567890^FIRST OBSERVATION^LN||42|ug/dL^Micrograms per Deciliter^UCUM|<10 ug/dL|H|||F||||OMG',
-          'NTE|1||SOME',
-          'NTE|2||THOUGHTS',
-        ].join("\r")
-      }
-
-      it { is_expected.to be false }
-    end
-
-    context "when there are no results (OBX) segments" do
-      let(:data) {
-        [
-          'OBR|1|A241Z^LAB||123456^A TEST^L|||201508181431||1234||||None|201502181432||||OMG123||||20150818143300',
-          'OBR|2|A241Z^LAB||123456^A TEST^L|||201508181431||1234||||None|201502181432||||OMG123||||20150818143300'
-        ].join("\r")
-      }
-
-      it { is_expected.to be false }
-    end
-  end
-end

data/spec/messages_spec.rb

@@ -1,24 +0,0 @@
-require 'spec_helper'
-
-describe "HL7 Messages" do
-  it 'processes multiple known messages without failing' do
-    expect do
-      HL7MESSAGES.each_pair do |key, hl7|
-        HL7::Message.new(hl7)
-      end
-    end.not_to raise_exception
-  end
-
-  describe 'MFN M13 Messages' do
-    it "extracts the MSH" do
-      expect(HL7::Message.new(HL7MESSAGES[:mfn_m13])[:MSH].sending_app).to eq 'HL7REG'
-    end
-    it 'extracts the MFI' do
-      expect(HL7::Message.new(HL7MESSAGES[:mfn_m13])[:MFI].master_file_identifier).to eq 'HL70006^RELIGION^HL70175'
-    end
-    it 'extracts the MFE' do
-      expect(HL7::Message.new(HL7MESSAGES[:mfn_m13])[:MFE][0].mfn_control_id).to eq '6772333'
-      expect(HL7::Message.new(HL7MESSAGES[:mfn_m13])[:MFE][1].mfn_control_id).to eq '6772334'
-    end
-  end
-end

data/spec/mfe_segment_spec.rb

@@ -1,28 +0,0 @@
-# encoding: UTF-8
-require 'spec_helper'
-
-describe HL7::Message::Segment::MFE do
-  context 'general' do
-    before :all do
-      @base_sft = 'MFE|MAD|6772331|200106290500|BUD^Buddhist^HL70006|CE'
-    end
-
-    it 'creates an MFE segment' do
-      expect do
-        sft = HL7::Message::Segment::MFE.new( @base_sft )
-        expect(sft).not_to be_nil
-        expect(sft.to_s).to eq(@base_sft)
-      end.not_to raise_error
-    end
-
-    it 'allows access to an MFE segment' do
-      expect do
-        sft = HL7::Message::Segment::MFE.new( @base_sft )
-        expect(sft.record_level_event_code).to eq 'MAD'
-        expect(sft.mfn_control_id).to eq '6772331'
-        expect(sft.primary_key_value).to eq 'BUD^Buddhist^HL70006'
-        expect(sft.primary_key_value_type).to eq 'CE'
-      end.not_to raise_error
-    end
-  end
-end

data/spec/mfi_segment_spec.rb

@@ -1,28 +0,0 @@
-# encoding: UTF-8
-require 'spec_helper'
-
-describe HL7::Message::Segment::MFI do
-  context 'general' do
-    before :all do
-      @base_sft = 'MFI|HL70006^RELIGION^HL70175|TEST|UPD|||AL'
-    end
-
-    it 'creates an MFI segment' do
-      expect do
-        sft = described_class.new( @base_sft )
-        expect(sft).not_to be_nil
-        expect(sft.to_s).to eq(@base_sft)
-      end.not_to raise_error
-    end
-
-    it 'allows access to an MFI segment' do
-      expect do
-        sft = described_class.new( @base_sft )
-        expect(sft.master_file_identifier).to eq 'HL70006^RELIGION^HL70175'
-        expect(sft.master_file_application_identifier).to eq 'TEST'
-        expect(sft.file_level_event_code).to eq 'UPD'
-        expect(sft.response_level_code).to eq 'AL'
-      end.not_to raise_error
-    end
-  end
-end

data/spec/msa_segment_spec.rb

@@ -1,27 +0,0 @@
-# encoding: UTF-8
-$: << '../lib'
-require 'ruby-hl7'
-
-describe HL7::Message::Segment::MSA do
-  context 'general' do
-    before :all do
-      @base_msa = "MSA|AR|ZZ9380 ERR"
-    end
-
-    it 'creates an MSA segment' do
-      expect do
-        msa = HL7::Message::Segment::MSA.new( @base_msa )
-        expect(msa).not_to be_nil
-        expect(msa.to_s).to eq @base_msa
-      end.not_to raise_error
-    end
-
-    it 'allows access to an MSA segment' do
-      expect do
-        msa = HL7::Message::Segment::MSA.new( @base_msa )
-        expect(msa.ack_code).to eq "AR"
-        expect(msa.control_id).to eq "ZZ9380 ERR"
-      end.not_to raise_error
-    end
-  end
-end

data/spec/msh_segment_spec.rb

@@ -1,28 +0,0 @@
-# encoding: UTF-8
-require 'spec_helper'
-
-describe HL7::Message::Segment::MSH do
-  context 'general' do
-    before :all do
-      @base = "MSH|^~\\&||ABCHS||AUSDHSV|20070101112951||ADT^A04^ADT_A01|12334456778890|P|2.5|||NE|NE|AU|ASCII|ENGLISH|||AN ORG|||RECNET.ORG"
-    end
-
-    it 'allows access to an MSH segment' do
-      msh = HL7::Message::Segment::MSH.new @base
-      msh.enc_chars='^~\\&'
-      expect(msh.version_id).to eq '2.5'
-      expect(msh.country_code).to eq 'AU'
-      expect(msh.charset).to eq 'ASCII'
-      expect(msh.sending_responsible_org).to eq 'AN ORG'
-      expect(msh.receiving_network_address).to eq 'RECNET.ORG'
-    end
-
-    it 'allows creation of an MSH segment' do
-      msh = HL7::Message::Segment::MSH.new
-      msh.sending_facility="A Facility"
-      expect(msh.sending_facility).to eq 'A Facility'
-      msh.time = DateTime.iso8601('20010203T040506')
-      expect(msh.time).to eq '20010203040506'
-    end
-  end
-end

data/spec/nk1_segment_spec.rb

@@ -1,26 +0,0 @@
-# encoding: UTF-8
-require 'spec_helper'
-
-describe HL7::Message::Segment::NK1 do
-  context 'general' do
-    before :all do
-      @base_nk1 = 'NK1|1|Mum^Martha^M^^^^L|MTH^Mother^HL70063^^^^2.5.1| 444 Home Street^Apt B^Ann Arbor^MI^99999^USA^H|^PRN^PH^^1^555^5552006'
-    end
-
-    it 'creates an NK1 segment' do
-      expect do
-        nk1 = HL7::Message::Segment::NK1.new( @base_nk1 )
-        expect(nk1).not_to be_nil
-        expect(nk1.to_s).to eq @base_nk1
-      end.not_to raise_error
-    end
-
-    it 'allows access to an NK1 segment' do
-      expect do
-        nk1 = HL7::Message::Segment::NK1.new( @base_nk1 )
-        expect(nk1.name).to eq 'Mum^Martha^M^^^^L'
-        expect(nk1.phone_number).to eq '^PRN^PH^^1^555^5552006'
-      end.not_to raise_error
-    end
-  end
-end

data/spec/obr_segment_spec.rb

@@ -1,45 +0,0 @@
-# encoding: UTF-8
-require 'spec_helper'
-
-describe HL7::Message::Segment::OBR do
-  context 'general' do
-    before :all do
-      @base = "OBR|2|^USSSA|0000000567^USSSA|37956^CT ABDOMEN^LN|||199405021550|||||||||||||0000763||||NMR|P||||||R/O TUMOR|202300&BAKER&MARK&E|||01&LOCHLEAR&JUDY|||||||||||||||123"
-      @obr = HL7::Message::Segment::OBR.new @base
-    end
-
-    it 'allows access to an OBR segment' do
-      expect(@obr.to_s).to eq @base
-      expect(@obr.e1).to eq "2"
-      expect(@obr.set_id).to eq "2"
-      expect(@obr.placer_order_number).to eq "^USSSA"
-      expect(@obr.filler_order_number).to eq "0000000567^USSSA"
-      expect(@obr.universal_service_id).to eq "37956^CT ABDOMEN^LN"
-    end
-
-    it 'allows modification of an OBR segment' do
-      @obr.set_id = 1
-      expect(@obr.set_id).to eq "1"
-      @obr.placer_order_number = "^DMCRES"
-      expect(@obr.placer_order_number).to eq "^DMCRES"
-    end
-
-    it 'supports the diagnostic_serv_sect_id method' do
-      expect(@obr).to respond_to(:diagnostic_serv_sect_id)
-      expect(@obr.diagnostic_serv_sect_id).to eq "NMR"
-    end
-
-    it 'supports the result_status method' do
-      expect(@obr).to respond_to(:result_status)
-      expect(@obr.result_status).to eq "P"
-    end
-
-    it 'supports the reason_for_study method' do
-      expect(@obr.reason_for_study).to eq "R/O TUMOR"
-    end
-
-    it 'supports the parent_universal_service_identifier method' do
-      expect(@obr.parent_universal_service_identifier).to eq "123"
-    end
-  end
-end

data/spec/obx_segment_spec.rb

@@ -1,68 +0,0 @@
-# encoding: UTF-8
-require 'spec_helper'
-
-describe HL7::Message::Segment::OBX do
-  context 'general' do
-    before :all do
-      @base = "OBX|1|NM|30341-2^Erythrocyte sedimentation rate^LN^815117^ESR^99USI^^^Erythrocyte sedimentation rate||10|mm/h^millimeter per hour^UCUM|0 to 17|N|0.1||F|||20110331140551-0800||Observer|||20110331150551-0800|^A Site|||Century Hospital^^^^^NIST-AA-1&2.16.840.1.113883.3.72.5.30.1&ISO^XX^^^987|2070 Test Park^^Los Angeles^CA^90067^USA^B^^06037|2343242^Knowsalot^Phil^J.^III^Dr.^^^NIST-AA-1&2.16.840.1.113883.3.72.5.30.1&ISO^L^^^DN"
-    end
-
-    it 'allows access to an OBX segment' do
-      obx = HL7::Message::Segment::OBX.new @base
-      expect(obx.set_id).to eq "1"
-      expect(obx.value_type).to eq "NM"
-      expect(obx.observation_id).to eq "30341-2^Erythrocyte sedimentation rate^LN^815117^ESR^99USI^^^Erythrocyte sedimentation rate"
-      expect(obx.observation_sub_id).to eq ""
-      expect(obx.observation_value).to eq "10"
-      expect(obx.units).to eq "mm/h^millimeter per hour^UCUM"
-      expect(obx.references_range).to eq "0 to 17"
-      expect(obx.abnormal_flags).to eq "N"
-      expect(obx.probability).to eq "0.1"
-      expect(obx.nature_of_abnormal_test).to eq ""
-      expect(obx.observation_result_status).to eq "F"
-      expect(obx.effective_date_of_reference_range).to eq ""
-      expect(obx.user_defined_access_checks).to eq ""
-      expect(obx.observation_date).to eq "20110331140551-0800"
-      expect(obx.producer_id).to eq ""
-      expect(obx.responsible_observer).to eq "Observer"
-      expect(obx.observation_site).to eq '^A Site'
-      expect(obx.observation_method).to eq ""
-      expect(obx.equipment_instance_id).to eq ""
-      expect(obx.analysis_date).to eq "20110331150551-0800"
-      expect(obx.performing_organization_name).to eq "Century Hospital^^^^^NIST-AA-1&2.16.840.1.113883.3.72.5.30.1&ISO^XX^^^987"
-      expect(obx.performing_organization_address).to eq "2070 Test Park^^Los Angeles^CA^90067^USA^B^^06037"
-      expect(obx.performing_organization_medical_director).to eq "2343242^Knowsalot^Phil^J.^III^Dr.^^^NIST-AA-1&2.16.840.1.113883.3.72.5.30.1&ISO^L^^^DN"
-    end
-
-    it 'allows creation of an OBX segment' do
-      expect do
-        obx = HL7::Message::Segment::OBX.new
-        obx.value_type = "TESTIES"
-        obx.observation_id = "HR"
-        obx.observation_sub_id = "2"
-        obx.observation_value = "SOMETHING HAPPENned"
-      end.not_to raise_error
-    end
-
-    describe "#correction?" do
-      let(:obx) { HL7::Message::Segment::OBX.new data  }
-      subject { obx.correction? }
-
-      context "when is a correction" do
-        let(:data) {
-          'OBX|1|ST|123456^AA OBSERVATION^L^4567890^FIRST OBSERVATION^LN||42|ug/dL^Micrograms per Deciliter^UCUM|<10 ug/dL|H|||C||||OMG'
-        }
-
-        it { is_expected.to be true }
-      end
-
-      context "when is not a correction" do
-        let(:data) {
-          'OBX|1|ST|123456^AA OBSERVATION^L^4567890^FIRST OBSERVATION^LN||42|ug/dL^Micrograms per Deciliter^UCUM|<10 ug/dL|H|||F||||OMG'
-        }
-
-        it { is_expected.to be false }
-      end
-    end
-  end
-end

data/spec/orc_segment_spec.rb

@@ -1,27 +0,0 @@
-# encoding: UTF-8
-$: << '../lib'
-require 'ruby-hl7'
-
-describe HL7::Message::Segment::ORC do
-  context 'general' do
-    before :all do
-      @base_orc = 'ORC|RE|23456^EHR^2.16.840.1.113883.19.3.2.3^ISO|9700123^Lab^2.16.840.1.113883.19.3.1.6^ISO|||||||||1234^Admit^Alan^A^III^Dr^^^&2.16.840.1.113883.19.4.6^ISO^L^^^EI^&2.16.840.1.113883.19.4.6^ISO^^^^^^^^MD||^WPN^PH^^1^555^5551005|||||||Level Seven Healthcare, Inc.^L^^^^&2.16.840.1.113883.19.4.6^ISO^XX^^^1234|1005 Healthcare Drive^^Ann Arbor^MI^99999^USA^B|^WPN^PH^^1^555^5553001|4444 Healthcare Drive^Suite 123^Ann Arbor^MI^99999^USA^B|||||||7844'
-    end
-
-    it 'creates an ORC segment' do
-      expect do
-        orc = HL7::Message::Segment::ORC.new( @base_orc )
-        expect(orc).not_to be_nil
-        expect(orc.to_s).to eq @base_orc
-      end.not_to raise_error
-    end
-
-    it 'allows access to an ORC segment' do
-      orc = HL7::Message::Segment::ORC.new( @base_orc )
-      expect(orc.ordering_provider).to eq '1234^Admit^Alan^A^III^Dr^^^&2.16.840.1.113883.19.4.6^ISO^L^^^EI^&2.16.840.1.113883.19.4.6^ISO^^^^^^^^MD'
-      expect(orc.call_back_phone_number).to eq '^WPN^PH^^1^555^5551005'
-      expect(orc.ordering_facility_name).to eq 'Level Seven Healthcare, Inc.^L^^^^&2.16.840.1.113883.19.4.6^ISO^XX^^^1234'
-      expect(orc.parent_universal_service_identifier).to eq '7844'
-    end
-  end
-end