hippo_eyeDoc 0.0.1

data/lib/hippo_eyeDoc/transaction_sets/HIPAA_997.rb

@@ -0,0 +1,7 @@
+module Hippo_eyeDoc::TransactionSets
+  module HIPAA_997
+    autoload_relative :Base,      'HIPAA_997/base'
+    autoload_relative :L2000,     'HIPAA_997/L2000'
+    autoload_relative :L2100,     'HIPAA_997/L2100'
+  end
+end

data/lib/hippo_eyeDoc/transaction_sets/HIPAA_997/L2000.rb

@@ -0,0 +1,36 @@
+module Hippo_eyeDoc::TransactionSets
+  module HIPAA_997
+
+    class L2000 < Hippo_eyeDoc::TransactionSets::Base
+      loop_name 'L2000'    #Transaction Set Response Header
+
+      #Transaction Set Response Header
+      segment Hippo_eyeDoc::Segments::AK2,
+                :name           => 'Transaction Set Response Header',
+                :minimum        => 0,
+                :maximum        => 1,
+                :position       => 300
+
+      #AK2/AK3 Error Identification
+      loop    Hippo_eyeDoc::TransactionSets::HIPAA_997::L2100,
+                :name           => 'AK2/AK3 Error Identification',
+                :minimum        => 0,
+                :maximum        => 99999,
+                :position       => 400,
+                :identified_by => {
+                  'AK3.AK304' => ["1", "2", "3", "4", "5", "6", "7", "8"]
+                }
+
+      #Transaction Set Response Trailer
+      segment Hippo_eyeDoc::Segments::AK5,
+                :name           => 'Transaction Set Response Trailer',
+                :minimum        => 1,
+                :maximum        => 1,
+                :position       => 600,
+                :identified_by => {
+                  'AK501' => ["A", "E", "M", "R", "W", "X"]
+                }
+
+    end
+  end
+end

data/lib/hippo_eyeDoc/transaction_sets/HIPAA_997/L2100.rb

@@ -0,0 +1,29 @@
+module Hippo_eyeDoc::TransactionSets
+  module HIPAA_997
+
+    class L2100 < Hippo_eyeDoc::TransactionSets::Base
+      loop_name 'L2100'    #AK2/AK3 Error Identification
+
+      #AK2/AK3 Error Identification
+      segment Hippo_eyeDoc::Segments::AK3,
+                :name           => 'AK2/AK3 Error Identification',
+                :minimum        => 0,
+                :maximum        => 1,
+                :position       => 400,
+                :identified_by => {
+                  'AK304' => ["1", "2", "3", "4", "5", "6", "7", "8"]
+                }
+
+      #Data Element Note
+      segment Hippo_eyeDoc::Segments::AK4,
+                :name           => 'Data Element Note',
+                :minimum        => 0,
+                :maximum        => 99,
+                :position       => 500,
+                :identified_by => {
+                  'AK403' => ["1", "2", "3", "4", "5", "6", "7", "8", "9", "10", "12", "13"]
+                }
+
+    end
+  end
+end

data/lib/hippo_eyeDoc/transaction_sets/HIPAA_997/base.rb

@@ -0,0 +1,49 @@
+module Hippo_eyeDoc::TransactionSets
+  module HIPAA_997
+
+    class Base < Hippo_eyeDoc::TransactionSets::Base
+
+      #Transaction Set Header
+      segment Hippo_eyeDoc::Segments::ST,
+                :name           => 'Transaction Set Header',
+                :minimum        => 1,
+                :maximum        => 1,
+                :position       => 100,
+                :identified_by => {
+                  'ST01' => '997'
+                }
+
+      #Functional Group Response Header
+      segment Hippo_eyeDoc::Segments::AK1,
+                :name           => 'Functional Group Response Header',
+                :minimum        => 1,
+                :maximum        => 1,
+                :position       => 200
+
+      #Transaction Set Response Header
+      loop    Hippo_eyeDoc::TransactionSets::HIPAA_997::L2000,
+                :name           => 'Transaction Set Response Header',
+                :minimum        => 0,
+                :maximum        => 99999,
+                :position       => 300
+
+      #Functional Group Response Trailer
+      segment Hippo_eyeDoc::Segments::AK9,
+                :name           => 'Functional Group Response Trailer',
+                :minimum        => 1,
+                :maximum        => 1,
+                :position       => 700,
+                :identified_by => {
+                  'AK901' => ["A", "E", "M", "P", "R", "W", "X"]
+                }
+
+      #Transaction Set Trailer
+      segment Hippo_eyeDoc::Segments::SE,
+                :name           => 'Transaction Set Trailer',
+                :minimum        => 1,
+                :maximum        => 1,
+                :position       => 800
+
+    end
+  end
+end

data/lib/hippo_eyeDoc/transaction_sets/HIPAA_999.rb

@@ -0,0 +1,8 @@
+module Hippo_eyeDoc::TransactionSets
+  module HIPAA_999
+    autoload_relative :Base,      'HIPAA_999/base'
+    autoload_relative :L2000AK2,  'HIPAA_999/L2000AK2'
+    autoload_relative :L2100AK2,  'HIPAA_999/L2100AK2'
+    autoload_relative :L2110AK2,  'HIPAA_999/L2110AK2'
+  end
+end

data/lib/hippo_eyeDoc/transaction_sets/HIPAA_999/L2000 - AK2.rb

@@ -0,0 +1,30 @@
+module Hippo::TransactionSets
+  module HIPAA_999
+
+    class L2000 - AK2 < Hippo::TransactionSets::Base
+      loop_name 'L2000 - AK2'    #Transaction Set Response Header
+
+      #Transaction Set Response Header
+      segment Hippo::Segments::AK2,
+                :name           => 'Transaction Set Response Header',
+                :minimum        => 0,
+                :maximum        => 1,
+                :position       => 300
+
+      #Error Identification
+      loop    Hippo::TransactionSets::HIPAA_837::L2100 - AK2,
+                :name           => 'Error Identification',
+                :minimum        => 0,
+                :maximum        => nil,
+                :position       => 400
+
+      #Transaction Set Response Trailer
+      segment Hippo::Segments::IK5,
+                :name           => 'Transaction Set Response Trailer',
+                :minimum        => 1,
+                :maximum        => 1,
+                :position       => 800
+
+    end
+  end
+end

data/lib/hippo_eyeDoc/transaction_sets/HIPAA_999/L2000AK2.rb

@@ -0,0 +1,36 @@
+module Hippo_eyeDoc::TransactionSets
+  module HIPAA_999
+
+    class L2000AK2 < Hippo_eyeDoc::TransactionSets::Base
+      loop_name 'L2000AK2'    #Transaction Set Response Header
+
+      #Transaction Set Response Header
+      segment Hippo_eyeDoc::Segments::AK2,
+                :name           => 'Transaction Set Response Header',
+                :minimum        => 0,
+                :maximum        => 1,
+                :position       => 300
+
+      #Error Identification
+      loop    Hippo_eyeDoc::TransactionSets::HIPAA_999::L2100AK2,
+                :name           => 'Error Identification',
+                :minimum        => 0,
+                :maximum        => 99999,
+                :position       => 400,
+                :identified_by => {
+                  'IK3.IK304' => ["1", "2", "3", "4", "5", "6", "7", "8", "I4", "I6", "I7", "I8", "I9"]
+                }
+
+      #Transaction Set Response Trailer
+      segment Hippo_eyeDoc::Segments::IK5,
+                :name           => 'Transaction Set Response Trailer',
+                :minimum        => 1,
+                :maximum        => 1,
+                :position       => 800,
+                :identified_by => {
+                  'IK501' => ["A", "E", "M", "R", "W", "X"]
+                }
+
+    end
+  end
+end

data/lib/hippo_eyeDoc/transaction_sets/HIPAA_999/L2100 - AK2.rb

@@ -0,0 +1,37 @@
+module Hippo::TransactionSets
+  module HIPAA_999
+
+    class L2100 - AK2 < Hippo::TransactionSets::Base
+      loop_name 'L2100 - AK2'    #Error Identification
+
+      #Error Identification
+      segment Hippo::Segments::IK3,
+                :name           => 'Error Identification',
+                :minimum        => 0,
+                :maximum        => 1,
+                :position       => 400
+
+      #Segment Context
+      segment Hippo::Segments::CTX,
+                :name           => 'Segment Context',
+                :minimum        => 0,
+                :maximum        => 9,
+                :position       => 500
+
+      #Business Unit Identifier
+      segment Hippo::Segments::CTX,
+                :name           => 'Business Unit Identifier',
+                :minimum        => 0,
+                :maximum        => 1,
+                :position       => 510
+
+      #Implementation Data Element Note
+      loop    Hippo::TransactionSets::HIPAA_837::L2110 - AK2,
+                :name           => 'Implementation Data Element Note',
+                :minimum        => 0,
+                :maximum        => nil,
+                :position       => 600
+
+    end
+  end
+end

data/lib/hippo_eyeDoc/transaction_sets/HIPAA_999/L2100AK2.rb

@@ -0,0 +1,43 @@
+module Hippo_eyeDoc::TransactionSets
+  module HIPAA_999
+
+    class L2100AK2 < Hippo_eyeDoc::TransactionSets::Base
+      loop_name 'L2100AK2'    #Error Identification
+
+      #Error Identification
+      segment Hippo_eyeDoc::Segments::IK3,
+                :name           => 'Error Identification',
+                :minimum        => 0,
+                :maximum        => 1,
+                :position       => 400,
+                :identified_by => {
+                  'IK304' => ["1", "2", "3", "4", "5", "6", "7", "8", "I4", "I6", "I7", "I8", "I9"]
+                }
+
+      #Segment Context
+      segment Hippo_eyeDoc::Segments::CTX,
+                :name           => 'Segment Context',
+                :minimum        => 0,
+                :maximum        => 9,
+                :position       => 500
+
+      #Business Unit Identifier
+      segment Hippo_eyeDoc::Segments::CTX,
+                :name           => 'Business Unit Identifier',
+                :minimum        => 0,
+                :maximum        => 1,
+                :position       => 510
+
+      #Implementation Data Element Note
+      loop    Hippo_eyeDoc::TransactionSets::HIPAA_999::L2110AK2,
+                :name           => 'Implementation Data Element Note',
+                :minimum        => 0,
+                :maximum        => 99999,
+                :position       => 600,
+                :identified_by => {
+                  'IK4.IK403' => ["1", "2", "3", "4", "5", "6", "7", "8", "9", "10", "12", "13", "I10", "I11", "I12", "I13", "I6", "I9"]
+                }
+
+    end
+  end
+end

data/lib/hippo_eyeDoc/transaction_sets/HIPAA_999/L2110 - AK2.rb

@@ -0,0 +1,23 @@
+module Hippo::TransactionSets
+  module HIPAA_999
+
+    class L2110 - AK2 < Hippo::TransactionSets::Base
+      loop_name 'L2110 - AK2'    #Implementation Data Element Note
+
+      #Implementation Data Element Note
+      segment Hippo::Segments::IK4,
+                :name           => 'Implementation Data Element Note',
+                :minimum        => 0,
+                :maximum        => 1,
+                :position       => 600
+
+      #Element Context
+      segment Hippo::Segments::CTX,
+                :name           => 'Element Context',
+                :minimum        => 0,
+                :maximum        => 10,
+                :position       => 700
+
+    end
+  end
+end

data/lib/hippo_eyeDoc/transaction_sets/HIPAA_999/L2110AK2.rb

@@ -0,0 +1,26 @@
+module Hippo_eyeDoc::TransactionSets
+  module HIPAA_999
+
+    class L2110AK2 < Hippo_eyeDoc::TransactionSets::Base
+      loop_name 'L2110AK2'    #Implementation Data Element Note
+
+      #Implementation Data Element Note
+      segment Hippo_eyeDoc::Segments::IK4,
+                :name           => 'Implementation Data Element Note',
+                :minimum        => 0,
+                :maximum        => 1,
+                :position       => 600,
+                :identified_by => {
+                  'IK403' => ["1", "2", "3", "4", "5", "6", "7", "8", "9", "10", "12", "13", "I10", "I11", "I12", "I13", "I6", "I9"]
+                }
+
+      #Element Context
+      segment Hippo_eyeDoc::Segments::CTX,
+                :name           => 'Element Context',
+                :minimum        => 0,
+                :maximum        => 10,
+                :position       => 700
+
+    end
+  end
+end

data/lib/hippo_eyeDoc/transaction_sets/HIPAA_999/base.rb

@@ -0,0 +1,49 @@
+module Hippo_eyeDoc::TransactionSets
+  module HIPAA_999
+
+    class Base < Hippo_eyeDoc::TransactionSets::Base
+
+      #Transaction Set Header
+      segment Hippo_eyeDoc::Segments::ST,
+                :name           => 'Transaction Set Header',
+                :minimum        => 1,
+                :maximum        => 1,
+                :position       => 100,
+                :identified_by => {
+                  'ST01' => '999'
+                }
+
+      #Functional Group Response Header
+      segment Hippo_eyeDoc::Segments::AK1,
+                :name           => 'Functional Group Response Header',
+                :minimum        => 1,
+                :maximum        => 1,
+                :position       => 200
+
+      #Transaction Set Response Header
+      loop    Hippo_eyeDoc::TransactionSets::HIPAA_999::L2000AK2,
+                :name           => 'Transaction Set Response Header',
+                :minimum        => 0,
+                :maximum        => 99999,
+                :position       => 300
+
+      #Functional Group Response Trailer
+      segment Hippo_eyeDoc::Segments::AK9,
+                :name           => 'Functional Group Response Trailer',
+                :minimum        => 1,
+                :maximum        => 1,
+                :position       => 900,
+                :identified_by => {
+                  'AK901' => ["A", "E", "M", "P", "R", "W", "X"]
+                }
+
+      #Transaction Set Trailer
+      segment Hippo_eyeDoc::Segments::SE,
+                :name           => 'Transaction Set Trailer',
+                :minimum        => 1,
+                :maximum        => 1,
+                :position       => 1000
+
+    end
+  end
+end

data/lib/hippo_eyeDoc/transaction_sets/base.rb

@@ -0,0 +1,236 @@
+module Hippo_eyeDoc::TransactionSets
+  class Base
+    include Hippo_eyeDoc::Separator
+    include Hippo_eyeDoc::Parser::TransactionSet
+    include Hippo_eyeDoc::Outputters::HTML::TransactionSet
+    include Hippo_eyeDoc::Outputters::PDF::TransactionSet
+    include Hippo_eyeDoc::Outputters::PrettyString::TransactionSet
+
+    class << self
+      attr_accessor :components, :identifier
+
+      def components
+        @components ||= []
+      end
+
+      def loop_name(id)
+        @identifier = id
+      end
+
+      def add_component(klass, options={})
+        components << Component.new(options.merge(:klass => klass, :sequence => components.length))
+      end
+      alias segment add_component
+      alias loop add_component
+
+
+      def grouped_components
+        @grouped_components ||= build_grouped_components
+      end
+
+      def build_grouped_components
+        output     = []
+        last_entry = nil
+
+        components.each do |component|
+          if component.segment?
+            output << [] if last_entry != :segment
+            output.last << component
+            last_entry = :segment
+          else
+            output << component
+            last_entry = :transaction_set
+          end
+        end
+
+        output
+      end
+      private :build_grouped_components
+    end
+
+    attr_accessor :values, :parent, :sequences, :ISA, :GS, :GE, :IEA
+
+    def initialize(options = {})
+      @parent = options[:parent]
+      @ISA    = options[:ISA]
+      @GS     = options[:GS]
+      @GE     = options[:GE]
+      @IEA    = options[:IEA]
+
+      super
+
+      populate(options[:segments]) if options[:segments]
+    end
+
+    def populate(segments)
+      grouped_components = self.class.grouped_components
+
+      grouped_components.each_with_index do |component, component_index|
+        if component.class == Array
+          # segments
+          starting_segment_count = segments.count
+          ending_segment_count   = 0
+
+          while starting_segment_count > ending_segment_count
+            starting_segment_count = segments.count
+
+            component.each do |individual_component|
+              segment = segments.first
+
+              break unless segment
+              next unless individual_component.valid?(segment)
+              next unless individual_component.conditions_match?(self, segment)
+
+              segment.parent = self
+
+              if individual_component.repeating?
+                values[individual_component.sequence] ||= individual_component.initialize_component(self)
+                values[individual_component.sequence] << segment
+              else
+                values[individual_component.sequence] = segment
+              end
+
+              segments.delete(segment)
+            end
+
+            ending_segment_count = segments.count
+          end
+        else
+          # loops
+          while true do
+            initial_segment = segments.first
+
+            break unless initial_segment
+            break unless component.valid?(initial_segment)
+            break unless component.conditions_match?(self, initial_segment)
+
+            component_matches_found  = []
+            starting_index = component.repeating? ? component_index : component_index + 1
+
+            grouped_components.slice(starting_index, grouped_components.length - starting_index).each do |next_component|
+              index =  segments.find_index do |segment|
+                          if segment == segments.first
+                            false
+                          elsif next_component.class == Array
+                             next_component.any?{|subcomponent| subcomponent.valid?(segment)}
+                          else
+                            next_component.valid?(segment)
+                          end
+                        end
+
+              component_matches_found << index if index
+            end
+
+            child_segments = segments.slice!(0, component_matches_found.min || segments.length)
+            values[component.sequence] ||= component.initialize_component(self)
+            if component.repeating?
+              values[component.sequence].build {|comp| comp.populate(child_segments) }
+            else
+              values[component.sequence].populate(child_segments)
+            end
+          end
+        end
+      end
+
+      unless segments.empty?
+        raise Hippo_eyeDoc::Exceptions::ParseError.new "Remaining Segments for #{self.class.identifier} after parsing was completed. Segments remaining: \n" + segments.map(&:to_s).join("\n")
+      end
+    end
+
+    def values
+      @values ||= {}
+    end
+
+    def increment(segment_identifier)
+      @sequences ||= Hash.new(0)
+
+      @sequences[segment_identifier] += 1
+    end
+
+    def segment?
+      false
+    end
+
+    def transaction_set?
+      true
+    end
+
+    def segments
+      values.values.collect(&:segments).flatten
+    end
+
+    def segment_count
+      segments.count
+    end
+
+    def ancestors
+      if parent
+        [parent, parent.ancestors].flatten
+      else
+        []
+      end
+    end
+
+    def to_ary
+      nil
+    end
+    alias :to_a :to_ary
+
+    def to_s
+      output = ''
+
+      values.sort.each do |sequence, component|
+        output += component.to_s
+      end
+
+      output
+    end
+
+    def get_component(identifier, sequence = nil)
+      if sequence.nil?
+        sequence = 0
+      else
+        sequence = sequence.to_i - 1
+      end
+
+      self.class.components.select do |c|
+        c.identifier == identifier
+      end[sequence]
+    end
+
+    def get_component_by_name(name, sequence = nil)
+      sequence =  if sequence.nil?
+                    0
+                  else
+                    sequence.to_i - 1
+                  end
+
+      self.class.components.select do |c|
+        if name.class == Regexp
+          c.options[:name] =~ name
+        else
+          c.options[:name] == name
+        end
+      end[sequence]
+    end
+
+    def method_missing(method_name, *args)
+      component = if method_name == :find_by_name
+                    get_component_by_name(args[0], args[1])
+                  else
+                    component_name, component_sequence = method_name.to_s.split('_')
+                    get_component(component_name, component_sequence)
+                  end
+
+      if component.nil?
+        raise Hippo_eyeDoc::Exceptions::InvalidSegment.new "Invalid segment specified: '#{method_name.to_s}'."
+      end
+
+      values[component.sequence] ||= component.initialize_component(self)
+
+      yield values[component.sequence] if block_given?
+
+      values[component.sequence]
+    end
+  end
+end