stupidedi 1.1.0

data/lib/stupidedi/versions/functional_groups/005010/transaction_set_defs/RA820.rb

@@ -0,0 +1,240 @@
+module Stupidedi
+  module Versions
+    module FunctionalGroups
+      module FiftyTen
+        module TransactionSetDefs
+
+          d = Schema
+          r = SegmentReqs
+          s = SegmentDefs
+
+          RA820 = d::TransactionSetDef.build("RA", "820",
+            "Payment Order/Remittance Advice",
+
+            d::TableDef.header("Table 1 - Header",
+              s:: ST.use(100, r::Mandatory, d::RepeatCount.bounded(1)),
+              s::BHT.use(200, r::Mandatory, d::RepeatCount.bounded(1)),
+              s::NTE.use(300, r::Optional,  d::RepeatCount.unbounded),
+              s::TRN.use(350, r::Optional,  d::RepeatCount.bounded(1)),
+              s::CUR.use(400, r::Optional,  d::RepeatCount.bounded(1)),
+              s::REF.use(500, r::Optional,  d::RepeatCount.unbounded),
+              s::DTM.use(600, r::Optional,  d::RepeatCount.unbounded),
+
+              d::LoopDef.build("N1", d::RepeatCount.unbounded,
+                s:: N1.use( 700, r::Optional,  d::RepeatCount.bounded(1)),
+                s:: N2.use( 800, r::Optional,  d::RepeatCount.unbounded),
+                s:: N3.use( 900, r::Optional,  d::RepeatCount.unbounded),
+                s:: N4.use(1000, r::Optional,  d::RepeatCount.bounded(1)),
+                s::REF.use(1100, r::Optional,  d::RepeatCount.unbounded),
+                s::PER.use(1200, r::Optional,  d::RepeatCount.unbounded),
+                s::RDM.use(1300, r::Optional,  d::RepeatCount.bounded(1)),
+                s::DTM.use(1400, r::Optional,  d::RepeatCount.bounded(1)))),
+
+            d::TableDef.detail("Table 2 - Detail",
+              d::LoopDef.build("ENT", d::RepeatCount.unbounded,
+                s::ENT.use( 100, r::Optional,  d::RepeatCount.bounded(1)),
+
+                d::LoopDef.build("ENT/FA1", d::RepeatCount.unbounded,
+                  s::FA1.use( 150, r::Optional,  d::RepeatCount.bounded(1)),
+                  s::FA2.use( 160, r::Mandatory, d::RepeatCount.unbounded)),
+
+                d::LoopDef.build("ENT/NM1", d::RepeatCount.unbounded,
+                  s::NM1.use( 200, r::Optional,  d::RepeatCount.bounded(1)),
+                  s:: N2.use( 300, r::Optional,  d::RepeatCount.unbounded),
+                  s:: N3.use( 400, r::Optional,  d::RepeatCount.unbounded),
+                  s:: N4.use( 500, r::Optional,  d::RepeatCount.bounded(1)),
+                  s::REF.use( 600, r::Optional,  d::RepeatCount.unbounded),
+                  s::PER.use( 700, r::Optional,  d::RepeatCount.unbounded)),
+
+                d::LoopDef.build("ENT/ADX", d::RepeatCount.unbounded,
+                  s::ADX.use( 800, r::Optional,  d::RepeatCount.bounded(1)),
+                  s::NTE.use( 900, r::Optional,  d::RepeatCount.unbounded),
+                  s::PER.use(1000, r::Optional,  d::RepeatCount.unbounded),
+                  s::DTM.use(1050, r::Optional,  d::RepeatCount.bounded(1)),
+
+                  d::LoopDef.build("ENT/ADX/REF", d::RepeatCount.unbounded,
+                    s::REF.use(1100, r::Optional,  d::RepeatCount.bounded(1)),
+                    s::DTM.use(1200, r::Optional,  d::RepeatCount.unbounded)),
+
+                  d::LoopDef.build("ENT/ADX/IT1", d::RepeatCount.unbounded,
+                    s::IT1.use(1300, r::Optional,  d::RepeatCount.bounded(1)),
+                    s::RPA.use(1310, r::Optional,  d::RepeatCount.bounded(1)),
+                    s::QTY.use(1320, r::Optional,  d::RepeatCount.bounded(1)),
+
+                    d::LoopDef.build("ENT/ADX/IT1/REF", d::RepeatCount.unbounded,
+                      s::REF.use(1400, r::Optional,  d::RepeatCount.bounded(1)),
+                      s::DTM.use(1410, r::Optional,  d::RepeatCount.bounded(1))),
+
+                    d::LoopDef.build("ENT/ADX/IT1/SAC", d::RepeatCount.unbounded,
+                      s::SAC.use(1420, r::Optional,  d::RepeatCount.bounded(1)),
+                      s::TXI.use(1430, r::Optional,  d::RepeatCount.unbounded),
+                      s::DTM.use(1440, r::Optional,  d::RepeatCount.bounded(10))),
+
+                    d::LoopDef.build("ENT/ADX/IT1/SLN", d::RepeatCount.unbounded,
+                      s::SLN.use(1450, r::Optional,  d::RepeatCount.bounded(1)),
+
+                      d::LoopDef.build("ENT/ADX/IT1/SLN/REF", d::RepeatCount.unbounded,
+                        s::REF.use(1460, r::Optional,  d::RepeatCount.bounded(1)),
+                        s::DTM.use(1470, r::Optional,  d::RepeatCount.unbounded)),
+
+                      d::LoopDef.build("ENT/ADX/IT1/SLN/SAC", d::RepeatCount.unbounded,
+                        s::SAC.use(1480, r::Optional,  d::RepeatCount.bounded(1)),
+                        s::TXI.use(1490, r::Optional,  d::RepeatCount.unbounded)))),
+
+                  d::LoopDef.build("ENT/ADX/FA1", d::RepeatCount.unbounded,
+                    s::FA1.use(1495, r::Optional,  d::RepeatCount.bounded(1)),
+                    s::FA2.use(1496, r::Mandatory, d::RepeatCount.bounded(1)))),
+
+                d::LoopDef.build("ENT/RMR", d::RepeatCount.unbounded,
+                  s::RMR.use(1500, r::Optional,  d::RepeatCount.bounded(1)),
+                  s::NTE.use(1600, r::Optional,  d::RepeatCount.unbounded),
+                  s::REF.use(1700, r::Optional,  d::RepeatCount.unbounded),
+                  s::DTM.use(1800, r::Optional,  d::RepeatCount.unbounded),
+                  s::VEH.use(1850, r::Optional,  d::RepeatCount.bounded(1)),
+
+                  d::LoopDef.build("ENT/RMR/IT1", d::RepeatCount.unbounded,
+                    s::IT1.use(1900, r::Optional,  d::RepeatCount.bounded(1)),
+                    s::RPA.use(1920, r::Optional,  d::RepeatCount.bounded(1)),
+                    s::QTY.use(1940, r::Optional,  d::RepeatCount.bounded(1)),
+
+                    d::LoopDef.build("ENT/RMR/IT1/REF", d::RepeatCount.unbounded,
+                      s::REF.use(2000, r::Optional,  d::RepeatCount.bounded(1)),
+                      s::DTM.use(2010, r::Optional,  d::RepeatCount.bounded(1))),
+
+                    d::LoopDef.build("ENT/RMR/IT1/SAC", d::RepeatCount.unbounded,
+                      s::SAC.use(2020, r::Optional,  d::RepeatCount.bounded(1)),
+                      s::TXI.use(2030, r::Optional,  d::RepeatCount.unbounded)),
+
+                    d::LoopDef.build("ENT/RMR/IT1/SLN", d::RepeatCount.unbounded,
+                      s::SLN.use(2040, r::Optional,  d::RepeatCount.bounded(1)),
+
+                      d::LoopDef.build("ENT/RMR/IT1/SLN/REF", d::RepeatCount.unbounded,
+                        s::REF.use(2050, r::Optional,  d::RepeatCount.bounded(1)),
+                        s::DTM.use(2060, r::Optional,  d::RepeatCount.unbounded)),
+
+                      d::LoopDef.build("ENT/RMR/IT1/SLN/SAC", d::RepeatCount.unbounded,
+                        s::SAC.use(2070, r::Optional,  d::RepeatCount.bounded(1)),
+                        s::TXI.use(2080, r::Optional,  d::RepeatCount.unbounded)))),
+
+                  d::LoopDef.build("ENT/RMR/ADX", d::RepeatCount.unbounded,
+                    s::ADX.use(2100, r::Optional,  d::RepeatCount.unbounded),
+                    s::NTE.use(2200, r::Optional,  d::RepeatCount.unbounded),
+                    s::PER.use(2300, r::Optional,  d::RepeatCount.unbounded),
+
+                    d::LoopDef.build("ENT/RMR/ADX/REF", d::RepeatCount.unbounded,
+                      s::REF.use(2400, r::Optional,  d::RepeatCount.bounded(1)),
+                      s::DTM.use(2500, r::Optional,  d::RepeatCount.unbounded)),
+
+                    d::LoopDef.build("ENT/RMR/ADX/IT1", d::RepeatCount.unbounded,
+                      s::IT1.use(2600, r::Optional,  d::RepeatCount.bounded(1)),
+                      s::RPA.use(2610, r::Optional,  d::RepeatCount.bounded(1)),
+                      s::QTY.use(2620, r::Optional,  d::RepeatCount.bounded(1)),
+
+                      d::LoopDef.build("ENT/RMR/ADX/IT1/REF", d::RepeatCount.unbounded,
+                        s::REF.use(2700, r::Optional,  d::RepeatCount.bounded(1)),
+                        s::DTM.use(2710, r::Optional,  d::RepeatCount.bounded(1))),
+
+                      d::LoopDef.build("ENT/RMR/ADX/IT1/SAC", d::RepeatCount.unbounded,
+                        s::SAC.use(2720, r::Optional,  d::RepeatCount.bounded(1)),
+                        s::TXI.use(2730, r::Optional,  d::RepeatCount.unbounded)),
+                        s::DTM.use(2740, r::Optional,  d::RepeatCount.bounded(10))),
+
+                      d::LoopDef.build("ENT/RMR/ADX/IT1/SLN", d::RepeatCount.unbounded,
+                        s::SLN.use(2750, r::Optional,  d::RepeatCount.bounded(1)),
+
+                        d::LoopDef.build("ENT/RMR/ADX/IT1/SLN/REF", d::RepeatCount.unbounded,
+                          s::REF.use(2760, r::Optional,  d::RepeatCount.bounded(1)),
+                          s::DTM.use(2770, r::Optional,  d::RepeatCount.unbounded)),
+
+                        d::LoopDef.build("ENT/RMR/ADX/IT1/SLN/SAC", d::RepeatCount.unbounded,
+                          s::SAC.use(2780, r::Optional,  d::RepeatCount.bounded(1)),
+                          s::TXI.use(2790, r::Optional,  d::RepeatCount.unbounded)))),
+
+                  d::LoopDef.build("ENT/RMR/FA1", d::RepeatCount.unbounded,
+                    s::FA1.use(2795, r::Optional,  d::RepeatCount.unbounded),
+                    s::FA2.use(2796, r::Optional,  d::RepeatCount.unbounded))),
+
+              d::LoopDef.build("TXP", d::RepeatCount.unbounded,
+                s::TXP.use(2800, r::Optional,  d::RepeatCount.bounded(1)),
+                s::TXI.use(2850, r::Optional,  d::RepeatCount.unbounded),
+                s::REF.use(2855, r::Optional,  d::RepeatCount.unbounded),
+                s::DTM.use(2860, r::Optional,  d::RepeatCount.unbounded)),
+
+              d::LoopDef.build("DED", d::RepeatCount.unbounded,
+                s::DED.use(2870, r::Optional,  d::RepeatCount.bounded(1))),
+
+              d::LoopDef.build("LX", d::RepeatCount.unbounded,
+                s:: LX.use(2900, r::Optional,  d::RepeatCount.bounded(1)),
+                s::REF.use( 100, r::Optional,  d::RepeatCount.unbounded),
+                s::TRN.use( 100, r::Optional,  d::RepeatCount.unbounded),
+
+                d::LoopDef.build("LX/NM1", d::RepeatCount.unbounded,
+                  s::NM1.use( 100, r::Optional,  d::RepeatCount.bounded(1)),
+                  s::REF.use( 100, r::Optional,  d::RepeatCount.unbounded),
+                  s::G53.use( 100, r::Optional,  d::RepeatCount.bounded(1)),
+
+                  d::LoopDef.build("LX/NM1/AIN", d::RepeatCount.unbounded,
+                    s::AIN.use( 100, r::Optional,  d::RepeatCount.bounded(1)),
+                    s::QTY.use( 100, r::Optional,  d::RepeatCount.unbounded),
+                    s::DTP.use( 100, r::Optional,  d::RepeatCount.unbounded)),
+
+                  d::LoopDef.build("LX/NM1/PEN", d::RepeatCount.unbounded,
+                    s::PEN.use( 100, r::Optional,  d::RepeatCount.bounded(1)),
+                    s::AMT.use( 100, r::Optional,  d::RepeatCount.unbounded),
+                    s::DTP.use( 100, r::Optional,  d::RepeatCount.unbounded),
+
+                    d::LoopDef.build("LX/NM1/PEN/INV", d::RepeatCount.unbounded,
+                      s::INV.use( 100, r::Optional,  d::RepeatCount.bounded(1))),
+                      s::DTP.use( 100, r::Optional,  d::RepeatCount.unbounded)))),
+
+              d::LoopDef.build("N9", d::RepeatCount.unbounded,
+                s:: N9.use( 100, r::Optional,  d::RepeatCount.bounded(1)),
+                s::REF.use( 100, r::Optional,  d::RepeatCount.unbounded),
+
+                d::LoopDef.build("N9/AMT", d::RepeatCount.unbounded,
+                  s::AMT.use( 100, r::Optional,  d::RepeatCount.bounded(1)),
+                  s::REF.use( 100, r::Optional,  d::RepeatCount.unbounded)),
+
+                d::LoopDef.build("N9/N1", d::RepeatCount.unbounded,
+                  s:: N1.use( 100, r::Optional,  d::RepeatCount.bounded(1)),
+                  s::REF.use( 100, r::Optional,  d::RepeatCount.unbounded),
+
+                  d::LoopDef.build("N9/N1/EMS", d::RepeatCount.unbounded,
+                    s::EMS.use( 100, r::Optional,  d::RepeatCount.bounded(1)),
+                    s::ATN.use( 100, r::Optional,  d::RepeatCount.unbounded),
+                    s::AIN.use( 100, r::Optional,  d::RepeatCount.unbounded),
+                    s::PYD.use( 100, r::Optional,  d::RepeatCount.unbounded)))),
+
+              d::LoopDef.build("RYL", d::RepeatCount.unbounded,
+                s::RYL.use( 100, r::Optional,  d::RepeatCount.bounded(1)),
+
+                d::LoopDef.build("RYL/NM1", d::RepeatCount.unbounded,
+                  s::NM1.use( 100, r::Optional,  d::RepeatCount.bounded(1)),
+
+                  d::LoopDef.build("RYL/NM1/LOC", d::RepeatCount.unbounded,
+                    s::LOC.use( 100, r::Optional,  d::RepeatCount.bounded(1)),
+
+                    d::LoopDef.build("RYL/NM1/LOC/PID", d::RepeatCount.unbounded,
+                      s::PID.use( 100, r::Optional,  d::RepeatCount.bounded(1)),
+                        s::DTM.use( 100, r::Optional,  d::RepeatCount.bounded(1)),
+
+                      d::LoopDef.build("RYL/NM1/LOC/PID/PCT", d::RepeatCount.unbounded,
+                        s::PCT.use( 100, r::Optional,  d::RepeatCount.bounded(1)),
+                        s::QTY.use( 100, r::Optional,  d::RepeatCount.bounded(1)),
+
+                        d::LoopDef.build("RYL/NM1/LOC/PID/PCT/AMT", d::RepeatCount.unbounded,
+                          s::AMT.use( 100, r::Optional,  d::RepeatCount.bounded(1)),
+                          s::ADX.use( 100, r::Optional,  d::RepeatCount.unbounded))))),
+
+                  d::LoopDef.build("RYL/NM1/ASM", d::RepeatCount.unbounded,
+                    s::ASM.use( 100, r::Optional,  d::RepeatCount.bounded(1)),
+                    s::ADX.use( 100, r::Optional,  d::RepeatCount.bounded(1))))))),
+
+            d::TableDef.summary("Table 3 - Summary",
+              s:: SE.use( 100, r::Mandatory, d::RepeatCount.bounded(1))))
+
+        end
+      end
+    end
+  end
+end

data/lib/stupidedi/versions/functional_groups/005010/transaction_set_defs.rb

@@ -0,0 +1,68 @@
+module Stupidedi
+  module Versions
+    module FunctionalGroups
+      module FiftyTen
+        module TransactionSetDefs
+
+          # 005010X187 xx269
+
+          # 005010X279 Eligibility, Coverage or Benefit Inquiry
+          autoload :HS270, # Eligibility, Coverage or Benefit Inquiry
+            "stupidedi/versions/functional_groups/005010/transaction_set_defs/HS270"
+
+          # 005010X279 Eligibility, Coverage or Benefit Response
+          autoload :HB271, # Eligibility, Coverage or Benefit Response
+            "stupidedi/versions/functional_groups/005010/transaction_set_defs/HB271"
+
+          # 005010X209 xx274
+          # 005010X254 xx275
+
+          # 005010X212 Health Care Claim Status Request
+          autoload :HR276, # Health Care Claim Status Request
+            "stupidedi/versions/functional_groups/005010/transaction_set_defs/HR276"
+
+          # 005010X212 Health Care Information Status Notification
+          # 005010X213
+          # 005010X214 Health Care Claim Acknowledgment
+          # 005010X228
+          autoload :HN277, # Health Care Information Status Notification
+            "stupidedi/versions/functional_groups/005010/transaction_set_defs/HN277"
+
+          # 005010X215
+          # 005010X216
+          # 005010X217 Health Care Services Review Information - Review
+          # 005010X217 Health Care Services Review Information - Response
+          autoload :HI278, # Health Care Services Review Information
+            "stupidedi/versions/functional_groups/005010/transaction_set_defs/HI278"
+
+          # 005010X218 Payment Order/Remittance Advice
+          autoload :RA820, # Payment Order/Remittance Advice
+            "stupidedi/versions/functional_groups/005010/transaction_set_defs/RA820"
+
+        # # 005010X220 Benefit Enrollment and Maintenance
+        # autoload :BE834, # Benefit Enrollment and Maintenance
+        #   "stupidedi/versions/functional_groups/005010/transaction_set_defs/BE834"
+
+          # 005010X221 Health Care Claim Payment/Advice
+          autoload :HP835, # Health Care Claim Payment/Advice
+            "stupidedi/versions/functional_groups/005010/transaction_set_defs/HP835"
+
+          # 005010X222 Health Care Claim: Professional
+          # 005010X223 Health Care Claim: Institutional
+          # 005010X224 Health Care Claim: Dental
+          autoload :HC837, # Health Care Claim
+            "stupidedi/versions/functional_groups/005010/transaction_set_defs/HC837"
+
+        # # 005010X230 Functional Acknowledgement
+        # autoload :FA997, # Functional Acknowledgment
+        #   "stupidedi/versions/functional_groups/005010/transaction_set_defs/FA997"
+
+          # 005010X231 Functional Acknowledgement
+          autoload :FA999, # Implementation Acknowledgment
+            "stupidedi/versions/functional_groups/005010/transaction_set_defs/FA999"
+
+        end
+      end
+    end
+  end
+end

data/lib/stupidedi/versions/functional_groups/005010.rb

@@ -0,0 +1,38 @@
+module Stupidedi
+  module Versions
+    module FunctionalGroups
+
+      #
+      # @see Guides::FiftyTen
+      # @see Interchanges::FiveOhOne
+      #
+      module FiftyTen
+
+        autoload :ElementTypes,
+          "stupidedi/versions/functional_groups/005010/element_types"
+
+        autoload :ElementDefs,
+          "stupidedi/versions/functional_groups/005010/element_defs"
+
+        autoload :ElementReqs,
+          "stupidedi/versions/functional_groups/005010/element_reqs"
+
+        autoload :FunctionalGroupDef,
+          "stupidedi/versions/functional_groups/005010/functional_group_def"
+
+        autoload :SegmentDefs,
+          "stupidedi/versions/functional_groups/005010/segment_defs"
+
+        autoload :SegmentReqs,
+          "stupidedi/versions/functional_groups/005010/segment_reqs"
+
+        autoload :SyntaxNotes,
+          "stupidedi/versions/functional_groups/005010/syntax_notes"
+
+        autoload :TransactionSetDefs,
+          "stupidedi/versions/functional_groups/005010/transaction_set_defs"
+      end
+
+    end
+  end
+end

data/lib/stupidedi/versions/functional_groups.rb

@@ -0,0 +1,8 @@
+module Stupidedi
+  module Versions
+    module FunctionalGroups
+      autoload :FortyTen, "stupidedi/versions/functional_groups/004010"
+      autoload :FiftyTen, "stupidedi/versions/functional_groups/005010"
+    end
+  end
+end

data/lib/stupidedi/versions/interchanges/00401/element_defs.rb

@@ -0,0 +1,224 @@
+module Stupidedi
+  module Versions
+    module Interchanges
+      module FourOhOne
+
+        #
+        # @see FunctionalGroups::FortyTen::ElementTypes
+        # @see Schema::CodeList
+        #
+        module ElementDefs
+
+          # Import definitions of DT, R, ID, Nn, AN, TM, and SimpleElementDef
+          t = FunctionalGroups::FortyTen::ElementTypes
+          s = Schema
+
+          class SeparatorElementVal < Values::SimpleElementVal
+
+            delegate :to_s, :length, :to => :@value
+
+            def initialize(value, usage, position)
+              @value = value
+              super(usage, position)
+            end
+
+            # @return [SeparatorElementVal]
+            def copy(changes = {})
+              SeparatorElementVal.new \
+                changes.fetch(:value, @value),
+                changes.fetch(:usage, usage),
+                changes.fetch(:position, position)
+            end
+
+            def valid?
+              true
+            end
+
+            def empty?
+              @value.blank?
+            end
+
+            def too_short?
+              @value.length < 1
+            end
+
+            def too_long?
+              @value.length > 1
+            end
+
+            def separator?
+              true
+            end
+
+            def inspect
+              id = definition.try{|d| ansi.bold("[#{d.id}]") }
+              ansi.element("SeparatorElementVal.value#{id}") << "(#{@value || "nil"})"
+            end
+          end
+
+          class << SeparatorElementVal
+            # @group Constructors
+            ###################################################################
+
+            # @raise NoMethodError
+            def empty(usage, position)
+              SeparatorElementVal.new(nil, usage, position)
+            end
+
+            # @return [SeparatorElementVal]
+            def value(character, usage, position)
+              SeparatorElementVal.new(character, usage, position)
+            end
+
+            # @return [SeparatorElementVal]
+            def parse(character, usage, position)
+              SeparatorElementVal.new(character, usage, position)
+            end
+
+            # @endgroup
+            ###################################################################
+          end
+
+          I01 = t::ID.new(:I01, "Authorization Information Qualifier",    2,  2,
+            s::CodeList.build(
+              "00" => "No Authorization Information Present (No Meaningful Information in I02)",
+            # "01" => "UCS Communications ID",
+            # "02" => "EDX Communications ID",
+              "03" => "Additional Data Identification"))
+            # "04" => "Rail Communication ID",
+            # "05" => "Deparment of Defense (DoD) Communication Identifier",
+            # "06" => "United States Federal Government Communication Identifier"))
+
+          I02 = t::AN.new(:I02, "Authorization Information",             10, 10)
+
+          I03 = t::ID.new(:I03, "Security Information Qualifier",         2,  2,
+            s::CodeList.build(
+              "00" => "No Security Information (No Meaningful Information in I04)",
+              "01" => "Password"))
+
+          I04 = t::AN.new(:I04, "Security Information",                  10, 10)
+
+          I05 = t::ID.new(:I05, "Interchange ID Qualifier",               2,  2,
+            s::CodeList.build(
+              "01" => "Duns (Dun & Bradstreet)",
+            # "02" => "SCAC (Standard Carrier Alpha Code)",
+            # "03" => "FMC (Federal Maritime Commission)",
+            # "04" => "IATA (International Air Transport Association)",
+            # "07" => s::CodeList.external("583"),
+            # "08" => "UCC EDI Communications ID (Comm ID)",
+            # "09" => "X.121 (CCITT)",
+            # "10" => s::CodeList.external("350"),
+            # "11" => "DEA (Drug Enforcement Administration)",
+            # "12" => "Phone (Telephone Companies)",
+            # "13" => "UCS Code (The UCS Code is a Code Used for UCS Transmissions; it includes the Area Code and Telephone Number of a Modem; it Does Not Include Punctation, Blanks, or Access Code)",
+              "14" => "Duns Plus Suffix",
+            # "15" => "Petroleum Accountants Society of Canada Company Code",
+            # "16" => "Duns Number With 4-Character Suffix",
+            # "17" => "American Bankers Association (ABA) Transit Routing Number (Including Check Digit, 9 Digit)",
+            # "18" => s::CodeList.external("420"),
+            # "19" => s::CodeList.external("421"),
+              "20" => s::CodeList.external("121"),
+            # "21" => s::CodeList.external("422"),
+            # "22" => s::CodeList.external("423"),
+            # "23" => s::CodeList.external("424"),
+            # "24" => s::CodeList.external("425"),
+            # "25" => s::CodeList.external("426"),
+            # "26" => s::CodeList.external("296", "300"),
+              "27" => "Carrier Identification Number as assigned by Health Care Financing Administration (HCFA)",
+              "28" => "Fiscal Intermediary Identification Number as assigned by Health Care Financing Administration (HCFA)",
+              "29" => "Medicare Provider and Supplier Identification Number as assigned by Health Care Financing Administration (HCFA)",
+              "30" => "US Federal Tax Identification Number",
+            # "31" => "Jurisdiction Identification Number Plus 4 as assigned by the Interational Association of Industrial Accident Boards and Commissions (IAIABC)",
+            # "32" => "US Federal Employer Identification Number (FEIN)",
+              "33" => "National Association of Insurance Commissioners Company Code (NAIC)",
+            # "34" => "Medicaid Provider and Supplier Identification Number as assigned by individual State Medicaid Agencies in conjunction with Health Care Financing Administration (HCFA)",
+            # "35" => "Statistics Canada Canadian College Student Information System Institution Codes",
+            # "36" => s::CodeList.external("300"),
+            # "37" => s::CodeList.external("573"),
+            # "38" => s::CodeList.external("862"),
+            # "AM" => s::CodeList.external("497"),
+            # "NR" => "National Retail Merchants Association (NRMA) Assigned",
+            # "SA" => s::CodeList.external("851"),
+            # "SN" => s::CodeList.external("42"),
+              "ZZ" => "Mutually Defined"))
+
+          I06 = t::AN.new(:I06, "Interchange Sender ID",                 15, 15)
+          I07 = t::AN.new(:I07, "Interchange Receiver ID",               15, 15)
+          I08 = t::DT.new(:I08, "Interchange Date",                       6,  6)
+          I09 = t::TM.new(:I09, "Interchange Time",                       4,  4)
+
+          I10 = t::ID.new(:I10, "Interchange Control Standards Identifier", 1, 1,
+            s::CodeList.build(
+              "U" => "U.S. EDI Community of ASC X12, TDCC, and UCS"))
+
+          I11 = t::ID.new(:I11, "Interchange Control Version Number",     5,  5,
+            s::CodeList.build(
+              "00401" => "Draft Standards for Trial Use Approved for Publication by ASC X12 Procedures Review Board through October 1997"))
+
+          I12 = t::Nn.new(:I12, "Interchange Control Number",             9,  9, 0)
+
+          I13 = t::ID.new(:I13, "Acknowledgment Requested",               1,  1,
+            s::CodeList.build(
+              "0" => "No Interchange Acknowledgment Requested",
+              "1" => "Interchange Acknowledgment Requested (TA1)"))
+
+          I14 = t::ID.new(:I14, "Interchange Usage Indicator",            1,  1,
+            s::CodeList.build(
+            # "I" => "Information",
+              "P" => "Production Data",
+              "T" => "Test Data"))
+
+          I15 = Class.new(t::SimpleElementDef) do
+            def companion
+              SeparatorElementVal
+            end
+          end.new(:I15, "Component Element Separator",                    1,  1)
+
+          I16 = t::Nn.new(:I16, "Number of Included Functional Groups",   1,  5, 0)
+
+          I17 = t::ID.new(:I17, "Interchange Acknowledgement Code",       1,  1,
+            s::CodeList.build(
+              "A" => "The Transmitted Interchange Control Structure Header and Trailer Have Been Received and Have No Errors",
+              "E" => "The Transmitted Interchange Control Structure Header and Trailer Have Been Received and Are Accepted But Errors Are Noted. This Means the Sender Must Not Resend the Data.",
+              "R" => "The Transmitted Interchange Control Structure Header and Trailer are Rejected Because of Errors"))
+
+          I18 = t::ID.new(:I18, "Interchange Note Code",                  3,  3,
+            s::CodeList.build(
+              "000" => "No error",
+              "001" => "The Interchange Control Number in the Header and Trailer Do Not Match. The Value From the Header is Used in the Acknowledgement",
+              "002" => "This Standard as Noted in the Control Standards Identifier is Not Supported",
+              "003" => "This Version of the Controls is Not Supported",
+              "004" => "The Segment Terminator is Invalid",
+              "005" => "Invalid Interchange ID Qualifier for Sender",
+              "006" => "Invalid Interchange Sender ID",
+              "007" => "Invalid Interchange ID Qualifier for Receiver",
+              "008" => "Invalid Interchange Receiver ID",
+              "009" => "Unknown Interchange Receiver ID",
+              "010" => "Invalid Authorization Information Qualifier Value",
+              "011" => "Invalid Authorization Information Value",
+              "012" => "Invalid Security Information Qualifier Value",
+              "013" => "Invalid Security Information Value",
+              "014" => "Invalid Interchange Date Value",
+              "015" => "Invalid Interchange Time Value",
+              "016" => "Invalid Interchange Standards Identifier Value",
+              "017" => "Invalid Interchange Version ID Value",
+              "018" => "Invalid Interchange Control Number Value",
+              "019" => "Invalid Acknowledgement Requested Value",
+              "020" => "Invalid Test Indicator Value",
+              "021" => "Invalid Number of Included Groups Value",
+              "022" => "Invalid Control Characters",
+              "023" => "Improper (Premature) End-of-File (Transmission)",
+              "024" => "Invalid Interchange Content (ex Invalid GS Segment)",
+              "025" => "Duplicate Interchange Control Numbers",
+              "026" => "Invalid Data Structure Separator",
+              "027" => "Invalid Component Element Separator",
+              "028" => "Invalid Date in Deferred Delivery Request",
+              "029" => "Invalid Time in Deferred Delivery Request",
+              "030" => "Invalid Delivery Time Code in Deferred Delivery Request",
+              "031" => "Invalid Grade of Service"))
+
+        end
+      end
+    end
+  end
+end

data/lib/stupidedi/versions/interchanges/00401/interchange_def.rb

@@ -0,0 +1,45 @@
+module Stupidedi
+  module Versions
+    module Interchanges
+
+      #
+      # @see Values::InterchangeDef
+      #
+      module FourOhOne
+
+        s = Schema
+        r = FunctionalGroups::FortyTen::ElementReqs
+
+        InterchangeDef = Class.new(Schema::InterchangeDef) do
+          # @group Constructors
+          #####################################################################
+
+          # @return [Values::InterchangeVal]
+          def empty(separators)
+            Values::InterchangeVal.new(self, [], separators)
+          end
+
+          # @endgroup
+          #####################################################################
+
+          # @return [Module]
+          def segment_dict
+            SegmentDefs
+          end
+
+          # @return [Reader::Separators]
+          def separators(isa)
+            Reader::Separators.new(isa.element(16).to_s, nil, nil, nil)
+          end
+        end.new "00401",
+          # Interchange header
+          [ SegmentDefs::ISA.use(1, r::Mandatory, s::RepeatCount.bounded(1)),
+            SegmentDefs::TA1.use(4, r::Optional,  s::RepeatCount.unbounded) ],
+
+          # Interchange trailer
+          [ SegmentDefs::IEA.use(5, r::Mandatory, s::RepeatCount.bounded(1)) ]
+
+      end
+    end
+  end
+end

data/lib/stupidedi/versions/interchanges/00401/segment_defs/IEA.rb

@@ -0,0 +1,20 @@
+module Stupidedi
+  module Versions
+    module Interchanges
+      module FourOhOne
+        module SegmentDefs
+
+          s = Schema
+          e = ElementDefs
+          r = FunctionalGroups::FortyTen::ElementReqs
+
+          IEA = s::SegmentDef.build(:IEA, "Interchange Control Trailer",
+            "To define the end of an interchange of zero or more functional groups and interchange-related control segments",
+            e::I16.simple_use(r::Mandatory, s::RepeatCount.bounded(1)),
+            e::I12.simple_use(r::Mandatory, s::RepeatCount.bounded(1)))
+
+        end
+      end
+    end
+  end
+end