Daniel Simoes

Boa pegada, @EliasCesar Humm.. então em homologação teremos que enviar POST e em produção PUT ? Há como relatar isso para os Devs deles ?

@Pedro Frayman ou @antonio.carlos, Podem por favor me ajudar com essa analise ?

Por favor verifique se realmente compilou com essa Unit... Notei que ele ainda está usando HTTP 1.0 @EliasCesar,consegue testar ?

Por favor teste, substituindo essa Unit ACBrPIXPSPSantander.pas

@EliasCesar, consegue nos ajudar com essa analise ?

Obrigado por reportar. Fechando. Para novas dúvidas, criar um novo tópico.

Se possível, por favor anexe o Log de comunicação, com o Nível mais alto...

Veja se esse link ajuda: https://docwiki.embarcadero.com/CodeExamples/Sydney/en/CreateFromStream_(Delphi)

Vou fechar esse e continuamos em:

Existe um emulador de Balança, mas você precisará uma conexão Null Modem entre 2 seriais

Enviei esse ajuste ao SVN e Git

@amadeujunior18, por favor teste mudar o tipo para "Cardinal" function SwapBytes(Value: Cardinal): Cardinal; type Bytes = packed array[0..3] of Byte; begin Bytes(Result)[0]:= Bytes(Value)[3]; Bytes(Result)[1]:= Bytes(Value)[2]; Bytes(Result)[2]:= Bytes(Value)[1]; Bytes(Result)[3]:= Bytes(Value)[0]; end;

Você precisa salvar RespostaTEF.Conteudo.Conteudo da transação da VENDA, em BD, Arquivo ou onde desejar, para recuperar ele no futuro...

o Arquivo Log em si, não seria possível usar ele para ler diretamente no RespostaTEF.Conteudo.Conteudo

Como você já é homologado, será bem mais rápido... Apenas teremos os tramites de apresentação de contrato, e verificação do seu certificado...

No Log da transação administrativa, que foi feita a Reimpressão... realmente não terá as informações de Log da venda... (isso já foi citado no primeiro tópico) Isso só será válido, se você tiver Salvo o Log da VENDA, e quiser recuperar ele, para fazer tratativas...

Ok.. acho que dá pra ajustar os Typecastes ou fazer essa operação com "Move"... amanha faço alguns testes

Se você tiver o Log do componente, salvo em um Memo, SIM.. Tente algo como: var RespostaTEF: TACBrTEFResp; begin RespostaTEF := TACBrTEFResp.Create try RespostaTEF.Conteudo.Conteudo.LoadFromFile(LogTEFFile); // usa propriedades de RespostaTEF finally RespostaTEF.Free; end; end;

@amadeujunior18, qual a sua IDE ? No Delphi 11.3, Android 32, pareceu compilar sem problemas

mas como eu disse, a reeimpressão apenas virá o espelho, e não os dados de log da Ultima Venda... Até porque, você pode reimprimir transações de Cancelamentos, Vendas, Administrativa, etc...

@Ico Menezes, a reimpressão em si, é uma NOVA transação Administrativa... ela apenas retornará o último Espelho impresso.. ou seja, ela nunca terá o retorno idêntico ao da última transação de venda.. Pelo que compreendi, você imaginaria receber todos os dados da mesma transação de venda, correto ? Infelizmente isso não ocorrerá... Sugiro você criar uma rotina, que salve rapidamente, todo o Log do TEF, assim que o mesmo for recebido... Caso essa rotina não seja executada (queda de energia).. Podemos deduzir que a transação também não foi confirmada... nesse caso, você pode optar por "desfazer" a última transação, quando o PDV subir novamente

É para ser, pois é Pascal puro... Por favor cole a exata msg de erro (fica difícil ver na imagem)

Essas modificações foram revertidas, pois quebraram as aplicações tradiciinais na operacao CRT

Por favor dê mais informações... Em que página ou serviço, você recebe 404? Tem algumas informações nesse tópico:

No caso do Demo, está na Unit Principal, método TFormPrincipal.AcharTransacaoTEFPendente