hippo 0.0.4 → 0.0.5

data/test/test_hipaa_835.rb

@@ -0,0 +1,229 @@
+require File.expand_path('test_helper', File.dirname(__FILE__))
+
+class TestHIPAA835 < MiniTest::Unit::TestCase
+
+  def test_business_scenario_1
+=begin
+
+Dollars and data are being sent together through the banking system to pay
+Medicare Part A institutional claims.
+
+This scenario depicts the use of the ANSI ASC X12 835 in a governmental
+institutional environment. The electronic transmission of funds request
+and the remittance detail are contained within this single 835. In this
+scenario, one or more Depository Financial Institutions is involved in 
+transferring information from the sender to the receiver.
+
+The following assumptions pertain to scenario one:
+• The dollars move using the ACH network from the Bank of Payorea, 
+  ABA# 999999992, account number 123456 to the Bank of No Return,
+  ABA# 999988880, checking account number 98765. The money moves on
+  September 13, 2002.
+• The Insurance Company of Timbucktu, Federal tax ID # 512345678 and
+  Medicare Intermediary ID# 999, is paying Regional Hope Hospital, National
+  Provider Number 6543210903. This is for one inpatient and one outpatient claim.
+• For the inpatient claim, the patient’s name is Sam O. Jones. The Health
+  Insurance Claim Number is 666-66-6666A. The Claim Submitter’s Identifier is
+  666123. The date of the hospitalization was August 16, 2002 to August 24, 2002.
+  Total charges reported are $211,366.97. Paid amount is $138,018.40. There is
+  no patient responsibility. Contractual adjustment is $73,348.57. No service
+  line detail is provided.
+• For the outpatient claim, the patient’s name is Liz E. Border, Health
+  Insurance Claim Number 996-66-9999B. The Claim Submitter’s Identifier is
+  777777. The date of service is May 12, 2002. Total charges reported are 
+  $15,000. Paid amount is $11,980.33. Contractual adjustment is $3,019.67.
+  There is no service line information.
+• There is a Capital Pass Through Amount (CV) payment to the provider for $1.27.
+
+=end
+
+    ts = Hippo::TransactionSets::HIPAA_835::Base.new
+
+    ts.ST do |st|
+      st.TransactionSetControlNumber        = '1234'
+    end
+
+    ts.BPR do |bpr|
+      bpr.TransactionHandlingCode           = 'C'
+      bpr.MonetaryAmount                    = '150000'
+      bpr.CreditDebitFlagCode               = 'C'
+      bpr.PaymentMethodCode                 = 'ACH'
+      bpr.PaymentFormatCode                 = 'CTX'
+      bpr.DfiIdNumberQualifier              = '01'
+      bpr.DfiIdentificationNumber           = '999999992'
+      bpr.AccountNumberQualifier            = 'DA'
+      bpr.AccountNumber                     = '123456'
+      bpr.OriginatingCompanyIdentifier      = '1512345678'
+      bpr.DfiIdNumberQualifier_02           = '01'
+      bpr.DfiIdentificationNumber_02        = '999988880'
+      bpr.AccountNumberQualifier_02         = 'DA'
+      bpr.AccountNumber_02                  = '98765'
+      bpr.Date                              = '20020913'
+    end
+
+    ts.TRN do |trn|
+      trn.ReferenceIdentification           = '12345'
+      trn.OriginatingCompanyIdentifier      = '1512345678'
+    end
+
+    ts.DTM.Date = '20020916'
+
+    ts.L1000A do |l1000a|
+      l1000a.N1.Name                = 'INSURANCE COMPANY OF TIMBUCKTU'
+      l1000a.N3.AddressInformation  = '1 MAIN STREET'
+
+      l1000a.N4 do |n4|
+        n4.CityName                 = 'TIMBUCKTU'
+        n4.StateOrProvinceCode      = 'AK'
+        n4.PostalCode               = '89111'
+      end
+
+      l1000a.REF do |ref|
+        ref.ReferenceIdentificationQualifier  = '2U'
+        ref.ReferenceIdentification           = '999'
+      end
+    end
+
+    ts.L1000B do |l1000b|
+      l1000b.N1 do |n1|
+        n1.Name                         = 'REGIONAL HOPE HOSPITAL'
+        n1.IdentificationCodeQualifier  = 'XX'
+        n1.IdentificationCode           = '6543210903'
+      end
+    end
+
+    ts.L2000.build do |l2000|
+      l2000.LX.LX01 = '110212'
+
+      l2000.TS3 do |ts3|
+        ts3.ReferenceIdentification     = '6543210903'
+        ts3.FacilityCodeValue           = '11'
+        ts3.Date                        = '20021231'
+        ts3.Quantity                    = '1'
+        ts3.MonetaryAmount_01           = '211366.97'
+        ts3.MonetaryAmount_05           = '138018.4'
+        ts3.MonetaryAmount_07           = '73348.57'
+      end
+
+      l2000.TS2 do |ts2|
+        ts2.MonetaryAmount_01           = '2178.45'
+        ts2.MonetaryAmount_02           = '1919.71'
+        ts2.MonetaryAmount_04           = '56.82'
+        ts2.MonetaryAmount_05           = '197.69'
+        ts2.MonetaryAmount_06           = '4.23'
+      end
+
+      l2000.L2100.build do |l2100|
+        l2100.CLP do |clp|
+          clp.ClaimSubmitterSIdentifier = '666123'
+          clp.ClaimStatusCode           = '1'
+          clp.MonetaryAmount_01         = '211366.97'
+          clp.MonetaryAmount_02         = '138018.4'
+          clp.ClaimFilingIndicatorCode  = 'MA'
+          clp.ReferenceIdentification   = '1999999444444'
+          clp.FacilityCodeValue         = '11'
+          clp.ClaimFrequencyTypeCode    = '1'
+        end
+
+        l2100.CAS.build do |cas|
+          cas.ClaimAdjustmentGroupCode  = 'CO'
+          cas.ClaimAdjustmentReasonCode = '45'
+          cas.MonetaryAmount            = '73348.57'
+        end
+
+        l2100.NM1 do |nm1|
+          nm1.NameLastOrOrganizationName  = 'JONES'
+          nm1.NameFirst                   = 'SAM'
+          nm1.NameMiddle                  = 'O'
+          nm1.IdentificationCodeQualifier = 'HN'
+          nm1.IdentificationCode          = '666666666A'
+        end
+
+        l2100.MIA do |mia|
+          mia.Quantity                    = '0'
+          mia.MonetaryAmount_02           = '138018.4'
+        end
+
+        l2100.DTM_01.build do |dtm|
+          dtm.DateTimeQualifier           = '232'
+          dtm.Date                        = '20020816'
+        end
+
+        l2100.DTM_01.build do |dtm|
+          dtm.DateTimeQualifier           = '233'
+          dtm.Date                        = '20020824'
+        end
+
+        l2100.QTY do |qty|
+          qty.QuantityQualifier           = 'CA'
+          qty.Quantity                    = '8'
+        end
+      end
+    end
+
+    ts.L2000.build do |l2000|
+      l2000.LX.LX01 = '130212'
+
+      l2000.TS3 do |ts3|
+        ts3.ReferenceIdentification     = '6543210909'
+        ts3.FacilityCodeValue           = '13'
+        ts3.Date                        = '19961231'
+        ts3.Quantity                    = '1'
+        ts3.MonetaryAmount_01           = '15000'
+        ts3.MonetaryAmount_05           = '11980.33'
+        ts3.MonetaryAmount_07           = '3019.67'
+      end
+
+      l2000.L2100.build do |l2100|
+        l2100.CLP do |clp|
+          clp.ClaimSubmitterSIdentifier = '777777'
+          clp.ClaimStatusCode           = '1'
+          clp.MonetaryAmount_01         = '15000'
+          clp.MonetaryAmount_02         = '11980.33'
+          clp.ClaimFilingIndicatorCode  = 'MB'
+          clp.ReferenceIdentification   = '1999999444445'
+          clp.FacilityCodeValue         = '13'
+          clp.ClaimFrequencyTypeCode    = '1'
+        end
+
+        l2100.CAS.build do |cas|
+          cas.ClaimAdjustmentGroupCode  = 'CO'
+          cas.ClaimAdjustmentReasonCode = '45'
+          cas.MonetaryAmount            = '3019.67'
+        end
+
+        l2100.NM1 do |nm1|
+          nm1.NameLastOrOrganizationName  = 'BORDER'
+          nm1.NameFirst                   = 'LIZ'
+          nm1.NameMiddle                  = 'E'
+          nm1.IdentificationCodeQualifier = 'HN'
+          nm1.IdentificationCode          = '996669999B'
+        end
+
+        l2100.MOA do |moa|
+          moa.ReferenceIdentification     = 'MA02'
+        end
+
+        l2100.DTM_01.build do |dtm|
+          dtm.DateTimeQualifier           = '232'
+          dtm.Date                        = '20020512'
+        end
+      end
+    end
+
+    ts.PLB do |plb|
+      plb.ReferenceIdentification_01  = '6543210903'
+      plb.Date                        = '20021231'
+      plb.AdjustmentReasonCode        = 'CV'
+      plb.ReferenceIdentification_02  = 'CP'
+      plb.MonetaryAmount              = '-1.27'
+    end
+
+    ts.SE.TransactionSetControlNumber = ts.ST.TransactionSetControlNumber
+    ts.SE.NumberOfIncludedSegments    = ts.segment_count
+
+    provided_answer = File.read('samples/005010X221A1_business_scenario_1.edi')
+
+    assert_equal provided_answer.chomp, ts.to_s
+  end
+end

data/test/test_hipaa_837.rb

@@ -1,6 +1,4 @@
-#!/usr/bin/env ruby
-
-require_relative 'test_helper'
+require File.expand_path('test_helper', File.dirname(__FILE__))
 
 class TestHIPAA837 < MiniTest::Unit::TestCase
 
@@ -107,7 +105,7 @@ VAN claim identification number = 17312345600006351.
 
     ts.L2000A do |l2000a|
       l2000a.HL do |hl|
-        hl.HL01 = hl.class.increment_sequence_number
+        hl.HL01 = ts.increment('HL')
         hl.HL04 = 1
       end
 
@@ -156,9 +154,9 @@ VAN claim identification number = 17312345600006351.
         end
       end
 
-      ts.L2000B do |l2000b|
+      l2000a.L2000B do |l2000b|
         l2000b.HL do |hl|
-          hl.HL01 = hl.class.increment_sequence_number
+          hl.HL01 = ts.increment('HL')
           hl.HL02 = l2000a.HL.HL01
           hl.HL04 = 1
         end
@@ -199,9 +197,9 @@ VAN claim identification number = 17312345600006351.
           end
         end
 
-        ts.L2000C do |l2000c|
+        l2000b.L2000C do |l2000c|
           l2000c.HL do |hl|
-            hl.HL01 = hl.class.increment_sequence_number
+            hl.HL01 = ts.increment('HL')
             hl.HL02 = l2000b.HL.HL01
             hl.HL04 = 0
           end
@@ -258,7 +256,7 @@ VAN claim identification number = 17312345600006351.
             end
 
             l2300.L2400.build do |l2400|
-              l2400.LX.LX01 = Hippo::Segments::LX.increment_sequence_number
+              l2400.LX.LX01 = l2300.increment('LX')
 
               l2400.SV1 do |sv1|
                 sv1.ProductServiceIdQualifier     = 'HC'
@@ -276,7 +274,7 @@ VAN claim identification number = 17312345600006351.
             end
 
             l2300.L2400.build do |l2400|
-              l2400.LX.LX01 = Hippo::Segments::LX.increment_sequence_number
+              l2400.LX.LX01 = l2300.increment('LX')
 
               l2400.SV1 do |sv1|
                 sv1.ProductServiceIdQualifier     = 'HC'
@@ -294,7 +292,7 @@ VAN claim identification number = 17312345600006351.
             end
 
             l2300.L2400.build do |l2400|
-              l2400.LX.LX01 = Hippo::Segments::LX.increment_sequence_number
+              l2400.LX.LX01 = l2300.increment('LX')
 
               l2400.SV1 do |sv1|
                 sv1.ProductServiceIdQualifier     = 'HC'
@@ -312,7 +310,7 @@ VAN claim identification number = 17312345600006351.
             end
 
             l2300.L2400.build do |l2400|
-              l2400.LX.LX01 = Hippo::Segments::LX.increment_sequence_number
+              l2400.LX.LX01 = l2300.increment('LX')
 
               l2400.SV1 do |sv1|
                 sv1.ProductServiceIdQualifier     = 'HC'
@@ -340,57 +338,259 @@ VAN claim identification number = 17312345600006351.
 
     ts.SE.NumberOfIncludedSegments    = ts.segment_count
 
-    published_answer = <<EOF
-ST*837*0021*005010X222A1~
-BHT*0019*00*244579*20061015*1023*CH~
-NM1*41*2*PREMIER BILLING SERVICE*****46*TGJ23~
-PER*IC*JERRY*TE*3055552222*EX*231~
-NM1*40*2*KEY INSURANCE COMPANY*****46*66783JJT~
-HL*1**20*1~
-PRV*BI*PXC*203BF0100Y~
-NM1*85*2*BEN KILDARE SERVICE*****XX*9876543210~
-N3*234 SEAWAY ST~
-N4*MIAMI*FL*33111~
-REF*EI*587654321~
-NM1*87*2~
-N3*2345 OCEAN BLVD~
-N4*MIAMI*FL*33111~
-HL*2*1*22*1~
-SBR*P**2222-SJ******CI~
-NM1*IL*1*SMITH*JANE****MI*JS00111223333~
-DMG*D8*19430501*F~
-NM1*PR*2*KEY INSURANCE COMPANY*****PI*999996666~
-REF*G2*KA6663~
-HL*3*2*23*0~
-PAT*19~
-NM1*QC*1*SMITH*TED~
-N3*236 N MAIN ST~
-N4*MIAMI*FL*33413~
-DMG*D8*19730501*M~
-CLM*26463774*100***11:B:1*Y*A*Y*I~
-REF*D9*17312345600006351~
-HI*BK:0340*BF:V7389~
-LX*1~
-SV1*HC:99213*40*UN*1***1~
-DTP*472*D8*20061003~
-LX*2~
-SV1*HC:87070*15*UN*1***1~
-DTP*472*D8*20061003~
-LX*3~
-SV1*HC:99214*35*UN*1***2~
-DTP*472*D8*20061010~
-LX*4~
-SV1*HC:86663*10*UN*1***2~
-DTP*472*D8*20061010~
-SE*42*0021~
-EOF
-
-    assert_equal published_answer, ts.to_s.split('~').join("~\n") + "~\n"
-
-    #* not printing LX segments for each service line
-    #* HL parent/child references wrong
-    #* HL total segments counts should only be counting direct children
-
+    published_answer = File.read('samples/005010X222A1_commercial_health_insurance.edi')
+    assert_equal published_answer.chomp, ts.to_s
   end
 
+  def test_anesthesia
+=begin
+Patient is the same as the subscriber. Payer is Medicare. 
+Encounter is billed directly to Medicare.
+
+SUBSCRIBER/PATIENT: Margaret Jones
+ADDRESS: 123 Rainbow Road, Nashville, TN 37232
+TELEPHONE: 615-555-1212
+SEX: F
+DOB: 03/03/1974
+EMPLOYER: ACME Inc.
+SUBSCRIBER #: 123456789A
+
+SECONDARY COVERAGE
+
+DESTINATION PAYER: ABC Payer
+PAYER ADDRESS: P.O. Box 1465, Nashville, TN, 37232
+PAYER ORGANIZATION ID: 05440
+
+RECEIVER: ABC Payer
+EDI #: 05440
+
+BILLING PROVIDER/SENDER: Provider Medical Group
+ADDRESS: 1234 West End Ave, Nashville, TN, 37232
+NPI#: 2366554859
+TIN: 756473826
+EDI #: N305
+CONTACT PERSON AND PHONE NUMBER: Nina, 615-555-1212 ext.911
+
+RENDERING PROVIDER: Dr. Jacob E. Townsend/Anesthesiologist
+NPI: 5678912345
+MEDICARE PROVIDER ID#: 9741234
+PLACE OF SERVICE: Provider OP Hospital
+PLACE OF SERVICE ADDRESS: 345 Main Drive, Nashville, TN,37232
+PLACE OF SERVICE ID#: 43294867
+
+PATIENT ACCOUNT NUMBER: 543211230
+CASE: Laser Eye Surgery.
+
+VISIT: DOS=1/12/2005 POS=Outpatient Hospital
+SERVICES: Anesthesia for the Laser Eye Surgery
+CHARGES: Anesthesia, 61 minutes = $827.00
+CONCURRENCY: 2 cases
+PHYSICAL STATUS: Normal
+PATIENT CONTROL #: 153829140
+MEDICAL RECORD ID #: 006653794
+
+TOTAL CHARGES: $827.00
+
+ELECTRONIC ROUTE: Billing Provider (sender) to ABC PAYER direct
+=end
+
+    ts = Hippo::TransactionSets::HIPAA_837::Base.new
+
+    ts.ST.TransactionSetControlNumber        = '0001'
+    ts.ST.ImplementationConventionReference  = '005010X222A1'
+
+    ts.BHT do |bht|
+      bht.TransactionSetPurposeCode = '00'
+      bht.ReferenceIdentification   = '0123'
+      bht.Date                      = '20050117'
+      bht.Time                      = '1023'
+      bht.TransactionTypeCode       = 'CH'
+    end
+
+    ts.L1000A do |l1000a|
+      l1000a.NM1 do |nm1|
+        nm1.EntityTypeQualifier        = '2'
+        nm1.NameLastOrOrganizationName = 'PROVIDER MEDICAL GROUP'
+        nm1.IdentificationCode         = 'N305'
+      end
+
+      l1000a.PER do |per|
+        per.Name                            = 'NINA'
+        per.CommunicationNumberQualifier_01 = 'TE'
+        per.CommunicationNumber_01          = '6155551212'
+        per.CommunicationNumberQualifier_02 = 'EX'
+        per.CommunicationNumber_02          = '911'
+      end
+    end
+
+    ts.L1000B do |l1000b|
+      l1000b.NM1 do |nm1|
+        nm1.EntityTypeQualifier        = '2'
+        nm1.NameLastOrOrganizationName = 'ABC PAYER'
+        nm1.IdentificationCode         = '05440'
+      end
+    end
+
+    ts.L2000A.build do |l2000a|
+      l2000a.HL do |hl|
+        hl.HL01 = ts.increment('HL')
+        hl.HL04 = 1
+      end
+
+      l2000a.L2010AA do |l2010aa|
+
+        l2010aa.NM1 do |nm1|
+          nm1.EntityTypeQualifier           = '2'
+          nm1.NameLastOrOrganizationName    = 'PROVIDER MEDICAL GROUP'
+          nm1.IdentificationCodeQualifier   = 'XX'
+          nm1.IdentificationCode            = '2366554859'
+        end
+
+        l2010aa.N3 do |n3|
+          n3.AddressInformation             = '1234 WEST END AVE'
+        end
+
+        l2010aa.N4 do |n4|
+          n4.CityName                       = 'NASHVILLE'
+          n4.StateOrProvinceCode            = 'TN'
+          n4.PostalCode                     = '37232'
+        end
+
+        l2010aa.REF do |ref|
+          ref.ReferenceIdentificationQualifier = 'EI'
+          ref.ReferenceIdentification          = '756473826'
+        end
+      end
+
+      l2000a.L2000B.build do |l2000b|
+        l2000b.HL do |hl|
+          hl.HL01 = ts.increment('HL')
+          hl.HL02 = l2000a.HL.HL01
+          hl.HL04 = 0
+        end
+
+        l2000b.SBR do |sbr|
+          sbr.PayerResponsibilitySequenceNumberCode = 'P'
+          sbr.IndividualRelationshipCode            = '18'
+          sbr.ClaimFilingIndicatorCode              = 'MB'
+        end
+
+        l2000b.L2010BA do |l2010ba|
+          l2010ba.NM1 do |nm1|
+            nm1.EntityTypeQualifier         = '1'
+            nm1.NameLastOrOrganizationName  = 'JONES'
+            nm1.NameFirst                   = 'MARGARET'
+            nm1.IdentificationCodeQualifier = 'MI'
+            nm1.IdentificationCode          = '123456789A'
+          end
+
+          l2010ba.N3.AddressInformation     = '123 RAINBOW ROAD'
+
+          l2010ba.N4 do |n4|
+            n4.CityName                     = 'NASHVILLE'
+            n4.StateOrProvinceCode          = 'TN'
+            n4.PostalCode                   = '37232'
+          end
+
+          l2010ba.DMG do |dmg|
+            dmg.DateTimePeriod              = '19740303'
+            dmg.GenderCode                  = 'F'
+          end
+        end
+
+        l2000b.L2010BB do |l2010bb|
+          l2010bb.NM1 do |nm1|
+            nm1.EntityTypeQualifier           = '2'
+            nm1.NameLastOrOrganizationName    = 'ABC PAYER'
+            nm1.IdentificationCodeQualifier   = 'PI'
+            nm1.IdentificationCode            = '05440'
+          end
+        end
+
+        l2000b.L2300.build do |l2300|
+          l2300.CLM do |clm|
+            clm.ClaimSubmitterSIdentifier         = '153829140'
+            clm.MonetaryAmount                    = '827'
+            clm.FacilityCodeValue                 = '22'
+            clm.FacilityCodeQualifier             = 'B'
+            clm.ClaimFrequencyTypeCode            = '1'
+            clm.YesNoConditionOrResponseCode      = 'Y'
+            clm.ProviderAcceptAssignmentCode      = 'A'
+            clm.YesNoConditionOrResponseCode_02   = 'Y'
+            clm.ReleaseOfInformationCode          = 'Y'
+          end
+
+          l2300.HI do |hi|
+            hi.CodeListQualifierCode_01 = 'BK'
+            hi.IndustryCode_01          = '36616'
+          end
+
+          l2300.L2310B do |l2310b|
+            l2310b.NM1 do |nm1|
+              nm1.EntityTypeQualifier           = '1'
+              nm1.NameLastOrOrganizationName    = 'TOWNSEND'
+              nm1.NameFirst                     = 'JACOB'
+              nm1.NameMiddle                    = 'E'
+              nm1.IdentificationCodeQualifier   = 'XX'
+              nm1.IdentificationCode            = '5678912345'
+            end
+
+            l2310b.PRV do |prv|
+              prv.ReferenceIdentificationQualifier  = 'ZZ'
+              prv.ReferenceIdentification           = '207L00000X'
+            end
+          end
+
+          l2300.L2310C do |l2310c|
+            l2310c.NM1 do |nm1|
+              nm1.EntityTypeQualifier           = '2'
+              nm1.NameLastOrOrganizationName    = 'PROVIDER OP HOSP'
+              nm1.IdentificationCodeQualifier   = 'XX'
+              nm1.IdentificationCode            = '432198765'
+            end
+
+            l2310c.N3.AddressInformation     = '345 MAIN DRIVE'
+
+            l2310c.N4 do |n4|
+              n4.CityName                     = 'NASHVILLE'
+              n4.StateOrProvinceCode          = 'TN'
+              n4.PostalCode                   = '37232'
+            end
+          end
+
+          l2300.L2400.build do |l2400|
+            l2400.LX.LX01 = l2300.increment('LX')
+
+            l2400.SV1 do |sv1|
+              sv1.ProductServiceIdQualifier     = 'HC'
+              sv1.ProductServiceId              = '00142'
+              sv1.ProcedureModifier_01          = 'QK'
+              sv1.ProcedureModifier_02          = 'QS'
+              sv1.ProcedureModifier_03          = 'P1'
+              sv1.MonetaryAmount                = '827'
+              sv1.UnitOrBasisForMeasurementCode = 'MJ'
+              sv1.Quantity                      = '61'
+              sv1.DiagnosisCodePointer          = 1
+            end
+
+            l2400.DTP('Date - Service Date') do |dtp|
+              dtp.DateTimePeriodFormatQualifier = 'D8'
+              dtp.DateTimePeriod                = '20050112'
+            end
+          end
+        end
+      end
+    end
+
+
+    ts.SE do |se|
+      se.TransactionSetControlNumber = ts.ST.TransactionSetControlNumber
+    end
+
+    ts.SE.NumberOfIncludedSegments    = ts.segment_count
+
+    published_answer = File.read('samples/005010X222A1_anesthesia.edi')
+    assert_equal published_answer.chomp, ts.to_s
+
+  end
 end

data/test/test_parser.rb

@@ -0,0 +1,26 @@
+require File.expand_path('test_helper', File.dirname(__FILE__))
+
+class TestParser < MiniTest::Unit::TestCase
+  def test_populate_segments_returns_array_of_segments
+    parser = Hippo::Parser.new
+    parser.read_file('samples/005010X221A1_business_scenario_1.edi')
+    parser.populate_segments
+
+    assert_instance_of Array, parser.segments
+
+    parser.segments.each do |segment|
+      assert_kind_of Hippo::Segments::Base, segment
+    end
+  end
+
+  def test_parse_returns_array_of_transaction_sets
+    parser = Hippo::Parser.new
+    transaction_sets = parser.parse('samples/005010X221A1_business_scenario_1.edi')
+
+    assert_instance_of Array, transaction_sets
+
+    transaction_sets.each do |ts|
+      assert_kind_of Hippo::TransactionSets::Base, ts
+    end
+  end
+end

data/test/test_segments_base.rb

@@ -1,4 +1,4 @@
-require_relative './test_helper'
+require File.expand_path('test_helper', File.dirname(__FILE__))
 
 class TestSegmentsBase < MiniTest::Unit::TestCase
   def setup; end;

data/test/test_transaction_sets_base.rb

@@ -1,4 +1,4 @@
-require_relative './test_helper'
+require File.expand_path('test_helper', File.dirname(__FILE__))
 
 class TestTransactionSetBase < MiniTest::Unit::TestCase
   def test_preset_values_are_set
@@ -82,4 +82,24 @@ class TestTransactionSetBase < MiniTest::Unit::TestCase
 
     assert_equal 'TSS*Blah*Bar*Baz~TCS*Blah*:::CNBlah*Preset Field 7~TSS*Last Segment*Boo~TSS*Foo*SubBar~TCS*:SubBarBlah**Foo2~TSS*Last Segment*SubBarRepeater~', ts.to_s
   end
+
+  def test_intializing_with_segment_array_populates_transaction_set
+    tss = Hippo::Segments::TestSimpleSegment.new
+    tss.TSS01 = 'Blah'
+
+    tcs = Hippo::Segments::TestCompoundSegment.new
+    tcs.Field7 = 'Preset Field 7'
+
+    tss2 = Hippo::Segments::TestSimpleSegment.new
+    tss2.TSS01 = 'Last Segment'
+
+    # start L0001 segments
+    tss3 = Hippo::Segments::TestSimpleSegment.new
+    tss3.TSS01 = 'Foo'
+
+    segment_array = [tss, tcs, tss2, tss3]
+
+    assert_equal segment_array.map(&:to_s).join, Hippo::TransactionSets::Test::Base.new(:segments => segment_array).to_s
+    assert_empty segment_array
+  end
 end