Ir para conteúdo
  • Cadastre-se

dev botao

NFSeX - Equiplano - Novo campo: nrCidadeIbgeServico


Ver Solução Respondido por Italo Giurizzato Junior,
  • Este tópico foi criado há 718 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

  • Consultores
  • Solution
Postado

Bom dia Marcos,

Já esta no SVN.

Favor atualizar os fontes, reinstale o ACBr e faça novos testes.

Fiz uma pequena alteração na sua contribuição visando obter a lista de resumos de todas as notas que porventura constam no retorno e não somente a primeira.

Consultor SAC ACBr

Italo Giurizzato Junior
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr

Analista de Sistemas / Araraquara-SP

Araraquara - A era dos Trólebus

Postado (editado)

Meu objetivo com este codigo

 

  if i = 1 then
  begin
    Response.NumeroNota := ANota.NFSe.Numero;
    Response.CodVerificacao := ANota.NFSe.CodigoVerificacao;
    Response.Data := ANota.NFSe.DataEmissao;
    Response.NumeroRps := ANumRps;
  end;

era manter o mesmo comportamento anterior, se retornar apenas 1 na lista, já retornar os dados como se não fosse o retorno de lista. (não sei se consegui ser claro)

 

Desta maneira conseguia obter o número da nota de maneira simples:

LNumeroNota := ACBrNFSeX.WebService.ConsultaLoteRps.NumeroNota;

 

E agora tenho que varrer o resumo.

Mas tudo bem, o objetivo era facilitar, estou adequando o código do sistema e passando para o departamento de testes.

 

Editado por -=Ma®©oS=-

-=Ma®©oS=-

Postado

A questão de retornar o resumo não tinha conhecimento, para mim bastava isto aqui:

 ANota := TACBrNFSeX(FAOwner).NotasFiscais.FindByRps(ANumRps);
 ANota.NFSe.Numero := ObterConteudoTag(AuxNode.Childrens.FindAnyNs('nrNfse'), tcStr);
 ANota.NFSe.CodigoVerificacao := ObterConteudoTag(AuxNode.Childrens.FindAnyNs('cdAutenticacao'), tcStr);
 ANota.NFSe.DataEmissao := ObterConteudoTag(AuxNode.Childrens.FindAnyNs('dtEmissaoNfs'), tcDat);

-=Ma®©oS=-

  • 2 semanas depois ...
Postado

Teste aprovado, departamento de testes aprovou emitindo com prestador dentro e fora do municipio, com retenção, sem retenção e mais algumas coisas que não lembro agora.

Podem fechar.

Obrigado

-=Ma®©oS=-

  • Este tópico foi criado há 718 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.
Visitante
Este tópico está agora fechado para novas respostas
×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.