BigWings

No repositório não consta nenhum arquivo .otares. Tente fazer revert completo da pasta ACBr\Pacotes.

Não, apenas A1.

Carregue pelo DadosPFX ou ArquivoPFX, e não pelo número de série (deixe este campo em branco).

Nesse caso a exceção parece ser disparada pelo método TDFeWinCrypt.CarregarCertificadoDeNumeroSerie. Aparentemente você está tentando carregar o certificado pelo número de série, mas o mesmo não está instalado no Windows.

Como o tópico é muito antigo é improvável que você vai ter uma resposta. Vou encerrar o tópico. Encontrei algo abaixo que talvez te ajude, se ainda tiver dúvidas abra um novo tópico e detalhe melhor o problema.

Não, você está fazendo confusão. NFe é uma coisa, NFSe é outra. O projeto que gera a DLL ACBrNFe32.dll depende do package ACBrNFe, e este depende de vários outros packages do ACBr, instalados na IDE do Lazarus, então se você conseguiu compilar a DLL da NFe imagino que tenha feito tudo isso. Já pra NFSe não tem DLL, o que existe é só o projeto do programa exemplo do componente, este depende do package ACBrNFSe instalado na IDE. Exatamente. No momento está sendo feito um refactoring do componente ACBrNFSe, pra no futuro possibilitar a implementação como DLL.

Se a operação não é com consumidor final, nesse caso vai cair na rejeição 773: Veja que existe exceção caso informe local de entrega ou retirada, então a saída a meu ver seria esta.

Se você já tem o Lazarus instalado, e já compilou a dll da NFe, já deve ter boa parte dos componentes do ACBr instalados, então basta adicionar o package do ACBrNFSe a ele, se ainda não tiver feito. Após isso pode estudar o programa exemplo. Por enquanto ele funciona apenas como componente para ser usado em Delphi ou Lazarus.

Essa mensagem não parece vir do ACBr, e sim da sua aplicação. Então é difícil saber sem ver o código, pra saber como você está fazendo a carga do certificado. Não entendi porque está acessando um A1 pelo número de série... Consegue rodar o programa exemplo do componente lá pra ver se tem erro?

Experimente usar o objeto ACBrCTe1.WebServices.Consulta pra obter o cStat e protocolo

Você está em homologação. E não há nenhuma nota emitida em homologação para o CNPJ consultado.

Qual foi exatamente a resposta? Anexe o log do ACBrMonitorPLUS. Para obter CTe precisa usar o objeto CTE. https://acbr.sourceforge.io/ACBrMonitor/CTEDistribuicaoDFe.html

Está consultando em produção ou homologação?

No seu outro tópico o Juliomar já te respondeu: Sugiro que leia com calma a Nota Técnica cujo link consta no manual. Tem também as video aulas sobre o método. https://www.projetoacbr.com.br/forum/video/browse/37-aula-24-distribuicao-dfe/

Parece correto o .ini. Também não consegui simular o erro, com o seu trecho de código não tive problema. Se possível descreva um passo a passo onde o problema ocorre, de preferência usando o programa exemplo do componente.

Desde que esteja também no XML, sim.

Imprimir algo no DANFE que não esteja no XML não é permitido pelo manual. O que você pode fazer é concatenar o código do cliente junto à tag xNome.

Anexe também o arquivo Cidades.ini que está usando. Pelo erro, deve ter algo errado nele.

Tente usar o OnAfterPrint do componente TfrxReport. procedure TForm1.frxReport1AfterPrint(Sender: TfrxReportComponent); begin if Sender.Name = 'MasterData1' then ShowMessage('Hello'); end;

Entendi, mas o código que postou a meu ver não vai surtir efeito, não é porque mudou o cursor no dataset que a banda vai refletir o conteúdo automaticamente, o relatório já foi preparado. Se você tem os fontes (eu não tenho), pode estudar os métodos de exportação padrão.

Em que momento você está chamando essa rotina? Se o relatório não está em execução creio que vai retornar em branco mesmo. Me parece que o correto nesse caso seria implementar o OnBeforePrint da banda.

Nesse caso só precisa trocar CodServ por ItemListaServico.

Obrigado por reportar. Fechando. Para novas dúvidas, criar um novo tópico.

Veja no código que a tag é gerada para cada item da nota, então deve ser informada na NFSe.Servico.ItemServico[ x ].ItemListaServico.