gnucash2bmd 0.0.2 → 0.0.3

checksums.yaml

@@ -1,7 +1,7 @@
 ---
 SHA1:
-  metadata.gz: 501affd56837d858bf0df493370866f483bb703c
-  data.tar.gz: '09e3714dc472c4e08b31577c3d2f40481123affb'
+  metadata.gz: 0ec98047035b2e2fd232e4450a0f18037ed59176
+  data.tar.gz: 7a0813cad9b10972ec58dfdfad208ad7f5f81836
 SHA512:
-  metadata.gz: 17b0da69b647a1ec46133b2ddb07b43185b9bc86dabafe2e4e80c53c2a0fbf518d3e85e6f4e2a221c9bca5ec0727ca0cd39b8de6bdf951ad6500434f69d126d0
-  data.tar.gz: 3dd2c1f0357c9e9576efc6fcc835573fa7315b71dea3fe95d2b95a58e1c9cb9d3dd5b0d2403e7c821f461cb700fb159e78e0a1524532a151561a9f38c4cb08eb
+  metadata.gz: a981030fc377f59f39258f8219f272e44f0883796729233f598eea30ce84ef5d5cce482d846cedbd34e5140fb0d55c7aeb46e5d9ac75013b9614caf76333e740
+  data.tar.gz: b77bd6342f27e07b6be1e01c832aa276e2811deb9eee7156990a0ed419683570389d49b2ad6f301999c5602c598b572ea17bcb1881c118af80c92d094e0eb85e

data/gnucash2bmd.gemspec

@@ -17,7 +17,7 @@ Gem::Specification.new do |spec|
   spec.require_paths = ["lib"]
 
   spec.add_dependency 'trollop'
-  spec.add_dependency 'oga'
+  spec.add_dependency 'gnucash'
 
   spec.add_development_dependency "bundler"
   spec.add_development_dependency "rake"

data/history.md

@@ -1,3 +1,7 @@
+## 0.0.3 of 2017.05.26
+
+- Added reading gnucash files directly
+
 ## 0.0.2 of 2017.05.26
 
 - Force col-sep to ';', force quotes for BMD importer

data/lib/gnucash2bmd/version.rb

@@ -1,3 +1,3 @@
 module Gnucash2Bmd
-  VERSION = '0.0.2'
+  VERSION = '0.0.3'
 end

data/lib/gnucash2bmd.rb

@@ -6,6 +6,9 @@ require 'csv'
 require 'ostruct'
 require 'gnucash2bmd/version'
 require 'pp'
+require "gnucash"
+require 'zlib'
+
 begin
   require 'pry'
 rescue LoadError
@@ -34,6 +37,7 @@ Wobei folgende Optionen vorhanden sind:
 EOS
   opt :jahr, "Jahr des Gnucas-Exports", :type => :integer, :default=> OLD_YEAR
   opt :ausgabe, "Name der erstellten Datei", :type => :string, :default =>"bmd_#{OLD_YEAR}.csv"
+  opt :gnucash, "Name der zu lesenden Gnucash-Datei", :type => :string, :default => nil
 end
 
 files_read = [
@@ -41,6 +45,8 @@ files_read = [
 ]
 
 AUSGABE = opts[:ausgabe]
+GNUCASH = opts[:gnucash]
+DATE_FORMAT= '%Y.%m.%d'
 
 KONTEN_GNUCASH_HEADERS = {
   'type' => nil,
@@ -76,7 +82,6 @@ KONTEN_JOURNAL_HEADERS = {
 }
   Mandant_ID = 1
 
-  BMD_LINE = OpenStruct.new
   BANK_GUIDS ||= {}
   IDS =  {
     :satzart  => 'satzart',
@@ -91,6 +96,13 @@ KONTEN_JOURNAL_HEADERS = {
     :belegnr => 'belegnr',
     :buchcode => 'buchcode',
     }
+  BMD_LINE = eval("Struct.new( :#{IDS.keys.join(', :')})")
+  class BMD_LINE
+    attr_accessor :name, :name_voll
+    def satzart
+      0
+    end
+  end
   class Helpers
     IDS.each do |id, name|
       eval("attr_accessor :#{id}")
@@ -98,10 +110,6 @@ KONTEN_JOURNAL_HEADERS = {
     def id_to_name(id)
       return @@ids[ide]
     end
-    def self.new_account
-      info = OpenStruct.new(:satzart =>0)
-      return info
-    end
     def self.search_bank_guid(konto_bezeichung)
       if value = BANK_GUIDS.key(konto_bezeichung)
         return value
@@ -127,7 +135,7 @@ def read_accounts(filename)
       name_voll = row[1]
       bezeichung = row[2]
       next unless bezeichung && bezeichung.size > 0
-      bmd = Helpers.new_account
+      bmd = BMD_LINE.new
       bmd.bank_guid = Helpers.search_bank_guid(bezeichung)
       bmd.account_nr = bezeichung
       @contents << bmd
@@ -144,7 +152,7 @@ end
 def read_journal(filename)
   line_nr = 0
   @bmd = nil
-  @mehrteilig
+  @mehrteilig = nil
   @buchungs_nr = 0 # Will be added by column Aktion
   puts "reading journal from #{filename}"
   CSV.foreach(filename) do |row|
@@ -161,7 +169,7 @@ def read_journal(filename)
         @contents << @bmd if @bmd # save terminated
         @buchungs_nr += 1
         @mehrteilig = row[6] && /mehrteilig/i.match(row[6])
-        @bmd = Helpers.new_account
+        @bmd = BMD_LINE.new
         @bmd.buchdatum = row[0]
         @bmd.konto = Helpers.search_bank_guid(row[1])
         @bmd.buchungstext = row[3]
@@ -202,15 +210,15 @@ def check_cmd(filename)
       exit 2
     end
   end
-  puts "All #{idx} lines of #{filename} have #{nr_rows} elements"
+  puts "Alle #{idx} Zeilen von #{filename} haben #{nr_rows} Elemente"
 rescue => error
   puts "got #{error} at line #{idx}"
 end
 
 def emit_bmd(filename)
-  CSV.open(filename, "wb", :encoding => 'UTF-8', :force_quotes  => true, :col_sep => ';') do |csv|
+  CSV.open(filename, "wb", :encoding => 'UTF-8', :col_sep => ';') do |csv|
     csv << IDS.values
-    @contents.each do |content|
+    @contents.uniq.each do |content|
       value_array = []
       IDS.keys.each do |key|
         begin
@@ -224,12 +232,89 @@ def emit_bmd(filename)
   end
 end
 
-read_accounts("Konten#{OLD_YEAR}.csv")
-BANK_GUIDS.freeze
-files_read.each do |filename|
-  read_journal(filename)
+def read_gnucash(filename)
+  puts "Lese GnuCash Datei #{filename}"
+  book = Gnucash.open(filename)
+  book.accounts.each do |account|
+    bmd = BMD_LINE.new
+    # bmd.bank_guid = Helpers.search_bank_guid(account.name)
+    bmd.bank_guid = account.id
+    bmd.name = account.name
+    bmd.name_voll = account.full_name
+    bmd.account_nr = account.description
+    $stdout.puts "bmd; #{bmd}" if $VERBOSE
+    @contents << bmd
+  end
+  @first_transaction_date = nil
+  @last_transaction_date = nil
+  @buchungs_nr = 0
+  book.accounts.each do |account|
+    balance = Gnucash::Value.zero
+    account.transactions.each do |txn|
+      balance += txn.value
+      @buchungs_nr += 1
+      # $VERBOSE = true if /-408.00/.match(txn.value.to_s)
+      $stdout.puts(sprintf("%s  %8s  %8s  %s",
+                          txn.date,
+                          txn.value,
+                          balance,
+                          txn.description))  if $VERBOSE
+      @buchung              = BMD_LINE.new
+      @buchung.buchdatum    = txn.date.strftime(DATE_FORMAT)
+      @last_transaction_date  = @buchung.buchdatum if !@last_transaction_date  || @last_transaction_date  < @buchung.buchdatum
+      @first_transaction_date = @buchung.buchdatum if !@first_transaction_date || @first_transaction_date > @buchung.buchdatum
+      @buchung.buchungstext = txn.description
+      @buchung.belegnr      = txn.id # or @buchungs_nr ?? TODO
+
+      if txn.splits.size == 2
+        @buchung.konto    = txn.splits.first[:account].id
+        @buchung.gkonto   = txn.splits.last[:account].id
+        @buchung.betrag   = txn.splits.first[:value]
+        @buchung.buchcode = getBuchcode(txn.splits.first[:value])
+        @contents << @buchung
+      else
+        # Splittbuchungen werden vom Programm automatisch erkannt, wenn in mehreren aufeinanderfolgenden Buchungszeilen folgende Felder identisch sind:
+        # Konto
+        # Belegnr
+        # Belegdatum
+        gegenbuchungen = []
+        txn.splits.each_with_index do |split, idx|
+          $stdout.puts(sprintf("idx %d: %s  %8s   %8s",
+                               idx,
+                              split[:quantity],
+                              split[:value],
+                              split[:account].id,
+                              ))
+        end if $VERBOSE
+        txn.splits.each_with_index do |split, idx|
+          if txn.value.to_s.eql?(split[:value].to_s)
+            @buchung.konto    = split[:account].id
+            @buchung.betrag   = split[:value]
+            @buchung.buchcode = getBuchcode(split[:value])
+          else
+            gegenbuchung = @buchung.clone
+            gegenbuchung.gkonto = split[:account].id
+            gegenbuchung.betrag = split[:value]
+            gegenbuchung.buchcode = getBuchcode(split[:value])
+            gegenbuchungen << gegenbuchung
+          end
+        end
+        gegenbuchungen.each do |info| info.konto = @buchung.konto;  @contents << info; end
+      end
+    end
+  end
+  puts "Las #{@buchungs_nr} Buchungen von #{filename} vom #{@first_transaction_date} bis zum #{@last_transaction_date}"
+end
+if GNUCASH
+  read_gnucash(GNUCASH)
+else
+  read_accounts("Konten#{OLD_YEAR}.csv")
+  BANK_GUIDS.freeze
+  files_read.each do |filename|
+    read_journal(filename)
+  end
 end
 emit_bmd(AUSGABE)
 check_cmd(AUSGABE)
 
-puts "Created #{AUSGABE} with #{@contents.size} lines"
+puts "Erstellte #{AUSGABE} mit #{@contents.size} Zeilen"

metadata

@@ -1,7 +1,7 @@
 --- !ruby/object:Gem::Specification
 name: gnucash2bmd
 version: !ruby/object:Gem::Version
-  version: 0.0.2
+  version: 0.0.3
 platform: ruby
 authors:
 - Niklaus Giger
@@ -25,7 +25,7 @@ dependencies:
       - !ruby/object:Gem::Version
         version: '0'
 - !ruby/object:Gem::Dependency
-  name: oga
+  name: gnucash
   requirement: !ruby/object:Gem::Requirement
     requirements:
     - - ">="