xls_sestavy 0.2.13 → 0.3.2

checksums.yaml

@@ -1,15 +1,15 @@
 ---
 !binary "U0hBMQ==":
   metadata.gz: !binary |-
-    MTgzMGI1Yjg5Zjg1ZTgxYTg4NWI1ZWUzNjViNjRkNzgyZjIyNjAzNw==
+    YjFlYWVkNDY1M2U0MmNmMDcwY2UyOWM2NmM2MGI2MGIwOTNiOThlOQ==
   data.tar.gz: !binary |-
-    NWMxYWZiMTg1ZWNhNWYwMWJlNzI2YzAzZGM1ZWM3NDEwYzg2OGE3Yw==
+    ZWYyYWI3NDY0ZTk2NGMwMDRiMGQ2MDhjMjM0ODgxMjdmY2Q3NzQ5NA==
 SHA512:
   metadata.gz: !binary |-
-    MzdiODM1OTY1YjdlMzQ0YWEzMjg5YWZhZjNiYTczYWIyZWY1ZTRiOGJkYWY3
-    MzExNmZlOTc1MDM4YWY0ODQ2ZDU0ZjQ4OTQ0YTFmZDU3MzVkOWFkMmYyNjQ2
-    ZDIzYTlhN2Q5OWJkNDhmZmVhNWY1ODM1ZmM5NzMwYTJiYWFmMjE=
+    YzkxY2Y4NzQ4NWU2MTgxNDcyZjdhNTBmYTQ0ZTk0YmQxNTIxYjU5MTE4MmM0
+    OGQyODY2ZjNkNjJlMWQ5ZTMyMjgwMjg1NWZmMDkzYjg3M2RkODU3MWQ3MTYx
+    M2ZkZGE4YTU1YTljYmRjNTEwNGI1YzJhMGI1N2E4MzZkZjIzMTY=
   data.tar.gz: !binary |-
-    MThmNGRhOTI5ZGVlODZmMDA1YTJmZDc1ZmI5ODg2MDZjNGE2MmViMjE5ZmFm
-    ZWYyOTgzYzc3YjQ2OGIxOWVjODIxOGI0MTE4NmM3YjExMjA4NTU0Y2I4NzZh
-    MDgxNDI2ODZkNWRmODgwNDk3MmMxZjRjNTUxYzBiMGZkYzJiZjk=
+    ZjZmNWU1NmJjZjhjMTJmY2YzYTYyZThlMzQxYzE0MDk1MTA0ZWYxYzExYzU1
+    OGRjZDQyNDJiMDgzMGNkOGRhY2VmYTZiZGJkY2EzNjMzYzYwYmY4MDZkNTg3
+    YWRkNTlkMTcyZTgyNzEwZmI1ZDQzZWUzNjc3NzdkM2I0MzdiN2M=

data/lib/xls_sestavy/sestava.rb

@@ -1,41 +1,44 @@
 # encoding: utf-8
-require 'tempfile'
-require 'xls_sestavy/excel_formaty'
-require 'xls_sestavy/excel_tabulky'
-
+require "xls_sestavy/tabulky/tabulka"
+require "xls_sestavy/tabulky/sloupce/sloupec"
+require "xls_sestavy/tabulky/sloupce/preddefinovany_sloupce"
+require "xls_sestavy/tabulky/sloupce/definice_sloupcu"
 
 module XLSSestavy
   class Sestava
-    NAZEV = 'Prázdná sestava'
 
-    include ExcelTabulky
-    include ExcelFormaty
+    def self.nazev
+      @nazev ||= 'bezejména'
+    end
+
+    def self.nastav_nazev(txt)
+      @nazev = txt
+    end
 
-    attr_reader :argumenty
+    attr_reader :params
 
-    def initialize(args={})
-      args[:k_datu] = Date.today unless args[:k_datu]
-      @argumenty = ArgumentySestavy.new args
+    def initialize(params)
+      @params = zpracuj_params params
+      @cas_vytvoreni = Time.zone.now
     end
 
-    def vytvor_soubor
-      f = Tempfile.new self.class::NAZEV.gsub(' ','_'), Rails.root.join('tmp')
-      @wb = ::WriteExcel.new f
-      vypracuj_sestavu
-      @wb.close
-      block_given? ? yield(f) : po_vypracovani(f)
+    def zpracuj_params(params)
+      params
     end
 
-    def vypracuj_sestavu; end
+    def zpracuj
+      vypracovani
+      block_given? ? yield : po_vypracovani
+    end
 
-    def po_vypracovani(f); end
+    # přepsáno v podtřídách
+    def vypracovani; end
 
-    def nazev_souboru
-      to_s + '.xls'
-    end
+    # přepsáno v podtřídách
+    def po_vypracovani; end
 
     def to_s
-      "#{self.class::NAZEV.gsub(' ','_')}_#{@argumenty.to_s}"
+      self.class.nazev.gsub ' ','_'
     end
 
   end

data/lib/xls_sestavy/sestava_xls.rb

@@ -0,0 +1,45 @@
+# encoding: utf-8
+require 'tempfile'
+require 'writeexcel'
+require "xls_sestavy/xls/xls"
+require "xls_sestavy/xls/formaty"
+require "xls_sestavy/xls/zapisovani"
+require "xls_sestavy/tabulky/tabulka_xls"
+
+module XLSSestavy
+  class SestavaXls < Sestava
+
+    include XLSSestavy::Xls::Formaty
+    include XLSSestavy::Xls::Zapisovani
+
+    def zpracuj
+      f = Tempfile.new to_s, Rails.root.join('tmp')
+      @wb = ::WriteExcel.new f
+      vypracovani
+      @wb.close
+      block_given? ? yield(f) : po_vypracovani(f)
+    end
+
+    # přepsáno v podtřídách
+    def vypracovani; end
+
+    # přepsáno v podtřídách
+    def po_vypracovani(f); end
+
+    def to_s
+      self.class.nazev.gsub ' ','_'
+    end
+
+    def nazev_souboru
+      to_s + '.xls'
+    end
+
+    # vytvoří list, zapíše jej do @ws a vrátí jej. mezi tím případně provede předaný blok
+    def vytvor_list(nazev)
+      @ws = @wb.add_worksheet nazev
+      yield @ws if block_given?
+      @ws
+    end
+
+  end
+end

data/lib/xls_sestavy/tabulky/sloupce/definice_sloupcu.rb

@@ -0,0 +1,27 @@
+# encoding: utf-8
+module XLSSestavy
+  class DefiniceSloupcu
+
+    def self.[](klic)
+      @instance ||= new
+      @instance[klic]
+    end
+
+    def initialize
+      @seznam = {}
+      definice
+    end
+
+    def definice; end # tato metoda bude přepsána
+
+    def definuj(*args, &block)
+      s = PreddefinovanySloupec.new(*args, &block)
+      @seznam[s.klic] = s
+    end
+
+    def [](klic)
+      @seznam[klic]
+    end
+
+  end
+end

data/lib/xls_sestavy/tabulky/sloupce/sloupec.rb

@@ -0,0 +1,41 @@
+# encoding: utf-8
+module XLSSestavy
+  class Sloupec
+
+    attr_accessor :tabulka
+
+    def initialize(zahlavi, opts={}, &block)
+      @options = opts.merge! zahlavi: zahlavi, fce: (opts[:fce] || block)
+    end
+
+    def zahlavi
+      raise 'Není přiřazena tabulka.' unless @tabulka
+      @zahlavi ||= I18n.translate(@options[:zahlavi], {default: @options[:zahlavi]}.merge!(@tabulka.sestava.params))
+    end
+
+    def argumenty_array
+      return @argumenty_array if defined? @argumenty_array
+      raise 'Není přiřazena tabulka.' unless @tabulka
+      params = @tabulka.sestava.params
+      @argumenty_array = (@options[:argumenty] || []).map{|arg_sym| params[arg_sym]}
+    end
+
+    def hodnota_pro(objekt)
+      @fce ||= @options[:fce]
+      if @fce.class==Proc
+        @fce.call(objekt, *argumenty_array)
+      elsif objekt.respond_to? @fce
+        objekt.send(@fce, *argumenty_array)
+      elsif nil
+        nil
+      else
+        raise "Není definováno pro @fce=#{@fce.class}:#{@fce}"
+      end
+    end
+
+    def opt(klic)
+      @options[klic]
+    end
+
+  end
+end

data/lib/xls_sestavy/tabulky/tabulka.rb

@@ -0,0 +1,27 @@
+# encoding: utf-8
+module XLSSestavy
+  class Tabulka
+
+    attr_reader :sestava
+
+    def initialize(sestava, args={}, &block)
+      @sestava = sestava
+      @args = args
+
+      @sloupce = args[:sloupce] || []
+      yield self if block_given?
+      @sloupce.each{|s| s.tabulka = self}
+    end
+
+    def sloupec(*args, &block)
+      s = if args.first.is_a? Sloupec
+        args.first
+      else
+        Sloupec.new(*args, &block)
+      end
+      s.tabulka = self
+      @sloupce << s
+    end
+
+  end
+end

data/lib/xls_sestavy/tabulky/tabulka_xls.rb

@@ -0,0 +1,145 @@
+# encoding: utf-8
+module XLSSestavy
+  class Xls::TabulkaXls < Tabulka
+
+    def initialize(sestava, worksheet, args={}, &block)
+      raise 'Sestava musí být typu SestavaXls' unless sestava.kind_of? SestavaXls
+      @worksheet = worksheet
+      super sestava, args, &block
+    end
+
+    def vypis_radek_zahlavi(pozice)
+      r, c = XLSSestavy::Xls.ciselne_souradnice(pozice).first
+      format_zahlavi = @sestava.get_format @args[:format_zahlavi] || :radek_zahlavi
+
+      @sloupce.each_with_index do |s, i|
+        format = if s.opt(:xls_format).class==Hash
+                   format_hash = s.opt(:xls_format).clone
+                   format_hash.delete :num_format
+                   @sestava.alter_format format_zahlavi, format_hash
+                 else
+                   format_zahlavi
+                 end
+        @worksheet.write r, c+i, s.zahlavi, format
+      end
+    end
+
+    def vypis_radek_souctu(pozice, rozsah=nil)
+      r, c = XLSSestavy::Xls.ciselne_souradnice(pozice).first
+      format_souctu = @sestava.get_format @args[:format_souctu] || :radek_souctu
+
+      @sloupce.each_with_index do |s, i|
+        format_hash = {num_format: XLSSestavy::Xls.num_format(s.opt(:datovy_typ))}
+        format_hash.merge! s.opt(:xls_format) if s.opt(:xls_format).class == Hash
+        format = @sestava.alter_format format_souctu, format_hash
+
+        pismeno = XLSSestavy::Xls.sloupec_pismeno c + i
+        case rozsah && s.opt(:radek_souctu)
+          when :soucet
+            formule = "SUBTOTAL(9,#{pismeno}#{rozsah.min}:#{pismeno}#{rozsah.max})"
+            @worksheet.write_formula r, c+i, formule, format
+          when :pocet
+            formule = "SUBTOTAL(3,#{pismeno}#{rozsah.min}:#{pismeno}#{rozsah.max})"
+            @worksheet.write_formula r, c+i, formule, format
+          else
+            @worksheet.write r, c+i, nil, format
+        end
+      end
+    end
+
+    def vypis_radky_dat(pozice, radky)
+      r, c = XLSSestavy::Xls.ciselne_souradnice(pozice).first
+      radku_vypsano = 0
+
+      format_dat = @sestava.get_format @args[:format_dat] || :radky_dat
+      formaty = @sloupce.map do |s|
+        format_hash = {num_format: XLSSestavy::Xls.num_format(s.opt(:datovy_typ))}
+        format_hash.merge! s.opt(:xls_format) if s.opt(:xls_format).class == Hash
+        @sestava.alter_format format_dat, format_hash
+      end
+
+      if radky.class == ActiveRecord::Relation
+        velikost_sady = @args[:velikost_sady] || 200
+        radky.find_in_batches batch_size: velikost_sady do |sada|
+          aktualni_pozice = "#{XLSSestavy::Xls.sloupec_pismeno c}#{r + 1 + radku_vypsano}"
+          vypis_blok_dat aktualni_pozice, sada, formaty
+          radku_vypsano += sada.length
+        end
+      else
+        vypis_blok_dat pozice, radky, formaty
+        radku_vypsano = radky.length
+      end
+
+      radku_vypsano
+    end
+
+    def vypis_blok_dat(pozice, radky, formaty=[])
+      r, c = XLSSestavy::Xls.ciselne_souradnice(pozice).first
+
+      radky.each do |objekt|
+        @sloupce.each_with_index do |s, i|
+          hodnota = XLSSestavy::Xls.douprav_hodnotu_bunky s.hodnota_pro(objekt)
+          case s.opt(:datovy_typ)
+            when :cas, :datum
+              @worksheet.write_date_time r, c+i, hodnota, formaty[i]
+            else
+              @worksheet.write r, c+i, hodnota, formaty[i]
+          end
+        end
+        r += 1
+      end
+    end
+
+    def vypis(pozice, radky)
+      r, c = XLSSestavy::Xls.ciselne_souradnice(pozice).first
+      sloupec_pismeno = XLSSestavy::Xls.sloupec_pismeno c
+      puvodni_r = r
+      pocet_radku = radky.count
+
+      soucty_od = puvodni_r + 1
+      souctove_radky = @args[:souctove_radky]
+      souctove_radky = :prazdne if pocet_radku==0 && souctove_radky
+
+      #šířky sloupců
+      @sloupce.each_with_index do |s, i|
+        sirka = s.opt(:sirka_sloupce)
+        next unless sirka
+        si = c + i
+        @worksheet.set_column si, si, XLSSestavy::Xls.col_cm_to_p(sirka)
+      end
+
+      #hlavičky
+      vypis_radek_zahlavi pozice
+      r += 1
+      @worksheet.set_row r, XLSSestavy::Xls.row_cm_to_p(@args[:vyska_zahlavi]  || 1.3)
+
+      #součtové řádky nad
+      if souctove_radky==:nad || souctove_radky==:nad_pod
+        soucty_od += 1
+        vypis_radek_souctu "#{sloupec_pismeno}#{r + 1}", (soucty_od..soucty_od+pocet_radku-1)
+        r += 1
+      end
+
+      #ukotvení
+      @worksheet.freeze_panes r, 0 if @args[:ukotvit_zahlavi]
+
+      #vypsání dat
+      r += vypis_radky_dat("#{sloupec_pismeno}#{r + 1}", radky)
+
+      #součty pod
+      if souctove_radky==:pod || souctove_radky==:nad_pod
+        vypis_radek_souctu "#{sloupec_pismeno}#{r + 1}", (soucty_od..soucty_od+pocet_radku-1)
+        r += 1
+      end
+
+      #prázdný součtový řádek
+      if souctove_radky==:prazdne
+        vypis_radek_souctu "#{sloupec_pismeno}#{r + 1}"
+        r += 1
+      end
+
+      r - puvodni_r
+    end
+
+  end
+end

data/lib/xls_sestavy/version.rb

@@ -1,5 +1,5 @@
 # encoding: utf-8
 module XLSSestavy
-  VERSION = "0.2.13"
+  VERSION = "0.3.2"
 
 end

data/lib/xls_sestavy/{excel_formaty.rb → xls/formaty.rb}

@@ -1,6 +1,6 @@
 # encoding: utf-8
 module XLSSestavy
-  module ExcelFormaty
+  module Xls::Formaty
 
     #do uchovávaného pole zapíše pod daným symbolem nový formát využívaný ostatními metodami
     def add_format(symbol, *args)
@@ -46,13 +46,13 @@ module XLSSestavy
           add_format symbol, size: 12, bold: 1, align: 'left'
         when :sestava_info
           add_format symbol, italic: 1
-        when :zahlavi
+        when :radek_zahlavi
           add_format symbol, bold: 1, border: 1, text_wrap: 1, align: 'center', bg_color: 22
-        when :data
+        when :radky_dat
           add_format symbol, text_wrap: 1, border: 1
-        when :data_stred
+        when :radky_dat_stred
           add_format symbol, text_wrap: 1, border: 1, align: 'center'
-        when :souctovy_radek
+        when :radek_souctu
           add_format symbol, align: 'right', bg_color: 42, bold: 1, border: 1
         when :default
           add_format symbol
@@ -62,4 +62,4 @@ module XLSSestavy
     end
 
   end
-end
+end

data/lib/xls_sestavy/xls/xls.rb

@@ -0,0 +1,89 @@
+# encoding: utf-8
+module XLSSestavy
+  module Xls
+
+    #převod cm na points pro řádky
+    def self.row_cm_to_p(cm)
+      (cm*28.3464567).to_i
+    end
+
+    #převod cm na points pro sloupce
+    #přibližně .. (nenalezen přesný výpočet)
+    def self.col_cm_to_p(cm)
+      (cm*28.3464567/5.6).to_i
+    end
+
+    #převod z mm na palce
+    def self.mm_to_inch(mm)
+      mm/25.4
+    end
+
+    #číslo sloupce ze znaků ('A' => 0)
+    # do maximální hodnoty 'ZZ'
+    def self.sloupec_cislo(znak)
+      znak.upcase!
+      if znak.length==1
+        znak.ord-65
+      elsif znak.length==2
+        (znak[0].ord-64)*26 + znak[1].ord-65
+      end
+    end
+
+    #písmeno sloupce z čísla (0 => 'A')
+    # do maximální hodnoty 'ZZ'
+    def self.sloupec_pismeno(cislo)
+      return (cislo+65).chr if cislo < 26
+      a = (cislo/26) - 1
+      b = cislo%26
+      "#{(a+65).chr}#{(b+65).chr}"
+    end
+
+    #převod standartních souřadnic na pole číselných souradnic:
+    # 'A3' => [[2,0]], 'A5:B7' => [[4,0],[6,1]] <radek, sloupec>
+    def self.ciselne_souradnice(bunky)
+      a = bunky.match /^(\D+)(\d+)(:(\D+)(\d+))?$/
+      return unless a
+      souradnice = [[a[2].to_i-1, sloupec_cislo(a[1])]]
+      souradnice << [a[5].to_i-1, sloupec_cislo(a[4])] if a[3]
+      souradnice
+    end
+
+    #doupravuje hodnotu buňky, aby nedošlo na předvídatelné konflikty.
+    #Důležité pro všechny typy času/datumu, protože to je potřeba převést na textový řetězec pro excel stravitelný
+    def self.douprav_hodnotu_bunky(hodnota)
+      return '' unless hodnota
+      case hodnota
+        when Hash
+          YAML.dump hodnota
+        when Array
+          hodnota.join ', '
+        when Time, DateTime, Date
+          I18n.localize hodnota, format: :excel
+        else
+          hodnota
+      end
+    end
+
+    #klíč num_formátu pro excel
+    def self.num_format(sym)
+      sym && case sym
+               when :cas; 'yyyy-MM-dd HH:mm:ss'
+               when :datum; 'd. M. yyyy'
+               when :suma; "#,###0.00 #{@def_mena}"
+               when :pocet; '#,##0'
+               when :cislo; '#0'
+               else raise "nedefinovaný num_format: #{sym}"
+             end
+    end
+
+    def self.def_mena=(mena)
+      @def_mena = case mena
+                    when '€';  '[$€-4B1]'
+                    when 'Kč'; '[$Kč-405]'
+                    else;      '??'
+                  end
+    end
+    self.def_mena = 'Kč'
+
+  end
+end

data/lib/xls_sestavy/xls/zapisovani.rb

@@ -0,0 +1,59 @@
+# encoding: utf-8
+module XLSSestavy
+  module Xls::Zapisovani
+
+    # roztahuje se na (defaultně) 24 sloupců v prvním řádku
+    def sestava_nadpis(text, roztahnout=12, radek=0)
+      @ws.merge_range radek, 0, radek, roztahnout-1, text, get_format(:sestava_nadpis)
+      @ws.set_row radek, XLSSestavy::Xls.row_cm_to_p(1)
+    end
+
+    # pozice ve standartních excel souřadnicích 'A2', 'B3:B5' (spojení buňek)
+    # vyska znamená výška daného řádku v cm
+    def sestava_napdis2(text, pozice, vyska = 0.7)
+      zapis pozice, text, get_format(:sestava_nadpis2)
+      @ws.set_row ciselne_souradnice(pozice).first.first, XLSSestavy::Xls.row_cm_to_p(vyska)
+    end
+
+    #pozice ve standartních excel souřadnicích 'A2', 'B3:B5' (spojení buňek)
+    def sestava_cas_vytvoreni(pozice='A2')
+      cas = "začátek zpracování: #{I18n.localize Time.zone.now}"
+      zapis pozice, cas, get_format(:default)
+    end
+
+    # pozice bunkdy jsou ve standartních souřadnicích ( 'A3')
+    def zapis(pozice, hodnota, format=nil)
+      format = get_format unless format
+      z_pole, do_pole = XLSSestavy::Xls.ciselne_souradnice pozice
+      if do_pole
+        @ws.merge_range z_pole[0], z_pole[1], do_pole[0], do_pole[1], hodnota, format
+      else
+        @ws.write z_pole[0], z_pole[1], hodnota, format
+      end
+    end
+
+    def zapis_radu(pozice, hodnoty, format=nil)
+      format = get_format unless format
+      r, c = XLSSestavy::Xls.ciselne_souradnice(pozice).first
+      hodnoty.each do |h|
+        @ws.write r, c, h, format
+        c += 1
+      end
+    end
+
+    def zapis_sloupec(pozice, hodnoty, format=nil)
+      format = get_format unless format
+      r, c = XLSSestavy::Xls.ciselne_souradnice(pozice).first
+      hodnoty.each do |h|
+        @ws.write r, c, h, format
+        r += 1
+      end
+    end
+
+    def zapis_tabulku(pozice, radky, args={}, &block)
+      tabulka = XLSSestavy::Xls::TabulkaXls.new self, @ws, args, &block
+      tabulka.vypis pozice, radky
+    end
+
+  end
+end

data/lib/xls_sestavy.rb

@@ -1,13 +1,6 @@
 # encoding: utf-8
-require "xls_sestavy/version"
-require "xls_sestavy/excel_helper"
-
-require 'xls_sestavy/sloupec'
-require 'xls_sestavy/preddefinovany_sloupec'
-require 'xls_sestavy/rada_sloupcu'
-require 'xls_sestavy/definice_sloupcu'
 
-require 'xls_sestavy/argumenty_sestavy'
-require 'xls_sestavy/sestava'
+require "xls_sestavy/version"
+require "xls_sestavy/sestava"
+require "xls_sestavy/sestava_xls"
 
-require 'writeexcel'

metadata

@@ -1,14 +1,14 @@
 --- !ruby/object:Gem::Specification
 name: xls_sestavy
 version: !ruby/object:Gem::Version
-  version: 0.2.13
+  version: 0.3.2
 platform: ruby
 authors:
 - Ondřej Želazko
 autorequire: 
 bindir: bin
 cert_chain: []
-date: 2014-05-29 00:00:00.000000000 Z
+date: 2014-06-13 00:00:00.000000000 Z
 dependencies:
 - !ruby/object:Gem::Dependency
   name: bundler
@@ -66,16 +66,17 @@ files:
 - README.md
 - Rakefile
 - lib/xls_sestavy.rb
-- lib/xls_sestavy/argumenty_sestavy.rb
-- lib/xls_sestavy/definice_sloupcu.rb
-- lib/xls_sestavy/excel_formaty.rb
-- lib/xls_sestavy/excel_helper.rb
-- lib/xls_sestavy/excel_tabulky.rb
-- lib/xls_sestavy/preddefinovany_sloupec.rb
-- lib/xls_sestavy/rada_sloupcu.rb
 - lib/xls_sestavy/sestava.rb
-- lib/xls_sestavy/sloupec.rb
+- lib/xls_sestavy/sestava_xls.rb
+- lib/xls_sestavy/tabulky/sloupce/definice_sloupcu.rb
+- lib/xls_sestavy/tabulky/sloupce/preddefinovany_sloupce.rb
+- lib/xls_sestavy/tabulky/sloupce/sloupec.rb
+- lib/xls_sestavy/tabulky/tabulka.rb
+- lib/xls_sestavy/tabulky/tabulka_xls.rb
 - lib/xls_sestavy/version.rb
+- lib/xls_sestavy/xls/formaty.rb
+- lib/xls_sestavy/xls/xls.rb
+- lib/xls_sestavy/xls/zapisovani.rb
 - xls_sestavy.gemspec
 homepage: https://github.com/doooby/xls_sestavy
 licenses:

data/lib/xls_sestavy/argumenty_sestavy.rb

@@ -1,31 +0,0 @@
-# encoding: utf-8
-module XLSSestavy
-  class ArgumentySestavy
-
-    attr_accessor :od_data, :do_data, :uzivatel_id
-    alias_method :k_datu, :od_data
-    def k_datu=(datum); @od_data = datum; @do_data = datum; end
-
-    def initialize(args={})
-      args.each_pair{|k, v| send "#{k}=", v }
-    end
-
-    def jeden_datum?
-      @od_data==@do_data
-    end
-
-    def argumenty_sloupce(arr)
-      arr.map{|a| (a.class==Symbol && respond_to?(a)) ? send(a) : a}
-    end
-
-    def to_s
-      return @to_s if defined? @to_s
-      @to_s = if jeden_datum?
-                "#{I18n.l(@od_data, format: :excel)[0..-2]}"
-              else
-                "#{I18n.l(@od_data, format: :excel)[0..-2]}_#{I18n.l(@do_data, format: :excel)[0..-2]}"
-              end
-    end
-
-  end
-end

data/lib/xls_sestavy/definice_sloupcu.rb

@@ -1,37 +0,0 @@
-# encoding: utf-8
-module XLSSestavy
-  class DefiniceSloupcu < RadaSloupcu
-
-    def self.[](klic)
-      DefiniceSloupcu.definice(self)[klic]
-    end
-
-    def self.pridej_jako_definice
-      DefiniceSloupcu.cache_definic[self] = self
-    end
-
-    def definice; end
-
-    def definuj(*args, &block)
-      @sloupce << PreddefinovanySloupec.new(*args, &block)
-    end
-
-    private
-
-    def self.definice(klass)
-      ds = DefiniceSloupcu.cache_definic[klass]
-      if ds.class==Class
-        ds = ds.new
-        ds.definice
-        ds.aktualizuj_seznam
-        @cache_definic[klass] = ds
-      end
-      ds
-    end
-
-    def self.cache_definic
-      @cache_definic ||= {}
-    end
-
-  end
-end

data/lib/xls_sestavy/excel_helper.rb

@@ -1,96 +0,0 @@
-# encoding: utf-8
-module XLSSestavy
-  #převod cm na points pro řádky
-  def self.row_cm_to_p(cm)
-    (cm*28.3464567).to_i
-  end
-
-  #převod cm na points pro sloupce
-  #přibližně .. (nenalezen přesný výpočet)
-  def self.col_cm_to_p(cm)
-    (cm*28.3464567/5.6).to_i
-  end
-
-  #převod z mm na palce
-  def self.mm_to_inch(mm)
-    mm/25.4
-  end
-
-  #číslo sloupce ze znaků ('A' => 0)
-  # do maximální hodnoty 'ZZ'
-  def self.sloupec_cislo(znak)
-    znak.upcase!
-    if znak.length==1
-      znak.ord-65
-    elsif znak.length==2
-      (znak[0].ord-64)*26 + znak[1].ord-65
-    end
-  end
-
-  #písmeno sloupce z čísla (0 => 'A')
-  # do maximální hodnoty 'ZZ'
-  def self.sloupec_pismeno(cislo)
-    return (cislo+65).chr if cislo < 26
-    a = (cislo/26) - 1
-    b = cislo%26
-    "#{(a+65).chr}#{(b+65).chr}"
-  end
-
-  #převod standartních souřadnic na pole číselných souradnic:
-  # 'A3' => [[2,0]], 'A5:B7' => [[4,0],[6,1]] <radek, sloupec>
-  def self.ciselne_souradnice(bunky)
-    a = bunky.match /^(\D+)(\d+)(:(\D+)(\d+))?$/
-    return unless a
-    souradnice = [[a[2].to_i-1, sloupec_cislo(a[1])]]
-    souradnice << [a[5].to_i-1, sloupec_cislo(a[4])] if a[3]
-    souradnice
-  end
-
-  #doupravuje hodnotu buňky, aby nedošlo na předvídatelné konflikty.
-  #Důležité pro všechny typy času/datumu, protože to je potřeba převést na textový řetězec pro excel stravitelný
-  def self.douprav_hodnotu_bunky(hodnota)
-    case hodnota
-      when Hash
-        ret = '---'
-        hodnota.each_pair{|k, v| ret += "\n#{k}: #{v}"}
-        ret
-      when Array
-        hodnota.join ', '
-      when Time, DateTime, Date
-        I18n.l hodnota, format: :excel
-      when NilClass
-        ''
-      else
-        hodnota
-    end
-  end
-
-  #klíč num_formátu pro excel
-  def self.num_format(sym)
-    case sym
-      when :cas
-        'yyyy-MM-dd HH:mm:ss'
-      when :datum
-        'd. M. yyyy'
-      when :suma
-        "#,###0.00 #{@def_mena}"
-      when :pocet
-        '#,##0'
-      when :cislo_smlouvy
-        '#0'
-      else
-        raise "nedefinovaný num_format: #{sym}"
-    end
-  end
-
-
-  def self.def_mena=(mena)
-    @def_mena = case mena
-                  when '€';  '[$€-4B1]'
-                  when 'Kč'; '[$Kč-405]'
-                  else;      '??'
-                end
-  end
-  self.def_mena = 'Kč'
-
-end

data/lib/xls_sestavy/excel_tabulky.rb

@@ -1,164 +0,0 @@
-# encoding: utf-8
-module XLSSestavy
-  module ExcelTabulky
-
-    # vytvoří list, zapíše jej do @ws a vrátí jej. mezi tím případně provede předaný blok
-    def vytvor_list(nazev)
-      @ws = @wb.add_worksheet nazev
-      yield @ws if block_given?
-      @ws
-    end
-
-    # roztahuje se na (defaultně) 24 sloupců v prvním řádku
-    def sestava_nadpis(text, roztahnout=24, radek=0)
-      @ws.merge_range radek, 0, radek, roztahnout-1, text, get_format(:sestava_nadpis)
-      @ws.set_row radek, XLSSestavy.row_cm_to_p(1)
-    end
-
-    # pozice ve standartních excel souřadnicích 'A2', 'B3:B5' (spojení buňek)
-    # vyska znamená výška daného řádku v cm
-    def sestava_napdis2(text, pozice, vyska = 0.7)
-      zapis pozice, text, get_format(:sestava_nadpis2)
-      @ws.set_row ciselne_souradnice(pozice)[0][0], XLSSestavy.row_cm_to_p(vyska)
-    end
-
-    #pozice ve standartních excel souřadnicích 'A2', 'B3:B5' (spojení buňek)
-    def sestava_cas_vytvoreni(pozice='A2')
-      cas = "začátek zpracování: #{l Time.now}"
-      zapis pozice, cas, get_format(:default)
-    end
-
-    # pozice bunkdy jsou ve standartních souřadnicích ( 'A3')
-    def zapis(bunky, hodnota, format=nil)
-      format = get_format unless format
-      souradnice = XLSSestavy.ciselne_souradnice bunky
-      if souradnice.length==1
-        @ws.write souradnice[0][0], souradnice[0][1], hodnota, format
-      else
-        @ws.merge_range souradnice[0][0], souradnice[0][1], souradnice[1][0], souradnice[1][1], hodnota, format
-      end
-    end
-
-    def zapis_radu(prvni_bunka, hodnoty, format=nil)
-      format = get_format unless format
-      souradnice = XLSSestavy.ciselne_souradnice(prvni_bunka).first
-      hodnoty.each do |h|
-        @ws.write souradnice[0], souradnice[1], h, format
-        souradnice[1] += 1
-      end
-    end
-
-    def zapis_sloupec(prvni_bunka, hodnoty, format=nil)
-      format = get_format unless format
-      souradnice = XLSSestavy.ciselne_souradnice(prvni_bunka).first
-      hodnoty.each do |h|
-        @ws.write souradnice[0], souradnice[1], h, format
-        souradnice[0] += 1
-      end
-    end
-
-    #vypsání dat tabulky, hlaviček a případných součtových řádků
-    # vrací počet, kolik řádků bylo vypsáno
-    # objekty = <Array<Object>>  /  <ActiveRecord::Relation>
-    # sloupce: <Array<Sloupec>> / <RadaSloupcu> -pole sloupců
-    #--- args ---
-    # vyska_zahlavi: <Numerical>  -hodnota výšky prvního řádku v cm
-    # ukotvit_zahlavi: <True> / <Nil>  -pokud má být za hlavičkou ukotveno(o jeden řádek níže při použití součtových řádků :nad)
-    # soucty: :nad, :pod, :nad_pod, :prazdne, nil
-    # format_zahlavi: <Symbol>  -formát hlavičky (bude upraven formátem sloupce)
-    # format_dat: <Symbol>  -formát řádků dat (bude upraven formátem sloupce)
-    def vypis_tabulku(pozice, objekty, sloupce, args={})
-      y, x = XLSSestavy.ciselne_souradnice(pozice).first
-      sloupce = sloupce.sloupce if sloupce.kind_of? RadaSloupcu
-      soucty = args[:soucty]
-      soucty = :prazdne if objekty.length==0 && soucty
-
-      dy = 0 # posun v řádcích
-      #hlavičky
-      format_zahlavi = get_format args[:format_zahlavi]||:zahlavi
-      formaty = sloupce.map do |s|
-        next format_zahlavi unless s.format.class==Hash
-        format_hash = s.format.clone
-        format_hash[:num_format] = nil
-        alter_format format_zahlavi, format_hash
-      end
-      sloupce.each_with_index do |s, i|
-        x_sloupce = x + i
-        @ws.write y, x_sloupce, s.zahlavi, formaty[i]
-        @ws.set_column x_sloupce, x_sloupce, XLSSestavy.col_cm_to_p(s.sirka)
-      end
-      @ws.set_row y, XLSSestavy.row_cm_to_p(args[:vyska_zahlavi]||1.3)
-      dy += 1
-      #součty :nad
-      y_soucty = y+dy+1
-      if soucty==:nad || soucty==:nad_pod
-        y_soucty += 1
-        vypis_souctovy_radek y+dy, x, sloupce, (y_soucty..y_soucty+objekty.length-1)
-        dy += 1
-      end
-      #ukotvit
-      @ws.freeze_panes y+dy, 0 if args[:ukotvit_zahlavi]
-      #vypsani samotnych dat
-      format_dat = get_format args[:format_dat]||:data
-      formaty = sloupce.map do |s|
-        next format_dat unless s.format.class==Hash
-        alter_format format_dat, s.format
-      end
-      if objekty.class==ActiveRecord::Relation
-        objekty.find_in_batches batch_size: 100 do |batch|
-          batch.each do |objekt|
-            sloupce.each_with_index do |s, i|
-              hodnota = XLSSestavy.douprav_hodnotu_bunky s.hodnota_pro(objekt)
-              if s.num_format==:cas || s.num_format==:datum
-                @ws.write_date_time y+dy, x+i, hodnota, formaty[i]
-              else
-                @ws.write y+dy, x+i, hodnota, formaty[i]
-              end
-            end
-            dy += 1
-          end
-        end
-      else
-        objekty.each do |objekt|
-          sloupce.each_with_index do |s, i|
-            hodnota = XLSSestavy.douprav_hodnotu_bunky s.hodnota_pro(objekt)
-            if s.num_format==:cas || s.num_format==:datum
-              @ws.write_date_time y+dy, x+i, hodnota, formaty[i]
-            else
-              @ws.write y+dy, x+i, hodnota, formaty[i]
-            end
-          end
-          dy += 1
-        end
-      end
-      #součty :pod
-      if soucty==:pod || soucty==:nad_pod
-        vypis_souctovy_radek y+dy, x, sloupce, (y_soucty..y_soucty+objekty.length-1)
-        dy += 1
-      end
-      #případně, když nejsou žádné objekty jenom prázdný součtový řádek
-      if soucty==:prazdne
-        format = get_format :souctovy_radek
-        sloupce.length.times{|i| @ws.write y+dy, x+i, '', format }
-        dy += 1
-      end
-      dy
-    end
-
-    def vypis_souctovy_radek(y, x, sloupce, rozsah)
-      format = get_format :souctovy_radek
-      sloupce.each_with_index do |s, i|
-        pismeno = XLSSestavy.sloupec_pismeno x+i
-        formule = case s.souctovy_radek
-                    when :soucet; "SUBTOTAL(9,#{pismeno}#{rozsah.min}:#{pismeno}#{rozsah.max})"
-                    when :pocet; "SUBTOTAL(3,#{pismeno}#{rozsah.min}:#{pismeno}#{rozsah.max})"
-                    else
-                      @ws.write y, x+i, '', format
-                      next
-                  end
-        @ws.write_formula y, x+i, formule, format
-      end
-    end
-
-  end
-end

data/lib/xls_sestavy/rada_sloupcu.rb

@@ -1,43 +0,0 @@
-# encoding: utf-8
-module XLSSestavy
-  class RadaSloupcu
-
-    attr_reader :sloupce
-
-    def initialize(sloupce=nil, argumenty=nil)
-      @sloupce = sloupce || []
-      yield self if block_given?
-      if @sloupce.class!=Array && @sloupce.any?{|s| !s.kind_of? Sloupec}
-        raise 'RadaSloupcu musí být inicializovány polem Sloupců'
-      end
-      nastav_argumenty argumenty if argumenty
-      @seznam = {}
-      aktualizuj_seznam
-    end
-
-    def pridej(*args, &block)
-      if args.first.is_a? Sloupec
-        @sloupce << args.first
-      else
-        @sloupce << Sloupec.new(*args, &block)
-      end
-    end
-
-    def nastav_argumenty(argumenty)
-      @sloupce.each{|s| s.nastav_argumenty argumenty}
-    end
-
-    def [](klic)
-      index = @seznam[klic.to_sym]
-      index ? @sloupce[index] :nil
-    end
-
-    def aktualizuj_seznam
-      @seznam = {}
-      @sloupce.each_with_index do |s,i|
-        @seznam[s.klic] = i if s.class==PreddefinovanySloupec
-      end
-    end
-
-  end
-end

data/lib/xls_sestavy/sloupec.rb

@@ -1,41 +0,0 @@
-# encoding: utf-8
-module XLSSestavy
-  class Sloupec
-
-    attr_accessor :zahlavi, :sirka, :format, :num_format, :souctovy_radek
-
-    def initialize(zahlavi, args={}, &block)
-      @zahlavi= zahlavi
-      @fce = args[:fce] || block
-      nastav args
-    end
-
-    def nastav(args={})
-      @parametry = args[:parametry] || []
-      @sirka = args[:sirka] || 3
-      @souctovy_radek = args[:souctovy_radek]
-      @format = args[:format]
-      @num_format = args[:num_format]
-      if @num_format
-        @format ||= {}
-        @format[:num_format] = XLSSestavy.num_format @num_format
-      end
-    end
-
-    def nastav_argumenty(argumenty)
-      @argumenty_array = argumenty.argumenty_sloupce(@parametry)
-      @zahlavi.gsub!(/%\w+%/){|m| argumenty.send m[1..-2]}
-    end
-
-    def hodnota_pro(objekt)
-      if @fce.class==Proc
-        @fce.call(objekt, *@argumenty_array)
-      elsif objekt.respond_to? @fce
-        objekt.send(@fce, *@argumenty_array)
-      else
-        raise "Není definováno pro @fce=#{@fce.class}:#{@fce}"
-      end
-    end
-
-  end
-end