Painel de líderes

Bom, Resolvido!! Forcei a compilação em x86, copiei todas as dlls envolvidas para a raiz do meu EXE, e funcionou!!! Obrigado @Daniel Simoes!!

As DLLs das pastas de dependências, devem estar no mesmo diretório, da ACBrLib*.dll.. Use a versão de DLL, conforme você compila o seu Binário... Exemplo, se você compila em 32 bits, copie todas as DLLs de "dep" dos subdiretórios "x86", para a mesma pasta da ACBrLibNFe32.dll

Pessoal depois de muita insistência com a SEFAZ-RS, agora pouco me responderam, segue a resposta : Então esperamos que da mesma forma como o erro passou a aparecer o mesmo seja eliminado. Porém pode ocorrer um pouco de demora na emissão, visto que é quase a metade dos servidores disponíveis. Mas poderemos tomar aquela mais tranquilos hoje []s

Bom dia Cleonir, Esses fiscais sabem muito bem o que querem e você também sabe. E não é alterar o layout do DAMDFE para ter a informação X ou Y.

no caso o emissor gratuito foi descontinuado. a segunda situação é que o fórum é para desenvolvedores e não para usuário final de software. sugiro procurar uma empresa de software para estar tendo uma versão mais atual e que funcione para emissão

Repositório já atualizado, Teste ok. Pode ser encerrado. Obrigado Italo Jurisato Junior

Diego, Favor realizar testes com a unit em anexo. ACBrCTe.pas

Boa tarde, também não consegui transmitir. Aparentemente a função TACBrDFe.LerServicoDeParams está diferente da TACBrCTe.LerServicoDeParams onde é tratado o Configuracoes.Geral.FormaEmissao. A função TACBrCTe.GetURLQRCode chama sem tratamento de FormaEmissao que repassa UF 31, assim o QRCODE vai com url errada.

Olá pessoal, Se tratando do MDF-e só temos apenas uma SEFAZ-Autorizadora que é a SEFAZ-Virtual do Rio Grande do Sul. A versão mais recente chamada de 3.00a tem como diferencial a tag que contem a string do QR-Code. O ambiente de produção passou a exigir essa tag a partir do dia 15/07/2019, sendo assim não faz mais sentido a propriedade de configuração: GerarInfMDFeSupl que dependendo do seu valor gerava ou não o grupo <infMDFeSulp que contem a tag <qrCodMDFe>. Foi removido a condição para gerar ou não o grupo <infMDFeSupl>, pois agora esse grupo tem que existir no XML e a partir do dia 01/10/2019 não teremos mais a propriedade de configuração. Ao atualizar os fontes a partir do dia 01/10/2019 poderá ocorrer erro de compilação e ou de execução por conta dessa propriedade que não vai mais existir. A solução para esse problema é muito simples: 1. remover dos fontes da sua aplicação todas as linhas que fazem referencia a propriedade GerarInfMDFeSupl. 2. abrir os arquivos DFM que contem o componente ACBrMDFe e remover a linha que contem a propriedade GerarInfMDFeSupl. Feito isso basta compilar a sua aplicação com a opção Build.

Olá pessoal, Vou prorrogar para o dia 07/10/2019 a remoção da propriedade de configuração: GerarInfMDFeSupl. Vou remover essa propriedade no final de semana, portanto que atualizar os fontes a partir do dia 07/10/2019 (Segunda-Feira) poderá ocorrer erros de compilação e ou execução. Para resolver esses problemas, releia a primeira postagem desse tópico.

Olá pessoal, Sei que todos estão muito atarefados com seus programas por aí... Maaaasssss.... Precisamos de sua atenção para uma alteração nos componentes!!! Atualmente temos uma falta de padronização nas unidades de medidas das margens das impressões dos documentos fiscais. Cada impressão Report tem margens medidas com um formato. Isso não está bom. Note a tabela a seguir com as unidades de medidas das margens atual: DF-e Fortes Fast LazReport ESCPOS NF-e (Paisagem, Retrato, Inut, Evento, Simplificado) cm cm nd X NFC-e mm mm X X NFC-e (A4) cm mm X X SAT mm X X X CT-e (Evento) cm nd X X CT-e (A5, Retrato) nd nd X X CT-e (Inut, Inut Retrato) nd nd X X GNR-e nd nd nd X MDF-e (Retrato, Evento) cm nd X X NFS-e cm nd X X BP-e X X X X Legenda: mm – milímetros cm – centímetros nd – O componente poderia, mas não está atualizando as margens do report X – Não possui impressão nesse formato ou não interage com as margens. Nota: Os modelos em ESCPOS que existem não consideram as propriedades de margem. Afinal, não faz muito sentido mesmo. Como podem ver na tabela acima, muitos componentes não estão atualizando as margens. Isso significa que mesmo que configure uma margem, ela será simplesmente ignorada. Então a ideia é fazer com que esses componentes imprimam de acordo com a configuração. Além disso, queremos evitar qualquer possível confusão e por isso vamos padronizar as unidades de medidas. A unidade de medida escolhida foi milímetros (mm). Alguns dos motivos foram: A unidade de medida mm funciona bem tanto para impressões grandes (por exemplo A4) como para bobinas (80 mm); As pessoas estão acostumadas com mm porque é a unidade padrão de todos os geradores de relatório usados atualmente (Fast Report, Fortes Report, LazReport ...); Devido ao ponto anterior, usar mm vai nos poupar código de conversão de unidades; Mesmo que tivéssemos escolhido centímetros (cm), haveria quebra de compatibilidade por causa do SAT e NFC-e; Quando as alterações vão entrar em vigor? A previsão é que dia 14 de outubro, as alterações sejam enviadas ao SVN. Acreditamos que isso dá tempo suficiente, para conseguirmos avisar a todos e para que todos possam se preparar. As alterações já foram enviadas ao SVN. Veja nota no fim desse post. O que eu preciso verificar no meu aplicativo? A primeira coisa é verificar se você tem configuração de margem (seria bom que tivesse). Em caso afirmativo, como você está armazenando? Em que unidade está armazenando? cm ou mm? Vai ser necessário fazer alguma conversão? Verifique como você deseja manter a configuração? De posse das informações acima, faça um teste imprimindo todos os documentos que você usa. Isso vai ajudar você a prevenir qualquer problema antes de enviar o executável para o cliente. Sugerimos você a imprimir tanto antes como depois das alterações no componente. Assim você vai ter algo para comparar as impressões e ajustar as margens caso necessário. O que eu preciso fazer caso use o ACBrMonitor Plus? A nossa ideia é minimizar o impacto para quem usa o ACBrMonitor. Vamos colocar as informações o próximo post logo abaixo. Se ficarmos atentos a essas alterações, as impressões vão seguir o mesmo padrão e ninguém mais vai precisar se confundir. Atualização- 17/10/2019 As alterações já foram enviadas ao SVN. Agora todos os reports seguem o mesmo padrão: DF-e Fortes Fast LazReport ESCPOS NF-e (Paisagem, Retrato, Inut, Evento, Simplificado) mm mm mm X NFC-e mm mm X X NFC-e (A4) mm mm X X SAT mm X X X CT-e (Evento) mm mm X X CT-e (A5, Retrato) mm mm X X CT-e (Inut, Inut Retrato) mm mm X X GNR-e mm mm mm X MDF-e (Retrato, Evento) mm mm X X NFS-e mm mm X X BP-e X X X X Caso encontre algum problema, queira por favor criar um novo tópico.

Oi Daniel, segundo sua dica eu fiz algo como: procedure TfrmPrincipal.ACBrTEFD1CliSiTefObtemCampo(Titulo: string; TamanhoMinimo, TamanhoMaximo, TipoCampo: Integer; Operacao: TACBrTEFDCliSiTefOperacaoCampo; var Resposta: AnsiString; var Digitado, VoltarMenu: Boolean); .... .... function no_parcelas_cartao:integer; var total:currency; begin total:=totaliza(); if total<=100 then result:=1 else if ((total>100) and (total<=500)) then result:=3 else if ((total>501) and (total<=1000)) then result:=4 else if (total>1000) then result:=6 else result:=1 end; case TipoCampo of 500: begin // esconde solicitação de Senha do Supervisor para Transação TEF Digitado := true; // TMinhaTelaSolicitacaoPersonalizada.Autoriza(); VoltarMenu := false; Resposta := ''; end; 504: // Esconde Taxas de Servico e Taxa de Embarque begin PerguntaCampo := (ACBrTEFD1.TEFCliSiTef.Tag > 0); if not PerguntaCampo then begin Digitado := true; VoltarMenu := false; Resposta := '0,00'; end end; 505: begin // Preenche o no de parcelas do cartão AForm.ValorMinimo:=1; AForm.ValorMaximo:=no_parcelas_cartao; AForm.Edit1.Text:='1'; if (no_parcelas_cartao>1) then begin MR := AForm.ShowModal; Digitado := (MR = mrOK); VoltarMenu := false; Resposta := AForm.Edit1.Text;//'3'; end else begin //nao precisa mostrar dialogo- só 1 parcela Digitado := true; VoltarMenu := false; Resposta := '1'; end end; else begin MR := AForm.ShowModal; Digitado := (MR = mrOK); VoltarMenu := (MR = mrRetry); if Digitado then Resposta := AForm.Edit1.Text; end; end; Uma dúvida. Não tenho pinpad ainda. Comprei mas não recebi até o momento. Minha pergunta é se fazendo assim e usando pinpad, o no. de parcelas vai aparecer no pinpad. Sem pinpad, eu abro o form e checo se o número de parcelas está dentro da politica de preços do cliente, antes dele fechar o form. Quando usando pinpad comporta-se de que forma?