Ir para conteúdo
  • Cadastre-se

Rafael Sartori

Membros
  • Total de ítens

    87
  • Registro em

  • Última visita

Tudo que Rafael Sartori postou

  1. Olá Pessoal, gostaria de saber se alguém passou por este problema. Tenho um cliente com uma Daruma FS700 que simplesmente parou de funcionar, mas com os programas de teste da Daruma (usando as DLL´s) funciona sem problemas (COM1 ou COM2). Estou fazendo os testes com o próprio EcfTeste. Dá o erro "Impressora Daruma não está respondendo" e as vezes "Impressora não está em linha.." Pesquisei no forum, encontrei quem teve este mesmo problema mas não descobri como foi resolvido. Obrigado
  2. Olá Juliana! Com certeza no espaço das mensagens do boleto dá para colocar informações. Mas no Informativo teria mais espaço, dá para colocar informações sobre o que o cliente está pagando, relatórios pequenos, mensagens promocionais, etc. Eu particularmente uso sempre este modelo de boleto. Surgiu esta dúvida porque comecei a olhar este excelente componente. Mas fica a sugestão aí, para alguém que conheça bem os fontes do AcbrBoleto criar mais este modelo. Obrigado a todos
  3. Segue o exemplo de boleto com campo de Informativo. Boletos 16251.pdf
  4. Olá pessoal, gostaria de tirar uma dúvida: Existe algum layout ou forma de imprimir o boleto com o campo de INFORMATIVO?
  5. Olá 1) Faça e refaça TODOS os testes com ATENÇÃO, deixe sua aplicação redonda, estude os fontes do ACbrTEFd e ACbrECF, se tiver dúvidas não deixe de ligar para a Software Express e SevenPDV, que tudo vai dar certo. 2)Vc pode fazer os testes com emulador, eu fiz assim, mas nos últimos dias antes de ir eu peguei uma ECF de "verdade" e refiz todos os testes pra garantir. O PinPad, caso vc não tenha, eles emprestam lá. 3) Sim 4) O numero de vias não pode ser parametrizado, o Acbr cuida disso para vc (teste com o demo). Vc pode esperar 5 seg. entre as vias. 5) Não, isso será impresso automaticamente no Cupom Vinculado.
  6. Seguinte, vc pode ter a situação em que após ligar o micro a ecf pode continuar desligada. E aí? É preciso mesmo assim fazer um NCM, mesmo que a ECF não responda. Então sempre antes de abrir uma nova venda venda, verifique se o cupom/Relatorio gerencial está aberto e feche/cancele. Vc pode fazer o cancelamento também, no evento OnAntesCancelarTransacao, verifique no demo do AcbrTefd. Abraço.
  7. Amigo, ligue na SevenPDV ou na Software Express que eles te fornecem os números, e sempre que tiver alguma dúvida quando aos procedimentos ligue para eles para evitar surpresas no dia da homologação. Abraços.
  8. Olá Daniel, eu já estou a algum tempo sem atualizar os fontes do ACBR, por causa da Homologação, mas se o fonte já foi alterado pelo mesmo motivo que eu citei, sem problemas! Quanto a segunda mudança no fonte, nao foi pré-requisito para homologar, na verdade era só uma garantia que se o erro fosse por falta de papel por ex. ele ia fechar. Acho que nem precisaria alterar o fonte neste ponto mesmo. Abraços!
  9. Segue a pequena alteração no AcbrTefDClass que eu fiz: procedure TACBrTEFDClass.ImprimirRelatorio; Var I : Integer; TempoInicio : TDateTime ; ImpressaoOk, RemoverMsg, GerencialAberto : Boolean ; Est : AnsiChar ; ArqBackup : String ; ImagemComprovante : TStringList ; begin VerificarIniciouRequisicao; if Resp.QtdLinhasComprovante < 1 then exit ; GravaLog( Name +' ImprimirRelatorio: '+Req.Header ); CopiarResposta ; ImpressaoOk := False ; RemoverMsg := False ; GerencialAberto := False ; TempoInicio := now ; with TACBrTEFD( Owner ) do begin try BloquearMouseTeclado( True ); while not ImpressaoOk do begin try try Est := EstadoECF; if Est <> 'L' then begin { Fecha Vinculado ou Gerencial ou Cupom, se ficou algum aberto por Desligamento } case Est of 'C' : ComandarECF( opeFechaVinculado ); 'G', 'R' : begin ComandarECF( opeFechaGerencial ); // Alterado por Rafael Sartori // para que em caso de falta de papel ou queda de luz na ecf ele // feche o cupom e abra novamente depois para imprimir tudo novamente GerencialAberto := False; // end; 'V', 'P' : ComandarECF( opeCancelaCupom ); end; if EstadoECF <> 'L' then raise EACBrTEFDECF.Create( ACBrStr('ECF não está LIVRE') ) ; end; TempoInicio := now ; if Self.Resp.TextoEspecialOperador <> '' then begin RemoverMsg := True ; DoExibeMsg( opmExibirMsgOperador, Self.Resp.TextoEspecialOperador ) ; end; if Self.Resp.TextoEspecialCliente <> '' then begin RemoverMsg := True ; DoExibeMsg( opmExibirMsgCliente, Self.Resp.TextoEspecialCliente ) ; end; I := 1 ; while I <= self.NumVias do begin if I = 1 then ImagemComprovante := Self.Resp.ImagemComprovante1aVia else ImagemComprovante := Self.Resp.ImagemComprovante2aVia ; if ImagemComprovante.Count > 0 then begin if not GerencialAberto then begin ComandarECF( opeAbreGerencial ) ; GerencialAberto := True; end else begin if I <> 1 then ComandarECF( opePulaLinhas ) ; DoExibeMsg( opmDestaqueVia, 'Destaque a '+IntToStr(I)+'ª Via') ; end ; ECFImprimeVia( trGerencial, I, ImagemComprovante ) end ; Inc( I ) ; end; if GerencialAberto then ComandarECF( opeFechaGerencial ); ImpressaoOk := True ; finally { Removendo a mensagem do Operador } if RemoverMsg then begin { Verifica se Mensagem Ficou pelo menos por 5 segundos } if ImpressaoOk then begin while SecondsBetween(now,TempoInicio) < 5 do begin Sleep(EsperaSleep) ; Application.ProcessMessages; end; end; DoExibeMsg( opmRemoverMsgOperador, '' ) ; DoExibeMsg( opmRemoverMsgCliente, '' ) ; end; end; except on EACBrTEFDECF do ImpressaoOk := False ; else raise ; end; if not ImpressaoOk then begin if DoExibeMsg( opmYesNo, 'Impressora não responde'+sLineBreak+ 'Tentar novamente ?') <> mrYes then break ; end; end; finally { 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 ; DeleteFile( ArqBackup ) ; except end; end ; BloquearMouseTeclado( False ); end ; if not ImpressaoOk then begin // Alterado por Rafael Sartori // Tento ao menos fechar o relatorio se a ECF estiver ligada.. Est := EstadoECF; case Est of 'G', 'R' : ComandarECF( opeFechaGerencial ) end; // raise EACBrTEFDECF.Create( ACBrStr('Impressão de Relatório Falhou' ) ) ; end; end; end;
  10. É isso mesmo Daniel, o segredo é estudar bem os fontes do ACBrTefd. Passei na homologação do TEF Discado, sem problemas! Fiz só uma pequena alteração nos fontes, pois foi preciso. Depois com calma eu vou colocar aqui. Abraços.
  11. Pessoal, vou homologar meu PDV com TEF (Cielo/Amex/Redecard) na semana que vem. Este PDV é simples, sem pgto com multiplos cartões, tudo testado e re-testado com o ACbrTEFD. Mas como é a primeira vez que vou fazer isso gostaria de umas dicas de quem já foi: 1) Vou levar uma CPU com Fax Modem Off-Board, um PinPad Ingenico 3070, ECF Bematech MP2100. A dúvida maior está com a Fax Modem, eles vão testar lá? Visto que nos testes não tem como usar ela. 2) Como usei o ACbrTEFD, estudei bem os fontes e sei que ele funciona muito bem. Gostaria de saber se eles costumam pedir alterações, na hora da certificação. 3) Alguma dica de "última hora" antes de eu ir? Abraços e obrigado.
  12. Amigo, vou fazer a minha homologação em janeiro e vou levar uma Bematech MP2100. Só para saber, vc fez esta alteração na hora lá com eles e depois teve que testar, isso? Gostaria de saber pois não quero ter muitas surpresas na hora lá. Abraços
×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.