Painel de líderes

Vimos comunicar aos usuários ACBr que estamos trabalhando para sempre trazer melhorias ao Projeto e por consequência a nossos usuário, este post tem por finalidade informar que além das novas versões de NF-e, CT-e, lançamento de SAT-e, NFC-e ,estamos trabalhando para que o projeto ACBr possa ser utilizado na plataforma Firemonkey, no 1o momento não vamos nos preocupar com multi-plataform, vamos usar o que temos e ajusta-lo para que uma aplicação feita em Firemonkey possa usa-la. Como é um caminho novo para nós também, estamos encontrando obstáculos, e não sabemos até onde podemos chegar realmente, mas de 1a mão anuncio que temos 80% dos componentes podendo ser compilados em uma aplicação Firemomkey, como mostra a imagem em anexo. Hoje faltando os componentes ACBrECF (falta bem pouco para esse), todos os eletrônicos NFe, CTe, NFSe, MDF-e, NFC-e se não esqueci de algum são esses. Em anexo segue os fontes alterados, para quem queira fazer algum teste, nesse 1o passo ajustaremos os fontes para que possam ser compilados, num segundo passo converteremos os demos para Firemonkey, não daremos tempos para conversão, o que fizemos até o momento é fruto de tempo disponível que tiramos do nosso tempo de trabalho ou folga, então conto com a compreensão e também ajuda para que possamos o mais breve possível conseguir essa e novação ao Projeto ACBr. Fontes_FMX.zip

Estou compatibilizando os testes atuais com o DUnit. Acredito que isso possa facilitar para que aqueles que não quiserem se aventurar no Lazarus possam ajudar neste sentido. Seguindo as sugestões nessa resposta no StackOverflow, fiz as modificações e parece que no momento está tudo ok. A maior diferença são alguns IFDEFs que precisam ser adicionados e ao invés de se utilizar AssertTrue, AsserEquals, etc... é preciso utilizar CheckTrue, CheckEquals, etc... Isso torna os códigos compatíveis. A resposta no StackOverflow acima citada, em seus comentários, sugere uma criação de uma classe "wrapper" para facilitar a escrita para os dois testes sem ficar fazendo um monte de IFDEFs no código. Sugestões são bem vindas.

Após receber um SAT da Dimep, pude fazer novos testes... e implementei as seguintes melhorias: Lembram que o SAT da Dimep é compatível com o ACBrSAT, usando o modelo satDinamico_stdcall

Respondendo minha própria pergunta. Este caso está relacionado com o caso do LFill apresentado no outro tópico. Adicionei hoje testes unitários expondo todos esses problemas. Só faltou o link pra esses tópicos... Até semana que vem vou poder resolver esse problema, espero que definitivamente. EDIT: Para reproduzir, não é necessário outro Banco de dados. Basta apenas modificar no programa de exemplo do ACBrPAF a linha no uFormPrincipal.pas do método btn.RegistrosPAFClick conforme abaixo: for j := 1 to 2 do begin with RegistroD3.New do begin DT_INCLUSAO := DATE; NUM_ITEM := i; COD_ITEM := '10'; DESC_ITEM := 'descricao do item'; QTDE_ITEM := 10.00; UNI_ITEM := 'UN'; VL_UNIT := 1.00; VL_DESCTO := 0.00; VL_ACRES := 0.00; VL_TOTAL := 4.20; //<---- Erro no arredondamento na hora que gera o arquivo. SIT_TRIB := 'T'; // T, S, I, N, F ALIQ := 7.00; // SOMENTE QUANDO T E S IND_CANC := 'N'; DEC_QTDE_ITEM := 2; DEC_VL_UNIT := 2;