Daniel Simoes

Oi Ivan, Em relação a Unit ACBrTEFDClass.pas Acho que podemos deixar apenas o Try Except que vc introduziu... { Enviando CNF ou NCN e apagando Arquivo de Backup } ArqBackup := Resp.ArqBackup ; while FileExists( ArqBackup ) do begin try if ImpressaoOk then self.CNF else self.NCN ; except end; DeleteFile( ArqBackup ) ; end ; [/code] Em relação a V&SPague... o que eles exigem durante a Inicialização da Aplicação quando há Transações Pendentes ? Se não me engano (não me lembro direito) no V&SPague tem um comando que retorna se há transações pendentes... não é preferível usa-lo ao invés dos arquivos de Backup ?

SIM... isso é mais comum.. ou seja, é abrir apenas um CCD (ou vinculado).... isso desde que você tenha apenas um pagamento com o total de todas as transações de todos os cartões passados no cupom (multiploscartoes)... Nesse caso, é possível imprimir todos os Comprovantes (em 2 vias) no mesmo vinculado ou CCD... O ACBrTEFD fará isso automaticamente, se você deixar a cargo dele a impressão das formas de Pagamento e fechamento do cupom... além de AutoEfetuarPagamento := False

izaiasavila, Parabéns pela sua homologação Obrigado pela sua correção e pelas suas valiosas dicas... Estou aplicando as modificações no SVN

A modificação invalidará o proposito do método, ou seja, o calculo do Exponente será errado... Veja esse tópico: viewtopic.php?f=5&t=964

nazarenoneto, Por favor seja mais específico... Exemplo: 1 - Ativar o ECF 2 - Selecionar a Aba DadosReduçao Z 3 - ..... ??

Parece ser um problema no seu G.P.... que aparentemente não responde ao comando ATV... Analise o LOG gerado pelo ACBrTEFD e observe o que ocorre durante a Inicialização

nos campos 030 e 031... por favor leia com atenção o Guia Técnico do Gerenciador Padrão... No ACBrTEFD vc pode acessar os campos como propriedades ou pelo Indice do Campo... Veja o exemplo extraído do Demo (estude o Demo em detalhes) procedure TForm1.ACBrTEFD1DepoisConfirmarTransacoes( RespostasPendentes: TACBrTEFDRespostasPendentes); var I : Integer; begin for I := 0 to RespostasPendentes.Count-1 do begin with RespostasPendentes[I] do begin Memo1.Lines.Add('Confirmado: '+Header+' ID: '+IntToStr( ID ) ); Memo1.Lines.Add( 'Rede: ' + Rede + ' NSU: ' + NSU + ' Valor: '+ FormatFloat('###,###,##0.00',ValorTotal)) ; Memo1.Lines.Add('Campo 11: ' + LeInformacao(11,0).AsString ); end; end; end; [/code] Observe que o campo 11 é capturado pelo Índice, enquanto NSU e Rede pela propriedade com o nome específico... A vantagem de usar as propriedades é que sua aplicação fica mais simples de migrar para um novo tipo de TEF, já que o ACBrTEFD tenta abstrair as diferenças entre eles, "mapeando" os diferentes retornos de cada classe TEF nas mesmas propriedades

O Erro ocorre porque o ACBrTEFD não conseguiu comandar a impressão do Vinculado... Vc informou o Indice da Forma de Pagamento corretamente ? Essa FPG permite Vinculados ? Analise o LOG gerado pelo ACBrECF... a resposta para o problema está lá... Infelizmente as regras do TEF não permitem uma msg de erro mais completa... apenas o famigerado "Impressora não respode/Sim ou nao" é permitido, e isso dificulta na detecção dos problemas... mas mesmo nesse caso, o ACBrECF faz o Log da msg de erro completa

Não há o que ser corrigido, o código do ACBrTEFD está correto... Provavelmente vc que não está informado o SaldoRestante corretamente no evento OnInfoECF, quando o TEFD pergunta por ele... (veja no Demo)

Se vc já usa o ACBr... veja os novos métodos do componente ACBrEAD... ou melhor... veja o Demo dele...

Não há erro no LOG... Por favor informe os passos para reprodução usando o ECFTeste e o emulador de ECF da Bematech

Se não me engano o oficial é: https://sourceforge.net/projects/fortesreport/files/

O componente irá disparar o CNC sempre que houver uma transação pendente... Isso é verificado no Ativar do componente... procurando por arquivos na pasta de Backup (propriedade do componente) e no TEF_DIAL\Resp... Isso é exigido pelas homologadoras... por favor leia o Guia técnico do gerenciador padrão

Uma analise visual mesmo... o G.P. estará no Systray da máquina... o primeiro passo é ligar o arquivo de LOG no componente ACBrTEFD.. com ele vc tem certeza de que não há comando sendo enviado sem que vc perceba.. (isso é comum em programação orientada a eventos)

Realmente não abriu... Tente instalar o Fortes Report a partir dos fontes... Acho que apenas as versões mais novas do Quick Report possuem um bom suporte a PDF... Qual gerador de relatório vc usa no seu dia a dia ?

Fabio, Você está fazendo testes pela aplicação Demo (AcbrBoletoDemo) ? Se SIM, quais são os passos para reprodução do problema ? A atualização recente do componente ACBrEAD exige a re-instalação do pacote ACBrComum e todos os que dependem dele... Por favor leia o LEIA-ME.TXT, e os arquivos ACBr-XXX-Change-log.txt

Vc tb não consegue abrir com o Adobe Acrobat Reader ? (por favor anexe o PDF gerado) Tente tb imprimir usando o Fortes Report... o suporte a PDF é bem melhor...

Os fontes estão atualizados pelo SVN ? Você consegue reproduzir o problema com o Demo ECFTeste e com o Emulador da Bematech ? Se SIM, por favor informe os passos para reprodução... assim poderemos investigar..

Não há nada de errado com o componente nesse sentido... observe os fontes, leia o LOG gerado... vc verá que ele manda apenas um ATV, de acordo com o exigido pelo Guia Técnico do G.P. Provavelmente vc está deixando o G.P. desativado, e forçando o TEFD a ativa-lo... e isso é um bug conhecido do GP, ele exibe a tela dele, quando é inicializado pela aplicação...

Analise os fontes... Veja por exemplo, o método: TACBrECFDaruma.ArquivoMFD_DLL em ACBrECFDaruma.pas

Por que não seria ? Vc, como empresa Sw.House, ficaria responsável por cadastrar corretamente as informações... Independente de qual Software vc usar para extrair as informações (ou uma simples analise visual na Leitura X e Leitura da Memória Fiscal)... Caberia a Sw.House enviar o arquivo com elas já configuradas corretamente... As informações são repetitivas no arquivo... não seria produtivo lê-las do ECF a cada linha gerada... muito mais simples ler de um arquivo... Mas o usuário final dificilmente saberá preenche-las corretamente...

O ACBrECF nunca será capaz de detectar todos essas informações com precisão... pois ele analisa os ECFs por protocolo... Mas por que tentar capturar tudo isso ? O PAF-ECF já exige que a Sw.House envie para o usuário, arquivo criptografado com a relação de ECFs permitidos para o uso, certo ? Faça assim, solicite para o seu (futuro) cliente uma Leitura X e uma Leitura da Memória fiscal de apenas 1 dia... com isso, vc poderá: - Verificar se o ECF é válido (registrado no posto fiscal) - Criar o arquivo criptografado, já com essas informações de identificação do ECF...

Vc precisa compilar e Instalar o ACBrComum e todos os pacotes que dependem dele...

Obrigado pelo seu trabalho de correção da Unit VSPague... prometo que assim que possível analisarei-a com mais calma...

Para que o TEFD saiba que houve pagamento em dinheiro, é necessário que vc informe o valor correto em OnInfoECF... No demo temos: ineSubTotal : RetornoECF := FloatToStr( ACBrECF1.Subtotal-ACBrECF1.TotalPago ) ;[/code] Se vc não enviou as Formas de pagamento para o ECF, ou seja, se vc bufferiza os pagamentos, a função acima obviamente não funcionaria... Mas nesse caso, cabe ao programador calcular o valor já pago, e informar apenas o Restante para o parâmetro RetornoECF