EMBarbosa

Moderação: Tópico movido

Olá pessoal, Queremos informar a todos que estamos removendo o componente ACBrSPEDFCONT. Talvez você nem saiba o que é... Nesse caso, não se preocupe, seu trabalho não será afetado. O FCONT já não é mais usado desde 2015. Fiquem tranquilos porque essa remoção não afeta de nenhum modo os outros componentes SPED. Vocês já devem ter visto o seguinte tópico falando de sua descontinuação:

Sim. Muito obrigado por ter avisado. Passou batido porque o erro só acontece no Delphi 7. Não acontece no Lazarus nem em versões mais novas do Delphi.

Sua mensagem de erro ficou incompleta. Ficou faltando a seguinte parte: C:\ProgHD\Delphi7\ACBr\Fontes\ACBrDFe\ACBreSocial\PCNeSocial\pcesS2300.pas(463) Error: Object or class type required C:\ProgHD\Delphi7\ACBr\Fontes\ACBrDFe\ACBreSocial\PCNeSocial\pcesNaoPeriodicos.pas(56) Fatal: Could not compile used unit '..\..\..\..\Fontes\ACBrDFe\ACBreSocial\PCNeSocial\pcesS2300.pas' mas não se preocupe. Basta atualizar novamente. Uma correção foi enviada ao SVN.

Você não tem uma licença community instalada na sua máquina. Veja essa linha que aparece várias vezes no seu arquivo de log: Isso indica que a versão instalada não suporta compilação por linha de comando.

Esse site já foi mencionado aqui no fórum. O maior problema levantado na época foi que as consultas eram feitas em cache e por isso em geral estariam desatualizadas. Nesse tópico tem até uma usuária que conseguiu fazer a consulta diretamente pelo Delphi, sem o uso do componente ACBrConsultaCNPJ.

Ok. Enviei ao SVN. Queira por favor atualizar, testar e reportar qualquer problema.

Vai mesmo. Principalmente levando em conta que esse serviço é instável, logo vamos ter vários usuários reclamando que seus aplicativos travaram. Trate isso na sua aplicação. Coloque um número limite de tentativas. Por último, se não me falha a memória, existem outros códigos http que são OK mas não é 200.

Sempre que esse tipo de problema acontece é bom você primeiro verificar se os programas de exemplo estão funcionando. Como é um erro http 500, é bom também verificar se não é um problema no servidor. Verifique também as sugestões desse tópico: https://www.projetoacbr.com.br/forum/topic/48844-codigo-ibeg/

Notei que você removeu o Drop shadow e alterou o alinhamento em alguns memos. Qual o objetivo?

Só olhando pra ter certeza.

Enviei ao SVN na revisão 16440. Obrigado pela contribuição. Queira atualizar, testar e reportar qualquer problema.

Muito difícil ajudar sem algo pra reproduzir. Infelizmente.

O Junior tem toda a razão. Eu refiz minha pesquisa e vi que tinha pesquisado de modo incorreto. A propriedade é utilizada pelo DANFe em Fortes modo Retrato (ACBrNFeDANFeRLRetrato.pas). Mas é usado apenas por ele. Então não funciona no Danfe Paisagem ou simplificado. Segue o código: ACBrNFeDANFeRLRetrato.pas linha: 657 if fpDANFe.LogoemCima then begin rliLogo.Top := 16; rliLogo.Left := 8; rliLogo.Height := 42; rliLogo.Width := 258; rlmEmitente.Top := 58; rlmEmitente.Left := 8; rlmEmitente.Height := 28; rlmEmitente.Width := 255; rlmEndereco.Top := 80; rlmEndereco.Left := 8; rlmEndereco.Height := 25; rlmEndereco.Width := 255; end;

Temos que verificar se alguém arquivo disponibilizado no repositório está fazendo uso dela. Mas pelo que eu procurei, não existe nenhuma menção a ela nas impressões em Fortes. Talvez o @hleorj saiba dizer.

Essa propriedade ainda existe no código, declarado na classe do Fortes. Mas parece que desde 2015 ela não funciona corretamente. Provavelmente ela deveria ter sido removida mas não foi. Vejam esses tópicos: https://www.projetoacbr.com.br/forum/topic/24413-alterar-tamanho-de-logo-posição-do-nome-da-empresa-tamanho-do-endereço/?page=3

Essas Alterações foram enviadas ao SVN com algumas modificações na parte de remoção de hints.

Ok. Espero que tenham sucesso.

Eu posso estar enganado porque tem um bom tempo que não faço esse tipo de trabalho, mas você precisa verificar pra que tipo de estrutura é o ponteiro e daí passar um ponteiro pra esse tipo de estrutura. Daí quando houver o retorno, você consegue pegar o ponteiro e receber a estrutura. Se você tiver um arquivo header em C/C++ talvez queira verificar o seguinte artigo: http://rvelthuis.de/articles/articles-convert.html

Se ele está cancelando a transação ao comandar o pagamento é porque o ACBrTEFD entendeu que o pagamento não foi efetivado no ECF. Verifique o que pode estar acontecendo nesse sentido. Por exemplo, talvez a função de retorno do estado do ECF não esteja correta. Veja essa parte do seu log: -- 24/01 16:21:20:234 - InfoECF: ineEstadoECF -- 24/01 16:21:20:234 - Ret: P -- 24/01 16:21:20:234 - InfoECF: ineSubTotal -- 24/01 16:21:20:234 - Ret: 50 -- 24/01 16:21:20:235 - TEF_DIAL ECFPagamento: Indice: 02 Valor: 50,00 -- 24/01 16:21:20:235 - InfoECF: ineSubTotal -- 24/01 16:21:20:235 - Ret: 50 -- 24/01 16:21:20:236 - InfoECF: ineTotalAPagar -- 24/01 16:21:20:236 - Ret: 0 -- 24/01 16:21:20:236 - ImprimirTransacoesPendentes -- 24/01 16:21:20:236 - InfoECF: ineEstadoECF -- 24/01 16:21:20:236 - Ret: P -- 24/01 16:21:20:237 - FinalizarCupom -- 24/01 16:21:20:237 - BloquearMouseTeclado: SIM -- 24/01 16:21:20:237 - InfoECF: ineEstadoECF -- 24/01 16:21:20:238 - Ret: P -- 24/01 16:21:20:238 - InfoECF: ineSubTotal -- 24/01 16:21:20:238 - Ret: 50 -- 24/01 16:21:20:238 - InfoECF: ineTotalAPagar -- 24/01 16:21:20:239 - Ret: 0 -- 24/01 16:21:20:239 - InfoECF: ineEstadoECF -- 24/01 16:21:20:239 - Ret: P Mesmo depois de FinalizarCupom, o estado do ECF continua P. Se eu não me engano, P é de Pagamento. O ECF deveria ter fechado o cupom. Veja também o funcionamento do programa de exemplo. Daí você pode comparar os logs.

Mas você definiu essas listas e o ponteiro para elas? Porque no exemplo que você passou, você está mandando um int64 como parâmetro. Não um ponteiro. Veja:

Eu não sei se você reparou, mas os arquivos tem a data e hora de modificação muito semelhantes. Exemplo: Talvez seja uma coincidência. Mas pode ser algum sistema agendado. Por exemplo de backup.

Acho difícil. Você não está passando strings para as funções, está? Eles tem algum exemplo de versão de implementação para Delphi/Lazarus que você possa testar?

Acabei de enviar uma alteração no componente que vai fazer esse arredondamento assim que você enviar um valor para Titulo.ValorDocumento. Queira por favor, atualizar e testar com essa versão que eu enviei: Revisão 16398 -- ACBrBoleto -- [*] Ao setar o valor do documento em um título, o ACBrBoleto agora arredonda o valor para 2 casas decimais. Isso corrige o problema de valor de documento estar diferente da LinhaDigitada.

O Refactoring já está no ar. Vejam o seguinte tópico: