importar XML NFSe

[Alexandre - Ábaco Inf.]

Boa tarde.

Preciso fazer a importação dos XMLs de serviços para um cliente. Utilizo o componente ACBrNFSe1

  ShowmEssage('Nota Numero: ' + ACBrNFSe1.NotasFiscais.Items[0].NFSe.Numero);
  ShowmEssage('Código de Verificação: ' + ACBrNFSe1.NotasFiscais.Items[0].NFSe.CodigoVerificacao);
  ShowmEssage('Data de Emissão: ' + DateToStr(ACBrNFSe1.NotasFiscais.Items[0].NFSe.DataEmissao)); 

esses campos retornam valores corretos

  ShowmEssage('CNPJ Prestador: ' + ACBrNFSe1.NotasFiscais.Items[0].NFSe.Prestador.cnpJ);
  ShowmEssage('IE Prestador: ' + ACBrNFSe1.NotasFiscais.Items[0].NFSe.Prestador.InscricaoEstadual);
  ShowmEssage('Razao: ' + ACBrNFSe1.NotasFiscais.Items[0].NFSe.Prestador.RazaoSocial);
  ShowmEssage('Endereco ' + ACBrNFSe1.NotasFiscais.Items[0].NFSe.Prestador.Endereco.Endereco);
  ShowmEssage('Bairro: ' + ACBrNFSe1.NotasFiscais.Items[0].NFSe.Prestador.Endereco.Bairro);   

esses campos retornam VAZIOS

Preciso do Valor da Nota, Discriminação do Serviço, dados do Prestador.

OS XMLs de serviços mudam de cidade pra cidade?

alguem pode me ajudar?

 

obg

Alexandre

 

[Italo Giurizzato Junior]

Boa tarde Alexandre,

Você ainda esta usando o componente antigo?

Lhe convido a iniciar os testes com o novo componente de emissão de NFS-e: ACBrNFSeX
O componente antigo: ACBrNFSe não vai mais ter manutenção.

Faça os testes usando o programa exemplo do novo componente.

Manual de Migração
https://www.projetoacbr.com.br/forum/topic/63017-manual-de-migração-para-o-novo-componente-de-emissão-de-nfs-e/
 

[Alexandre - Ábaco Inf.]

Bom dia Italo., tudo bem?

então... estou apenas tentando importar uma NFSe, não preciso emitir nota.

Tentei fazer a importação usando o componente novo. Mudo a propriedade Provedor para proSigISS e mesmo assim da o erro de "Nenhum provedor selecionado"

ACBrNFSeX1.NotasFiscais.Clear;
 ACBrNFSeX1.NotasFiscais.LoadFromFile(edtLocalS.Text, false);

  ShowmEssage('Nota Numero: ' + ACBrNFSeX1.NotasFiscais.Items[0].NFSe.Numero);
  ShowmEssage('Código de Verificação: ' + ACBrNFSeX1.NotasFiscais.Items[0].NFSe.CodigoVerificacao);
  ShowmEssage('Data de Emissão: ' + DateToStr(ACBrNFSeX1.NotasFiscais.Items[0].NFSe.DataEmissao));
  ShowmEssage('Razao: ' + ACBrNFSeX1.NotasFiscais.Items[0].NFSe.Prestador.RazaoSocial);
  ShowmEssage('Endereco ' + ACBrNFSeX1.NotasFiscais.Items[0].NFSe.Prestador.Endereco.Endereco);
  ShowmEssage('Bairro: ' + ACBrNFSeX1.NotasFiscais.Items[0].NFSe.Prestador.Endereco.Bairro);

Dúvida: como vou fazer uma importação pode existir notas de servicos com xmls diferentes. Neste caso preciso saber qual o servidor de cada Nota?  Ou esta rotina ira me servir para tds os tipos de notas (xmls)??

att

Alexandre

[Alexandre - Ábaco Inf.]

boa tarde. Alguém tem alguma rotina para ler o xml de uma nota de servico com essa estrutura?

 

Obrigado.

 

[Rodrigo - Digibyte]

Não precisa saber ou escolher manualmente o provedor de cada cidade, o ACBR faz isso pelo código do município. Existia também uma leitura do XML para tentar identificar o provedor, mas no X acho que é só pelo município mesmo:

ACBrNFSe.Configuracoes.Geral.CodigoMunicipio

O XML varia entre provedores, não entre cidades, mas pode haver alguma situação específica

O ACBRNFSE X está com problema para ler a nota do provedor SIG quando baixado do site

O ACBRNFSE anterior deve estar funcionando, não tenho certeza, talvez falhe algum campo

Pra pegar o CNPJ experimente:

ACBrNFSe.NotasFiscais.Items[i].NFSe.PrestadorServico.IdentificacaoPrestador.Cnpj)

 

[Alexandre - Ábaco Inf.]

pelo AcbrNFSeX da erro ao passar o codigo ibge (3556602- panorama/sp) deve ser pq nao tem essa cidade no componente,

voltei pro AcbrNFSe e mesmo assim nao consigo ler o xml. 

em azul eu consigo ler os dados... no vermelho nao, so vem vazio.

[Italo Giurizzato Junior]

Bom dia Alexandre,

Faça testes usando o programa exemplo.

Use o botão para imprimir o DANFSE.