xmlconv2 2.0.0

data/src/conversion/i2_bdd.rb

@@ -0,0 +1,271 @@
+#!/usr/bin/env ruby
+# I2Bdd -- xmlconv2 -- 28.06.2004 -- hwyss@ywesee.com
+
+require 'i2/parser'
+require 'model/address'
+require 'model/agreement'
+require 'model/bdd'
+require 'model/bsr'
+require 'model/delivery'
+require 'model/delivery_item'
+require 'model/invoice'
+require 'model/invoice_item'
+require 'model/name'
+require 'model/party'
+require 'model/part_info'
+require 'model/price'
+require 'time'
+require 'date'
+
+module XmlConv
+	module Conversion
+		class I2Bdd
+			I2_ADDR_CODES = {
+				'BY'	=>	'BillTo',
+				'DP'	=>	'ShipTo',
+			}
+			class << self
+				def convert(ast)
+					bdd = Model::Bdd.new
+					ast.records.each_node { |node|
+						_bdd_add_ast_node(bdd, node)
+					}
+					bdd
+				end
+				def parse(src)
+					I2.cached_parser.parse(src)
+				end
+				def _bdd_add_address(bdd, address)
+					transaction = _select_bdd_transaction(bdd)
+					atype = _value(address.atype)
+					case(atype)
+					when 'SE'
+						transaction.seller.address = _bdd_assemble_address(address)
+					when 'CU'
+						transaction.customer.address = _bdd_assemble_address(address)
+					when 'DP', 'BY'
+						delivery_party = Model::Party.new
+						delivery_party.role = I2_ADDR_CODES[atype]
+						delivery_party.address = _bdd_assemble_address(address)
+						transaction.customer.add_party(delivery_party)
+					when 'EP'
+						employee = transaction.customer.employee \
+							|| _customer_add_employee(customer)
+						employee.address = _bdd_assemble_address(address)
+					end
+				end
+				def _bdd_add_ast_node(bdd, node)
+					case node.name
+					when 'Address'
+						_bdd_add_address(bdd, node)
+					when 'Commission'
+						_bdd_add_commission(bdd, node)
+					when 'Header'
+						_bdd_add_header(bdd, node)
+					when 'HeaderText'
+						_bdd_add_header_text(bdd, node)
+					when 'Position'
+						_bdd_add_position(bdd, node)
+					when 'Footer'
+						_bdd_add_footer(bdd, node)
+					end
+				end
+				def _bdd_add_commission(bdd, ast)
+					if(_bdd_transaction_type(bdd) == 'Invoice')
+						_bdd_add_invoice(bdd, ast)
+					else
+						_bdd_add_delivery(bdd, ast)
+					end
+				end
+				def _bdd_add_delivery(bdd, ast)
+					delivery = Model::Delivery.new
+					delivery.status = 'Confirmed'
+					delivery.add_id('ACC', _value(ast.reference))
+					_bdd_assemble_transaction(delivery, ast)
+					bdd.add_delivery(delivery)
+				end
+				def _bdd_add_footer(bdd, ast)
+					transaction = _select_bdd_transaction(bdd)
+					_item_add_price(transaction, ast.pricenetto, 'SummePositionen')
+					_item_add_price(transaction, ast.vatpercent, 'MehrwertsteuerPct')
+					_item_add_price(transaction, ast.vatamount, 'Mehrwertsteuer')
+					
+					_item_add_price(transaction, ast.pricebrutto, 'Endbetrag')
+					if(terms = ast.agreement)
+						agreement = Model::Agreement.new
+						agreement.terms_cond = _value(terms)
+						transaction.agreement = agreement
+					end
+				end
+				def _bdd_add_free_text(obj, text, type=nil)
+					if(txt = obj.free_text)
+						txt << text
+					else
+						obj.add_free_text(type, text)
+					end
+				end
+				def _bdd_add_header(bdd, ast)
+					bsr = Model::Bsr.new
+					bsr.timestamp = Time.parse(_value(ast.date).to_s << 
+						_value(ast.time).to_s)
+					case _value(ast.mtype)
+					when 'CONFIRM'
+						bsr.verb = 'Return'
+						bsr.noun = 'Status'
+					when 'INVOIC'
+						bsr.verb = 'Return'
+						bsr.noun = 'Invoice'
+					end
+					if(customer_name = _value(ast.recipient))
+						customer = Model::Party.new
+						customer.role = 'Customer'
+						name = Model::Name.new
+						name.text = customer_name
+						customer.name = name
+						bsr.add_party(customer)
+					end
+					bdd.bsr = bsr
+				end
+				def _bdd_add_header_text(bdd, ast)
+					if(text = _value(ast.text))
+						transaction = _select_bdd_transaction(bdd)
+						_bdd_add_free_text(transaction, text)
+					end
+				end
+				def _bdd_add_invoice(bdd, ast)
+					invoice = Model::Invoice.new
+					invoice.status = 'Invoiced'
+					invoice.add_invoice_id('Invoice', _value(ast.receipt))
+					invoice.add_delivery_id('ACC', _value(ast.reference))
+					_bdd_assemble_transaction(invoice, ast)
+					bdd.add_invoice(invoice)
+				end
+				def _bdd_add_position(bdd, ast)
+					transaction = _select_bdd_transaction(bdd)
+					if(transaction.is_a?(Model::Invoice))
+						_invoice_add_item(transaction, ast)
+					else
+						_delivery_add_item(transaction, ast)
+					end
+				end
+				def _bdd_assemble_address(address)
+					bdd_addr = Model::Address.new
+					bdd_addr.add_line(_value(address.name1))
+					if(name2 = _value(address.name2))
+						bdd_addr.add_line(name2)
+					end
+					bdd_addr.add_line(_value(address.street))
+					bdd_addr.city = _value(address.city)
+					bdd_addr.zip_code = _value(address.code)
+					bdd_addr.country = _value(address.country)
+					bdd_addr
+				end
+				def _bdd_assemble_item(item, ast)
+					item.line_no = _value(ast.lineno)
+					if(etnr = _value(ast.eancode))
+						item.add_id('EAN-Nummer', etnr)
+					end
+=begin
+					if(sellercode = _value(ast.sellercode))
+						item.add_id('Lieferantenartikel', sellercode)
+					end
+=end
+					if(buyercode = _value(ast.buyercode))
+						item.add_id('ET-Nummer', buyercode)
+					end
+=begin
+					[:description1, :description2].collect { |symbol|
+						_value(ast.send(symbol))
+					}.compact.each { |descr|
+						_bdd_add_free_text(item, descr, 'Bezeichnung')
+					}
+=end
+					item.qty = _value(ast.qty)
+					_item_add_price(item, ast.pricenettopce, 'NettoPreis')
+					_item_add_price(item, ast.pricenetto, 'NettoPreisME')
+					_item_add_price(item, ast.discountpce, 'Grundrabatt')
+					_item_add_price(item, ast.discount, 'GrundrabattME')
+					_item_add_price(item, ast.extradiscountpce, 'Sonderrabatt')
+					_item_add_price(item, ast.extradiscount, 'SonderrabattME')
+					_item_add_price(item, ast.pricebruttopce, 'BruttoPreis')
+					_item_add_price(item, ast.pricebrutto, 'BruttoPreisME')
+				end
+				def _bdd_assemble_transaction(transaction, ast)
+					if(datestr = _value(ast.rdate))
+						transaction.status_date = Date.parse(datestr)
+					end
+					transaction.add_id('Customer', _value(ast.commission))
+					seller = Model::Party.new
+					seller.role = 'Seller'
+					transaction.add_party(seller)
+					customer = Model::Party.new
+					customer.role = 'Customer'
+					if(emp = _value(ast.employee))
+						employee = _customer_add_employee(customer)
+						name = Model::Name.new
+						name.text = emp
+						employee.name = name
+					end
+					transaction.add_party(customer)
+				end
+				def _bdd_transaction_type(bdd)
+					unless((bsr = bdd.bsr) && (noun = bsr.noun))
+						raise 'Invalid Conversion: there was no valid Header in AST'
+					end
+					noun
+				end
+				def _customer_add_employee(customer)
+					employee = Model::Party.new
+					employee.role = 'Employee'
+					customer.add_party(employee)
+					employee
+				end
+				def _delivery_add_item(delivery, ast)
+					item = Model::DeliveryItem.new
+					_bdd_assemble_item(item, ast)
+					if(datestr = _value(ast.ddate))
+						item.delivery_date = Date.parse(datestr)
+					end
+					delivery.add_item(item)
+				end
+				def _invoice_add_item(invoice, ast)
+					item = Model::InvoiceItem.new
+					_bdd_assemble_item(item, ast)
+					if(origin = _value(ast.origin))
+						_item_add_part_info(item, 'Ursprungsland', origin)
+					end
+					if(customs = _value(ast.customs))
+						_item_add_part_info(item, 'Zolltarifnr.', customs)
+					end
+					invoice.add_item(item)
+				end
+				def _item_add_part_info(item, dimension, value)
+					info = Model::PartInfo.new
+					info.dimension = dimension
+					info.value = value 
+					item.add_part_info(info)
+				end
+				def _item_add_price(item, ast, purpose)
+					if(price = _value(ast))
+						bdd_price = Model::Price.new
+						bdd_price.purpose = purpose
+						bdd_price.amount = sprintf('%1.2f', price)
+						item.add_price(bdd_price)
+					end
+				end
+				def _select_bdd_transaction(bdd)
+					if(_bdd_transaction_type(bdd) == 'Invoice')
+						bdd.invoices.last
+					else
+						bdd.deliveries.last
+					end
+				end
+				def _value(node)
+					unless(node.attributes.empty?)
+						node.value
+					end
+				end
+			end
+		end
+	end
+end

data/src/conversion/xml_bdd.rb

@@ -0,0 +1,125 @@
+#!/usr/bin/env ruby
+# XmlBdd -- xmlconv2 -- 01.06.2004 -- hwyss@ywesee.com
+
+require 'date'
+require 'iconv'
+require 'rexml/document'
+require 'rexml/xpath'
+require 'model/address'
+require 'model/bdd'
+require 'model/bsr'
+require 'model/delivery'
+require 'model/delivery_item'
+require 'model/name'
+require 'model/party'
+
+module XmlConv
+	module Conversion
+		class XmlBdd
+			class << self
+				def convert(xml_document)
+					bdd = Model::Bdd.new
+					if(xml_bsr = REXML::XPath.first(xml_document, 'BDD/BSR'))
+						_bdd_add_xml_bsr(bdd, xml_bsr)
+					end
+					REXML::XPath.each(xml_document, 'BDD/Delivery') { |xml_delivery|
+						_bdd_add_xml_delivery(bdd, xml_delivery)
+					}
+					bdd
+				end
+				def parse(xml_src)
+					REXML::Document.new(xml_src)
+				end
+				def _bdd_add_xml_bsr(bdd, xml_bsr)
+					bsr = Model::Bsr.new
+					REXML::XPath.each(xml_bsr, 'Party') { |xml_party|
+						_container_add_xml_party(bsr, xml_party)
+					}
+					bdd.bsr = bsr
+				end
+				def _bdd_add_xml_delivery(bdd, xml_delivery)
+					delivery = Model::Delivery.new
+					delivery.bsr = bdd.bsr
+					REXML::XPath.each(xml_delivery, 'DeliveryId') { |xml_id|
+						_container_add_xml_id(delivery, xml_id)
+					}
+					REXML::XPath.each(xml_delivery, 'Party') { |xml_party| 
+						_container_add_xml_party(delivery, xml_party)
+					}
+					REXML::XPath.each(xml_delivery, 'DeliveryItem') { |xml_item|
+						_delivery_add_xml_item(delivery, xml_item)	
+					}
+					bdd.add_delivery(delivery)
+				end
+				def _container_add_xml_party(container, xml_party)
+					party = Model::Party.new
+					party.role = _latin1(xml_party.attribute('Role').value)
+					REXML::XPath.each(xml_party, 'PartyId') { |xml_id|
+						_container_add_xml_id(party, xml_id)
+					}
+					if(xml_name = REXML::XPath.first(xml_party, 'Name'))
+						_party_add_xml_name(party, xml_name)
+					end
+					if(xml_address = REXML::XPath.first(xml_party, 'Address'))
+						_party_add_xml_address(party, xml_address)
+					end
+					REXML::XPath.each(xml_party, 'Party') { |xml_inner_party|
+						_container_add_xml_party(party, xml_inner_party)
+					}
+					container.add_party(party)
+				end
+				def _container_add_xml_id(container, xml_id)
+					domain = _latin1(xml_id.attribute('Domain').value)
+					value = _latin1(xml_id.text)
+					container.add_id(domain, value)
+				end
+				def _delivery_add_xml_item(delivery, xml_item)
+					item = Model::DeliveryItem.new
+					xml_line_no = REXML::XPath.first(xml_item, 'LineNo')
+					item.line_no = _latin1(xml_line_no.text)
+					REXML::XPath.each(xml_item, 'PartId/IdentNo') { |xml_id| 
+						_container_add_xml_id(item, xml_id)	
+					}
+					xml_qty = REXML::XPath.first(xml_item, 'Qty')
+					item.qty = xml_qty.text
+					if(xml_date = REXML::XPath.first(xml_item, 'DeliveryDate'))
+						raw = _latin1(xml_date.text)
+						item.delivery_date = begin
+							Date.parse(raw.gsub(/\./, '-'))
+						rescue
+							Date.today
+						end
+					end
+					delivery.add_item(item)
+				end
+				def _party_add_xml_address(party, xml_address)
+					address = Model::Address.new
+					REXML::XPath.each(xml_address, 'AddressLine') { |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, 'ZipCode')
+					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.text = _latin1(xml_name.text)
+					if(xml_first = REXML::XPath.first(xml_name, 'FirstName'))
+						name.first = _latin1(xml_first.text)
+					end
+					if(xml_last = REXML::XPath.first(xml_name, 'LastName'))
+						name.last = _latin1(xml_last.text)
+					end
+					party.name = name
+				end
+				def _latin1(str)
+					Iconv.iconv('ISO-8859-1', 'UTF8', str).first.strip
+				rescue Exception => err
+					str
+				end
+			end
+		end
+	end
+end

data/src/custom/lookandfeel.rb

@@ -0,0 +1,47 @@
+#!/usr/bin/env ruby
+# Custom::Lookandfeel -- xmlconv2 -- 09.06.2004 -- hwyss@ywesee.com
+
+require 'sbsm/lookandfeel'
+
+module XmlConv
+	module Custom
+		class Lookandfeel < SBSM::Lookandfeel
+			DICTIONARIES = {
+				'de'	=>	{
+					:copyright0								=>	'&copy;ywesee.com&nbsp;',
+					:copyright1								=>	'',
+					:home											=>	'Home',
+					:login										=>	'Anmelden',
+					:login_welcome						=>	'Willkommen bei XmlConv',
+					:logout										=>	'Abmelden',
+					:navigation_divider				=>	'|',
+					:page_back								=>	"&lt;&lt;",
+					:page_fwd									=>	"&gt;&gt;",
+					:page_number0							=>	"Seite&nbsp;",
+					:page_number1							=>	"&nbsp;von&nbsp;",
+					:page_number2							=>	"",
+					:pass											=>	'Passwort',
+					:status_error							=>	'Fehler',
+					:status_http_ok						=>	'&Uuml;bertragung erfolgreich',
+					:status_http_not_found		=>	'URI nicht gefunden',
+					:status_http_unauthorized	=>	'Keine Berechtigung',
+					:status_open							=>	'Offen',
+					:status_pending_pickup		=>	'Bereit zum Abholen',
+					:status_picked_up					=>	'Abgeholt',
+					:th_commit_time						=>	'Zeit',
+					:th_error									=>	'Fehler',
+					:th_input									=>	'Input',
+					:th_uri_comparable				=>	'Empf�nger',
+					:th_filename							=>	'Filename',
+					:th_transaction_id				=>	'ID',
+					:th_origin								=>	'Absender',
+					:th_output								=>	'Output',
+					:th_status_comparable			=>	'Status',
+				}
+			}
+			RESOURCES = {
+				:css	=>	'xmlconv.css'
+			}
+		end
+	end
+end

data/src/i2/address.rb

@@ -0,0 +1,33 @@
+#!/usr/bin/env ruby
+# I2::Address -- xmlconv2 -- 02.06.2004 -- hwyss@ywesee.com
+
+module XmlConv
+	module I2
+		class Address
+			attr_accessor :code, :party_id
+			attr_accessor :name1, :name2, :street1, :city, :zip_code, :street2
+			I2_ADDR_CODES = {
+				:buyer		=>	'BY',
+				:delivery	=>	'DP',
+				:employee	=>	'EP',
+			}
+			def initialize
+				@code = :buyer
+			end
+			def to_s
+				output = []
+				numerals = [ 201, 202, 220, 221, 222, 223, 225, 226 ]
+				[
+					I2_ADDR_CODES[@code],
+					@party_id, @name1, @name2, @street1,
+					@city, @zip_code, @street2,
+				].each_with_index { |value, idx|
+					unless(value.nil?)
+						output << "#{numerals[idx]}:#{value}"
+					end
+				}
+				output.join("\n") << "\n"
+			end
+		end
+	end
+end