eancom 1.4.0 → 2.0.0

data/definitions/desadv/d96a.rb

@@ -1,6 +1,6 @@
 Eancom::Definition.create(name: 'D96A', type: :desadv) do |document, config|
   document.header do |header|
-    header.segment Eancom::Edifact::UNA.new()
+    header.segment Eancom::Edifact::UNA.new
 
     header.segment Eancom::Edifact::UNB.new(
       syntax_identifier: 'UNOC',
@@ -12,8 +12,8 @@ Eancom::Definition.create(name: 'D96A', type: :desadv) do |document, config|
       date: config.header.date,
       time: config.header.time,
       interchange_control_reference: config.header.interchange_control_reference,
-      application_reference: 'DESADV',
-      interchange_agreement_identifier: 'EANCOM'
+      application_reference: config.header.application_reference,
+      interchange_agreement_identifier: config.header.interchange_agreement_identifier
     )
 
     header.segment Eancom::Edifact::UNH.new(
@@ -27,115 +27,201 @@ Eancom::Definition.create(name: 'D96A', type: :desadv) do |document, config|
   end
 
   document.body do |body|
-    body.segment Eancom::Edifact::BGM.new(
-      document_name_code: '351',
-      document_identifier: config.body.document_identifier,
-      message_function_code: '9'
-    )
-
-    # Document Date
-    body.segment Eancom::Edifact::DTM.new(
-      type: '137',
-      date_time: config.body.document_message_date_time,
-      format: '102'
-    )
-
-    # Shipping Date
-    body.segment Eancom::Edifact::DTM.new(
-      type: '11',
-      date_time: config.body.despatch_date_and_or_time,
-      format: '102'
-    )
-
-    # Order Reference
-    body.segment Eancom::Edifact::RFF.new(
-      reference_code_qualifier: 'VN',
-      reference_identifier: config.body.document_identifier
-    )
-
-    # Sender ILN
-    body.segment Eancom::Edifact::NAD.new(
-      party_function_code_qualifier: 'SU',
-      party_identifier: config.header.interchange_sender_identification,
-      code_list_responsible_agancy_code_1: '9'
-    )
-
-    # Manufacturer ILN
-    body.segment Eancom::Edifact::NAD.new(
-      party_function_code_qualifier: 'MF',
-      party_identifier: config.header.interchange_sender_identification,
-      code_list_responsible_agancy_code_1: '9'
-    )
-
-    # Reciver ILN
-    body.segment Eancom::Edifact::NAD.new(
-      party_function_code_qualifier: 'BY',
-      party_identifier: config.header.interchange_recipient_identification,
-      code_list_responsible_agancy_code_1: '9'
-    )
-
-    # Destination ILN
-    body.segment Eancom::Edifact::NAD.new(
-      party_function_code_qualifier: 'DP',
-      party_identifier: config.header.interchange_recipient_identification,
-      code_list_responsible_agancy_code_1: '9'
-    )
-
-    # Final Recipient ILN
-    body.segment Eancom::Edifact::NAD.new(
-      party_function_code_qualifier: 'UC',
-      party_identifier: config.header.interchange_recipient_identification,
-      code_list_responsible_agancy_code_1: '9'
-    )
-
-    # Delivery Note Mode
-    body.segment Eancom::Edifact::CPS.new(
-      hierarchical_structure_level_identifier: '1'
-    )
-
-    # Items
-    total_quantity = 0
-
-    items = config.body.items
-
-    items.each_with_index do |item, index|
-      total_quantity += item.quantity.to_i
-
-      body.segment Eancom::Edifact::LIN.new(
-        line_item_identifier_1: "#{index + 1}",
-        item_identifier: item.ean,
-        item_type_identification_code: 'SRV'
+    messages = config.body.messages
+    messages.each do |message|
+      body.segment Eancom::Edifact::BGM.new(
+        document_name_code: message.document_name_code,
+        document_identifier: message.document_identifier,
+        message_function_code: message.message_function_code
       )
 
-      body.segment Eancom::Edifact::QTY.new(
-        quantity_type_code_qualifier: '12',
-        quantity: "#{item.quantity}"
+      date_time_messages = message.date_time_messages
+      date_time_messages.each_with_index do |dtm, index|
+        next unless index == 0
+
+        structure = Eancom.find_structure(tag: 'DTM')
+        key = dtm.identifier.intern.to_sym
+        body.segment Eancom::Edifact::DTM.new(
+          type: structure.dictionary_lookup(:type, dtm.identifier),
+          date_time: dtm[key].date_time,
+          format: '102'
+        )
+      end
+
+      date_time_messages = message.date_time_messages
+      date_time_messages.each_with_index do |dtm, index|
+        next unless index == 1
+
+        structure = Eancom.find_structure(tag: 'DTM')
+        key = dtm.identifier.intern.to_sym
+        body.segment Eancom::Edifact::DTM.new(
+          type: structure.dictionary_lookup(:type, dtm.identifier),
+          date_time: dtm[key].date_time,
+          format: '102'
+        )
+      end
+
+      references = message.references
+      references.each_with_index do |rff, index|
+        next unless index == 0
+
+        structure = Eancom.find_structure(tag: 'RFF')
+        key = rff.identifier.intern.to_sym
+        body.segment Eancom::Edifact::RFF.new(
+          reference_code_qualifier: structure.dictionary_lookup(:reference_code_qualifier, rff.identifier),
+          reference_identifier: rff[key].reference_identifier
+        )
+      end
+
+      # Sender ILN
+      nads = message.nads
+      nads.each_with_index do |nad, index|
+        next unless index == 0
+
+        structure = Eancom.find_structure(tag: 'NAD')
+        key = nad.identifier.intern.to_sym
+        body.segment Eancom::Edifact::NAD.new(
+          party_function_code_qualifier: structure.dictionary_lookup(:party_function_code_qualifier, nad.identifier),
+          party_identifier: nad[key].party_identifier,
+          code_list_responsible_agency_code_1: '9'
+        )
+      end
+
+      # Manufacturer ILN
+      nads = message.nads
+      nads.each_with_index do |nad, index|
+        next unless index == 1
+
+        structure = Eancom.find_structure(tag: 'NAD')
+        key = nad.identifier.intern.to_sym
+        body.segment Eancom::Edifact::NAD.new(
+          party_function_code_qualifier: structure.dictionary_lookup(:party_function_code_qualifier, nad.identifier),
+          party_identifier: nad[key].party_identifier,
+          code_list_responsible_agency_code_1: '9'
+        )
+      end
+
+      # Reciver ILN
+      nads = message.nads
+      nads.each_with_index do |nad, index|
+        next unless index == 2
+
+        structure = Eancom.find_structure(tag: 'NAD')
+        key = nad.identifier.intern.to_sym
+        body.segment Eancom::Edifact::NAD.new(
+          party_function_code_qualifier: structure.dictionary_lookup(:party_function_code_qualifier, nad.identifier),
+          party_identifier: nad[key].party_identifier,
+          code_list_responsible_agency_code_1: '9'
+        )
+      end
+
+      # Destination ILN
+      nads = message.nads
+      nads.each_with_index do |nad, index|
+        next unless index == 3
+
+        structure = Eancom.find_structure(tag: 'NAD')
+        key = nad.identifier.intern.to_sym
+        body.segment Eancom::Edifact::NAD.new(
+          party_function_code_qualifier: structure.dictionary_lookup(:party_function_code_qualifier, nad.identifier),
+          party_identifier: nad[key].party_identifier,
+          code_list_responsible_agency_code_1: '9'
+        )
+      end
+
+      # Final Recipient ILN
+      nads = message.nads
+      nads.each_with_index do |nad, index|
+        next unless index == 4
+
+        structure = Eancom.find_structure(tag: 'NAD')
+        key = nad.identifier.intern.to_sym
+        body.segment Eancom::Edifact::NAD.new(
+          party_function_code_qualifier: structure.dictionary_lookup(:party_function_code_qualifier, nad.identifier),
+          party_identifier: nad[key].party_identifier,
+          code_list_responsible_agency_code_1: '9'
+        )
+      end
+
+      # Delivery Note Mode
+      body.segment Eancom::Edifact::CPS.new(
+        hierarchical_structure_level_identifier: message.hierarchical_structure_level_identifier
       )
-    end
 
-    # Total Quantity
-    body.segment Eancom::Edifact::CNT.new(
-      control_total_type_code_quantifier: '1',
-      control_total_value: "#{total_quantity}"
-    )
-
-    # Position Count
-    body.segment Eancom::Edifact::CNT.new(
-      control_total_type_code_quantifier: '2',
-      control_total_value: "#{items.count}"
-    )
+      # Items
+      total_quantity = 0
+
+      items = message.items
+
+      items.each_with_index do |item, index|
+        total_quantity += item.quantity.to_i
+
+        structure = Eancom.find_structure(tag: 'LIN')
+        body.segment Eancom::Edifact::LIN.new(
+          line_item_identifier_1: (index + 1).to_s,
+          item_identifier: item.ean,
+          item_type_identification_code: structure.dictionary_lookup(:item_type_identification_code,
+                                                                     item.item_type_identification_code)
+        )
+
+        quantities = item.quantities
+        quantities.each_with_index do |qty, index|
+          structure = Eancom.find_structure(tag: 'QTY')
+          key = qty.identifier.intern.to_sym
+          body.segment Eancom::Edifact::QTY.new(
+            quantity_type_code_qualifier: structure.dictionary_lookup(:quantity_type_code_qualifier, qty.identifier),
+            quantity: qty[key].quantity
+          )
+        end
+      end
+    end
   end
 
   document.footer do |footer|
+    messages = config.body.messages
+    messages.each do |message|
+      items = message.items
+      control_total_value = 0
+
+      items.each_with_index do |item, index|
+        quantities = item.quantities
+        quantities.each do |qty|
+          key = qty.identifier.intern.to_sym
+          control_total_value += qty[key].quantity.to_i
+        end
+        next unless index == 1
+        counts = item.counts
+        counts.each_with_index do |cnt, cnt_index|
+          next unless cnt_index == 0
+          structure = Eancom.find_structure(tag: 'CNT')
+          footer.segment Eancom::Edifact::CNT.new(
+            control_total_type_code_quantifier: structure.dictionary_lookup(:control_total_type_code_quantifier,
+                                                                            cnt.control_total_type_code_quantifier),
+            control_total_value: control_total_value.to_s
+          )
+        end
+
+
+        counts.each_with_index do |cnt, cnt_index|
+          next unless cnt_index == 1
+          structure = Eancom.find_structure(tag: 'CNT')
+          footer.segment Eancom::Edifact::CNT.new(
+            control_total_type_code_quantifier: structure.dictionary_lookup(:control_total_type_code_quantifier,
+                                                                            cnt.control_total_type_code_quantifier),
+            control_total_value: items.count.to_s
+          )
+        end
+      end
+    end
+
     footer.segment Eancom::Edifact::UNT.new(
-      number_of_segments_in_message: "#{document.total_segments}",
-      message_reference_number: '1'
+      number_of_segments_in_message: document.total_segments.to_s,
+      message_reference_number: config.header.message_reference_number
     )
 
     footer.segment Eancom::Edifact::UNZ.new(
-      interchange_control_count: '1',
-      interchange_control_reference: "#{config.body.document_identifier}"
+      interchange_control_count: messages.size.to_s,
+      interchange_control_reference: config.header.interchange_control_reference.to_s
     )
   end
-
 end