itamarluiz

Eu dei um tempo no desenvolvimento do TEF para o V&S Pague, e logo depois tirei férias. Agora estou retomando o desenvolvimento e quero terminar. Peço por favor aos colegas que homologaram: ajudem postando suas alterações para que o Daniel possa incluí-las no código do ACBr. Obrigado! Obrigado!

Sim, exatamente. Mas o roteiro fala de uma mensagem. Eu coloquei a mensagem no evento OnAntesCancelarTransacao e está funcionando, mas tenho dúvidas de que é exatamente assim: procedure TfrmPrincipal.acbrTEFAntesCancelarTransacao(RespostaPendente: TACBrTEFDResp); const sAviso = 'A transação TEF NSU: %s e valor: %s está pendente. Favor realizar o desfazimento no Menu Administrativo e cancelar o Cupom Fiscal.'; var Estado: TACBrECFEstado; begin Estado := ECF.Estado; if RespostaPendente.ValorTotal > 0 then MyDlgInformation(Format(sAviso, [RespostaPendente.NSU, FormatFloat(',0.00', RespostaPendente.ValorTotal)])); case Estado of estVenda, estPagamento: ECF.CancelaCupom; estRelatorio: ECF.FechaRelatorio; else if not (Estado in [estLivre, estDesconhecido, estNaoInicializada]) then ECF.CorrigeEstadoErro(False); end; end; Outra coisa: o teste seguinte me manda apenas fechar o diálogo sem tratar, e fechar a aplicação. Quando voltar, a aplicação deve mostrar novamente a pendência. Acontece que não mostra. Parece que está limpando os dados.

Pessoal, Estou aqui fazendo os testes da pré-certificação do V&S Pague via background. Tenho algumas dúvidas e gostaria de usar esse tópico para saná-las. Ficarei muito grato se alguém de vocês puder me ajudar. A primeira delas é a seguinte: pré-teste 1.1.2.1 Procedimento: Realizar uma transação de Crédito no valor de R$ 900,00. Desligar a ECF no Comprovante Vinculado (CCD) e após exibir a mensagem “Erro na impressão. Deseja tentar novamente? . ” Desligar o Computador. Após o retorno da energia, manter a ECF Desligada e iniciar a Automação. Resultado esperado: A automação deve solicitar o desfazimento da Transação TEF e exibir a seguinte mensagem “A(s) trasanção(s) TEF NSU: XXXXXX e Valor: XX,XX está PENDENTE. Favor realizar o DESFAZIMENTO no menu administrativo. Cancelar o cupom fiscal ! ” - ao confirmar essa mesagem a automação deve abrir o menu ADM - transações pedentes, para DESFAZER a transação. Observação: A automação deve realizar o tratamento independente de a ECF estar ligada ou não. Se eu simplesmente inicializar o TEF ao abrir o aplicativo o ACBrTEFD entra no ADM e me dá a opção de confirmar, desfazer ou fechar o diálogo. Mas infelizmente a mensagem não é exibida. Então creio que eu mesmo tenho que fazer isso. Gostaria que os colegas pudessem me dizer se existe um evento específico pra fazer isso, e/ou como fazer isso. Obrigado.

Pessoal, nazarenoneto tinha razão. O problema era realmente no diálogo com a mensagem. eu passei a usar um Label dentro do proprio form de venda e o problema não aconteceu mais. Obrigado a todos.

Olá Daniel, Obrigado pela sua atenção. Usei o código que você sugeriu, mas não mudou nada. A aplicação continua sendo "jogada" pra trás entre a primeira e a segunda vias do CDC. Talvez eu esteja fazendo algo errado em outro lugar. Obrigado

Daniel, Estou usando mesmo código do exemplo: procedure TfrmPrincipal.acbrTEFRestauraFocoAplicacao(var Tratado: Boolean); begin Application.BringToFront; Tratado := False; { Deixa executar o código de Foco do ACBrTEFD } end; Testei também trocando o valor de Tratado para True, e a situação piorou: a aplicação passou a ser sobreposta durante o período de espera para passar o cartão.

Pessoal, Estou implementando o TEF via background da V&S Pague. Percebi que durante a impressão do CDC, mais exatamente entre a primeira e a segunda vias, o sistema vai pra segundo plano, e uma outra aplicação qualquer aberta fica por cima dele. Isso só não acontece quando ele é a unica aplicação aberta. Podem me ajudar? Obrigado