BigWings

Bom dia, Favor não duplicar tópicos.

Com base nas alterações feitas pelo Italo para o Fortes Report, fiz a mesma implementação para o DANFSE em Fast, rev. 18967. Favor atualizar os fontes e fazer os testes.

O demo do componente ACBrCTe para Delphi/Lazarus é livre e está no repositório: https://svn.code.sf.net/p/acbr/code/trunk2 Agora se você está estudando os demos do ACBrLibCTe, que é a DLL para outras linguagens, temos um fórum específico: Fórum aberto: https://www.projetoacbr.com.br/forum/forum/76-acbrlib/ Fórum para usuários SAC: https://www.projetoacbr.com.br/forum/forum/71-acbrlib/ Pelo que vi, assim como no componente, o método está implementado no ACBrLibCTe, mas ele provavelmente não faz nada.

Então é o que eu disse, a SEFAZ não disponibiliza esse serviço para o CTe, apenas para a NFe.

Se está tentando fazer a consulta de um CTe pela chave de acesso pelo método DistribuicaoDFe realmente não existe esse serviço. Veja a implementação do método no componente: function TACBrCTe.DistribuicaoDFePorChaveCTe(AcUFAutor: integer; const ACNPJCPF, AchCTe: String): Boolean; begin // Aguardando a SEFAZ implementar esse recurso já existente para a NF-e. Result := False; GerarException('Aguardando a SEFAZ implementar esse recurso já existente para a NF-e.'); // Result := Distribuicao(AcUFAutor, ACNPJCPF, '', '', AchCTe); end; Já a consulta do protocolo por chave de acesso do CTe deve funcionar normalmente.

Configurei assim e tive o mesmo erro. Aparentemente o webservice não suporta esse protocolo. Tente com LT_all ou LT_SSLv3.

Pelo que entendi, o documento é apenas uma solicitação por parte de um senador. Houve alguma definição?

Verifique também como está informando a propriedade SSLType.

Veja que o // antes da diretiva significa que ela está comentada, portanto não ativada. Se você copiou as DLL da pasta MinGW sem ativar a diretiva esse pode ser o problema. Creio que não haja mais necessidade de usar as DLL MinGW, tente copiar as DLLs da pasta ACBr\DLLs\OpenSSL, última versão.

Provavelmente é algo relacionado a hardware. Mau contato na leitora ou na porta USB.

Essa parece a configuração padrão do ACBr.inc. Você ativou a diretiva {$DEFINE USE_MINGW}? Se fez isso, copiou também as DLLs da MinGW?

Fique a vontade para fazer a correção e anexar os arquivos alterados aqui que pode ser analisado e enviado ao SVN.

O que quer dizer com "não reconhece o certificado"? Tem alguma mensagem de erro? É certificado A1 ou A3?

Quem gera as dezenas é a SEFAZ-MS, no ACBr só foi preciso implementar a impressão das mesmas no DANFE. As regras que ela usa pra gerar ou não não estão muito claras. Talvez nesse caso não foi gerado por ser uma operação interestadual...

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

O apagarACBr.bat não apaga alguns dcu, geralmente os de terceiros. Então mesmo executando o apagaracbr ainda pode haver algum arquivo smtpsend.dcu ou smtpsend.pas desatualizado em algum lugar que o Delphi está encontrando na compilação. Então você precisa fazer uma varredura em todos os discos por estes arquivos e se for o caso removê-los ou atualizá-los.

Não, mas você pode desativar a gravação automática pelo componente e salvar manualmente de acordo com o schema.

Que saiba o ACBrNFe pelo método DistribuicaoDFe não salva os arquivos em TXT. Isso me parece outro assunto, talvez você deva abrir outro tópico. Eu não trabalho nem tenho conhecimento do formato em TXT.

Como você mesmo disse, pra ajudar os demais que tiverem a mesma dúvida e chegarem neste tópico.

Não está implementado dessa forma para NFCe. Que me lembre foi implementado para o MFe por obrigatoriedade pelo CE. Existe essa obrigatoriedade também no caso da NFCe?

Provavelmente tem algo errado no código e está tentando acessar um item que não existe. Se estiver usando for..do aninhados verifique as variáveis de controle. Não entendi essa parte.

Devia cair no schprocEventoNFe. Consegue ver pelo debug qual schema está carregando?

Os "em branco" podem ser eventos e não notas. Você pode testar o tipo de documento retornado acessando a propriedade schema: case ACBrNFe1.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items[0].schema of schresNFe: ; // resumo de nfe schresEvento: ; // resumo de evento schprocNFe: ; // nfe completa schprocEventoNFe: ; // evento end;

Você está chamando o comando </logo>, esse comando depende da imagem já estar carregada na memória da impressora. Para fazer apenas informando o caminho, você pode tentar o comando <bmp>, veja exemplo no tópico que citei.