PD_x12 1.3.2 → 1.3.11

data/misc/T723.xml

@@ -4,7 +4,7 @@
 
    http://x12parser.rubyforge.org 
    
-   Copyright (C) 2009 APP Design, Inc.
+   Copyright (C) 2012 P & D Technology Solutions, LLC.
 
    This library is free software; you can redistribute it and/or
    modify it under the terms of the GNU Lesser General Public
@@ -19,8 +19,7 @@
    You should have received a copy of the GNU Lesser General Public
    License along with this library; if not, write to the Free Software
    Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
-
-   $Id: T723.xml 78 2009-05-12 22:27:26Z ikk $
+   
 -->
 
 <Table name="T723">
@@ -36,4 +35,10 @@
   <Entry name="10" value="Exclusion Condition Violated"/>
   <Entry name="12" value="Too Many Repetitions"/>
   <Entry name="13" value="Too Many Components"/>
+  <Entry name="I6" value="Code value not used in Implementation"/>
+  <Entry name="I9" value="Implememtation dependent data element missing"/>
+  <Entry name="I10" value="Implementation 'not used' data element present"/>
+  <Entry name="I11" value="Implementation too few repetitions"/>
+  <Entry name="I12" value="Implementation pattern match failure"/>
+  <Entry name="I13" value="Implementation dependent 'not used' data element present"/>
 </Table>

data/test/tc_parse_999.rb

@@ -0,0 +1,77 @@
+#--
+#     This file is part of the X12Parser library that provides tools to
+#     manipulate X12 messages using Ruby native syntax.
+#
+#     http://x12parser.rubyforge.org 
+#     
+#     Copyright (C) 2012 P&D Technical Solutions, LLC.
+#
+#     This library is free software; you can redistribute it and/or
+#     modify it under the terms of the GNU Lesser General Public
+#     License as published by the Free Software Foundation; either
+#     version 2.1 of the License, or (at your option) any later version.
+#
+#     This library is distributed in the hope that it will be useful,
+#     but WITHOUT ANY WARRANTY; without even the implied warranty of
+#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+#     Lesser General Public License for more details.
+#
+#     You should have received a copy of the GNU Lesser General Public
+#     License along with this library; if not, write to the Free Software
+#     Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+#++
+#
+require 'x12'
+require 'test/unit'
+
+class Test999Parse < Test::Unit::TestCase
+  
+  def setup
+    @parser = X12::Parser.new('999.xml')
+    @msg =[]
+    @msg.push "ISA*00*          *00*          *27*PPPPPP         *27*XXXXXX         *100914*1025*^*00501*000000218*0*T*:~GS*FA*PPPPPP*XXXXXX*20100914*10251463*3*X*005010X231A1~ST*999*3001*005010X231A1~AK1*HC*2145001*005010X222A1~AK2*837*000000001*005010X222A1~IK5*A~AK9*A*1*1*1~SE*6*3001~GE*1*3~IEA*1*000000218~"
+    @msg.push "ISA*00*          *00*          *ZZ*123456789      *ZZ*987654321      *041117*1024*^*00501*000000286*0*P*:~GS*FA*RCVR*SNDR*20041117*1024*287*X*005010X231~ST*999*2870001*005010X231~AK1*HC*17456*004010X098A1~AK2*837*0001~IK5*A~AK2*837*0002~IK3*CLM*22**8~CTX*CLM01:123456789~IK4*2*782*1~IK5*R*5~AK2*837*0003~IK3*REF*57**3~CTX*SITUATIONAL TRIGGER*CLM*43**5:3*C023:1325~CTX*CLM01:987654321~IK5*R*5~AK9*P*3*3*1~SE*16*2870001~GE*1*287~IEA*1*000000286~"  
+ end
+  
+  def teardown
+    #nothing   
+  end
+  
+  #parse a simple accepted message
+  def test_simple
+    @r = @parser.parse('999', @msg[0])
+                     
+    assert_equal(@r.GS.ApplicationSendersCode, "PPPPPP")
+    assert_equal(@r.GS.ApplicationReceiversCode, "XXXXXX")
+    
+    @r.L1000 {|a|
+      assert_equal(a.AK2.TransactionSetIdentifierCode, "837")
+      assert_equal(a.AK2.TransactionSetControlNumber, "000000001")
+      assert_equal(a.AK2.ImplementationConventionReference, "005010X222A1")
+      
+      assert_equal(a.IK5.TransactionSetAcknowledgmentCode, "A")
+    }
+  end
+  
+  
+  #parse a multiple transaction with 1 accepted and 2 rejected claims
+  def test_all
+    @r = @parser.parse('999', @msg[1])           
+    
+    
+    assert_equal(3, @r.L1000.size)  
+    assert_equal("A", @r.L1000[0].IK5.TransactionSetAcknowledgmentCode)
+    assert_equal("R", @r.L1000[1].IK5.TransactionSetAcknowledgmentCode)
+    assert_equal("R", @r.L1000[2].IK5.TransactionSetAcknowledgmentCode)       
+  end
+
+  def test_timing
+    start = Time::now
+    X12::TEST_REPEAT.times do
+      @r = @parser.parse('999', @msg[1])
+    end
+    finish = Time::now
+    puts sprintf("Parses per second, 999: %.2f, elapsed: %.1f", X12::TEST_REPEAT.to_f/(finish-start), finish-start)
+  end # test_timing
+
+end

data/test/{tc_parse_270interchange.rb → xc_parse_270interchange.rb}

@@ -118,7 +118,7 @@ EOT
       @@p = @@parser.parse('270interchange', @@m)
     end
     @r = @@p
-#    @@p.show
+    #@@p.show
 
   end # setup
 

data/test/{tc_parse_837p.rb → xc_parse_837p.rb}

@@ -37,7 +37,7 @@ class Test837pParse < Test::Unit::TestCase
     @temporary = "ISA*00**00**ZZ*000009340000000*ZZ*000000010000000*100423*1740*^*00501*000000181*0*P*:~GS*HC*00000934*00000001*20100423*1740*181*X*005010X222A1~ST*837*0001*005010X222A1~BHT*0019*00*181*20100423*1740*CH~NM1*41*2*EDI BILLING*****46*00000934~PER*IC*BILLER NAME*TE*2135559999~NM1*40*2*LAC DEPARTMENT OF MENTAL HEALTH*****46*00000001~HL*1**20*1~NM1*85*2*PROVIDER NAME*****XX*1477632479~N3*146 WESTWOOD BLVD~N4*LOS ANGELES*CA*900059876~REF*EI*959999346~HL*2*1*22*0~SBR*S*18**1001*****11~NM1*IL*1*DOE*JOHN****MI*9998211~N3*15 BEFORD~N4*LOS ANGELES*CA*900359876~DMG*D8*19900923*F~NM1*PR*2*LAC DEPARTMENT OF MENTAL HEALTH*****PI*953893470~REF*FY*123100~CLM*0000181*150***12:B:1*Y*A*Y*Y*P~REF*G1*89194428225~HI*BK:30002~NM1*82*1*RENDERING*JOHN****XX*1518169325~PRV*PE*PXC*2084P0800X~SBR*P*18*******MC~OI***Y*P**Y~NM1*IL*1*DOE*JOHN****MI*99929939C~N3*15 BEFORD~N4*LOS ANGELES*CA*900359876~NM1*PR*2*MEDI-CAL*****PI*01~LX*1~SV1*HC:90847*150*UN*60***1~DTP*472*D8*20100403~SE*33*0001~GE*1*181~IEA*1*000000181~"
     @msg << @temporary  
     
-    @r = @parser.parse('837p', @msg[0])        
+    @r = @parser.parse('837p', @msg[0])         
   end
   
   def teardown

data/test/{tc_parse_997.rb → xc_parse_997.rb}

@@ -76,6 +76,7 @@ EOT
 
       @@p = @@parser.parse('997', @@m997)
     end
+    #@@p.show
     @r = @@p
   end # setup
 

data/test/{tc_factory_837p.rb → xtc_factory_837p.rb}

@@ -47,7 +47,7 @@ N3*P O BOX 12312~
 N4*DURHAM*NC*27715~
 DMG*D8*19670807*F~
 NM1*PR*2*BCBSNC*****PI*987654321~
-CLM*PTACCT2235057*100.5***11::1*Y*A*Y*N**********~
+CLM*PTACCT2235057*100.5***11::1*Y*A*Y*N~
 REF*EA*MEDREC11111~
 HI*BK:78901~
 LX*1~

data/test/{tc_factory_997.rb → xtc_factory_997.rb}

@@ -28,6 +28,8 @@ class Test997Factory < Test::Unit::TestCase
 
   @@p = nil
 tmp=<<-EOT
+ISA****************~
+GS********~
 ST*997*2878~
 AK1*HS*293328532~
 AK2*270*~
@@ -42,6 +44,8 @@ AK4*1**1~
 AK5*E****999~
 AK9****~
 SE**~
+GE**~
+IEA**~
 EOT
 
   @@result = tmp.gsub!(/\n/,'')

data/test/xtc_factory_999.rb

@@ -0,0 +1,128 @@
+#--
+#     This file is part of the X12Parser library that provides tools to
+#     manipulate X12 messages using Ruby native syntax.
+#
+#     http://x12parser.rubyforge.org 
+#     
+#     Copyright (C) 2012 P&D Technical Solutions, LLC.
+#
+#     This library is free software; you can redistribute it and/or
+#     modify it under the terms of the GNU Lesser General Public
+#     License as published by the Free Software Foundation; either
+#     version 2.1 of the License, or (at your option) any later version.
+#
+#     This library is distributed in the hope that it will be useful,
+#     but WITHOUT ANY WARRANTY; without even the implied warranty of
+#     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+#     Lesser General Public License for more details.
+#
+#     You should have received a copy of the GNU Lesser General Public
+#     License along with this library; if not, write to the Free Software
+#     Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+#++
+#
+require 'x12'
+require 'test/unit'
+
+class Test999Factory < Test::Unit::TestCase
+  
+  def setup
+    @parser = X12::Parser.new('999.xml')
+    @msg = "ISA*00*          *00*          *27*PPPPPP         *27*XXXXXX         *100914*1025*^*00501*000000218*0*T*:~GS*FA*PPPPPP*XXXXXX*20100914*10251463*3*X*005010X231A1~ST*999*3001*005010X231A1~AK1*HC*2145001*005010X222A1~AK2*837*000000001*005010X222A1~IK5*A~AK9*A*1*1*1~SE*6*3001~GE*1*3~IEA*1*000000218~"
+  end
+  
+  def teardown
+    #nothing  
+  end
+  
+  def set_header(r)
+    r.ISA.AuthorizationInformationQualifier = "00"
+    r.ISA.AuthorizationInformation = "          "
+    r.ISA.SecurityInformationQualifier = "00"
+    r.ISA.SecurityInformation = "          "
+    r.ISA.InterchangeIdQualifier1 = "27"
+    r.ISA.InterchangeSenderId = "PPPPPP         "
+    r.ISA.InterchangeIdQualifier2 = "27"
+    r.ISA.InterchangeReceiverId = "XXXXXX         "
+    r.ISA.InterchangeDate = "100914"
+    r.ISA.InterchangeTime = "1025"
+    r.ISA.InterchangeControlStandardsIdentifier = "^"
+    r.ISA.InterchangeControlVersionNumber = "00501"
+    r.ISA.InterchangeControlNumber = "000000218"
+    r.ISA.AcknowledgmentRequested = "0"
+    r.ISA.UsageIndicator = "T"
+    r.ISA.ComponentElementSeparator = ":"   
+    
+    r.GS.FunctionalIdentifierCode = "FA" 
+    r.GS.ApplicationSendersCode = "PPPPPP"
+    r.GS.ApplicationReceiversCode = "XXXXXX"
+    r.GS.Date = "20100914"
+    r.GS.Time = "10251463"
+    r.GS.GroupControlNumber = "3"
+    r.GS.ResponsibleAgencyCode = "X"
+    r.GS.VersionReleaseIndustryIdentifierCode = "005010X231A1" 
+    
+    r.ST.TransactionSetIdentifierCode = 999
+    r.ST.TransactionSetControlNumber  = '3001'
+    r.ST.ImplementationConventionReference = "005010X231A1"
+    return r
+  end
+  
+  def set_trailer(r, count)
+    r.SE.NumberOfIncludedSegments = count
+    r.SE.TransactionSetControlNumber = "3001"
+    
+    r.GE.NumberOfTransactionSetsIncluded = "1" 
+    r.GE.GroupControlNumber = "3"
+    
+    r.IEA.NumberOfIncludedFunctionalGroups = "1"
+    r.IEA.InterchangeControlNumber = "000000218"
+    return r
+  end
+  
+  def test_all
+    @r = @parser.factory('999')
+    @r = set_header(@r)
+    #count both the ST and SE segments
+    @seg_count = 2
+    
+    @r.AK1 {|a|
+      a.FunctionalIdentifierCode = "HC"
+      a.GroupControlNumber = "2145001"
+      a.VersionReleaseIndustryIdentifierCode = "005010X222A1"
+    }
+    @seg_count += 1
+    
+    @r.L1000 {|a|
+      a.AK2.TransactionSetIdentifierCode = "837"
+      a.AK2.TransactionSetControlNumber = "000000001"
+      a.AK2.ImplementationConventionReference = "005010X222A1"
+      @seg_count += 1  
+      a.IK5.TransactionSetAcknowledgmentCode = "A"
+      @seg_count += 1
+    }
+    
+    @r.AK9 {|a|
+      a.FunctionalGroupAcknowledgeCode = "A"
+      a.NumberOfTransactionSetsIncluded = "1"
+      a.NumberOfReceivedTransactionSets = "1"
+      a.NumberOfAcceptedTransactionSets = "1"
+    }
+    @seg_count += 1
+
+    @r = set_trailer(@r, @seg_count)
+    
+    assert_equal(@msg, @r.render)
+  end
+  
+  def test_timing
+    start = Time::now
+    X12::TEST_REPEAT.times do
+      test_all
+    end
+    finish = Time::now
+    puts sprintf("Factories per second, 999: %.2f, elapsed: %.1f", X12::TEST_REPEAT.to_f/(finish-start), finish-start)
+  end # test_timing
+  
+  
+end

data/test/{tc_parse_270.rb → xtc_parse_270.rb}

@@ -51,7 +51,7 @@ EOT
       # @@p.show
     end
     @r = @@p
-
+    
   end # setup
 
   def teardown

data/test/{tc_parse_835.rb → xtc_parse_835.rb}

@@ -43,7 +43,6 @@ class Test835Parse < Test::Unit::TestCase
   def test_ISA_IEA
      assert_equal('ISA*00*          *00*          *ZZ*5010TEST       *ZZ*835RECVR       *110930*1105*^*00501*000004592*0*T*:~', @r.ISA.to_s)
      assert_equal('5010TEST       ', @r.ISA.InterchangeSenderId)
-     puts @r.IEA.to_s
      assert_equal('1', @r.IEA.NumberOfIncludedFunctionalGroups)
   end # test_ST
 

metadata

@@ -1,7 +1,7 @@
 --- !ruby/object:Gem::Specification
 name: PD_x12
 version: !ruby/object:Gem::Version
-  version: 1.3.2
+  version: 1.3.11
   prerelease: 
 platform: ruby
 authors:
@@ -11,7 +11,7 @@ authors:
 autorequire: 
 bindir: bin
 cert_chain: []
-date: 2012-12-02 00:00:00.000000000 Z
+date: 2013-01-26 00:00:00.000000000 Z
 dependencies: []
 description: ! 'A gem to handle parsing and generation of ANSI X12 documents. Currently
   tested with Ruby >= 1.9.2. Gem supports X12 EDI transactions 270, 997, 837p and
@@ -32,6 +32,7 @@ files:
 - Rakefile
 - example/factory.rb
 - example/parse.rb
+- init.rb
 - lib/x12.rb
 - lib/x12/base.rb
 - lib/x12/composite.rb
@@ -49,6 +50,7 @@ files:
 - misc/837p.xml
 - misc/997.xml
 - misc/997single.xml
+- misc/999.xml
 - misc/AAA.xml
 - misc/ACD.xml
 - misc/ACK.xml
@@ -236,6 +238,8 @@ files:
 - misc/C4.xml
 - misc/C8.xml
 - misc/C8C.xml
+- misc/C998.xml
+- misc/C999.xml
 - misc/CA1.xml
 - misc/CAD.xml
 - misc/CAI.xml
@@ -312,6 +316,7 @@ files:
 - misc/CTC.xml
 - misc/CTP.xml
 - misc/CTT.xml
+- misc/CTX.xml
 - misc/CUR.xml
 - misc/CV.xml
 - misc/CYC.xml
@@ -541,6 +546,9 @@ files:
 - misc/IGI.xml
 - misc/III.xml
 - misc/IIS.xml
+- misc/IK3.xml
+- misc/IK4.xml
+- misc/IK5.xml
 - misc/IM.xml
 - misc/IMA.xml
 - misc/IMM.xml
@@ -1523,6 +1531,9 @@ files:
 - misc/T612.xml
 - misc/T615.xml
 - misc/T617.xml
+- misc/T618.xml
+- misc/T620.xml
+- misc/T621.xml
 - misc/T623.xml
 - misc/T625.xml
 - misc/T626.xml
@@ -1851,15 +1862,17 @@ files:
 - misc/ZR.xml
 - misc/ZT.xml
 - misc/rdoc_template.rb
-- test/tc_factory_270.rb
-- test/tc_factory_270interchange.rb
-- test/tc_factory_837p.rb
-- test/tc_factory_997.rb
-- test/tc_parse_270.rb
-- test/tc_parse_270interchange.rb
-- test/tc_parse_835.rb
-- test/tc_parse_837p.rb
-- test/tc_parse_997.rb
+- test/tc_parse_999.rb
+- test/xc_parse_270interchange.rb
+- test/xc_parse_837p.rb
+- test/xc_parse_997.rb
+- test/xtc_factory_270.rb
+- test/xtc_factory_270interchange.rb
+- test/xtc_factory_837p.rb
+- test/xtc_factory_997.rb
+- test/xtc_factory_999.rb
+- test/xtc_parse_270.rb
+- test/xtc_parse_835.rb
 - x12.gemspec
 homepage: https://github.com/mjpete3/x12
 licenses:
@@ -1887,12 +1900,14 @@ signing_key:
 specification_version: 3
 summary: A gem to handle parsing and generation of ANSI X12 documents
 test_files:
-- test/tc_factory_270.rb
-- test/tc_factory_270interchange.rb
-- test/tc_factory_837p.rb
-- test/tc_factory_997.rb
-- test/tc_parse_270.rb
-- test/tc_parse_270interchange.rb
-- test/tc_parse_835.rb
-- test/tc_parse_837p.rb
-- test/tc_parse_997.rb
+- test/tc_parse_999.rb
+- test/xc_parse_270interchange.rb
+- test/xc_parse_837p.rb
+- test/xc_parse_997.rb
+- test/xtc_factory_270.rb
+- test/xtc_factory_270interchange.rb
+- test/xtc_factory_837p.rb
+- test/xtc_factory_997.rb
+- test/xtc_factory_999.rb
+- test/xtc_parse_270.rb
+- test/xtc_parse_835.rb