hippo 0.0.4

data/bin/demo_276.rb

@@ -0,0 +1,296 @@
+require './lib/hippo.rb'
+require 'pp'
+
+class Demo276
+	def self.run
+		ts = Hippo::TransactionSets::HIPAA_276::Base.new
+
+		ts.ST do |seg|
+			seg.TransactionSetIdentifierCode = rand(10 * 100)
+			seg.TransactionSetControlNumber = rand(10 * 100)
+		end
+
+		ts.BHT do |seg|
+			seg.HierarchicalStructureCode = '0001'
+			seg.TransactionSetPurposeCode = '00'
+			seg.ReferenceIdentification = ''
+			seg.Date = ''
+			seg.Time = ''
+			seg.TransactionTypeCode = ''
+		end
+
+		ts.L2000A do |loop|
+			loop.HL do |seg|
+				seg.HierarchicalIdNumber = ''
+				seg.HierarchicalParentIdNumber = ''
+				seg.HierarchicalLevelCode = ''
+				seg.HierarchicalChildCode = ''
+			end 
+			loop.L2100A do |sub_loop|
+				sub_loop.NM1 do |seg|
+					seg.EntityIdentifierCode1 = ''
+					seg.EntityTypeQualifier = ''
+					seg.NameLastOrOrganizationName = ''
+					seg.NameFirst = ''
+				end
+				sub_loop.PER do |seg|
+					seg.ContactFunctionCode = ''
+					seg.Name = ''
+					seg.CommunicationNumberQualifier1 = ''
+					seg.CommunicationNumber1 = ''
+					seg.CommunicationNumberQualifier2 = ''
+					seg.CommunicationNumber2 = ''
+					seg.CommunicationNumberQualifier3 = ''
+					seg.CommunicationNumber3 = ''
+					seg.ContactInquiryReference = ''
+				end
+			end
+		end
+
+		ts.L2000B do |loop|
+			loop.HL do |seg|
+				seg.HierarchicalIdNumber = ''
+				seg.HierarchicalParentIdNumber = ''
+				seg.HierarchicalLevelCode = ''
+				seg.HierarchicalChildCode = ''
+			end
+			loop.L2100B do |sub_loop|
+				sub_loop.NM1 do |seg|
+					seg.EntityIdentifierCode1 = ''
+					seg.EntityTypeQualifier = ''
+					seg.NameLastOrOrganizationName = ''
+					seg.NameFirst = ''  
+				end    
+			end
+		end
+
+		ts.L2000C do |loop|
+			loop.HL do |seg|
+				seg.HierarchicalIdNumber = ''
+				seg.HierarchicalParentIdNumber = ''
+				seg.HierarchicalLevelCode = ''
+				seg.HierarchicalChildCode = ''
+			end
+			loop.L2100C do |sub_loop|
+				sub_loop.NM1 do |seg|
+					seg.EntityIdentifierCode1 = ''
+					seg.EntityTypeQualifier = ''
+					seg.NameLastOrOrganizationName = ''
+					seg.NameFirst = ''  
+				end
+			end
+		end
+
+		ts.L2000D do |loop|
+			loop.HL do |seg|
+				seg.HierarchicalIdNumber = ''
+				seg.HierarchicalParentIdNumber = ''
+				seg.HierarchicalLevelCode = ''
+				seg.HierarchicalChildCode = ''
+			end
+			loop.DMG do |seg|
+				seg.DateTimePeriodFormatQualifier = ''
+				seg.DateTimePeriod = ''
+				seg.GenderCode = ''
+				seg.MaritalStatusCode = ''
+				seg.CompositeRaceOrEthnicityInformation = ''
+				seg.CitizenshipStatusCode = ''
+				seg.CountryCode = ''
+				seg.BasisOfVerificationCode = ''
+				seg.Quantity = ''
+				seg.CodeListQualifierCode = ''
+				seg.IndustryCode = ''
+			end
+			loop.L2100D do |sub_loop|
+				sub_loop.NM1 do |seg|
+					seg.EntityIdentifierCode1 = ''
+					seg.EntityTypeQualifier = ''
+					seg.NameLastOrOrganizationName = ''
+					seg.NameFirst = ''
+				end
+			end
+			loop.L2200D do |sub_loop|
+				sub_loop.TRN do |seg|
+					seg.TraceTypeCode = rand(10 * 100)
+					seg.ReferenceIdentification1 = rand(10 * 100)
+					seg.OriginatingCompanyIdentifier = rand(10 * 100)
+					seg.ReferenceIdentification2 = rand(10 * 100)
+				end
+				sub_loop.REF do |seg|
+					seg.ReferenceIdentificationQualifier = "00"
+					seg.ReferenceIdentification = "R0203"
+					seg.Description = "Description"
+					seg.ReferenceIdentifier = "1241"
+				end
+				sub_loop.REF do |seg|
+					seg.ReferenceIdentificationQualifier = "00"
+					seg.ReferenceIdentification = "R0203"
+					seg.Description = "Description"
+					seg.ReferenceIdentifier = "1241"
+				end
+				sub_loop.REF do |seg|
+					seg.ReferenceIdentificationQualifier = "00"
+					seg.ReferenceIdentification = "R0203"
+					seg.Description = "Description"
+					seg.ReferenceIdentifier = "1241"
+				end
+				sub_loop.AMT do |seg|
+					seg.AmountQualifierCode = ''
+					seg.MonetaryAmount = ''
+					seg.CreditDebitFlagCode = ''
+				end
+				sub_loop.DTP do |seg|
+					seg.DateTimeQualifier = ''
+					seg.DateTimePeriodFormatQualifier = ''
+					seg.DateTimePeriod = ''
+				end
+				sub_loop.L2210D do |sub_loop_child|
+					sub_loop_child.SVC do |seg|
+						#seg.CompositeMedicalProcedureIdentifier1 do |seg|
+						seg.ProductServiceID = ''
+						seg.ProcedureModifier1 = ''
+						seg.ProcedureModifier2 = ''
+						seg.ProcedureModifier3 = ''
+						seg.ProcedureModifier4 = ''
+						seg.Description = ''
+						#end
+
+						seg.MonetaryAmount1 = ''
+						seg.MonetaryAmount2 = ''
+						seg.ProductServiceId = ''
+						seg.Quantity1 = ''
+
+						seg.OriginalProductServiceIDQualifier = ''
+						seg.OriginalProductServiceID = ''
+						seg.OriginalProcedureModifier1 = ''
+						seg.OriginalProcedureModifier2 = ''
+						seg.OriginalProcedureModifier3 = ''
+						seg.OriginalProcedureModifier4 = ''
+						seg.OriginalDescription = ''
+						seg.Quantity2 = ''
+					end
+
+					sub_loop_child.REF do |seg|
+						seg.ReferenceIdentificationQualifier = "00"
+						seg.ReferenceIdentification = "R0203"
+						seg.Description = "Description"
+						seg.ReferenceIdentifier = "1241"
+					end
+					sub_loop_child.DTP do |seg|
+						seg.DateTimeQualifier = ''
+						seg.DateTimePeriodFormatQualifier = ''
+						seg.DateTimePeriod = ''
+					end
+				end
+			end
+		end
+
+		ts.L2000E do |loop|
+			loop.HL do |seg|
+				seg.HierarchicalIdNumber = ''
+				seg.HierarchicalParentIdNumber = ''
+				seg.HierarchicalLevelCode = ''
+				seg.HierarchicalChildCode = ''
+			end
+			loop.DMG do |seg|
+				seg.DateTimePeriodFormatQualifier = ''
+				seg.DateTimePeriod = ''
+				seg.GenderCode = ''
+				seg.MaritalStatusCode = ''
+				seg.CompositeRaceOrEthnicityInformation = ''
+				seg.CitizenshipStatusCode = ''
+				seg.CountryCode = ''
+				seg.BasisOfVerificationCode = ''
+				seg.Quantity = ''
+				seg.CodeListQualifierCode = ''
+				seg.IndustryCode = ''
+			end
+			loop.L2100E do |sub_loop|
+				sub_loop.NM1 do |seg|
+					seg.EntityIdentifierCode1 = ''
+					seg.EntityTypeQualifier = ''
+					seg.NameLastOrOrganizationName = ''
+					seg.NameFirst = ''
+				end
+				sub_loop.TRN do |seg|
+					seg.TraceTypeCode = rand(10 * 100)
+					seg.ReferenceIdentification1 = rand(10 * 100)
+					seg.OriginatingCompanyIdentifier = rand(10 * 100)
+					seg.ReferenceIdentification2 = rand(10 * 100)
+				end
+			end
+			loop.L2200E do |sub_loop|
+				sub_loop.REF do |seg|
+					seg.ReferenceIdentificationQualifier = "00"
+					seg.ReferenceIdentification = "R0203"
+					seg.Description = "Description"
+					seg.ReferenceIdentifier = "1241"
+				end
+				sub_loop.REF do |seg|
+					seg.ReferenceIdentificationQualifier = "00"
+					seg.ReferenceIdentification = "R0203"
+					seg.Description = "Description"
+					seg.ReferenceIdentifier = "1241"
+				end
+				sub_loop.REF do |seg|
+					seg.ReferenceIdentificationQualifier = "00"
+					seg.ReferenceIdentification = "R0203"
+					seg.Description = "Description"
+					seg.ReferenceIdentifier = "1241"
+				end
+				sub_loop.AMT do |seg|
+					seg.AmountQualifierCode = ''
+					seg.MonetaryAmount = ''
+					seg.CreditDebitFlagCode = ''
+				end
+				sub_loop.DTP do |seg|
+					seg.DateTimeQualifier = ''
+					seg.DateTimePeriodFormatQualifier = ''
+					seg.DateTimePeriod = ''
+				end
+				sub_loop.L2210E do |sub_loop_child|
+					sub_loop_child.SVC do |seg|
+						seg.ProductServiceID = ''
+						seg.ProcedureModifier1 = ''
+						seg.ProcedureModifier2 = ''
+						seg.ProcedureModifier3 = ''
+						seg.ProcedureModifier4 = ''
+						seg.Description = ''
+						seg.MonetaryAmount1 = ''
+						seg.MonetaryAmount2 = ''
+						seg.OriginalProductServiceIDQualifier = ''
+						seg.OriginalProductServiceID = ''
+						seg.OriginalProcedureModifier1 = ''
+						seg.OriginalProcedureModifier2 = ''
+						seg.OriginalProcedureModifier3 = ''
+						seg.OriginalProcedureModifier4 = ''
+						seg.OriginalDescription = ''
+						seg.Quantity2 = ''
+					end
+					sub_loop.REF do |seg|
+						seg.ReferenceIdentificationQualifier = "00"
+						seg.ReferenceIdentification = "R0203"
+						seg.Description = "Description"
+						seg.ReferenceIdentifier = "1241"
+					end
+					sub_loop.DTP do |seg|
+						seg.DateTimeQualifier = ''
+						seg.DateTimePeriodFormatQualifier = ''
+						seg.DateTimePeriod = ''
+					end
+				end
+			end
+		end
+
+		ts.SE do |seg|
+			seg.NumberOfIncludedSegments = ''
+			seg.TransactionSetControlNumber = ''
+		end
+
+		puts ts.to_s
+	end
+end
+
+if __FILE__ == $0
+	Demo276.run
+end

data/bin/demo_835.rb

@@ -0,0 +1,170 @@
+require './lib/hippo.rb'
+require 'faker'
+
+module Hippo
+	class Demo835
+		def self.run
+			ts = Hippo::TransactionSets::HIPAA_835::Base.new
+
+			ts.ST do |seg|
+				seg.TransactionSetIdentifierCode = rand(10 * 100)
+				seg.TransactionSetControlNumber = rand(10 * 100)
+			end
+
+			ts.BPR do |seg|
+				seg.TransactionHandlingCode = 'C'
+				seg.MonetaryAmount = rand(10 * 100).to_f
+				seg.CreditDebitFlagCode = 'C'
+				seg.PaymentMethodCode = 'ACH'
+				seg.PaymentFormatCode = 'CCP'
+				seg.DFIIdNumberQualifier1 = rand(10 * 100)
+				seg.AccountNumberQualifier1 = rand(10 * 100)
+				seg.Date = "19951104"
+				seg.BusinessFunctionCode = "Col"
+				seg.DFIIdNumberQualifier3 = "02"
+				seg.AccountNumberQualifier3 = "3"
+			end
+
+			ts.TRN do |seg|
+				seg.TraceTypeCode = rand(10 * 100)
+				seg.ReferenceIdentification1 = rand(10 * 100)
+				seg.OriginatingCompanyIdentifier = rand(10 * 100)
+				seg.ReferenceIdentification2 = rand(10 * 100)
+			end
+
+			ts.REF do |seg|
+				seg.ReferenceIdentificationQualifier = "00"
+				seg.ReferenceIdentification = "R0203"
+				seg.Description = "Description"
+				seg.ReferenceIdentifier = "1241"
+			end
+
+			ts.REF do |seg|
+				seg.ReferenceIdentificationQualifier = "URL"
+				seg.ReferenceIdentification = "R0203"
+				seg.Description = "Description"
+				seg.ReferenceIdentifier = "1241"
+			end
+
+			ts.DTM do |seg|
+				seg.DateTimeQualifier = "002"
+				seg.Date = "19451104"
+			end
+
+
+			ts.L1000A do |loop|
+				loop.N1 do |seg|
+					seg.EntityIdentifierCode1 = "PR"
+					seg.Name = Faker::Name.name
+				end
+				loop.N3 do |seg|
+					seg.AddressInformation1 = Faker::Address.street_address
+					seg.AddressInformation2 = "#{Faker::Address.city} #{Faker::Address.us_state} #{Faker::Address.zip_code}"
+				end
+				loop.N4 do |seg|
+					seg.CityName = Faker::Address.city
+					seg.StateOrProvinceCode = Faker::Address.us_state_abbr
+					seg.PostalCode = Faker::Address.zip_code
+					seg.CountryCode = "US"
+				end
+				loop.REF do |seg|
+					seg.ReferenceIdentificationQualifier = "URL"
+					seg.ReferenceIdentification = "R0203"
+					seg.Description = "Description"
+					seg.ReferenceIdentifier = "1241"
+				end
+				loop.PER do |seg|
+					seg.ContactFunctionCode = "1A"
+					seg.Name = Faker::Name.name
+				end
+			end
+
+			ts.L1000B do |loop|
+				loop.N1 do |seg|
+					seg.EntityIdentifierCode1 = "PR"
+					seg.Name = Faker::Name.name
+				end
+				loop.N3 do |seg|
+					seg.AddressInformation1 = Faker::Address.street_address
+					seg.AddressInformation2 = "#{Faker::Address.city} #{Faker::Address.us_state} #{Faker::Address.zip_code}"
+				end
+				loop.N4 do |seg|
+					seg.CityName = Faker::Address.city
+					seg.StateOrProvinceCode = Faker::Address.us_state_abbr
+					seg.PostalCode = Faker::Address.zip_code
+					seg.CountryCode = "US"
+				end
+				loop.REF do |seg|
+					seg.ReferenceIdentificationQualifier = "URL"
+					seg.ReferenceIdentification = "R0203"
+					seg.Description = "Description"
+					seg.ReferenceIdentifier = "1241"
+				end
+			end
+
+			5.times do |i|  
+				ts.L2000 do |loop|
+
+					loop.LX do |seg|
+						seg.AssignedNumber = i
+					end
+
+					loop.TS3 do |seg|
+						seg.ReferenceIdentification = "Provider Identifier"
+						seg.FacilityCodeValue = "Facility Type Code"
+						seg.Date = "20051104"
+						seg.Quantity1 = 5
+						seg.MonetaryAmount1 = rand(10 * 100).to_f
+						seg.MonetaryAmount2 = rand(10 * 100).to_f
+						seg.MonetaryAmount3 = rand(10 * 100).to_f
+						seg.MonetaryAmount4 = rand(10 * 100).to_f
+						seg.MonetaryAmount5 = rand(10 * 100).to_f
+						seg.MonetaryAmount6 = rand(10 * 100).to_f
+						seg.MonetaryAmount7 = rand(10 * 100).to_f
+						seg.Quantity2 = rand(10 * 100)
+					end
+
+					loop.TS2 do |seg|
+						seg.MonetaryAmount1 = rand(10 * 100).to_f
+						seg.MonetaryAmount2 = rand(10 * 100).to_f
+						seg.MonetaryAmount3 = rand(10 * 100).to_f
+						seg.MonetaryAmount4 = rand(10 * 100).to_f
+						seg.MonetaryAmount5 = rand(10 * 100).to_f
+						seg.MonetaryAmount6 = rand(10 * 100).to_f
+					end
+
+					2.times do |i|
+						loop.L2100 do |sub_loop|
+
+							sub_loop.CLP do |seg|
+								seg.ClaimSubmittersIdentifier = rand(10 * 100).to_f
+								seg.ClaimStatusCode = "1"
+								seg.MonetaryAmount1 = rand(10 * 100).to_f
+								seg.ClaimFilingIndicatorCode = "01"
+								seg.YesNoConditionOrResponseCode = "Y"
+							end
+
+							sub_loop.CAS do |seg|
+								seg.ClaimAdjustmentGroupCode = "CO"
+								seg.ClaimAdjustmentReasonCode1 = "139"
+								seg.MonetaryAmount1 = rand(10 * 100).to_f
+							end
+
+							sub_loop.NM1 do |seg|
+								seg.EntityIdentifierCode1 = "00"
+								seg.EntityTypeQualifier = 1
+								seg.NameLastOrOrganizationName = Faker::Name.name
+								seg.NameFirst = Faker::Name.first_name
+							end
+						end
+					end
+				end
+				puts ts.to_s
+			end
+		end
+	end
+end
+
+if __FILE__ == $0
+	Hippo::Demo835.run
+end

data/hippo.gemspec

@@ -0,0 +1,24 @@
+# -*- encoding: utf-8 -*-
+$:.push File.expand_path("../lib", __FILE__)
+require "hippo/version"
+
+Gem::Specification.new do |s|
+  s.name        = "hippo"
+  s.version     = Hippo::VERSION
+  s.platform    = Gem::Platform::RUBY
+  s.authors     = ["Robert Jackson", 'Jon Jackson']
+  s.email       = ["robertj@promedicalinc.com"]
+  s.homepage    = "http://github.com/promedical/hippo"
+  s.summary     = %q{HIPAA Transaction Set Generator/Parser}
+  s.description = %q{HIPAA Transaction Set Generator/Parser}
+
+  s.rubyforge_project = "hippo"
+
+  s.add_development_dependency('minitest')
+  s.add_development_dependency('rake', '~>0.9.2')
+
+  s.files         = `git ls-files`.split("\n")
+  s.test_files    = `git ls-files -- {test,spec,features}/*`.split("\n")
+  s.executables   = `git ls-files -- bin/*`.split("\n").map{ |f| File.basename(f) }
+  s.require_paths = ["lib"]
+end

data/lib/hippo/exceptions.rb

@@ -0,0 +1,8 @@
+module Hippo
+  module Exceptions
+    class Exception < StandardError; end
+
+    class InvalidField    < Exception; end
+    class InvalidSegment  < Exception; end
+  end
+end

data/lib/hippo/field.rb

@@ -0,0 +1,6 @@
+module Hippo
+  class Field
+    attr_accessor :name, :sequence, :datatype, :options, :restrictions, :minimum, :maximum, :required, :separator, :composite, :composite_sequence
+
+  end
+end

data/lib/hippo/parser.rb

@@ -0,0 +1,92 @@
+require 'pp'
+require 'hippo'
+
+module Hippo
+  class Parser
+    attr_accessor :raw_data, :segments, :output
+
+    def segments
+      @segments ||= []
+    end
+
+    def read_file(filename)
+      @raw_data = File.read(filename)
+    end
+
+    def populate_segments
+
+      # iterate through each line of the input data
+      # and create Hippo::Segments for each segment
+      @raw_data.split(Hippo::SegmentSeparator).each do |line|
+
+        # get rid of any newlines or other bizarre spacing
+        # this may cause an issue with any transactions with
+        # some sort of whitespace delimiter
+        line = line.strip
+        next if line.nil? || line.empty?
+
+        # each field is separated by either * or : depending 
+        # if it is a composite field.  we treat them the same
+        fields = line.split(Hippo::FieldSeparator)
+
+        # grab the first field as it is the segment identifier 
+        segment_identifier = fields.shift
+
+        # create a new segment object based on the identifier
+        segment = Hippo::Segments.const_get(segment_identifier.upcase).new
+        
+        # populate each field from the original input
+        fields.each_with_index do |value, index|
+          field = segment.class.fields[index]
+         
+          # if the field is an array that means it is a
+          # composite field
+          if field.class == Array
+            composite_fields = value.split(Hippo::CompositeSeparator)
+            
+            # initialize the values hash with a hash for this
+            # composite field
+            segment.values[index] = {}
+
+            # iterate through each value present in the composite field
+            # and save them to the appropriate sequence in the values 
+            # hash
+            composite_fields.each_with_index do |comp_value, comp_index|
+              segment.values[index][field[comp_index].sequence] = comp_value
+            end
+          else
+            segment.values[field.sequence] = value
+          end
+        end
+        
+        # save the newly created segment to the segments accessor
+        segments << segment
+      end
+    end
+
+    def parse_segments
+      @segments.each do |segment|
+        puts segment.to_s
+      end
+    end
+
+    def parse(filename)
+      read_file(filename)
+      populate_segments
+      parse_segments
+    end
+  end
+end
+
+if __FILE__ == $0
+  parser = Hippo::Parser.new
+  parser.parse(ARGV[0])
+
+  output_string = ''
+  parser.segments.each do |seg|
+    output_string += seg.to_s
+  end
+
+  puts ''
+  puts output_string
+end

data/lib/hippo/samples/835.edi

@@ -0,0 +1,88 @@
+ISA*00*          *00*          *ZZ*SENDER         *ZZ*RECEIVER       *080319*2327*U*00401*002721171*0*P*:~
+GS*HC*SENDER*RECEIVER*20080319*2327*27211711*X*004010X091A1~
+ST*835*1234~
+BPR*C*150000*C*ACH*CTX*01*999999992*DA*123456
+*1512345678**01*999988880*DA*98765*19960913~
+TRN*1*12345*1512345678~
+DTM*405*19960916~
+N1*PR*INSURANCE COMPANY OF TIMBUCKTU~
+N3*1 MAIN STREET~
+N4*TIMBUCKTU*AK*89111~
+REF*2U*999~
+N1*PE*CYBIL MENTAL HOSPITAL*XX*6543210903~
+PLB*130035*20070930*72>PR*-12123.66~
+SE*28*1234~
+ST*835*1234~
+BPR*C*150000*C*ACH*CTX*01*999999992*DA*123456
+*1512345678**01*999988880*DA*98765*19960913~
+TRN*1*12345*1512345678~
+DTM*405*19960916~
+N1*PR*INSURANCE COMPANY OF TIMBUCKTU~
+N3*1 MAIN STREET~
+N4*TIMBUCKTU*AK*89111~
+REF*2U*999~
+N1*PE*CYBIL MENTAL HOSPITAL*XX*6543210903~
+LX*961211~
+TS3*6543210903*11*19961231*1*211366.97*138018.4***
+138018.4**73348.57~
+TS2*2178.45*1919.71**56.82*197.69*4.23~
+CLP*666123*1*211366.97*138018.4**MA*1999999444444*
+11*1~
+CAS*CO*A2*73348.57~
+NM1*QC*1*SHEPARD*SAM*O***HN*666666666A~
+MIA*0***138018.4~
+DTM*232*19960816~
+DTM*233*19960824~
+QTY*CA*8~
+LX*961213~
+TS3*6543210909*13*19961231*1*15000*15000**
+*11980.33**3019.67~
+CLP*777777*1*15000*11980.33**MB*1999999444445*13*
+1~
+CAS*CO*A2*3019.67~
+NM1*QC*1*BORDEN*LIZ*E***HN*996669999B~
+NM1*82*2*CYBIL MENTAL HOSPITAL*****XX*6543210903~
+MIA*0****MA130~
+REF*EA*00000000012345~
+DTM*050*19960128~
+DTM*232*19961214~
+DTM*233*19961216~
+SVC*NU:0111*2000*0****2~
+DTM*472*19961216~
+CAS*CO*22*2000*2~
+SVC*NU:0250*1113.08*0****217~
+DTM*472*19961216~
+CAS*CO*22*1113.08*217~
+SVC*NU:0270*349.4*0****8~
+DTM*472*19961216~
+CAS*CO*22*349.4*8~
+SVC*NU:0301*747.65*0****16~
+DTM*472*19961216~
+CAS*CO*22*747.65*16~
+SVC*NU:0305*187.53*0****5~
+DTM*472*19961216~
+CAS*CO*22*187.53*5~
+SVC*NU:0320*375.73*0****2~
+DTM*472*19961216~
+CAS*CO*22*375.73*2~
+SVC*NU:0324*365.87*0****2~
+DTM*472*19961216~
+CAS*CO*22*365.87*2~
+SVC*NU:0410*222.5*0****4~
+DTM*472*19961216~
+CAS*CO*22*222.5*4~
+SVC*NU:0450*715.55*0****1~
+DTM*472*19961216~
+CAS*CO*22*715.55*1~
+SVC*NU:0460*230*0****4~
+DTM*472*19961216~
+CAS*CO*22*230*4~
+SVC*NU:0730*256.86*0****2~
+DTM*472*19961216~
+CAS*CO*22*256.86*2~
+SVC*NU:0801*1550*0****2~
+DTM*472*19961216~
+CAS*CO*22*1550*2~
+SE*28*1234~
+GE*1*27211711~
+IEA*1*002721171~