Daniel Simoes

Oi Marcos, eu que criei o Memo da Bobina... Usei um HTML bem simples, pois não sei se todos os componentes de Exibição de HTML suportam comandos mais complexos... No Delphi acho que não haverá problemas, pois aparentemente ele usa uma API do I.E.

Use um adaptador de USB x Serial... http://www.clone.com.br/db/detalhes_pro ... alhe=05087

viallyisrael, Você já de uma olhada na aba Menu fiscal do Demo ECFTeste.dpr ? O Regys fez várias modificações para a própria homologação dele... e aparentemente está tudo correto...

Obrigado pela contribuição... já fiz o Merge... e logo envio pro SVN

Oi Marcelo... Muitíssimo obrigado pelas contribuições... a tempo o ACBrTER estava precisando de um "uso real" Estou analisando e já mando pro SVN

Verifique a Unidade de Medida que você está usando no componente...

Vc deve enviar o horário atual no método da Redução Z... se fizer isso o ACBr calcula o ajuste e envia... porem nem todos ECFs suportam isso

Atualizei a lista, inserindo uns novos modelos... além de informação se o ECF não é MFD e o protocolo utilizado

Obrigado... vou providenciar o commit

Já reportei o problema na lista oficial... acho que ainda não corrigiram.... Estou anexando o meu aqui... Ele leva em consideração que o Lazarus está instalado em: C:\lazarus\fpc\2.5.1\bin\i386-win32 fpc.zip

Apague os BPLs do ACBr, e todos os DCUs e instale tudo novamente desde o inicio, seguindo as orientações de LEIA-ME.TXT

Infelizmente não uso o QuickReport... e portanto não sei o que poderia ser ajustado... Se descobrir algo, por favor notifique aqui mesmo...

Por favor pesquise antes de postar viewtopic.php?f=5&t=1740

O SAT ou CFe, praticamente elimina a homologação PAF-ECF... São mundos totalmente diferentes... mas o fisco é criativo... e quem sabe no futuro exigirão PAF-SAT

O FasTEF é o SiTEF, porém distribuído pela DataRegis... A DataRegis fará toda a intermediação do seu processo de homologação (sem custos), e em troca, vc sempre oferecerá o SiTEF através deles (FastTEF)...

Hoje o SiTEF tem um custo fixo de + ou - R$ 300,00... não precisa mais de X25 ou aluguel do servidor SiTEF Basta vc usar um integrador SiTEF, como por exemplo a DataRegis.. veja esse link: http://www.dataregis.com.br/fasttef.shtml

Para empresas com 1 PDV o V&SPague tem um plano ideal... com um custo mensal muito baixo... Já com 3 ou mais PDVs o SiTEF leva vantagem, pois não tem limite de transações nem de Terminais... O Pay&Go é mais caro que o SiTEF, e é recomendado apenas se a aplicação não suporta TEF dedicado (pois é compatível com a estrutura do discado)... O discado é o pior de todos... é caro pela baixa qualidade que oferece... e não esqueça de por na conta os custos de Telefonia (Conta + Pulsos) Ainda pretendo homologar o V&SPague para focar os pequenos, e substituir de vez o discado dos meus clientes....

Edson, Acompanhe os históricos de atualização através dos arquivos ACBrxxx-Chage-Log.txt (em cada pasta dos fontes) Você tb pode usar o TortoiseSVN para comparar os fontes atuais com a qq outra versão anterior...

Vc poderia ancorar os componentes Left/Right para que eles se ajustem ao tamanho da tela... mas isso não mudaria a fonte... No meu caso, fiz um editor de Skins, onde posiciono os componentes visualmente, e esse programa gera um .INI com as coordenadas e características de cada componente (uma re-invenção do .DFM )

Isso realmente ocorre... Vc precisa cancelar a transação TEF independente de ter tido sucesso na comunicação com o ECF... O que geralmente é feito... e verificar o estado do ECF antes de iniciar uma nova venda... Ou seja, apenas quando realmente for necessário vc se preocupa com o estado do ECF... E se o estado não for livre, vc trata o documento em aberto... No ACBrECF o método CorrigeEstadoErro já faz isso

- Experimente remover o Path do nome do arquivo... Deixe apenas: "nomearquivo.so" - O que é "SharedSuffix" ? Lembre-se que o Linux é CaseSensitive, ou seja, o nome deve ser idêntico ao do arquivo - No Lazarus/FPC, Tenho usado o método: dynlibs.LoadLibrary(LibName) ; - Tenha certeza de que a Lib está em algum diretório do LibPath do Linux (apenas os .SO existente nos diretórios previamente autorizados são carregados) (provavelmente /usr/lib é correto) - Verifique se essa LIB depende de outras (que ainda não foram instaladas)... tente o comando: ldd "nomearquivo.so"

Isso realmente acontece... (pois os dados foram lidos antes)... o mesmo será verdade para o CRZ... basta vc lembrar disso e adicionar +1

Acho que é a hora de aposentar essa IF do código function TACBrECFBematech.GetTotalPago: Double; begin { O Bug no comando 35 + 22 ainda persiste na versao 010101... Enquanto nao obter uma correção da Bematech vou ignorar o uso do 35+22 na MPTH e MP25 } if fs25MFD then // if NumVersao = '010000' then Result := fsTotalPago else Result := StrToFloatDef( RetornaInfoECF( '22' ),0 ) / 100 ; end;[/code] para simplesmente: [code] function TACBrECFBematech.GetTotalPago: Double; begin Result := StrToFloatDef( RetornaInfoECF( '22' ),0 ) / 100 ; end;

Consegui resolver o problema, lendo direto o Flag de Tipo de documento... function TACBrECFBematech.GetSubTotal: Double; Var RetCmd : AnsiString ; B2 : Integer ; ENaoFiscal : Boolean ; begin ENaoFiscal := False; if fpMFD then begin RetCmd := RetornaInfoECF( '65' ) ; B2 := ord( RetCmd[1] ) ; ENaoFiscal := TestBit( B2 ,0) ; end ; if not ENaoFiscal then begin BytesResp := 7 ; RetCmd := BcdToAsc( EnviaComando( #29 ) ) ; end else RetCmd := RetornaInfoECF('66') ; Result := StrToFloatDef( RetCmd, 0) / 100 ; end; [/code] O problema porém agora foi transferido para o método [b]GetTotalPago[/b]... ao que parece a Bematech não tem um registrador que informe o total já pago em um comprovante não fiscal

Em um IF acima ele faz o teste de Visible... deve ser o suficiente para o Delphi.. mas no caso do FPC, ainda é possível saber se o controle está realmente sendo pintado... Por exemplo: IsVisible pode ser False, se um TTabShet está oculto...