paulorsa

Testado e funcionando.

Fiz a inclusão dos seguintes registros. Bloco 0 - Registro 0002 Bloco C - Registro C101 Fiz uma alteração na ordem dos registro gerados no bloco E310 pois estava gerando de forma errada. A sequencia correta peguei da nota técnica. Nota Técnica 2023.001 v 1.2 (leiaute versão 018) Segue arquivos alterados. ACBrEFDBloco_0_Importar.pas ACBrEFDBloco_C_Importar.pas ACBrEFDBloco_E_Importar.pas

Sim, a não ser que desse para passar um valor padrão.

Neste tópico... Fiz uma solução alterando o evento QuandoPerguntarCampo, colocando um booleano para informar que deve voltar.

Para homologar o CliTef com a Qualità precisei fazer uma alteração nas seguintes units ACBrTEFAPI, ACBrTEFAPICliSiTef, ACBrTEFPayGoWebComum, ACBrTEFAPIPayGoWeb. Fiz uma alteração no Evento QuandoPerguntarCampo incluí um campo booleano para indicar que o fluxo pode voltar ao anterior. Seria a mesma funcionalidade que o QuandoPerguntarMenu pode ter de voltar ao menu anterior. Caso seja interessante deixo aqui minha alteração. ACBrTEFAPI.pas ACBrTEFAPICliSiTef.pas ACBrTEFAPIPayGoWeb.pas ACBrTEFPayGoWebComum.pas

Boa tarde. Consegui resolver usando o seguinte código.. if ACBrTEFAPI1.Modelo = tefApiCliSiTEF then begin ACBrTEFAPI1.EfetuarAdministrativa('131', IntToStr(Venda.NumOperacao)); ACBrTEFAPI1.FinalizarTransacao(tefstsErroEnergia); end;

@DaniPro Vi em outro tópico ( uma res) uma resposta sua. Usei a função ACBrTEFAPI1.EfetuarAdministrativa('130','') e me retorna os seguintes dados 000-000 = 18221 1319-000 = 1900 160-000 = 1 161-000 = 1 163-000 = 20240208 164-000 = 113419 210-000 = 2 211-000 = 3 899-103 = 0 Achei o que cada código quer dizer: 210 Quantidade total de pendências, listadas nos blocos de dados abaixo 160 Cupom Fiscal 161 Número Identificador do Cupom do Pagamento 163 Data Fiscal 164 Hora Fiscal 211 Código da “Funcao” original 1319 Valor da transação original Só não sei qual a função chamar para fazer o estorno.

Esse é o procedimento que ocorre, tem que tirar o cartão para finalizar. Mais é um teste de queda de energia, então se derruba a aplicação antes da retirada do cartão. O que ocorre é que não é gravado os arquivos ACBr*.tef, então o componente não faz o estorno da transação pendente na inicialização. Precisaria de uma forma de ler o que ainda esta pendente no relatório Sitef e também qual a função que faria para estornar automaticamente sem precisar passar o cartão, pois a transação não foi efetuada.

Estou parado em uma situação que ainda não sei como resolver. Preciso cancelar/estornar uma venda que ainda se encontra pendente no relatório Sitef. O passo a passo... Faz a venda, escolhe cartão crédito com o valor total da venda, insere o cartão no Pinpad, digita a senha, a transação é aprovada... E quando aparece a mensagem para retirar o cartão do Pinpad NÃO retira, Derruba o TEFAPIDemo. Executa o TEFAPIDemo novamente. O que deveria acontecer segundo o pessoal que faz a homologação é que a venda deveria ser cancelada ou confirmada, pois ainda se encontra pendente no relatório. O que acontece é que enquanto eu não retiro o cartão não é retornado nada fica apenas no TACBrTEFAPIClassCliSiTef.ContinuarRequisicaoSiTef Então o sistema não pode salvar nenhuma informação Vou postar o log para verificarem. Porem no relatório Sitef já consta como PENDENTE. Não achei uma maneira de ler/verificar essa PENDENCIA. Gostaria de saber com vocês que já tem TEF da Sitef API, como resolveram essa questão. Vocês podem ver na imagem do Demo como não é incluído nos pagamentos enquanto o cartão não for retirado. arqlog.txt

Dois cliente aqui do RS estão com o mesmo problema. Aparentemente somente em vendas para clientes sem inscrição estadual.

Este erro acontece no Delphi XE também, mas não acontece no Delphi DX 10.2, mas a alteração indicada pelo próprio erro funciona também no XE e no DX 10.2

É só alterar a unit ACBrDFeHttpIndy.pas trocar os $ENDIF para $IFEND, salvar e instalar.

Você não está totalizando a base do ICMS. no item na tag imposto você tem vBC = 1000.00 e na tag ICMSTot você tem vBC = 0.00

Valeu pelas dicas, já tenho informação suficiente se quiser pode fechar o tópico.

Obrigado pelas dicas Robert, quanto ao valor vou ponderar mais tarde o custo beneficio, só gostaria mesmo de saber a configuração que o pessoal mais usa, quanto a placa só acrescentei pois pretendo trabalhar com dois monitores. Mais uma vez obrigado pelas dicas serão de grande ajuda.