cnab240 0.0.4 → 0.0.5

data/lib/cnab240/segmentos/segmento_z.rb

@@ -2,13 +2,14 @@ module Cnab240
 	class SegmentoZ < BinData::Record
 
 		include Cnab240::DefaultMixin
+		include Cnab240::SegmentoMixin
 		
 		string :controle_banco, :length => 3, :pad_byte => '0'
 		string :controle_lote, :length => 4, :pad_byte => '0'
 		string :controle_registro, :length => 1, :initial_value => '3', :pad_byte => '0'
 
 		string :servico_numero_registro, :length => 5, :pad_byte => '0'
-		string :servico_codigo_segmento, :value => 'Z', :pad_byte => ' '
+		string :servico_codigo_segmento, :length => 1, :initial_value => 'Z', :pad_byte => ' '
 
 		string :autenticacao, :length => 64, :pad_byte => ' '
 		string :controle_bancario, :length => 25, :pad_byte => ' '

data/lib/cnab240/version.rb

@@ -1,4 +1,4 @@
 module Cnab240
-  VERSION = "0.0.4"
+  VERSION = "0.0.5"
 end
 

data/lib/cnab240.rb

@@ -2,9 +2,10 @@ require "cnab240/version"
 
 require 'bindata'
 
-require "cnab240/core_ext/attribute_accessors"
-require "cnab240/core_ext/bindata"
-require "cnab240/core_ext/default_mixin"
+require "cnab240/ext/attribute_accessors"
+require "cnab240/ext/bindata"
+require "cnab240/ext/default_mixin"
+require "cnab240/ext/segmento_mixin"
 
 require "cnab240/arquivo/lote"
 
@@ -14,6 +15,14 @@ require "cnab240/segmentos/segmento_c"
 require "cnab240/segmentos/segmento_j"
 require "cnab240/segmentos/segmento_j52"
 require "cnab240/segmentos/segmento_o"
+require "cnab240/segmentos/segmento_n8"
+require "cnab240/segmentos/segmento_n7"
+require "cnab240/segmentos/segmento_n6"
+require "cnab240/segmentos/segmento_n5"
+require "cnab240/segmentos/segmento_n4"
+require "cnab240/segmentos/segmento_n3"
+require "cnab240/segmentos/segmento_n2"
+require "cnab240/segmentos/segmento_n1"
 require "cnab240/segmentos/segmento_n"
 require "cnab240/segmentos/segmento_w1"
 require "cnab240/segmentos/segmento_w"

data/spec/arquivo/arquivo_spec.rb

@@ -37,13 +37,40 @@ describe Arquivo do
 		end
 	end
 
-	it "deve ler e escrever em arquivo" do
+	it "deve ler e escrever, mantendo classe de lote" do
 		arquivo = Cnab240::Arquivo::Arquivo.new
 		(1..10).each do |n|
 			arquivo.lotes  << Cnab240::Lote.new(:operacao => :pagamento, :tipo => :remessa)
 		end
 		arquivo.save_to_file("spec/tmp/arquivo.test")
-		arquivo = Cnab240::Arquivo::Arquivo.load_from_file("spec/tmp/arquivo.test")
+
+		arquivo_read = Cnab240::Arquivo::Arquivo.load_from_file("spec/tmp/arquivo.test")[0]
+
+		arquivo_read.lotes.length.should be 10
+
+		arquivo_read.lotes.each_with_index do |lote_read, i| 
+			lote_read.header.servico_operacao.should eq arquivo.lotes[i].header.servico_operacao
+			lote_read.should be_an_instance_of(arquivo.lotes[i].class)
+			lote_read.segmentos.length.should be arquivo.lotes[i].segmentos.length
+		end
 	end
 
+	it "arquivos devem ser identicos" do
+		arquivo = Cnab240::Arquivo::Arquivo.new
+		(1..10).each do |n|
+			arquivo.lotes  << Cnab240::Lote.new(:operacao => :pagamento, :tipo => :remessa)
+		end
+		arquivo.save_to_file("spec/tmp/arquivo.test")
+
+		arquivo_read = Cnab240::Arquivo::Arquivo.load_from_file("spec/tmp/arquivo.test")[0]
+		
+		header_r = arquivo_read.header
+		header = arquivo.header
+
+		arquivo_read.header.linha.should eq arquivo.header.linha
+		arquivo_read.trailer.linha.should eq arquivo.trailer.linha
+
+	end
+
+
 end

data/spec/arquivo/header_spec.rb

@@ -43,4 +43,47 @@ describe Cnab240::Arquivo::Header do
 		header = Cnab240::Arquivo::Header.new
 		header.linha.length.should be(240)
 	end
+
+	it "conversao deve manter consistencia" do 
+		header = Cnab240::Arquivo::Header.new
+
+		header.controle_banco= "8"
+		header.controle_lote= "8"
+		header.controle_registro= "8"
+
+		header.cnab_g004_1= "8"
+
+		header.empresa_tipo= "8"
+		header.empresa_numero= "8"
+		header.empresa_convenio= "8"
+		header.empresa_agencia_codigo= "8"
+		header.empresa_agencia_dv= "8"
+		header.empresa_conta_numero= "8"
+		header.empresa_conta_dv= "8"
+		header.empresa_agencia_conta_dv= "8"
+		header.empresa_nome= "8"
+
+		header.banco_nome= "8"
+
+		header.cnab_g004_2= "8"
+
+		header.arquivo_codigo= "8"
+		header.arquivo_data_geracao= "8"
+		header.arquivo_hora_geracao= "8"
+		header.arquivo_sequencia= "8"
+		header.arquivo_layout= "8"
+		header.arquivo_densidade= "8"
+
+		header.reservado_banco= "8"
+		header.reservado_empresa= "8"
+
+		header.cnab_g004_3= "8"
+
+		linha1 = header.linha
+
+		header2 = Cnab240::Arquivo::Header.read(linha1)
+		linha2 = header2.linha
+		
+		linha1.should eq linha2
+	end
 end

data/spec/bindata/bindata_spec.rb

@@ -0,0 +1,40 @@
+require 'spec_helper'
+
+describe "Bindata" do
+
+	it "should work" do
+		class Dummy < BinData::Record
+			string :f1, :length => 3, :pad_byte => '1'
+			string :f2, :length => 4, :initial_value => '0000', :pad_byte => '0'
+			string :f3, :length => 9, :pad_byte => 'X'
+		end
+
+		d1 = Dummy.new
+		s1 = StringIO.new
+		d1.write(s1)
+
+		d2 = Dummy.read(s1.string)
+		s2 = StringIO.new
+		d2.write(s2)
+		
+		s1.string.should eq s2.string
+
+		class Dummy2 < BinData::Record
+			string :f1, :length => 3, :pad_byte => '1'
+			string :f2, :value => '0000', :pad_byte => '0'
+			string :f3, :length => 9, :pad_byte => 'X'
+		end
+
+		d1 = Dummy2.new
+		s1 = StringIO.new
+		d1.write(s1)
+
+		d2 = Dummy2.read(s1.string)
+		s2 = StringIO.new
+		d2.write(s2)
+		
+		 # s1.string.should eq s2.string # TODO: Fix bindata
+	end
+
+
+end

data/spec/segmentos/segmento_a_spec.rb

@@ -53,4 +53,13 @@ describe SegmentoA do
 		segmento.linha.length.should be(240)
 	end
 
+	it "deve manter coesao" do 
+		c = Cnab240::SegmentoA
+		obj = c.new
+		linha1 = obj.linha
+		obj2 = c.read(linha1)
+		linha2 = obj2.linha
+		linha1.should eq linha2
+	end
+
 end

data/spec/segmentos/segmento_b_spec.rb

@@ -55,4 +55,13 @@ describe SegmentoB do
 		segmento.linha.length.should be(240)
 	end
 
+	it "deve manter coesao" do 
+		c = Cnab240::SegmentoB
+		obj = c.new
+		linha1 = obj.linha
+		obj2 = c.read(linha1)
+		linha2 = obj2.linha
+		linha1.should eq linha2
+	end
+
 end

data/spec/segmentos/segmento_c_spec.rb

@@ -39,4 +39,13 @@ describe SegmentoC do
 		segmento.linha.length.should be(240)
 	end
 
+	it "deve manter coesao" do 
+		c = Cnab240::SegmentoC
+		obj = c.new
+		linha1 = obj.linha
+		obj2 = c.read(linha1)
+		linha2 = obj2.linha
+		linha1.should eq linha2
+	end
+
 end

data/spec/segmentos/segmento_j52_spec.rb

@@ -43,4 +43,13 @@ describe SegmentoJ52 do
 		segmento.linha.length.should be(240)
 	end
 
+	it "deve manter coesao" do 
+		c = Cnab240::SegmentoJ52
+		obj = c.new
+		linha1 = obj.linha
+		obj2 = c.read(linha1)
+		linha2 = obj2.linha
+		linha1.should eq linha2
+	end
+
 end

data/spec/segmentos/segmento_j_spec.rb

@@ -43,4 +43,13 @@ describe SegmentoJ do
 		segmento.linha.length.should be(240)
 	end
 
+	it "deve manter coesao" do 
+		c = Cnab240::SegmentoJ
+		obj = c.new
+		linha1 = obj.linha
+		obj2 = c.read(linha1)
+		linha2 = obj2.linha
+		linha1.should eq linha2
+	end
+
 end

data/spec/segmentos/segmento_n1_spec.rb

@@ -0,0 +1,43 @@
+require 'spec_helper'
+
+include Cnab240
+
+describe SegmentoN1 do
+
+	it "deve instanciar segmento" do
+		segmento = SegmentoN1.new
+		segmento.should be_an_instance_of(SegmentoN1)
+	end
+
+	it "deve conter campos" do
+		segmento = SegmentoN1.new
+
+		segmento.should respond_to(:receita)
+		segmento.should respond_to(:tipo_identificacao_contribuinte)
+		segmento.should respond_to(:identificacao_contribuinte)
+		segmento.should respond_to(:identificacao_tributo)
+		
+		segmento.should respond_to(:mes_ano_competencia)
+		segmento.should respond_to(:valor_tributo)
+		segmento.should respond_to(:valor_outras_entidades)
+		segmento.should respond_to(:atualizacao_monetaria)
+
+		segmento.should respond_to(:cnab)
+
+	end
+
+	it "deve ter 120 caracteres" do
+		segmento = SegmentoN1.new
+		segmento.linha.length.should be(120)
+	end
+
+	it "deve manter coesao" do 
+		c = Cnab240::SegmentoN1
+		obj = c.new
+		linha1 = obj.linha
+		obj2 = c.read(linha1)
+		linha2 = obj2.linha
+		linha1.should eq linha2
+	end
+
+end

data/spec/segmentos/segmento_n2_spec.rb

@@ -0,0 +1,46 @@
+require 'spec_helper'
+
+include Cnab240
+
+describe SegmentoN2 do
+
+	it "deve instanciar segmento" do
+		segmento = SegmentoN2.new
+		segmento.should be_an_instance_of(SegmentoN2)
+	end
+
+	it "deve conter campos" do
+		segmento = SegmentoN2.new
+		
+		segmento.should respond_to(:receita)
+		segmento.should respond_to(:tipo_identificacao_contribuinte)
+		segmento.should respond_to(:identificacao_contribuinte)
+		segmento.should respond_to(:identificacao_tributo)
+		
+		segmento.should respond_to(:periodo_apuracao)
+		segmento.should respond_to(:numero_referencia)
+		segmento.should respond_to(:valor_principal)
+		segmento.should respond_to(:valor_multa)
+		segmento.should respond_to(:valor_juros_encargos)
+		segmento.should respond_to(:data_vencimento)
+
+
+		segmento.should respond_to(:cnab)
+
+	end
+
+	it "deve ter 120 caracteres" do
+		segmento = SegmentoN2.new
+		segmento.linha.length.should be(120)
+	end
+
+	it "deve manter coesao" do 
+		c = Cnab240::SegmentoN2
+		obj = c.new
+		linha1 = obj.linha
+		obj2 = c.read(linha1)
+		linha2 = obj2.linha
+		linha1.should eq linha2
+	end
+
+end

data/spec/segmentos/segmento_n3_spec.rb

@@ -0,0 +1,45 @@
+require 'spec_helper'
+
+include Cnab240
+
+describe SegmentoN3 do
+
+	it "deve instanciar segmento" do
+		segmento = SegmentoN3.new
+		segmento.should be_an_instance_of(SegmentoN3)
+	end
+
+	it "deve conter campos" do
+		segmento = SegmentoN3.new
+
+		segmento.should respond_to(:receita)
+		segmento.should respond_to(:tipo_identificacao_contribuinte)
+		segmento.should respond_to(:identificacao_contribuinte)
+		segmento.should respond_to(:identificacao_tributo)
+		
+		segmento.should respond_to(:periodo_apuracao)
+		segmento.should respond_to(:receita_bruta)
+		segmento.should respond_to(:percentual)
+		segmento.should respond_to(:valor_principal)
+		segmento.should respond_to(:valor_multa)
+		segmento.should respond_to(:valor_juros_encargos)
+
+		segmento.should respond_to(:cnab)
+
+	end
+
+	it "deve ter 120 caracteres" do
+		segmento = SegmentoN3.new
+		segmento.linha.length.should be(120)
+	end
+
+	it "deve manter coesao" do 
+		c = Cnab240::SegmentoN3
+		obj = c.new
+		linha1 = obj.linha
+		obj2 = c.read(linha1)
+		linha2 = obj2.linha
+		linha1.should eq linha2
+	end
+
+end

data/spec/segmentos/segmento_n4_spec.rb

@@ -0,0 +1,47 @@
+require 'spec_helper'
+
+include Cnab240
+
+describe SegmentoN4 do
+
+	it "deve instanciar segmento" do
+		segmento = SegmentoN4.new
+		segmento.should be_an_instance_of(SegmentoN4)
+	end
+
+	it "deve conter campos" do
+		segmento = SegmentoN4.new
+
+		segmento.should respond_to(:receita)
+		segmento.should respond_to(:tipo_identificacao_contribuinte)
+		segmento.should respond_to(:identificacao_contribuinte)
+		segmento.should respond_to(:identificacao_tributo)
+		
+		segmento.should respond_to(:vencimento)
+		segmento.should respond_to(:ie_munic_declar)
+		segmento.should respond_to(:divida_ativa_etiqueta)
+		segmento.should respond_to(:periodo_referencia)
+		segmento.should respond_to(:numero_parcela_notificacao)
+		segmento.should respond_to(:valor_receita)
+		segmento.should respond_to(:valor_juros_encargos)
+		segmento.should respond_to(:valor_multa)
+
+		segmento.should respond_to(:cnab)
+
+	end
+
+	it "deve ter 120 caracteres" do
+		segmento = SegmentoN4.new
+		segmento.linha.length.should be(120)
+	end
+
+	it "deve manter coesao" do 
+		c = Cnab240::SegmentoN4
+		obj = c.new
+		linha1 = obj.linha
+		obj2 = c.read(linha1)
+		linha2 = obj2.linha
+		linha1.should eq linha2
+	end
+
+end

data/spec/segmentos/segmento_n5_spec.rb

@@ -0,0 +1,45 @@
+require 'spec_helper'
+
+include Cnab240
+
+describe SegmentoN5 do
+
+	it "deve instanciar segmento" do
+		segmento = SegmentoN5.new
+		segmento.should be_an_instance_of(SegmentoN5)
+	end
+
+	it "deve conter campos" do
+		segmento = SegmentoN5.new
+
+		segmento.should respond_to(:receita)
+		segmento.should respond_to(:tipo_identificacao_contribuinte)
+		segmento.should respond_to(:identificacao_contribuinte)
+		segmento.should respond_to(:identificacao_tributo)
+		
+		segmento.should respond_to(:exercicio)
+		segmento.should respond_to(:renavam)
+		segmento.should respond_to(:uf)
+		segmento.should respond_to(:municipio)
+		segmento.should respond_to(:placa)
+		segmento.should respond_to(:opcao_pagamento)
+
+		segmento.should respond_to(:cnab)
+
+	end
+
+	it "deve ter 120 caracteres" do
+		segmento = SegmentoN5.new
+		segmento.linha.length.should be(120)
+	end
+
+	it "deve manter coesao" do 
+		c = Cnab240::SegmentoN5
+		obj = c.new
+		linha1 = obj.linha
+		obj2 = c.read(linha1)
+		linha2 = obj2.linha
+		linha1.should eq linha2
+	end
+
+end

data/spec/segmentos/segmento_n6_spec.rb

@@ -0,0 +1,45 @@
+require 'spec_helper'
+
+include Cnab240
+
+describe SegmentoN6 do
+
+	it "deve instanciar segmento" do
+		segmento = SegmentoN6.new
+		segmento.should be_an_instance_of(SegmentoN6)
+	end
+
+	it "deve conter campos" do
+		segmento = SegmentoN6.new
+
+		segmento.should respond_to(:receita)
+		segmento.should respond_to(:tipo_identificacao_contribuinte)
+		segmento.should respond_to(:identificacao_contribuinte)
+		segmento.should respond_to(:identificacao_tributo)
+		
+		segmento.should respond_to(:exercicio)
+		segmento.should respond_to(:renavam)
+		segmento.should respond_to(:uf)
+		segmento.should respond_to(:municipio)
+		segmento.should respond_to(:placa)
+		segmento.should respond_to(:opcao_pagamento)
+
+		segmento.should respond_to(:cnab)
+
+	end
+
+	it "deve ter 120 caracteres" do
+		segmento = SegmentoN6.new
+		segmento.linha.length.should be(120)
+	end
+
+	it "deve manter coesao" do 
+		c = Cnab240::SegmentoN6
+		obj = c.new
+		linha1 = obj.linha
+		obj2 = c.read(linha1)
+		linha2 = obj2.linha
+		linha1.should eq linha2
+	end
+
+end

data/spec/segmentos/segmento_n7_spec.rb

@@ -0,0 +1,46 @@
+require 'spec_helper'
+
+include Cnab240
+
+describe SegmentoN7 do
+
+	it "deve instanciar segmento" do
+		segmento = SegmentoN7.new
+		segmento.should be_an_instance_of(SegmentoN7)
+	end
+
+	it "deve conter campos" do
+		segmento = SegmentoN7.new
+
+		segmento.should respond_to(:receita)
+		segmento.should respond_to(:tipo_identificacao_contribuinte)
+		segmento.should respond_to(:identificacao_contribuinte)
+		segmento.should respond_to(:identificacao_tributo)
+		
+		segmento.should respond_to(:exercicio)
+		segmento.should respond_to(:renavam)
+		segmento.should respond_to(:uf)
+		segmento.should respond_to(:municipio)
+		segmento.should respond_to(:placa)
+		segmento.should respond_to(:opcao_pagamento)
+		segmento.should respond_to(:opcao_retirada)
+
+		segmento.should respond_to(:cnab)
+
+	end
+
+	it "deve ter 120 caracteres" do
+		segmento = SegmentoN7.new
+		segmento.linha.length.should be(120)
+	end
+
+	it "deve manter coesao" do 
+		c = Cnab240::SegmentoN7
+		obj = c.new
+		linha1 = obj.linha
+		obj2 = c.read(linha1)
+		linha2 = obj2.linha
+		linha1.should eq linha2
+	end
+
+end

data/spec/segmentos/segmento_n8_spec.rb

@@ -0,0 +1,45 @@
+require 'spec_helper'
+
+include Cnab240
+
+describe SegmentoN8 do
+
+	it "deve instanciar segmento" do
+		segmento = SegmentoN8.new
+		segmento.should be_an_instance_of(SegmentoN8)
+	end
+
+	it "deve conter campos" do
+		segmento = SegmentoN8.new
+
+		segmento.should respond_to(:receita)
+		segmento.should respond_to(:tipo_identificacao_contribuinte)
+		segmento.should respond_to(:identificacao_contribuinte)
+
+		segmento.should respond_to(:ie_munic_declar)
+		
+		segmento.should respond_to(:origem)
+		segmento.should respond_to(:valor_principal)
+		segmento.should respond_to(:atualizacao_monetaria)
+		segmento.should respond_to(:valor_mora)
+		segmento.should respond_to(:valor_multa)
+		segmento.should respond_to(:data_vencimento)
+		segmento.should respond_to(:periodo_parcela)
+
+	end
+
+	it "deve ter 120 caracteres" do
+		segmento = SegmentoN8.new
+		segmento.linha.length.should be(120)
+	end
+
+	it "deve manter coesao" do 
+		c = Cnab240::SegmentoN8
+		obj = c.new
+		linha1 = obj.linha
+		obj2 = c.read(linha1)
+		linha2 = obj2.linha
+		linha1.should eq linha2
+	end
+
+end

data/spec/segmentos/segmento_n_spec.rb

@@ -26,7 +26,7 @@ describe SegmentoN do
 		segmento.should respond_to(:data_pagamento)
 		segmento.should respond_to(:valor_pagamento)
 
-		segmento.should respond_to(:informacoes_complementares)
+		segmento.should respond_to(:n_complemento)
 
 		segmento.should respond_to(:ocorrencias)
 	end
@@ -36,4 +36,37 @@ describe SegmentoN do
 		segmento.linha.length.should be(240)
 	end
 
+	it "n_complemento deve respeitar choice header (N5)" do
+		lote = Cnab240::Lote.new(:operacao => :pagamento_titulo_tributos, :tipo => :remessa) do |l|
+			l.header.servico_forma = '25'
+		end
+		lote.segmento_n.should be_an_instance_of(Cnab240::SegmentoN)
+		
+		segmento = lote.segmento_n.n_complemento
+
+		segmento.should respond_to(:receita)
+		segmento.should respond_to(:tipo_identificacao_contribuinte)
+		segmento.should respond_to(:identificacao_contribuinte)
+		segmento.should respond_to(:identificacao_tributo)
+		
+		segmento.should respond_to(:exercicio)
+		segmento.should respond_to(:renavam)
+		segmento.should respond_to(:uf)
+		segmento.should respond_to(:municipio)
+		segmento.should respond_to(:placa)
+		segmento.should respond_to(:opcao_pagamento)
+
+		segmento.should respond_to(:cnab)
+
+	end
+
+	it "deve manter coesao" do 
+		c = Cnab240::SegmentoN
+		obj = c.new
+		linha1 = obj.linha
+		obj2 = c.read(linha1)
+		linha2 = obj2.linha
+		linha1.should eq linha2
+	end
+
 end

data/spec/segmentos/segmento_o_spec.rb

@@ -38,4 +38,13 @@ describe SegmentoO do
 		segmento.linha.length.should be(240)
 	end
 
+	it "deve manter coesao" do 
+		c = Cnab240::SegmentoO
+		obj = c.new
+		linha1 = obj.linha
+		obj2 = c.read(linha1)
+		linha2 = obj2.linha
+		linha1.should eq linha2
+	end
+
 end