Ler XML NF-e Emitidas por Fornecedores

[Hilderaldo Barbosa]

Pessoal, bom dia

Estou fazendo uma aplicativo para Ler os xml do meus fornecedores atraves do componente

acbrnfe, mas ao ler o xlm e importar os dados para minha base de dados, porém quando cheguei nos itens da nota a tag

myqueryCOD_CST.value := acbrNFE1.NotasFiscais.items[0].NFe.Det.Items[0].Imposto.ICMS.

o que ocorre é que não aparece a tag ICMS00.cst constante no xml desta nf-e

veja imagem do que ocorre.

grato pela atenção

Hilderaldo Barbosa

[Régys Silveira]

Utilize as seguinte propriedades:

            

  Origem = Det.Items[X].Imposto.ICMS.orig

  CST = Det.Items[X].Imposto.ICMS.CST

  Redução da Base de Cálculo = Det.Items[X].Imposto.ICMS.pRedBC

  Alíquota ICMS= Det.Items[X].Imposto.ICMS.pICMS

[/code]

[Hilderaldo Barbosa]

Utilize as seguinte propriedades:

            

  Origem = OrigemToInt(Det.Items[X].Imposto.ICMS.orig)

  CST = CstIcmsToString(Det.Items[X].Imposto.ICMS.CST);

  Redução da Base de Cálculo = Det.Items[X].Imposto.ICMS.pRedBC;

  Alíquota ICMS= Det.Items[X].Imposto.ICMS.pICMS

Caro Regys,

Esta retornando a mensagem que o operador não esta declarado,

Undeclared Identifier CstIcmsToString ,

acbr todo instalado e apontadas as pastas no Library Path.

att;

Hilderaldo Barbosa

[Régys Silveira]

Desculpe, são funções minhas para transformar os valores para string, considere somente o que for da NF-e.

[Leopold Koenig]

Regys, estou com a mesma dúvida do Hilderaldo e ainda não consegui capturar a informação do CST constante na NFe, considerando que o Identificador não está declarado eu não consigo converter o tipo TpcnCstICMS por exemplo para "String".

 

Como exemplo, como devo informar para que a seguinte expressão retorne "00"? Estou executando o seguinte código e gera a incompatibilidade acima mencionada.

 

"IcmsCst := ACBrNFe.NotasFiscais.Items[0].NFe.Det.Items.Imposto.ICMS.CST.cst00;"

 

Um ponto importante, tentei usar o ICMSCstToStr e também não funcionou.

 

 

===========================

 

Achei o problema, faltou incluir uses "pcnConversao".

Editado 31 Julho, 2013 por Leopold Koenig