xmlconv2 2.0.0

data/src/conversion/bdd_i2.rb

@@ -0,0 +1,102 @@
+#!/usr/bin/env ruby
+# BddI2 -- xmlconv2 -- 02.06.2004 -- hwyss@ywesee.com
+
+require 'i2/document'
+require 'i2/address'
+require 'i2/position'
+
+module XmlConv
+	module Conversion
+		class BddI2
+			I2_ADDR_CODES = {
+				'BillTo'		=>	:buyer,
+				'Employee'	=>	:employee,
+				'ShipTo'		=>	:delivery,
+			}
+			I2_DELIVERY_CODES = {
+				'wird abgeholt'   =>  :pickup,
+				'werkslieferung'  =>  :delivery,
+				'camion'          =>  :camion,
+			}
+			class << self
+				def convert(bdd)
+					doc = I2::Document.new
+					header = I2::Header.new
+					doc.header = header
+					bdd.deliveries.each { |delivery|
+						_doc_add_delivery(doc, delivery)
+					}
+					doc
+				end
+				def _doc_add_delivery(doc, delivery)
+					order = I2::Order.new
+					order.sender_id = delivery.bsr_id
+					# customer_id is in reality the delivery_id assigned by the
+					# customer - the slight confusion is due to automatic naming
+					order.delivery_id = delivery.customer_id 
+					order.add_date(I2::Date.from_date(::Date.today))
+					if(customer = delivery.customer)
+						_order_add_customer(order, customer)
+					end
+          if(agreement = delivery.agreement)
+            order.terms_cond = I2_DELIVERY_CODES[agreement.terms_cond]
+          end
+					delivery.items.each { |item|
+						_order_add_item(order, item)
+					}
+					doc.add_order(order)
+				end
+				def _address_add_bdd_addr(address, bdd_addr)
+					if(bdd_addr.size < 2)
+						bdd_addr.lines.each_with_index { |line, idx|
+							address.send("street#{idx.next}=", line)
+						}
+					else
+						ln1, ln2, ln3 = bdd_addr.lines
+						address.name2 = ln1
+						address.street1 = ln2
+						address.street2 = ln3 unless(ln3.nil?)
+					end
+					address.city = bdd_addr.city
+					address.zip_code = bdd_addr.zip_code
+				end
+				def _order_add_customer(order, customer)
+					customer.parties.each { |party|
+						_order_add_party(order, party)
+					}
+				end
+				def _order_add_party(order, party)
+					address = I2::Address.new
+					address.party_id = party.acc_id
+					if(name = party.name)
+						address.name1 = name.to_s
+					end
+					if(code = I2_ADDR_CODES[party.role])
+						address.code = code
+					end
+					if(bdd_addr = party.address)
+						_address_add_bdd_addr(address, bdd_addr)
+					end
+					order.add_address(address)
+				end
+				def _order_add_item(order, item)
+					position = I2::Position.new
+					position.number = item.line_no
+					position.article_ean = item.et_nummer_id
+          if(id = item.customer_id)
+            position.customer_id = id
+          end
+					position.qty = item.qty
+          position.unit = item.unit
+					if(date = item.delivery_date)
+						position.delivery_date = I2::Date.from_date(date)
+					end
+          if(price = item.get_price('NettoPreis'))
+            position.price = price.amount
+          end
+					order.add_position(position)
+				end
+			end
+		end
+	end
+end

data/src/conversion/bdd_xml.rb

@@ -0,0 +1,242 @@
+#!/usr/bin/env ruby
+# BddXml -- xmlconv2 -- 21.06.2004 -- hwyss@ywesee.com
+
+require 'rexml/document'
+
+module XmlConv
+	module Conversion
+		class BddXml
+			class << self
+				def convert(bdd)
+					skeleton = <<-EOS
+<?xml version="1.0" encoding="UTF-8"?>
+<!DOCTYPE BDD SYSTEM "ABB BDD.dtd">
+<BDD />
+					EOS
+					doc = REXML::Document.new(skeleton)
+					_xml_add_bdd_bsr(doc.root, bdd.bsr)
+					bdd.deliveries.each { |delivery|
+						_xml_add_bdd_delivery(doc.root, delivery)
+					}
+					bdd.invoices.each { |invoice|
+						_xml_add_bdd_invoice(doc.root, invoice)
+					}
+					doc
+				end
+				def _xml_add_bdd_address(xml_elm, address)
+					xml_addr = REXML::Element.new('Address')
+					address.lines.each { |line|
+						xml_line = REXML::Element.new('AddressLine')
+						xml_line.text = line
+						xml_addr.add_element(xml_line)
+					}
+					if(city = address.city)
+						xml_city = REXML::Element.new('City')
+						xml_city.text = city
+						xml_addr.add_element(xml_city)
+					end
+					if(zip_code = address.zip_code)
+						xml_zip = REXML::Element.new('ZipCode')
+						domain = address.country || 'CH'
+						xml_zip.add_attribute('Domain', domain)
+						xml_zip.text = zip_code
+						xml_addr.add_element(xml_zip)
+					end
+					xml_elm.add_element(xml_addr)
+				end
+				def _xml_add_bdd_agreement(xml_elm, agreement)
+					if(terms_cond = agreement.terms_cond)
+						xml_agreement = REXML::Element.new('Agreement')
+						terms = REXML::Element.new('TermsCond')
+						terms.text = terms_cond
+						xml_agreement.add_element(terms)
+						xml_elm.add_element(xml_agreement)
+					end
+				end
+				def _xml_add_bdd_bsr(xml_bdd, bsr)
+					xml_bsr = REXML::Element.new('BSR')
+					timestamp = REXML::Element.new('Timestamp')
+					time = bsr.timestamp || Time.now
+					zone = sprintf("%+i", time.gmtoff / 3600)
+					timestamp.add_attribute('Zone', zone)
+					timestamp.text = time.strftime('%Y%m%d%H%M%S')
+					xml_bsr.add_element(timestamp)
+					verb = REXML::Element.new('Verb')
+					verb.text = bsr.verb || 'Return'	
+					xml_bsr.add_element(verb)
+					noun = REXML::Element.new('Noun')
+					noun.text = bsr.noun || 'Status'
+					xml_bsr.add_element(noun)
+					bsr.parties.each { |party|
+						_xml_add_bdd_party(xml_bsr, party)
+					}
+					xml_bdd.add_element(xml_bsr)
+				end
+				def _xml_add_bdd_delivery(xml_bdd, delivery)
+					xml_delivery = REXML::Element.new('Delivery')
+					_xml_assemble_bdd_transaction(xml_delivery, delivery)
+					xml_bdd.add_element(xml_delivery)
+				end
+				def _xml_add_bdd_invoice(xml_bdd, invoice)
+					xml_invoice = REXML::Element.new('Invoice')
+					if(invoice_id = invoice.invoice_id)
+						domain, idstr = invoice_id
+						_xml_add_domain_id(xml_invoice, domain, idstr, 'InvoiceId')
+					end
+					if(delivery_id = invoice.delivery_id)
+						domain, idstr = delivery_id
+						_xml_add_domain_id(xml_invoice, domain, idstr, 'DeliveryId')
+					end
+					_xml_assemble_bdd_transaction(xml_invoice, invoice)
+					xml_bdd.add_element(xml_invoice)
+				end
+				def _xml_add_bdd_name(xml_elm, name)
+					xml_name = REXML::Element.new('Name')
+					if(name.text)
+						xml_name.text = name.to_s
+					else
+						if(first = name.first)
+							xml_first = REXML::Element.new('FirstName')
+							xml_first.text = first
+							xml_name.add_element(xml_first)
+						end
+						if(last = name.last)
+							xml_last = REXML::Element.new('LastName')
+							xml_last.text = last
+							xml_name.add_element(xml_last)
+						end
+					end
+					xml_elm.add_element(xml_name)
+				end
+				def _xml_add_bdd_party(xml_elm, party)
+					xml_party = REXML::Element.new('Party')
+					xml_party.add_attribute('Version', '2')
+					xml_party.add_attribute('Role', party.role)
+					party.ids.each { |domain, idstr|
+						_xml_add_domain_id(xml_party, domain, idstr, 'PartyId')
+					}
+					if(name = party.name)
+						_xml_add_bdd_name(xml_party, name)
+					end
+					if(addr = party.address)
+						_xml_add_bdd_address(xml_party, addr)
+					end
+					party.parties.each { |subdiv|
+						_xml_add_bdd_party(xml_party, subdiv)
+					}
+					xml_elm.add_element(xml_party)
+				end
+				def _xml_add_delivery_item(xml_delivery, item)
+					xml_item = _xml_add_item(xml_delivery, item, 'DeliveryItem')
+					if((date = item.delivery_date) && date.respond_to?(:strftime))
+						xml_date = REXML::Element.new('DeliveryDate')
+						xml_date.text = date.strftime('%Y%m%d')
+						xml_item.add_element(xml_date)
+					end
+				end
+				def _xml_add_domain_id(xml_elm, domain, idstr, idname)
+					xml_id = REXML::Element.new(idname)
+					xml_id.add_attribute('Domain', domain)
+					xml_id.text = idstr
+					xml_elm.add_element(xml_id)
+				end
+				def _xml_add_free_text(xml_elm, free_text)
+					xml_text = REXML::Element.new('FreeText')
+					if(type = free_text.type)
+						xml_text.add_attribute('Type', type)
+					end
+					xml_text.text = free_text.to_s
+					xml_elm.add_element(xml_text)
+				end
+				def _xml_add_invoice_item(xml_invoice, item)
+					_xml_add_item(xml_invoice, item, 'InvoiceItem')
+				end
+				def _xml_add_item(xml_elm, item, tag)
+					xml_item = REXML::Element.new(tag)
+					_xml_add_item_line_no(xml_item, item.line_no)
+					_xml_add_item_part_id(xml_item, item)
+					xml_qty = REXML::Element.new('Qty')
+					xml_qty.text = item.qty
+					xml_item.add_element(xml_qty)
+					item.prices.each { |price|
+						_xml_add_item_price(xml_item, price)
+					}
+					if(free_text = item.free_text)
+						_xml_add_free_text(xml_item, free_text)
+					end
+					xml_elm.add_element(xml_item)
+					xml_item
+				end
+				def _xml_add_item_line_no(xml_item, line_no)
+					if(line_no)
+						xml_line_no = REXML::Element.new('LineNo')
+						xml_line_no.text = line_no
+						xml_item.add_element(xml_line_no)
+					end
+				end
+				def _xml_add_item_part_id(xml_item, item)
+					ids = item.ids
+					part_infos = item.part_infos
+					unless(ids.empty? && part_infos.empty?)
+						xml_id = REXML::Element.new('PartId')
+						ids.each { |domain, idstr|
+							_xml_add_domain_id(xml_id, domain, idstr, 'IdentNo')
+						}
+						unless(part_infos.empty?)
+							xml_info = REXML::Element.new('PartInfo')
+							part_infos.each { |part_info|
+								xml_value = REXML::Element.new('Value')
+								xml_value.add_attribute('Dimension', part_info.dimension)
+								xml_value.text = part_info.value
+								xml_info.add_element(xml_value)
+							}
+							xml_id.add_element(xml_info)
+						end
+						xml_item.add_element(xml_id)
+					end
+				end
+				def _xml_add_item_price(xml_item, price)
+					xml_price = REXML::Element.new('Price')
+					xml_price.add_attribute('Purpose', price.purpose)
+					xml_price.text = sprintf('%1.2f', price.amount)
+					xml_item.add_element(xml_price)
+				end
+				def _xml_add_item_status(xml_item, trans)
+					status = REXML::Element.new('Status')
+					status.text = trans.status
+					if((date = trans.status_date) && date.respond_to?(:strftime))
+						fmt = "%Y%m%d"
+						if(date.is_a?(Time))
+							fmt << "%H%M%S"
+						end
+						status.add_attribute('Date', date.strftime(fmt))
+					end
+					xml_item.add_element(status)
+				end
+				def _xml_assemble_bdd_transaction(xml_trans, trans)
+					_xml_add_item_status(xml_trans, trans)
+					name = xml_trans.name
+					trans.ids.each { |domain, idstr|
+						_xml_add_domain_id(xml_trans, domain, idstr, name + 'Id')
+					}
+					trans.parties.each { |party|
+						_xml_add_bdd_party(xml_trans, party)
+					}
+					method = "_xml_add_#{name}_item".downcase
+					trans.items.each { |item|
+						self.send(method, xml_trans, item)
+					}
+					trans.prices.each { |price|
+						_xml_add_item_price(xml_trans, price)
+					}
+					if(free_text = trans.free_text)
+						_xml_add_free_text(xml_trans, free_text)
+					end
+					if(agreement = trans.agreement)
+						_xml_add_bdd_agreement(xml_trans, agreement)
+					end
+				end
+			end
+		end
+	end
+end

data/src/conversion/geh_bdd.rb

@@ -0,0 +1,165 @@
+#!/usr/bin/env ruby
+# GehBdd -- xmlconv2 -- 17.05.2006 -- hwyss@ywesee.com
+
+require 'rexml/document'
+require 'model/address'
+require 'model/agreement'
+require 'model/bdd'
+require 'model/bsr'
+require 'model/delivery'
+require 'model/delivery_item'
+require 'model/name'
+require 'model/party'
+require 'model/price'
+
+module XmlConv
+	module Conversion
+		class GehBdd
+class << self
+	def convert(xml_document)
+		bdd = Model::Bdd.new
+		_bdd_add_xml_delivery(bdd, xml_document)
+		bdd
+	end
+	def parse(xml_src)
+		REXML::Document.new(xml_src)
+	end
+	def _bdd_add_xml_delivery(bdd, xml_document)
+		delivery = Model::Delivery.new
+		xml_header = REXML::XPath.first(xml_document, 
+			'OrderRequest/OrderRequestHeader')
+		_bdd_add_xml_header(bdd, xml_header)
+		_delivery_add_xml_header(delivery, xml_header)
+    if(xml_terms = REXML::XPath.first(xml_header, 
+        '//TermsOfDeliveryFunctionCodedOther'))
+      agreement = Model::Agreement.new
+      agreement.terms_cond = _latin1(xml_terms.text).downcase
+      delivery.agreement = agreement
+    end
+		REXML::XPath.each(xml_document, 'OrderRequest//ItemDetail') { |xml_item|
+			_delivery_add_xml_item(delivery, xml_item)	
+		}
+		delivery.bsr = bdd.bsr
+		bdd.add_delivery(delivery)
+		delivery
+	end
+	def _bdd_add_xml_header(bdd, xml_header)
+		bsr = Model::Bsr.new
+		xml_party = REXML::XPath.first(xml_header, '//BuyerParty/Party')
+		if(xml_id = REXML::XPath.first(xml_party, '//PartyID/Identifier/Ident'))
+			party = Model::Party.new
+			# ACC: ABB-Customer Domain
+			party.role = 'Customer'
+			party.add_id('ACC', _latin1(xml_id.text))
+			bsr.add_party(party)
+		end
+		bdd.bsr = bsr
+	end
+	def _container_add_xml_id(container, xml_id, domain)
+		domain = _latin1(xml_id.attribute('Domain').value)
+		value = _latin1(xml_id.text)
+		container.add_id(domain, value)
+	end
+	def _container_add_xml_party(container, xml_party, role)
+		party = Model::Party.new
+		party.role = role
+		if(xml_id = REXML::XPath.first(xml_party, 'PartyID//Ident'))
+			party.add_id('ACC', _latin1(xml_id.text))
+		end
+		if(xml_address = REXML::XPath.first(xml_party, 'NameAddress'))
+			_party_add_xml_address(party, xml_address)
+			if(xml_name = REXML::XPath.first(xml_address, 'Name1'))
+				_party_add_xml_name(party, xml_name)
+			end
+		end
+		if(xml_name = REXML::XPath.first(xml_party, 'OrderContact//ContactName'))
+			employee = Model::Party.new
+			employee.role = 'Employee'
+			_party_add_xml_name(employee, xml_name)
+			party.add_party(employee)
+		end
+		container.add_party(party)
+    party
+	end
+	def _delivery_add_xml_header(delivery, xml_header)
+		xml_id = REXML::XPath.first(xml_header, 
+												'OrderRequestNumber/BuyerOrderRequestNumber')
+		delivery.add_id('Customer', _latin1(xml_id.text))
+		xml_buyer = REXML::XPath.first(xml_header, 
+																	 'OrderRequestParty//BuyerParty/Party')
+		customer = _container_add_xml_party(delivery, xml_buyer, 'Customer')
+    _container_add_xml_party(customer, xml_buyer, 'BillTo')
+		if(xml_location = REXML::XPath.first(xml_header, 
+												 'OrderTermsOfDelivery//TermsOfDelivery/Location'))
+			_container_add_xml_party(customer, xml_location, 'ShipTo')
+		end
+		xml_seller = REXML::XPath.first(xml_header, 
+																		'OrderRequestParty//SellerParty/Party')
+		_container_add_xml_party(delivery, xml_seller, 'Seller')
+	end
+	def _delivery_add_xml_item(delivery, xml_item)
+		item = Model::DeliveryItem.new
+		xml_line_no = REXML::XPath.first(xml_item, 
+																		'BaseItemDetail//LineItemNum/*ItemNum')
+		item.line_no = _latin1(xml_line_no.text)
+=begin # I'm not sure which Id is which..
+		if(xml_id = REXML::XPath.first(xml_item, 'BaseItemDetail//AgencyCoded'))
+			item.add_id('ET-NUMMER', _latin1(xml_id.text))
+		end
+=end
+		if(xml_id = REXML::XPath.first(xml_item, 
+																	 'BaseItemDetail//SellerPartNumberPartID'))
+			#item.add_id('Seller', _latin1(xml_id.text))
+			item.add_id('ET-NUMMER', _latin1(xml_id.text))
+		end
+		if(xml_id = REXML::XPath.first(xml_item, 
+																	 'BaseItemDetail//BuyerPartNumberPartID'))
+			item.add_id('LIEFERANTENARTIKEL', _latin1(xml_id.text))
+		end
+		xml_qty = REXML::XPath.first(xml_item, 'BaseItemDetail//QuantityValue')
+		item.qty = _latin1(xml_qty.text)
+    if(xml_unit = REXML::XPath.first(xml_item, 'BaseItemDetail//UOMCoded'))
+      item.unit = _latin1(xml_unit.text)
+    end
+		if(xml_date = REXML::XPath.first(xml_item, 
+																	   'DeliveryDetail//RequestedDeliveryDate'))
+			raw = _latin1(xml_date.text)
+			item.delivery_date = begin
+														 Date.parse(raw)
+													 rescue
+														 Date.today
+													 end
+		end
+    if(xml_price = REXML::XPath.first(xml_item, 'PricingDetail//UnitPriceValue'))
+      price = Model::Price.new
+      price.purpose = 'NettoPreis'
+      price.amount = _latin1(xml_price.text)
+      item.add_price(price)
+    end
+		delivery.add_item(item)
+	end
+	def _latin1(str)
+		Iconv.iconv('ISO-8859-1', 'UTF8', str).first.strip
+	rescue
+		str
+	end
+	def _party_add_xml_address(party, xml_address)
+		address = Model::Address.new
+		REXML::XPath.each(xml_address, 'Street') { |xml_addr_line|
+			address.add_line(_latin1(xml_addr_line.text))
+		}
+		xml_city = REXML::XPath.first(xml_address, 'City')
+		address.city = _latin1(xml_city.text)
+		xml_zip_code = REXML::XPath.first(xml_address, 'PostalCode')
+		address.zip_code = _latin1(xml_zip_code.text)
+		party.address = address
+	end
+	def _party_add_xml_name(party, xml_name)
+		name = Model::Name.new
+		name.last = _latin1(xml_name.text)
+		party.name = name
+	end
+end
+		end
+	end
+end