Dúvidas com XML

237 views
Skip to first unread message

12800006

unread,
Oct 8, 2009, 4:01:39 PM10/8/09
to dug...@googlegroups.com

Boa tarde pessoal,

 

Eu poderia me ajudar com relação a leitura de arquivos XML da NFe?

 

Preciso criar uma aplicação que lei os arquivos XML assinados e validados que estejam em uma determinada pasta, interprete cada arquivo desse diretório e em seguida gere um arquivo que contenha os dados da nota fiscal, o cadastros dos produtos constantes como itens dessa nota, e também as informações do cliente dessa nota, e por fim gere um arquivo texto com essas informações para que seja importado em um sistema de escrituração fiscal.

Alguém tem experiência com NFe + Delphi?

 

Obrigado.

 

Att

 

Carlos Marcelo

 



__________ Informação do ESET NOD32 Antivirus, versão da vacina 4491 (20091008) __________

A mensagem foi verificada pelo ESET NOD32 Antivirus.

http://www.eset.com

Newton Michel de Oliveira

unread,
Oct 8, 2009, 4:20:01 PM10/8/09
to dug...@googlegroups.com
Carlos,
   eu desenvolvo a solução de nota fiscal e de conhecimento eletronico. o que você quer fazer?


Newton Michel de Oliveira www.nmooliveira.com.br
Mobile 55 51 92358577
Consultor de TI
Embarcadero Delphi 2009 Programming

Public Profile
http://www.linkedin.com/in/newtongaucho




2009/10/8 12800006 <1280...@maxsp.com.br>

12800006

unread,
Oct 8, 2009, 4:23:36 PM10/8/09
to dug...@googlegroups.com

Eu gostaria apenas de ler os arquivos XML e extrair deles as informações referentes a nota fiscal, como por exemplo CFOP, Valores de ICMS, Contábil, IPI, impostos em geral, mais as informações dos itens.

 

Uma orientação de qual componente usar, como ler os nodes do XML e daí poder extrair as informações.

 

Obrigado.


Diego Campos Rosa

unread,
Oct 8, 2009, 4:36:49 PM10/8/09
to dug...@googlegroups.com
Carlos,

Eu trabalho com xml e utilizo sempre duas alternativas, que são as seguintes:
1. O componente XMLDocument da paleta Internet
2. Utilizar o XML Mapper para utilizar um ClientDataSet

Ou no caso da NF-e o componente ACBrNFePCN (http://acbr.sourceforge.net/drupal/?q=node/36) pode te ajudar.

Abraços.

Atenciosamente,
Diego Campos Rosa diego.ca...@gmail.com
Mobile 55 51 84597563
Consultor da Aquasoft Tecnologia da Informação
Fone +55 51 3022-3188 - Porto Alegre/RS - Brasil
Embarcadero™ Delphi® 2007

Public Profile
http://www.linkedin.com/in/diegocamposrosa82


2009/10/8 12800006 <1280...@maxsp.com.br>

Jefferson Follmann

unread,
Oct 8, 2009, 4:43:16 PM10/8/09
to dug...@googlegroups.com
Eu utulizei aqui um leitor muitoo bom.
O nome dele é XML Parser ( open source ).

Você pode efetuar o download do componente em:
http://www.destructor.de/xmlparser/index.htm

O bom é que no site deles, tem até uns demos ( http://www.destructor.de/xmlparser/download.htm ) para demonstrar como utilizar o componente.

Eu sinceramente, recomendo sempre este componente para leitura de XML.
Acho que ele dá de 10 a ZERO no XmlDocument.

Mas cadum, cadum.. hehehe

Isso ae, abraço!

2009/10/8 Diego Campos Rosa <diego.ca...@gmail.com>



--
O único erro da natureza, é a incompetência não doer.
Linux User #490529.
Linux: Live FREE or DIE!

Samuel

unread,
Oct 8, 2009, 5:27:57 PM10/8/09
to dug...@googlegroups.com
Boa tarde Jefferson,

Tentei acessar esse endereço que você passou mas a página não está "entrando". Já que o componente é open source, se o instalador tiver menos que 20MB você pode enviá-lo para meu email ?

Hoje nós usamos o EMS Advanced Data Import para ler arquivos XML que é extremamente fácil de usar e muito completo e, além de arquivos XML ele processa XLS, TXT, CSV, DBF e mais um monte de formatos.

Se quiser conhecê-lo o endereço do produto é http://www.sqlmanager.com.br/html/dataimport_vcl.html

[ ]s

Samuel

Newton Michel de Oliveira

unread,
Oct 8, 2009, 5:45:24 PM10/8/09
to dug...@googlegroups.com
Samuel,
     esta entrando sim


Newton Michel de Oliveira www.nmooliveira.com.br
Mobile 55 51 92358577
Consultor de TI
Embarcadero Delphi 2009 Programming

Public Profile
http://www.linkedin.com/in/newtongaucho




2009/10/8 Samuel <e...@sqlmanager.com.br>

Samuel

unread,
Oct 9, 2009, 7:01:18 AM10/9/09
to dug...@googlegroups.com
Bom dia,

Aqui do escritório entra, mas lá em casa não consegui acessar.

Estranho. . .

Mas já estou baixando o componente para conhecê-lo.

Samuel

Samuel

unread,
Oct 9, 2009, 7:39:55 AM10/9/09
to dug...@googlegroups.com

Bom dia Jefferson,

Fui baixar esse componente e logo na página de entrada diz que ele não é compatível com o Delphi 2009 e que o desenvolvedor não sabe quando conseguirá compatibilizá-lo com essa versão do Delphi.

Por acaso você sabe se alguém já conseguiu compatibilizá-lo com o D2009 ?


[ ]s

Samuel


Jefferson Follmann escreveu o seguinte  em 08/10/2009 17:43:

Jefferson Follmann

unread,
Oct 9, 2009, 8:00:26 AM10/9/09
to dug...@googlegroups.com
Bom dia Samuel.

Acabei não conseguindo acessar o email ontem a noite, por isso não respondi antes.

Vamos ao caso:
Cara, eu sinceramente não sabia que o componente não era compativel com o D2009.
Trabalho aqui na empresa com o D7 ( sim, ainda tem gente que usa o D7 :P ) e rolou de boa.
Infelizmente não tenho maiores informações de como fazer este componente funcionar no D2009.

Outra sugestão que posso te dar é o NativeXML ( http://www.simdesign.nl/xml.html )
Mas já te adianto que é uma solução paga.
Deste componente é só escutei falar bem dele, mas não cheguei a trabalhar com ele.
Dizem que é de fácil implementação e com preço acessivel ( não posso te garatir isso, só escutei falar de fontes seguras )

Acessando o site deles, notei que eles não citam compatibilidade com a versão do D2009
" Languages: Delphi (2,3,4,5,6,7,2005,2006,2007 Win32 and .NET), Kylix, C++ Builder "

Mas tenta dar uma pesquisada né, vai que rola..

Outra coisa que posso te indicar, é os componentes da comunidade Delphi TISS ( Google Groups ).
Apenas para ti saber, estes componentes foram criados com o objetivo de atender a geração/leitura de XML para uma mudança de processos na ANS ( Agencia Nacional de Saúde ).
Á uns tempos atrás, andei dando uma lida nos fontes deste componente e notei que eles são beeeeeem simples ( até meio burrinhos pra ser sincero... hehehe ).
CLARO, que eles não vão resolver o teu problema, mas daqui a pouco te auxiliam em criar uma solução tua.
O link da Comunidade Delphi TISS no google groups é:
http://groups.google.com.br/group/comunidade-delphi-tiss?hl=pt-BR&pli=1

Acredito que seja isso cara.
Espero ter te auxiliado.

Abraço!

2009/10/9 Samuel <e...@sqlmanager.com.br>

Samuel

unread,
Oct 9, 2009, 9:37:11 AM10/9/09
to dug...@googlegroups.com
Jefferson,

Não esquenta.

Como eu disse, hoje já usamos o Advanced Data Import e ele lê muito bem arquivos XML, XLS, DOCX, XLSX, TXT, CVS e vários outros formatos.

Vamos continuar com ele, só queria conhecer esse que você falou. Esse que usamos é uma solução "paga" mas o custo dele não é tão elevado perto do benefício que ele trás para a gente. Inclusive, o ADI tem um assistente que pode ser incorporado na aplicação que permitiu transferir para o usuário dos nossos programas a tarefa de "ligar" os campos do nosso banco de dados com os do arquivo que ele deseja importar.

Usando esse assistente, ele pode ter o arquivo em qualquer formato e com os campos em qualquer ordem, basta que, antes de efetuar a importação, ele informe qual o formato do arquivo (XLS, XML, TXT, CVS, etc) e em seguida "ligue" os campos com os da nossa aplicação.

Se tiver curiosidade de ver como ele é, baixe a versão trial no endereço http://www.sqlmanager.com.br/html/dataimport_vcl.html

[ ]s

Samuel

Wecsley Fey

unread,
Oct 9, 2009, 10:26:33 AM10/9/09
to DUG-RS
 Carlos,
 
 O interessante em usar o ACBrNFePCN para este caso é a facilidade da persistência dos dados.
 
 Se você possui um arquivo de NF-e válido e assinado, somente necessitas dar um "LoadFromFile" através do componente e já tens tudo persistido, estruturado totalmente OO.
 
 Abraço !
 

Att,
Wecsley Fey
Analista de Sistemas
Aquasoft Tecnologia da Informação
http://www.aquasoft.com.br
Fone (51) 3022-3188 - Porto Alegre/RS - Brasil
Parceira Embarcadero no RS




 

Date: Fri, 9 Oct 2009 10:37:11 -0300
From: e...@sqlmanager.com.br
To: dug...@googlegroups.com
Subject: [dug-rs] Re: Dúvidas com XML

12800006

unread,
Oct 9, 2009, 10:45:30 AM10/9/09
to dug...@googlegroups.com
Bom dia Wecsley,
 
Eu procurei um manual ou algo do tipo de como utilizar o ACBrNFePCN, porém não achei, você poderia me passar algum material, ou onde posso baixar?
 
Obrigado.
 
 
 


De: dug...@googlegroups.com [mailto:dug...@googlegroups.com] Em nome de Wecsley Fey
Enviada em: sexta-feira, 9 de outubro de 2009 11:27
Para: DUG-RS

__________ Informação do ESET NOD32 Antivirus, versão da vacina 4493 (20091009) __________


A mensagem foi verificada pelo ESET NOD32 Antivirus.


http://www.eset.com



__________ Informação do ESET NOD32 Antivirus, versão da vacina 4493 (20091009) __________

12800006

unread,
Oct 9, 2009, 10:56:13 AM10/9/09
to dug...@googlegroups.com
Bom dia.
 
Eu instalei o componente  ACBrNFePCN, porém como faço para utiliza-lo?
 
Eu fiz um laço para carregar os arquivo xml das nfe assinados, como segue abaixo:
 
for qtdarq := 0 to FileListBox1.Count - 1 do
   begin
      XMLDocument1.Active := false;
      XMLDocument1.FileName := FileListBox1.items[qtdarq];
      XMLDocument1.Active := true;
   end;
Com isso eu fico com xml do primeiro arquivo. Agora como que faria para "pegar" as informações de cada tag? Por exemplo quero obter as informações dos itens que compõe essa NFe, como faria para obter essas informações?
Segue abaixo o trecho de um arquivo xml:
- <det nItem="1">
- <prod>
  <cProd>00001</cProd>
  <cEAN />
  <xProd>Agua Mineral</xProd>
  <CFOP>5101</CFOP>
  <uCom>dz</uCom>
  <qCom>1000000.0000</qCom>
  <vUnCom>1</vUnCom>
  <vProd>10000000.00</vProd>
  <cEANTrib />
  <uTrib>und</uTrib>
  <qTrib>12000000.0000</qTrib>
  <vUnTrib>1</vUnTrib>
  </prod>
- <imposto>
- <ICMS>
- <ICMS00>
  <orig>0</orig>
  <CST>00</CST>
  <modBC>0</modBC>
  <vBC>10000000.00</vBC>
  <pICMS>18.00</pICMS>
  <vICMS>1800000.00</vICMS>
  </ICMS00>
  </ICMS>
- <PIS>
- <PISAliq>
  <CST>01</CST>
  <vBC>10000000.00</vBC>
  <pPIS>0.65</pPIS>
  <vPIS>65000</vPIS>
  </PISAliq>
  </PIS>
- <COFINS>
- <COFINSAliq>
  <CST>01</CST>
  <vBC>10000000.00</vBC>
  <pCOFINS>2.00</pCOFINS>
  <vCOFINS>200000.00</vCOFINS>
  </COFINSAliq>
  </COFINS>
  </imposto>
  </det>
- <det nItem="2">
- <prod>
  <cProd>00002</cProd>
  <cEAN />
  <xProd>Agua Mineral</xProd>
  <CFOP>5101</CFOP>
  <uCom>pack</uCom>
  <qCom>5000000.0000</qCom>
  <vUnCom>2</vUnCom>
  <vProd>10000000.00</vProd>
  <cEANTrib />
  <uTrib>und</uTrib>
  <qTrib>3000000.0000</qTrib>
  <vUnTrib>0.3333</vUnTrib>
  </prod>
- <imposto>
- <ICMS>
- <ICMS00>
  <orig>0</orig>
  <CST>00</CST>
  <modBC>0</modBC>
  <vBC>10000000.00</vBC>
  <pICMS>18.00</pICMS>
  <vICMS>1800000.00</vICMS>
  </ICMS00>
  </ICMS>
- <PIS>
- <PISAliq>
  <CST>01</CST>
  <vBC>10000000.00</vBC>
  <pPIS>0.65</pPIS>
  <vPIS>65000</vPIS>
  </PISAliq>
  </PIS>
- <COFINS>
- <COFINSAliq>
  <CST>01</CST>
  <vBC>10000000.00</vBC>
  <pCOFINS>2.00</pCOFINS>
  <vCOFINS>200000.00</vCOFINS>
  </COFINSAliq>
  </COFINS>
  </imposto>
  </det>
 
Alguém saberia me orientar?
 


De: dug...@googlegroups.com [mailto:dug...@googlegroups.com] Em nome de Wecsley Fey
Enviada em: sexta-feira, 9 de outubro de 2009 11:27
Para: DUG-RS

__________ Informação do ESET NOD32 Antivirus, versão da vacina 4493 (20091009) __________


A mensagem foi verificada pelo ESET NOD32 Antivirus.


http://www.eset.com



__________ Informação do ESET NOD32 Antivirus, versão da vacina 4493 (20091009) __________

luiz

unread,
Oct 13, 2009, 2:19:36 PM10/13/09
to dug...@googlegroups.com
Olá Colegas!
 
Estou a procura de uma solução de TEF para pequenas empresas (preferencialmente que não seja discado) , atualmente trabalho com TEF dedicado (integrador Direção) só que para pequenos comércios se torna inviável (link x25, servidor dedicado etc... )  o custo para o cliente final fica muito elevado. Alguem trabalha com Pay & Go?, aparentemente, esta,  me parece ser uma solução intermediária, alguem a utiliza? poderia me informar os custos, como é a comercialização etc... ou qualquer outra solução TEF que estejam usando atualmente...
 
a quem puder ajudar agradeço imensamente...
 
obrigado

Steve Narancic

unread,
Oct 13, 2009, 2:19:39 PM10/13/09
to dug...@googlegroups.com

Também terei que desenvolver um módulo TEF no sistema, mas ainda não parei para estudar sobre esse assunto....

 

 

De: dug...@googlegroups.com [mailto:dug...@googlegroups.com] Em nome de luiz


Enviada em: terça-feira, 13 de outubro de 2009 15:20
Para: dug...@googlegroups.com

Steve Narancic.vcf

Jackson [ Condata Informática ]

unread,
Oct 13, 2009, 2:21:38 PM10/13/09
to dug...@googlegroups.com
Existem 3 tipos de TEF (discado, dedicado e TEF IP)
Discado é pela SevenPDV e Express
Dedicado é direção
TEF IP é Pay&Go, tem uma solução da Getnet se não me enagano.
 
o TEF IP é parecido com dedicado, porem não é necessaria a linha X25, mas tbm tem um custo mensal porem menor que o dedicado.
 
att,
Jackson de Fraga

luiz

unread,
Oct 13, 2009, 2:34:39 PM10/13/09
to dug...@googlegroups.com
Olá Jackson!
 
Pois é... a princípio estou mais inclinado a essa solução da Pay & Go, até porque ela trabalha com as principais operadoras de cartão do mercado (visanet, redercard, amex, hipercard e pra nós gaúchos...  o banrisul), só que ainda não consegui obter os custos para o cliente final, no site as informações não são muito claras... tentei entrar em contato... mas ainda não tive resposta... saberia me informar alguma coisa de valores...
 
obrigado

Jackson [ Condata Informática ]

unread,
Oct 13, 2009, 2:32:54 PM10/13/09
to dug...@googlegroups.com
Tem uma solução Daruma by Pay&Go
 
liga pro pessoal da daruma. eu tinha os custos, mas não achei aqui.
 
 

Newton Michel de Oliveira

unread,
Oct 13, 2009, 4:19:04 PM10/13/09
to dug...@googlegroups.com
Pessoal,
    eu trabalho na Direção que é a fornecedora de TEF, e existe todas as opções, discada, dedicado e tambem existe a hospedagem, que depende do tamanho da empresa, pode ficar bem em conta, ,as Luiz, você como integrador deveria saber disto né?


Newton Michel de Oliveira www.nmooliveira.com.br
Mobile 55 51 92358577
Consultor de TI
Embarcadero Delphi 2009 Programming

Public Profile
http://www.linkedin.com/in/newtongaucho




2009/10/13 Jackson [ Condata Informática ] <jac...@condatars.com.br>
Reply all
Reply to author
Forward
0 new messages