ydim-html 1.0.1

data/lib/ydim/html/state/debitors.rb

@@ -0,0 +1,24 @@
+#!/usr/bin/env ruby
+# encoding: utf-8
+# Html::State::Debitors -- ydim -- 12.01.2006 -- hwyss@ywesee.com
+
+require 'ydim/html/state/global_predefine'
+require 'ydim/html/state/debitor'
+require 'ydim/html/view/debitors'
+require 'ydim/debitor'
+
+module YDIM
+	module Html
+		module State
+class Debitors < Global
+	VIEW = Html::View::Debitors
+	def init
+    lnf = @session.lookandfeel
+		@model = @session.debitors.sort_by do |deb|
+      [ lnf.lookup(deb.debitor_type) || '', deb.name.to_s.downcase ]
+    end
+	end
+end
+		end
+	end
+end

data/lib/ydim/html/state/global.rb

@@ -0,0 +1,100 @@
+#!/usr/bin/env ruby
+# encoding: utf-8
+# Html::State::Global -- ydim -- 12.01.2006 -- hwyss@ywesee.com
+
+require 'sbsm/state'
+require 'ydim/html/state/init'
+require 'ydim/html/state/autoinvoice'
+require 'ydim/html/state/debitor'
+require 'ydim/html/state/debitors'
+require 'ydim/html/state/invoice'
+require 'ydim/html/state/invoices'
+require 'ydim/html/state/pdf'
+
+module YDIM
+	module Html
+		module State
+class Global < SBSM::State
+  attr_accessor :sortby, :sort_reverse
+	class Stub
+		def initialize
+			@carry = {}
+		end
+		def carry(key, val)
+			@carry.store(key, val)	
+		end
+		def method_missing(key, *args)
+			if(match = /^(.*)=$/.match(key.to_s))
+				@carry[match[1].to_sym] = args.first
+			else
+				@carry[key]
+			end
+		end
+		def respond_to?(key)
+			true
+		end
+	end
+	EVENT_MAP = {
+		:debitors	=>	Debitors,
+		:invoices	=>	Invoices,
+	}
+  def autoinvoice
+    if(id = @session.user_input(:unique_id))
+      AutoInvoice.new(@session, @session.autoinvoice(id))
+    end
+  end
+  def create_autoinvoice
+    _create_invoice(CreateAutoInvoice, nil)
+  end
+	def create_debitor
+		Debitor.new(@session, YDIM::Debitor.new(nil))
+	end
+	def create_invoice
+    _create_invoice(CreateInvoice)
+	end
+  def _create_invoice(nextclass, date=Date.today)
+		if((id = @session.user_input(:unique_id)) \
+			 && (debitor = @session.debitor(id.to_i)))
+			invoice = Stub.new
+			invoice.carry(:debitor, debitor)
+			invoice.carry(:date, date)
+      invoice.carry(:precision, 2)
+      if debitor.foreign?
+        invoice.carry(:suppress_vat, true)
+      end
+			nextclass.new(@session, invoice)
+		end
+  end
+	def debitor
+		if(id = @session.user_input(:unique_id))
+			Debitor.new(@session, @session.debitor(id.to_i))
+		end
+	end
+	def logout
+		@session.logout
+		State::Init.new(@session, nil)
+	end
+	def invoice
+		if(id = @session.user_input(:unique_id))
+			Invoice.new(@session, @session.invoice(id.to_i))
+		end
+	end
+	def pdf
+		if(id = @session.user_input(:unique_id))
+			Pdf.new(@session, @session.invoice(id.to_i))
+		end
+	end
+	def send_invoice
+		if(id = @session.user_input(:unique_id))
+      sort_args = { :sortby => (@sortby || []).first,
+                    :sort_reverse => @sort_reverse }
+			recipients = @session.send_invoice(id.to_i, sort_args)
+			message = @session.lookandfeel.lookup(:confirm_send_invoice, 
+																						recipients.join(', '))
+			Html::State::Confirm.new(@session, message)
+		end
+	end
+end
+		end
+	end
+end

data/lib/ydim/html/state/global_predefine.rb

@@ -0,0 +1,14 @@
+#!/usr/bin/env ruby
+# encoding: utf-8
+# Html::State::Global -- ydim -- 12.01.2006 -- hwyss@ywesee.com
+
+require 'sbsm/state'
+
+module YDIM
+	module Html
+		module State
+class Global < SBSM::State
+end
+		end
+	end
+end

data/lib/ydim/html/state/init.rb

@@ -0,0 +1,21 @@
+#!/usr/bin/env ruby
+# encoding: utf-8
+# Html::State::Init -- ydim -- 12.01.2006 -- hwyss@ywesee.com
+
+require 'ydim/html/state/debitors'
+require 'ydim/html/view/init'
+
+module YDIM
+	module Html
+		module State
+class Init < SBSM::State 
+	VIEW = Html::View::Init
+	def login
+		if(res = @session.login)
+			Debitors.new(@session, nil)
+		end
+	end
+end
+		end
+	end
+end

data/lib/ydim/html/state/invoice.rb

@@ -0,0 +1,180 @@
+#!/usr/bin/env ruby
+# encoding: utf-8
+# Html::State::Invoice -- ydim -- 16.01.2006 -- hwyss@ywesee.com
+
+require 'ydim/html/state/global_predefine'
+require 'ydim/html/state/ajax_values'
+require 'ydim/html/state/confirm'
+require 'ydim/html/view/invoice'
+
+module YDIM
+	module Html
+		module State
+class AjaxItems < SBSM::State
+	VOLATILE = true
+	VIEW = Html::View::ItemList
+end
+class AjaxInvoice < SBSM::State
+	VOLATILE = true
+	VIEW = Html::View::InvoiceComposite
+end
+module InvoiceKeys
+  def invoice_key
+    :invoice
+  end
+  def invoice_keys
+    invoice_mandatory + [:precision, :suppress_vat]
+  end
+  def invoice_mandatory
+    [:description, :date, :currency]
+  end
+end
+class CreateInvoice < Global
+  include InvoiceKeys
+	VIEW = Html::View::Invoice
+	attr_reader :model
+  def update
+    _update(Invoice)
+  end
+	def _update(nextclass)
+		input = user_input(invoice_keys, invoice_mandatory)
+		input[:precision] = (input[:precision] || 2).to_i
+		unless(error?)
+			@model = @session.send("create_#{invoice_key}",
+                             @model.debitor.unique_id)
+      @model.payment_period = 30
+			input.each { |key, val|
+				@model.send("#{key}=", val)
+			}
+			@model.odba_store
+			nextclass.new(@session, @model)
+		end
+	end
+end
+class Invoice < Global
+  include InvoiceKeys
+  class SortableInvoice
+    def initialize invoice
+      @invoice = invoice
+    end
+    def items
+      @items ||= @invoice.items
+    end
+    def reverse!
+      items.reverse!
+    end
+    def respond_to? *args
+      @invoice.respond_to?(*args) || super
+    end
+    def sort! &block
+      items.sort! &block
+    end
+    def update!
+      @items = nil
+    end
+    def method_missing name, *args, &block
+      @invoice.send name, *args, &block
+    end
+  end
+	VIEW = Html::View::Invoice
+	attr_reader :model
+  def init
+    @model = SortableInvoice.new @model
+    super
+  end
+	def ajax_create_item
+		if(id = @session.user_input(:unique_id))
+			begin
+				@session.add_items(id.to_i, [{:time => Time.now}], invoice_key)
+			rescue IndexError
+			end
+      @model.update! ## @model is a SortableInvoice
+		end
+		AjaxItems.new(@session, @model.items)
+	end
+	def ajax_delete_item
+		if((id = @session.user_input(:unique_id)) \
+			&& (idx = @session.user_input(:index)))
+			begin
+				@session.delete_item(id.to_i, idx.to_i, invoice_key)
+			rescue IndexError
+			end
+      @model.update! ## @model is a SortableInvoice
+		end
+		AjaxItems.new(@session, @model.items)
+	end
+	def ajax_item
+		data = {}
+		if((id = @session.user_input(:unique_id)) \
+			&& (idx = @session.user_input(:index)))
+			begin
+				keys = [:text, :quantity, :unit, :price]
+				input = user_input(keys).delete_if { |key, val| val.nil?  }
+				item = @session.update_item(id.to_i, idx.to_i, input, 
+                                    invoice_key)
+				input.each { |key, val| data.store("#{key}[#{item.index}]", val) }
+				data.store("total_netto#{item.index}", item.total_netto)
+			rescue IndexError
+			end
+		end
+		[:total_netto, :vat, :total_brutto].each { |key|
+			data.store(key, @model.send(key))
+		}
+		AjaxValues.new(@session, data)
+	end
+	def ajax_invoice
+		_do_update
+		AjaxInvoice.new(@session, @model)
+	end
+  def pdf
+    newstate = super
+    newstate.sortby, newstate.sort_reverse = @sortby, @sort_reverse
+    newstate
+  end
+  def send_invoice
+    _do_update
+    super
+  end
+	def update
+		_do_update
+		self
+	end
+	def _do_update
+		if((id = @session.user_input(:unique_id)) \
+       && @model.unique_id == id.to_i)
+			## update items
+			keys = [:text, :quantity, :unit, :price]
+			data = {}
+			user_input(keys).each { |key, hash|
+				hash.each { |idx, value|
+					(data[idx] ||= {}).store(key, value)
+				} unless hash.nil?
+			}
+			target = origin = nil
+			converter = if((target = @session.user_input(:currency)) \
+				 && (origin = @model.currency) \
+				 && origin != target)
+				@session.currency_converter
+			end
+			data.each { |idx, item|
+				if(converter)
+					item[:price] = converter.convert(item[:price], origin, target)
+				end
+				@session.update_item(id.to_i, idx.to_i, item, invoice_key)
+			}
+
+			_do_update_invoice(user_input(invoice_keys, invoice_mandatory))
+      @model.update! ## @model is a SortableInvoice
+			@model.odba_store
+		end
+	end
+  def _do_update_invoice(input)
+    input[:precision] = (input[:precision] || 2).to_i
+    input.each { |key, val|
+      @model.send("#{key}=", val)
+    }
+  end
+end
+		end
+	end
+end

data/lib/ydim/html/state/invoices.rb

@@ -0,0 +1,70 @@
+#!/usr/bin/env ruby
+# encoding: utf-8
+# Html::State::Invoices -- ydim -- 13.01.2006 -- hwyss@ywesee.com
+
+require 'ydim/html/state/global_predefine'
+require 'ydim/html/view/invoices'
+
+module YDIM
+	module Html
+		module State
+class AjaxInvoices < SBSM::State
+	VOLATILE = true
+	VIEW = Html::View::InvoiceList
+end
+module AjaxInvoiceMethods
+	def ajax_invoices(model=@model)
+		keys = [:payment_received, :unique_id, :deleted]
+		input = user_input(keys, [:unique_id])
+		id = input.delete(:unique_id).to_i
+		if(!error? && !input.empty? && (invoice = @session.invoice(id)))
+			input.each { |key, val|
+				invoice.send("#{key}=", val)
+			}
+			invoice.odba_store
+			model.delete_if { |info| info.unique_id == id }
+		end
+		AjaxInvoices.new(@session, model)
+	end
+	def ajax_status
+		AjaxInvoices.new(@session, load_invoices)
+	end
+	def currency_convert(invoices)
+		currency = Html.config.currency
+		converter = @session.currency_converter
+		invoices.each { |inv|
+			if(icur = inv.currency)
+				inv.total_netto = converter.convert(inv.total_netto, icur, currency)
+				inv.total_brutto = converter.convert(inv.total_brutto, icur, currency)
+			end
+			inv.currency = currency
+		}
+	end
+	def sort_invoices(invoices)
+		null_date = Date.new(9999)
+		invoices.sort_by { |inv| 
+			[null_date - (inv.date || null_date), inv.description.to_s]
+		}
+	end
+end
+class Invoices < Global
+	include AjaxInvoiceMethods
+	VIEW = Html::View::Invoices
+	def init
+		super
+    invs = @session.invoice_infos('is_open')
+    invs.concat @session.invoice_infos('is_due')
+    @model = sort_invoices(currency_convert(invs))
+	end
+	def ajax_collect_garbage
+		@session.collect_garbage
+		AjaxInvoices.new(@session, [])
+	end
+	private
+	def load_invoices
+		@model = sort_invoices(currency_convert(@session.invoices))
+	end
+end
+		end
+	end
+end

data/lib/ydim/html/state/pdf.rb

@@ -0,0 +1,17 @@
+#!/usr/bin/env ruby
+# encoding: utf-8
+# Html::State::Pdf -- ydim -- 17.01.2006 -- hwyss@ywesee.com
+
+require 'ydim/html/view/pdf'
+
+module YDIM
+	module Html
+		module State
+class Pdf < SBSM::State
+	VOLATILE = true
+	VIEW = Html::View::Pdf
+  attr_accessor :sortby, :sort_reverse
+end
+		end
+	end
+end

data/lib/ydim/html/util/lookandfeel.rb

@@ -0,0 +1,133 @@
+#!/usr/bin/env ruby
+# encoding: utf-8
+# Html::Custom::Lookandfeel -- ydim -- 12.01.2006 -- hwyss@ywesee.com
+
+require 'sbsm/lookandfeel'
+
+module YDIM
+	module Html
+		module Custom
+class Lookandfeel < SBSM::Lookandfeel
+	DICTIONARIES = {
+		'de'	=>	{
+			:address_lines							=>	'Strasse/Nr.',
+      :autoinvoices               =>  'Vorlagen',
+			:CHF												=>	'CHF',
+			:collect_garbage						=>	'Papierkorb Leeren',
+			:comma											=>	', ',
+			:confirm_send_invoice0			=>	'Die Rechnung wurde an folgende Email-Adressen verschickt: ',
+			:confirm_send_invoice1			=>	'.',
+			:contact										=>	'Name',
+			:contact_firstname					=>	'Vorname',
+			:contact_title							=>	'Titel',
+      :country                    =>  'Land',
+			:cpr_link										=>	' ywesee GmbH',
+			:create_debitor							=>	'Neuer Kunde',
+      :create_autoinvoice         =>  'Neue Vorlage',
+			:create_invoice							=>	'Neue Rechnung',
+			:create_item								=>	'Neue Position',
+			:currency										=>	'W&auml;hrung',
+			:dash												=>	'&nbsp;&ndash;&nbsp;',
+			:date												=>	'Rechnungsdatum',
+      :date_format                =>  '%d.%m.%Y',
+			:debitors										=>	'Kunden',
+			:debitor_name								=>	'Kunde',
+			:debitor_type								=>	'Kundenart',
+			:delete											=>	'Löschen',
+			:description								=>	'Beschreibung',
+			:dt_consulting	    				=>	'Beratung',
+			:dt_doctor									=>	'Arzt',
+			:dt_health									=>	'Gesundheitsdienstleister',
+			:dt_hospital								=>	'Spital',
+			:dt_hosting									=>	'Hosting-Kunde',
+			:dt_info										=>	'ODDB.org-User',
+			:dt_insurance								=>	'Krankenkasse',
+			:dt_pharma									=>	'Pharma-Firma',
+			:dt_pharmacy								=>	'Apotheke',
+			:e_domainless_email_address	=>	'Wir akzeptieren keine lokalen Email-Adressen.',
+			:e_invalid_email_address		=>	'Die angegebene Email-Adresse ist ungültig.',
+			:e_invalid_numeric_format		=>	'Ungültiges Zahlenformat',
+			:e_invalid_phone						=>	'Die angegebene Telefonnummer ist ungültig.',
+      :e_too_many_emails          =>  'Es sind maximal 3 Email-Adressen erlaubt.',
+			:email											=>	'Email',	
+      :emails                     =>  'Email (max. 3)',
+			:e_bygone_date							=>	'Bitte geben Sie ein Datum an, welches in der Zukuft liegt.',
+			:e_missing0									=>	'Bitte geben Sie das Feld "',
+			:e_missing1									=>	'" an.',
+			:EUR												=>	'EUR',
+			:Frau												=>	'Frau',
+			:generate_invoice						=>	'Generieren',
+			:Herr												=>	'Herr',
+      :html_title                 =>  'YDIM',
+			:invoice_interval		        =>	'Rechnungs-Intervall',
+			:inv_m											=>	'Nur Manuell',
+			:inv_3											=>	'Vierteljährlich',
+			:inv_6											=>	'Halbjährlich',
+			:inv_12		  								=>	'Jährlich',
+			:inv_24		  								=>	'Alle zwei Jahre',
+			:invoices										=>	'Rechnungen',
+			:is_due											=>	'F&auml;llige Rechnungen',
+			:is_open										=>	'Offene Rechnungen',
+			:is_paid										=>	'Bezahlte Rechnungen',
+			:is_trash										=>	'Papierkorb',
+			:lgpl_license								=>	'LGPL',
+			:location										=>	'PLZ/Ort',
+			:login											=>	'Login',
+			:logout											=>	'Logout',
+			:name												=>	'Firma',
+			:pass												=>	'Passwort',
+      :payment_period0            =>  ' Zahlbar in ',
+      :payment_period1            =>  ' Tagen',
+			:pdf												=>	'PDF',
+			:phone											=>	'Telefon',
+			:precision									=>	'Kommastellen',
+			:reminder_body							=>	'Erinnerungsmail Text',	
+			:reminder_date							=>	'Wird am %d.%m.%Y versendet',	
+			:reminder_none							=>	'Es wird kein Erinnerungsmail versendet',	
+			:reminder_subject  					=>	'Erinnerungsmail Betreff',	
+			:salutation									=>	'Anrede',
+			:send_invoice								=>	'Email Senden',
+      :suppress_vat               =>  'OHNE MwSt.',
+			:th_currency								=>	'W&auml;hrung',
+			:th_debitor_email						=>	'Email',
+			:th_debitor_name						=>	'Name',
+			:th_debitor_type						=>	'Kundenart',
+			:th_description							=>	'Beschreibung',
+			:th_domain									=>	'Domain',
+			:th_email										=>	'Email',
+			:th_formatted_date					=>	'Datum',
+			:th_name										=>	'Name',
+			:th_next_invoice_date				=>	'Nächste Rechnung',
+			:th_phone										=>	'Telefon',
+			:th_price										=>	'Preis',
+			:th_quantity								=>	'Anzahl',
+			:th_text										=>	'Positionstext',
+			:th_time										=>	'Zeit',
+			:th_toggle_payment_received	=>	'Status',
+			:th_total_brutto						=>	'Brutto',
+			:th_total_netto							=>	'Netto',
+			:th_unique_id								=>	'ID',
+			:th_unit										=>	'Einheit',
+			:time_format								=>	'%d.%m.%Y %H:%M',
+			:toggle_deleted							=>	'löschen',
+			:toggle_paid								=>	'offen',
+			:toggle_recovered						=>	'wiederherstellen',
+			:toggle_unpaid							=>	'bezahlt',
+			:total											=>	'Total',
+			:total_brutto								=>	'Total Brutto',
+			:total_netto								=>	'Total Netto',
+			:unique_id									=>	'ID',
+			:update											=>	'Speichern',
+			:vat												=>	'MwSt. (8.0%)',
+			:ydim												=>	'YDIM',
+			:ydim_version								=>	'Commit-ID', 
+		},
+	}
+	RESOURCES = {
+		:css				=>	'ydim.css',
+		:javascript	=>	'javascript',
+	}
+end
+		end
+	end
+end