Opera��es Pendentes em TEF

Question

ol� pessoal, gostaira de contar com a ajuda de voc�s.....bem � o seguinte, como fazer as verifica��es de opera��es pendentes no tef?? alguem ai tem algum exemplo pra me passar, ou alguma ideia, pois estou tendo dificuldades pra fazer tais verifica��es....

valeu pessoal

abra�o a todos

Essistemas · Answer

Eu tenho um arquivo INI, e quando � bem sucedido a abertura da venda ou Adm eu uso ela

procedure TTef.AbreTransacaoTEF;
begin
try
ArquivoINI := TIniFile.Create(F_PathArq+�ESPDV.INI�);
ArquivoINI.WriteString(�STATUS�, �Transacao�, �Aberta�);
ArquivoINI.WriteString(�STATUS�, �Rede�, F_Rede);
finally
ArquivoINI.Free;
end;
end;

quando cancelo ou fecho a venda e da tudo certo uso

procedure TTef.FechaTransacaoTEF;
begin
try
ArquivoINI := TIniFile.Create(F_PathArq+�ESPDV.INI�);
ArquivoINI.WriteString(�STATUS�, �Transacao�, �Fechada�);
ArquivoINI.DeleteKey(�STATUS�,�Rede�);
finally
ArquivoINI.Free;
end;
end;

F�rum Opera��es Pendentes em TEF #339308