ruby-hl7 1.1.1 → 1.2.0

Sign up to get free protection for your applications and to get access to all the features.
Files changed (47) hide show
  1. checksums.yaml +4 -4
  2. data/README.rdoc +2 -1
  3. data/lib/message.rb +5 -0
  4. data/lib/ruby-hl7.rb +1 -1
  5. data/lib/segment.rb +6 -0
  6. data/lib/segments/mfe.rb +10 -0
  7. data/lib/segments/mfi.rb +13 -0
  8. data/lib/segments/obx.rb +4 -1
  9. data/lib/segments/sft.rb +0 -6
  10. data/lib/test/hl7_messages.rb +30 -24
  11. metadata +11 -46
  12. data/.gitignore +0 -6
  13. data/.travis.yml +0 -15
  14. data/Gemfile +0 -11
  15. data/Gemfile.lock +0 -37
  16. data/NOTES.md +0 -53
  17. data/Rakefile +0 -149
  18. data/VERSION +0 -1
  19. data/VERSION.yml +0 -4
  20. data/examples/proxy_server.rb +0 -26
  21. data/ruby-hl7.gemspec +0 -44
  22. data/spec/basic_parsing_spec.rb +0 -320
  23. data/spec/batch_parsing_spec.rb +0 -52
  24. data/spec/child_segment_spec.rb +0 -66
  25. data/spec/core_ext/date_time_spec.rb +0 -43
  26. data/spec/default_segment_spec.rb +0 -31
  27. data/spec/dynamic_segment_def_spec.rb +0 -37
  28. data/spec/err_segment_spec.rb +0 -26
  29. data/spec/evn_segment_spec.rb +0 -23
  30. data/spec/msa_segment_spec.rb +0 -27
  31. data/spec/msh_segment_spec.rb +0 -28
  32. data/spec/nk1_segment_spec.rb +0 -26
  33. data/spec/obr_segment_spec.rb +0 -45
  34. data/spec/obx_segment_spec.rb +0 -46
  35. data/spec/orc_segment_spec.rb +0 -27
  36. data/spec/pid_segment_spec.rb +0 -70
  37. data/spec/prd_segment_spec.rb +0 -29
  38. data/spec/pv1_segment_spec.rb +0 -23
  39. data/spec/rf1_segment_spec.rb +0 -29
  40. data/spec/segment_field_spec.rb +0 -92
  41. data/spec/segment_generator_spec.rb +0 -32
  42. data/spec/segment_list_storage_spec.rb +0 -47
  43. data/spec/segment_spec.rb +0 -27
  44. data/spec/sft_segment_spec.rb +0 -26
  45. data/spec/spec_helper.rb +0 -12
  46. data/spec/speed_parsing_spec.rb +0 -19
  47. data/spec/spm_segment_spec.rb +0 -26
@@ -1,29 +0,0 @@
1
- # encoding: UTF-8
2
- require 'spec_helper'
3
-
4
- describe HL7::Message::Segment::PRD do
5
- context 'general' do
6
- let (:base) { 'PRD|RP|LastName^FirstName^MiddleInitial^SR^NickName|444 Home Street^Apt B^Ann Arbor^MI^99999^USA|^^^A Wonderful Clinic|^WPN^PH^^^07^5555555|PH|4796^AUSHICPR|20130109163307+1000|20140109163307+1000' }
7
- let (:prd) { HL7::Message::Segment::PRD.new base }
8
-
9
- it 'should set the provider_role' do
10
- prd.provider_role.should eql 'RP'
11
- end
12
-
13
- it 'should set the name' do
14
- prd.provider_name.should eql 'LastName^FirstName^MiddleInitial^SR^NickName'
15
- end
16
-
17
- it 'should set the provider_address' do
18
- prd.provider_address.should eql '444 Home Street^Apt B^Ann Arbor^MI^99999^USA'
19
- end
20
-
21
- it 'should set the provider_location' do
22
- prd.provider_location.should eql '^^^A Wonderful Clinic'
23
- end
24
-
25
- it 'should set provider_communication_information' do
26
- prd.provider_communication_information.should eql '^WPN^PH^^^07^5555555'
27
- end
28
- end
29
- end
@@ -1,23 +0,0 @@
1
- # encoding: UTF-8
2
- require 'spec_helper'
3
-
4
- describe HL7::Message::Segment::PV1 do
5
- context 'general' do
6
- before :all do
7
- @base = "PV1||R|||||||||||||||A|||V02^19900607~H02^19900607"
8
- end
9
-
10
- it 'allows access to an PV1 segment' do
11
- pv1 = HL7::Message::Segment::PV1.new @base
12
- pv1.patient_class.should == "R"
13
- end
14
-
15
- it 'allows creation of an OBX segment' do
16
- pv1= HL7::Message::Segment::PV1.new
17
- pv1.referring_doctor="Smith^John"
18
- pv1.referring_doctor.should == "Smith^John"
19
- pv1.admit_date = Date.new(2014, 1, 1)
20
- pv1.admit_date.should == '20140101'
21
- end
22
- end
23
- end
@@ -1,29 +0,0 @@
1
- # encoding: UTF-8
2
- require 'spec_helper'
3
-
4
- describe HL7::Message::Segment::RF1 do
5
- context 'general' do
6
- before :all do
7
- @base = 'RF1|P^Pending^HL70283|R^Routine^HL70280|GRF^General referral^HL70281|AM^Assume management^HL70282||8094|20060705||20060705||42'
8
-
9
- end
10
-
11
- it 'allows access to an RF1 segment' do
12
- rf1 = HL7::Message::Segment::RF1.new @base
13
- rf1.referral_status.should == 'P^Pending^HL70283'
14
- rf1.referral_priority.should == 'R^Routine^HL70280'
15
- rf1.referral_type.should == 'GRF^General referral^HL70281'
16
- rf1.referral_disposition.should == 'AM^Assume management^HL70282'
17
- rf1.originating_referral_identifier.should == '8094'
18
- rf1.effective_date.should == '20060705'
19
- rf1.process_date.should == '20060705'
20
- rf1.external_referral_identifier.should == '42'
21
- end
22
-
23
- it 'allows creation of an RF1 segment' do
24
- rf1 = HL7::Message::Segment::RF1.new
25
- rf1.expiration_date=Date.new(2058, 12, 1)
26
- rf1.expiration_date.should == '20581201'
27
- end
28
- end
29
- end
@@ -1,92 +0,0 @@
1
- # encoding: UTF-8
2
- require 'spec_helper'
3
-
4
- class MockSegment < HL7::Message::Segment
5
- weight 1
6
- add_field :no_block
7
- alias_field :no_block_alias, :no_block
8
- add_field :validating do |value|
9
- value == "bad" ? nil : value
10
- end
11
- add_field :converting do |value|
12
- "X" + value
13
- end
14
- end
15
-
16
- describe HL7::Message::Segment do
17
- before :all do
18
- @base = "Mock|no_block|validated|converted"
19
- end
20
-
21
- context "block on field definitions" do
22
- it 'is evaluated on access by field name' do
23
- msg = MockSegment.new(@base)
24
-
25
- msg.to_s.should == @base
26
- msg.no_block.should == "no_block"
27
- msg.validating.should == "validated"
28
- msg.converting.should == "Xconverted"
29
-
30
- msg.no_block = "NO_BLOCK"
31
- msg.no_block.should == "NO_BLOCK"
32
-
33
- msg.validating = "good"
34
- msg.validating.should == "good"
35
- msg.validating = "bad"
36
- msg.validating.should == ""
37
-
38
- msg.converting = "empty"
39
- msg.converting.should == "XXempty"
40
- end
41
-
42
- it 'is not evaluated on read access by eXXX alias' do
43
- msg = MockSegment.new(@base)
44
-
45
- msg.e1.should == "no_block"
46
- msg.e2.should == "validated"
47
- msg.e3.should == "converted"
48
- end
49
-
50
- it 'is not evaluated on write access by eXXX alias' do
51
- msg = MockSegment.new(@base)
52
-
53
- msg.e1 = "NO_BLOCK"
54
- msg.e1.should == "NO_BLOCK"
55
-
56
- msg.e2 = "good"
57
- msg.e2.should == "good"
58
- msg.e2 = "bad"
59
- msg.e2.should == "bad"
60
-
61
- msg.e3 = "empty"
62
- msg.e3.should == "empty"
63
- end
64
- end
65
-
66
- describe '#alias_field' do
67
- context 'with a valid field' do
68
- it 'uses alias field names' do
69
- msg = MockSegment.new(@base)
70
- msg.no_block.should == "no_block"
71
- msg.no_block_alias.should == "no_block"
72
- end
73
- end
74
-
75
- context 'with an invalid field' do
76
-
77
- class MockInvalidSegment < HL7::Message::Segment
78
- weight 1
79
- add_field :no_block
80
- alias_field :no_block_alias, :invalid_field
81
- add_field :second
82
- add_field :third
83
- end
84
-
85
-
86
- it 'throws an error when the field is invalid' do
87
- msg = MockInvalidSegment.new(@base)
88
- lambda{ msg.no_block_alias }.should raise_error
89
- end
90
- end
91
- end
92
- end
@@ -1,32 +0,0 @@
1
- require 'spec_helper'
2
-
3
- describe HL7::Message::SegmentGenerator do
4
- describe 'valid_segments_parts?' do
5
-
6
- let(:element){ "MSH|1|2|3" }
7
- let(:delimiter){ HL7::Message::Delimiter.new('|', '^', '\r') }
8
- let(:segment_generator) do
9
- HL7::Message::SegmentGenerator.new(element, nil, delimiter)
10
- end
11
-
12
- it "should return true if @seg_parts is an array of one element or more" do
13
- segment_generator.valid_segments_parts?.should be true
14
- end
15
-
16
- context 'when is empty' do
17
- it "should return false if empty_segment_is_error is false" do
18
- segment_generator.seg_parts = nil
19
- HL7.ParserConfig[:empty_segment_is_error] = false
20
- segment_generator.valid_segments_parts?.should be false
21
- end
22
-
23
- it "should raise an error if empty_segment_is_error is true" do
24
- HL7.ParserConfig[:empty_segment_is_error] = true
25
- segment_generator.seg_parts = nil
26
- expect do
27
- segment_generator.valid_segments_parts?
28
- end.to raise_error HL7::EmptySegmentNotAllowed
29
- end
30
- end
31
- end
32
- end
@@ -1,47 +0,0 @@
1
- require 'spec_helper'
2
-
3
- class SegmentNoChildren< HL7::Message::Segment
4
- end
5
-
6
- class SegmentWithChildren < HL7::Message::Segment
7
- has_children [:NTE,:ORC,:SPM]
8
- end
9
-
10
- describe HL7::Message::SegmentListStorage do
11
- describe "self#add_child_type" do
12
- it "should allow to add a new segment type as child" do
13
- SegmentWithChildren.add_child_type :OBR
14
- segment = SegmentWithChildren.new
15
- segment.accepts?(:OBR).should be true
16
- segment.child_types.should include :OBR
17
- end
18
- end
19
-
20
- describe "Adding children has_children and add_child_type" do
21
- subject do
22
- segment_instance = segment_class.new
23
- [:accepts?, :child_types, :children].each do |method|
24
- segment_instance.respond_to?(method).should be true
25
- end
26
- end
27
-
28
- context "when child_types is not present" do
29
- let(:segment_class){ SegmentNoChildren }
30
-
31
- it "by adding add_child_type should respond to the children methods" do
32
- segment_instance = segment_class.new
33
- segment_instance.respond_to?(:children).should be false
34
- segment_class.add_child_type(:OBR)
35
- subject
36
- end
37
- end
38
-
39
- context "when child_types is present" do
40
- let(:segment_class){ SegmentWithChildren }
41
-
42
- it "should respond to the children methods" do
43
- subject
44
- end
45
- end
46
- end
47
- end
@@ -1,27 +0,0 @@
1
- require 'spec_helper'
2
-
3
- describe HL7::Message::Segment do
4
- describe 'length' do
5
-
6
- it "should return the length of the elements" do
7
- segment = HL7::Message::Segment.new "MSA|AR|ZZ9380 ERR"
8
- segment.length.should eq 3
9
- end
10
- end
11
-
12
- describe 'is_child_segment?' do
13
- let(:segment){ HL7::Message::Segment.new "MSA|AR|ZZ9380 ERR" }
14
- it "return false when is not set" do
15
- segment.is_child_segment?.should be false
16
- end
17
- end
18
-
19
- describe 'convert_to_ts' do
20
- let(:time_now){ DateTime.now }
21
- let(:formated_time){ time_now.strftime('%Y%m%d%H%M%S') }
22
-
23
- it "should conver to the hl7 time format" do
24
- HL7::Message::Segment.convert_to_ts(time_now).should eq formated_time
25
- end
26
- end
27
- end
@@ -1,26 +0,0 @@
1
- # encoding: UTF-8
2
- require 'spec_helper'
3
-
4
- describe HL7::Message::Segment::SFT do
5
- context 'general' do
6
- before :all do
7
- @base_sft = 'SFT|1|Level Seven Healthcare Software, Inc.^L^^^^&2.16.840.1.113883.19.4.6^ISO^XX^^^1234|1.2|An Lab System|56734||20080817'
8
- end
9
-
10
- it 'creates an SFT segment' do
11
- lambda do
12
- sft = HL7::Message::Segment::SFT.new( @base_sft )
13
- sft.should_not be_nil
14
- sft.to_s.should == @base_sft
15
- end.should_not raise_error
16
- end
17
-
18
- it 'allows access to an SFT segment' do
19
- lambda do
20
- sft = HL7::Message::Segment::SFT.new( @base_sft )
21
- sft.software_product_name.should == 'An Lab System'
22
- sft.software_install_date.should == '20080817'
23
- end.should_not raise_error
24
- end
25
- end
26
- end
@@ -1,12 +0,0 @@
1
- require 'simplecov'
2
-
3
- if ENV["COVERAGE"]
4
- SimpleCov.start do
5
- add_filter "/test/"
6
- add_filter "/spec/"
7
- end
8
- end
9
-
10
- # ruby-hl7 loads the rest of the files in lib
11
- require File.expand_path('../../lib/ruby-hl7', __FILE__)
12
- require File.expand_path('../../lib/test/hl7_messages', __FILE__)
@@ -1,19 +0,0 @@
1
- # encoding: UTF-8
2
- require 'spec_helper'
3
- require 'time'
4
-
5
- describe HL7::Message do
6
- context 'speed parsing' do
7
- before :all do
8
- @msg = open( "./test_data/lotsunknowns.hl7" ).readlines
9
- end
10
-
11
- it 'parses large, unknown segments rapidly' do
12
- start = Time.now
13
- doc = HL7::Message.new @msg
14
- doc.should_not be_nil
15
- ends = Time.now
16
- (ends-start).should be < 1
17
- end
18
- end
19
- end
@@ -1,26 +0,0 @@
1
- # encoding: UTF-8
2
- require 'spec_helper'
3
-
4
- describe HL7::Message::Segment::SPM do
5
- context 'general' do
6
- before :all do
7
- @base_spm = 'SPM|1|23456&EHR&2.16.840.1.113883.19.3.2.3&ISO^9700122&Lab&2.16.840.1.113883.19.3.1.6&ISO||122554006^Capillary blood specimen^SCT^BLDC^Blood capillary^HL70070^20080131^2.5.1||HEPA^Ammonium heparin^HL70371^^^^2.5.1|CAP^Capillary Specimen^HL70488^^^^2.5.1|181395001^Venous structure of digit^SCT^^^^20080731|||P^Patient^HL60369^^^^2.5.1|50^uL&Micro Liter&UCUM&&&&1.6|||||200808151030-0700|200808151100-0700'
8
- end
9
-
10
- it 'creates an SPM segment' do
11
- lambda do
12
- spm = HL7::Message::Segment::SPM.new( @base_spm )
13
- spm.should_not be_nil
14
- spm.to_s.should == @base_spm
15
- end.should_not raise_error
16
- end
17
-
18
- it 'allows access to an SPM segment' do
19
- lambda do
20
- spm = HL7::Message::Segment::SPM.new( @base_spm )
21
- spm.specimen_type.should == '122554006^Capillary blood specimen^SCT^BLDC^Blood capillary^HL70070^20080131^2.5.1'
22
- spm.set_id.should == '1'
23
- end.should_not raise_error
24
- end
25
- end
26
- end