baldr 0.0.0 → 0.3.0

data/lib/baldr/builder.rb

@@ -1,25 +1,62 @@
 class Baldr::Builder
 
-  DEFAULT_SEPARATORS = {
-    element: '*',
-    segment: '~'
-  }.freeze
-
-  attr_accessor :separators
+  attr_accessor :envelope
 
   def initialize(params = {})
-    @children = []
-    @separators = params[:separators] || DEFAULT_SEPARATORS
+    @envelope = Baldr::Envelope.new
+    @transactions = []
+    @sender_id = params[:sender_id]
+    @receiver_id = params[:receiver_id]
+    @sender_id_qualifier = params[:sender_id_qualifier]
+    @receiver_id_qualifier = params[:receiver_id_qualifier]
+    @standard_version_number = params[:standard_version_number] || '00401'
+    @interchange_control_number = params[:interchange_control_number]
+    @date_time = params[:date_time] || DateTime.now
+    @functional_groups_control_numbers = params[:functional_groups_control_numbers] || {}
+    @acknowledgment_requested = params[:acknowledgment_requested] || '0'
   end
 
-  def method_missing(method, *args, &block)
-    child = VanillaX12::Segment.new(method, self)
-    child.instance_eval &block
-    @children << child
+  def ST(&block)
+    transaction = Baldr::Transaction.new
+    @transactions << transaction
+
+    transaction.instance_eval &block if block_given?
   end
 
-  def draw
-    @children.map(&:draw).join("\n")
+  def prepare!
+    @envelope.sender_id = @sender_id if @sender_id
+    @envelope.receiver_id = @receiver_id if @receiver_id
+    @envelope.sender_id_qualifier = @sender_id_qualifier if @sender_id_qualifier
+    @envelope.receiver_id_qualifier = @receiver_id_qualifier if @receiver_id_qualifier
+    @envelope.standard_version_number = @standard_version_number if @standard_version_number
+    @envelope.interchange_control_number = @interchange_control_number if @interchange_control_number
+    @envelope.date_time = @date_time
+    @envelope.acknowledgment_requested = @acknowledgment_requested
+
+    functional_groups = @transactions.group_by { |t| t.functional_group(version) }
+    functional_groups.each do |group_id, transactions|
+      group = Baldr::FunctionalGroup.new
+      group.functional_identifier_code = group_id
+      group.application_senders_code = @sender_id
+      group.application_receivers_code = @receiver_id
+      group.version_release_industry_code = "#{@standard_version_number}0"
+      group.date_time = @date_time
+      group.group_control_number = @functional_groups_control_numbers[group_id]
+      @envelope.add group
+      transactions.each do |t|
+        group.add t
+        t.prepare!
+      end
+      group.prepare!
+    end
+
+    @envelope.prepare!
+  end
+
+  protected
+
+  def version
+    @version ||= Baldr::Grammar.for_version(@standard_version_number)
   end
 
 end

data/lib/baldr/envelope.rb

@@ -0,0 +1,127 @@
+class Baldr::Envelope < Baldr::Segment
+
+  helpers_for_elements(
+    'ISA01' => :authorization_info_qualifier,
+    #'ISA02' => :authorization_info,
+    'ISA03' => :security_info_qualifier,
+    #'ISA04' => :security_info,
+    'ISA05' => :sender_id_qualifier,
+    #'ISA06' => :sender_id,
+    'ISA07' => :receiver_id_qualifier,
+    #'ISA08' => :receiver_id,
+    'ISA09' => :date,
+    'ISA10' => :time,
+    'ISA11' => :standard_id,
+    'ISA12' => :standard_version_number,
+    'ISA13' => :interchange_control_number,
+    'ISA14' => :acknowledgment_requested,
+    'ISA15' => :usage_indicator,
+    'ISA16' => :component_separator,
+  )
+
+  def initialize(id = 'ISA')
+    super(id)
+
+    self.authorization_info_qualifier = '00'
+    self.authorization_info = ''
+    self.security_info_qualifier = '00'
+    self.security_info = ''
+    self.sender_id_qualifier = '00'
+    self.sender_id = ''
+    self.receiver_id_qualifier = '00'
+    self.receiver_id = ''
+    self.date_time = DateTime.now
+    self.standard_id = 'U'
+    self.standard_version_number = '00401'
+    self.acknowledgment_requested = '0'
+    self.usage_indicator = 'P'
+    self.component_separator = '>'
+  end
+
+  def prepare!
+    trailer = get_trailer('IEA')
+
+    trailer['IEA01'] = func_group_loop.segments.count.to_s
+
+    self.interchange_control_number ||= generate_control_number(9)
+    trailer['IEA02'] = interchange_control_number
+  end
+
+  def transactions
+    @transactions ||= func_group_loop.segments.map{ |f| f.transactions }.flatten
+  end
+
+  def GS(&block)
+    if @children.last && @children.last.id.to_s == 'GS'
+      loop = @children.last
+      loop.add_segment Baldr::FunctionalGroup.new
+    else
+      loop = Baldr::Loop.new('GS')
+      @children << loop
+    end
+
+    loop.current_segment.instance_eval &block if block_given?
+  end
+
+  def authorization_info
+    self['ISA02'].rstrip
+  end
+
+  def authorization_info=(value)
+    self['ISA02'] = value.to_s.ljust(record_def[1][:max])
+  end
+
+  def security_info
+    self['ISA04'].rstrip
+  end
+
+  def security_info=(value)
+    self['ISA04'] = value.to_s.ljust(record_def[3][:max])
+  end
+
+  def sender_id
+    self['ISA06'].rstrip
+  end
+
+  def sender_id=(value)
+    self['ISA06'] = value.to_s.ljust(record_def[5][:max])
+  end
+
+  def receiver_id
+    self['ISA08'].rstrip
+  end
+
+  def receiver_id=(value)
+    self['ISA08'] = value.to_s.ljust(record_def[7][:max])
+  end
+
+  def date_time
+    DateTime.parse "#{date} #{time}"
+  end
+
+  def date_time=(value)
+    self.date = value.strftime('%y%m%d')
+    self.time = value.strftime('%H%M')
+  end
+
+  def custom_validate!(version)
+    trailer = @children.last.segments.first
+    if trailer['IEA01'].to_i != func_group_loop.segments.count
+      raise "wrong functional groups number: #{trailer['IEA01']} in IEA01, but real number is #{func_group_loop.segments.count}"
+    end
+    if trailer['IEA02'] != interchange_control_number
+      raise "interchange control numbers don't match: #{trailer['IEA02']} in IEA02 and #{interchange_control_number} in ISA13"
+    end
+  end
+
+  protected
+
+  def func_group_loop
+    @func_group_loop ||= @children.select{ |c| c.id == 'GS' }.first
+  end
+
+  def record_def
+    Baldr::Grammar::Envelope::RECORD_DEFS['ISA']
+  end
+
+end

data/lib/baldr/error.rb

@@ -0,0 +1,3 @@
+class Baldr::Error < StandardError
+
+end

data/lib/baldr/functional_group.rb

@@ -0,0 +1,72 @@
+class Baldr::FunctionalGroup < Baldr::Segment
+
+  helpers_for_elements(
+    'GS01' => :functional_identifier_code,
+    'GS02' => :application_senders_code,
+    'GS03' => :application_receivers_code,
+    'GS04' => :date,
+    'GS05' => :time,
+    'GS06' => :group_control_number,
+    'GS07' => :responsible_agency_code,
+    'GS08' => :version_release_industry_code,
+  )
+
+  def initialize(id = 'GS')
+    super(id)
+
+    #self.application_senders_code = ''
+    #self.application_receivers_code = ''
+    self.date_time = DateTime.now
+    self.responsible_agency_code = 'X'
+    self.version_release_industry_code = '004010'
+  end
+
+  def prepare!
+    trailer = get_trailer('GE')
+
+    trailer['GE01'] = transaction_loop.segments.count.to_s
+
+    self.group_control_number ||= generate_control_number(9)
+    trailer['GE02'] = group_control_number
+  end
+
+  def sub_version
+    Baldr::Grammar.for_version(version_release_industry_code)
+  end
+
+  def transactions
+    transaction_loop.segments
+  end
+
+  def date_time
+    DateTime.parse "#{date} #{time}"
+  end
+
+  def date_time=(value)
+    self.date = value.strftime('%Y%m%d')
+    self.time = value.strftime('%H%M')
+  end
+
+  def custom_validate!(version)
+    transaction_loop.segments.each do |transaction|
+      if version.for_transaction_set(transaction.transaction_set_code)::FUNCTIONAL_GROUP != functional_identifier_code
+        raise "wrong transaction #{transaction.transaction_set_code} in functional group #{functional_identifier_code}"
+      end
+    end
+
+    trailer = @children.second.segments.first
+    if trailer['GE01'].to_i != transaction_loop.segments.count
+      raise "wrong transactions number: #{trailer['GE01']} in GE01, but real number is #{transaction_loop.segments.count}"
+    end
+    if trailer['GE02'] != group_control_number
+      raise "group control numbers don't match: #{trailer['GE02']} in GE02 and #{group_control_number} in GS06"
+    end
+  end
+
+  protected
+
+  def transaction_loop
+    @children.first
+  end
+
+end

data/lib/baldr/grammar/envelope.rb

@@ -0,0 +1,69 @@
+module Baldr::Grammar::Envelope
+
+  STRUCTURE = {
+    id: 'ISA', min: 0, max: 99999, class: :envelope, level: [
+      {id: 'TA1', min: 0, max: 99999},
+      {id: 'GS', min: 0, class: :functional_group, max: 99999, level: [
+        {id: 'ST', min: 0, class: :transaction, max: 99999},
+        {id: 'GE', min: 1, max: 1},
+      ]},
+      {id: 'IEA', min: 1, max: 1}
+    ]
+  }.freeze
+
+  RECORD_DEFS = {
+    'ISA' => [
+      {id: 'ISA01', required: true, min: 2, max: 2, type: :id},
+      {id: 'ISA02', required: true, min: 10, max: 10, type: :string},
+      {id: 'ISA03', required: true, min: 2, max: 2, type: :id},
+      {id: 'ISA04', required: true, min: 10, max: 10, type: :string},
+      {id: 'ISA05', required: true, min: 2, max: 2, type: :id},
+      {id: 'ISA06', required: true, min: 15, max: 15, type: :string},
+      {id: 'ISA07', required: true, min: 2, max: 2, type: :id},
+      {id: 'ISA08', required: true, min: 15, max: 15, type: :string},
+      {id: 'ISA09', required: true, min: 6, max: 6, type: :date},
+      {id: 'ISA10', required: true, min: 4, max: 4, type: :time},
+      {id: 'ISA11', required: true, min: 1, max: 1, type: :id},
+      {id: 'ISA12', required: true, min: 5, max: 5, type: :id},
+      {id: 'ISA13', required: true, min: 9, max: 9, type: :number, decimals: 0},
+      {id: 'ISA14', required: true, min: 1, max: 1, type: :id},
+      {id: 'ISA15', required: true, min: 1, max: 1, type: :id},
+      {id: 'ISA16', required: true, min: 1, max: 1, type: :string},
+    ],
+    'GS' => [
+      {id: 'GS01', required: true, max: 2, type: :id},
+      {id: 'GS02', required: true, max: 15, type: :string},
+      {id: 'GS03', required: true, max: 15, type: :string},
+      {id: 'GS04', required: true, max: 8, type: :date},
+      {id: 'GS05', required: true, max: 8, type: :time},
+      {id: 'GS06', required: true, max: 9, type: :number, decimals: 0},
+      {id: 'GS07', required: true, max: 2, type: :id},
+      {id: 'GS08', required: true, max: 12, type: :string},
+    ],
+    'ST' => [
+      {id: 'ST01', required: true, max: 3, type: :id},
+      {id: 'ST02', required: true, min: 4, max: 9, type: :string},
+      {id: 'ST03', required: false, max: 35, type: :string},
+    ],
+    'SE' => [
+      {id: 'SE01', required: true, max: 10, type: :number, decimals: 0},
+      {id: 'SE02', required: true, min: 4, max: 9, type: :string},
+    ],
+    'GE' => [
+      {id: 'GE01', required: true, max: 6, type: :number, decimals: 0},
+      {id: 'GE02', required: true, max: 9, type: :number, decimals: 0},
+    ],
+    'IEA' => [
+      {id: 'IEA01', required: true, max: 5, type: :number, decimals: 0},
+      {id: 'IEA02', required: true, max: 9, type: :number, decimals: 0},
+    ],
+    'TA1' => [
+      {id: 'TA101', required: true, max: 9, type: :number, decimals: 0},
+      {id: 'TA102', required: true, max: 6, type: :date},
+      {id: 'TA103', required: true, max: 4, type: :time},
+      {id: 'TA104', required: true, max: 1, type: :id},
+      {id: 'TA105', required: true, max: 3, type: :id},
+    ],
+  }.freeze
+
+end

data/lib/baldr/grammar/version4010/set204.rb

@@ -0,0 +1,88 @@
+module Baldr::Grammar::Version4010::Set204
+
+  FUNCTIONAL_GROUP = 'SM'
+
+  STRUCTURE = {
+    id: 'ST', min: 1, max: 1, level: [
+      {id: 'B2', min: 1, max: 1},
+      {id: 'B2A', min: 1, max: 1},
+      {id: 'L11', min: 0, max: 50},
+      {id: 'G62', min: 0, max: 1},
+      {id: 'MS3', min: 0, max: 1},
+      {id: 'AT5', min: 0, max: 6},
+      {id: 'PLD', min: 0, max: 1},
+      {id: 'LH6', min: 0, max: 6},
+      {id: 'NTE', min: 0, max: 10},
+      {id: 'N1', min: 0, max: 5, level: [
+        {id: 'N2', min: 0, max: 1},
+        {id: 'N3', min: 0, max: 2},
+        {id: 'N4', min: 0, max: 1},
+        {id: 'L11', min: 0, max: 1},
+        {id: 'G61', min: 0, max: 3},
+      ]},
+      {id: 'N7', min: 0, max: 10, level: [
+        {id: 'N7A', min: 0, max: 1},
+        {id: 'N7B', min: 0, max: 1},
+        {id: 'MEA', min: 0, max: 1},
+        {id: 'M7', min: 0, max: 2},
+      ]},
+      {id: 'S5', min: 1, max: 999, level: [
+        {id: 'L11', min: 0, max: 50},
+        {id: 'G62', min: 0, max: 2},
+        {id: 'AT8', min: 0, max: 1},
+        {id: 'LAD', min: 0, max: 999},
+        {id: 'AT5', min: 0, max: 6},
+        {id: 'PLD', min: 0, max: 1},
+        {id: 'NTE', min: 0, max: 20},
+        {id: 'N1', min: 0, max: 1, level: [
+          {id: 'N2', min: 0, max: 1},
+          {id: 'N3', min: 0, max: 2},
+          {id: 'N4', min: 0, max: 1},
+          {id: 'G61', min: 0, max: 3},
+        ]},
+        {id: 'L5', min: 0, max: 99, level: [
+          {id: 'AT8', min: 0, max: 1},
+          {id: 'G61', min: 0, max: 99, level: [
+            {id: 'L11', min: 0, max: 5},
+            {id: 'LH6', min: 0, max: 6},
+            {id: 'LH1', min: 0, max: 25, level: [
+              {id: 'LH2', min: 0, max: 4},
+              {id: 'LH3', min: 0, max: 10},
+              {id: 'LFH', min: 0, max: 20},
+              {id: 'LEP', min: 0, max: 3},
+              {id: 'LH4', min: 0, max: 1},
+              {id: 'LHT', min: 0, max: 3},
+            ]},
+          ]},
+        ]},
+        {id: 'OID', min: 0, max: 999, level: [
+          {id: 'G62', min: 0, max: 2},
+          {id: 'LAD', min: 0, max: 999},
+          {id: 'L5', min: 0, max: 99, level: [
+            {id: 'AT8', min: 0, max: 1},
+            {id: 'G61', min: 0, max: 99, level: [
+              {id: 'L11', min: 0, max: 5},
+              {id: 'LH6', min: 0, max: 6},
+              {id: 'LH1', min: 0, max: 25, level: [
+                {id: 'LH2', min: 0, max: 4},
+                {id: 'LH3', min: 0, max: 10},
+                {id: 'LFH', min: 0, max: 20},
+                {id: 'LEP', min: 0, max: 3},
+                {id: 'LH4', min: 0, max: 1},
+                {id: 'LHT', min: 0, max: 3},
+              ]},
+            ]},
+          ]},
+        ]},
+        {id: 'N7', min: 0, max: 10, level: [
+          {id: 'N7A', min: 0, max: 1},
+          {id: 'N7B', min: 0, max: 1},
+          {id: 'MEA', min: 0, max: 1},
+          {id: 'M7', min: 0, max: 2},
+        ]},
+      ]},
+      {id: 'L3', min: 0, max: 1},
+      {id: 'SE', min: 1, max: 1},
+    ]
+  }.freeze
+end

data/lib/baldr/grammar/version4010/set210.rb

@@ -0,0 +1,80 @@
+module Baldr::Grammar::Version4010::Set210
+
+  FUNCTIONAL_GROUP = 'IM'
+
+  STRUCTURE = {
+    id: 'ST', min: 1, max: 1, level: [
+      {id: 'B3', min: 1, max: 1},
+      {id: 'C2', min: 0, max: 1},
+      {id: 'C3', min: 0, max: 1},
+      {id: 'ITD', min: 0, max: 1},
+      {id: 'N9', min: 0, max: 300},
+      {id: 'G62', min: 0, max: 6},
+      {id: 'R3', min: 0, max: 12},
+      {id: 'H3', min: 0, max: 6},
+      {id: 'K1', min: 0, max: 10},
+      {id: 'N1', min: 0, max: 10, level: [
+        {id: 'N2', min: 0, max: 1},
+        {id: 'N3', min: 0, max: 2},
+        {id: 'N4', min: 0, max: 1},
+        {id: 'N9', min: 0, max: 5},
+      ]},
+      {id: 'N7', min: 0, max: 10, level: [
+        {id: 'M7', min: 0, max: 2},
+      ]},
+      {id: 'SPO', min: 0, max: 999999, level: [
+        {id: 'SDQ', min: 0, max: 10},
+      ]},
+      {id: 'S5', min: 0, max: 999, level: [
+        {id: 'N9', min: 0, max: 10},
+        {id: 'G62', min: 0, max: 10},
+        {id: 'H3', min: 0, max: 6},
+        {id: 'SPO', min: 0, max: 999999, level: [
+          {id: 'SDQ', min: 0, max: 10},
+        ]},
+        {id: 'N1', min: 0, max: 2, level: [
+          {id: 'N2', min: 0, max: 1},
+          {id: 'N3', min: 0, max: 2},
+          {id: 'N4', min: 0, max: 1},
+          {id: 'N9', min: 0, max: 5},
+          {id: 'N7', min: 0, max: 10, level: [
+            {id: 'M7', min: 0, max: 2},
+          ]},
+        ]},
+      ]},
+      {id: 'LX', min: 0, max: 9999, level: [
+        {id: 'N9', min: 0, max: 5},
+        {id: 'POD', min: 0, max: 1},
+        {id: 'L5', min: 0, max: 30},
+        {id: 'H1', min: 0, max: 3},
+        {id: 'H2', min: 0, max: 2},
+        {id: 'L0', min: 0, max: 10},
+        {id: 'L1', min: 0, max: 10},
+        {id: 'L4', min: 0, max: 10},
+        {id: 'L7', min: 0, max: 10},
+        {id: 'K1', min: 0, max: 10},
+        {id: 'SPO', min: 0, max: 999999, level: [
+          {id: 'SDQ', min: 0, max: 10},
+        ]},
+        {id: 'N1', min: 0, max: 999999, level: [
+          {id: 'N2', min: 0, max: 1},
+          {id: 'N3', min: 0, max: 2},
+          {id: 'N4', min: 0, max: 1},
+          {id: 'N9', min: 0, max: 10},
+          {id: 'CD3', min: 0, max: 999999, level: [
+            {id: 'N9', min: 0, max: 20},
+            {id: 'H6', min: 0, max: 10},
+            {id: 'L9', min: 0, max: 10},
+            {id: 'POD', min: 0, max: 1},
+            {id: 'G62', min: 0, max: 1},
+          ]},
+          {id: 'SPO', min: 0, max: 999999, level: [
+            {id: 'SDQ', min: 0, max: 10},
+          ]},
+        ]},
+      ]},
+      {id: 'L3', min: 0, max: 1},
+      {id: 'SE', min: 1, max: 1},
+    ]
+  }.freeze
+end

data/lib/baldr/grammar/version4010/set214.rb

@@ -0,0 +1,74 @@
+module Baldr::Grammar::Version4010::Set214
+
+  FUNCTIONAL_GROUP = 'QM'
+
+  STRUCTURE = {
+    id: 'ST', min: 1, max: 1, level: [
+      {id: 'B10', min: 1, max: 1},
+      {id: 'L11', min: 0, max: 300},
+      {id: 'MAN', min: 0, max: 9999},
+      {id: 'K1', min: 0, max: 10},
+      {id: 'N1', min: 0, max: 10, level: [
+        {id: 'N2', min: 0, max: 1},
+        {id: 'N3', min: 0, max: 2},
+        {id: 'N4', min: 0, max: 1},
+        {id: 'G61', min: 0, max: 1},
+        {id: 'G62', min: 0, max: 1},
+        {id: 'L11', min: 0, max: 10},
+      ]},
+      {id: 'MS3', min: 0, max: 12},
+      {id: 'LX', min: 0, max: 999999, level: [
+        {id: 'AT7', min: 0, max: 10, level: [
+          {id: 'MS1', min: 0, max: 1},
+          {id: 'MS2', min: 0, max: 1},
+        ]},
+        {id: 'L11', min: 0, max: 10},
+        {id: 'MAN', min: 0, max: 9999},
+        {id: 'Q7', min: 0, max: 10},
+        {id: 'K1', min: 0, max: 10},
+        {id: 'AT5', min: 0, max: 10},
+        {id: 'AT8', min: 0, max: 10},
+        {id: 'CD3', min: 0, max: 999999, level: [
+          {id: 'L11', min: 0, max: 20},
+          {id: 'AT7', min: 0, max: 10, level: [
+            {id: 'MS1', min: 0, max: 1},
+            {id: 'MS2', min: 0, max: 1},
+          ]},
+          {id: 'NM1', min: 0, max: 1},
+          {id: 'Q7', min: 0, max: 10},
+          {id: 'AT8', min: 0, max: 1},
+          {id: 'MAN', min: 0, max: 9999},
+          {id: 'N1', min: 0, max: 999999, level: [
+            {id: 'N2', min: 0, max: 1},
+            {id: 'N3', min: 0, max: 3},
+            {id: 'N4', min: 0, max: 1},
+            {id: 'L11', min: 0, max: 10},
+          ]},
+        ]},
+        {id: 'PRF', min: 0, max: 999999, level: [
+          {id: 'N1', min: 0, max: 999999, level: [
+            {id: 'N2', min: 0, max: 1},
+            {id: 'N3', min: 0, max: 2},
+            {id: 'N4', min: 0, max: 1},
+            {id: 'L11', min: 0, max: 10},
+          ]},
+          {id: 'CD3', min: 0, max: 999999, level: [
+            {id: 'L11', min: 0, max: 20},
+            {id: 'AT7', min: 0, max: 10, level: [
+              {id: 'MS1', min: 0, max: 1},
+              {id: 'MS2', min: 0, max: 1},
+            ]},
+            {id: 'MAN', min: 0, max: 9999},
+          ]},
+        ]},
+        {id: 'SPO', min: 0, max: 999999, level: [
+          {id: 'SDQ', min: 0, max: 10},
+        ]},
+        {id: 'EFI', min: 0, max: 99999, level: [
+          {id: 'BIN', min: 1, max: 1},
+        ]},
+      ]},
+      {id: 'SE', min: 1, max: 1},
+    ]
+  }.freeze
+end