URGENTE PAF 0112 POSTO EM HOMOLOGAÇÃO

[ALA]

Senhores, bom noite, estou terminando a homologação do meu sistema no PAF 01.12 amanha, mas foi solicitado que o eu sistema busque o encerrante inicial e finla da bomba para atender a solicitação da tela de troca de placa eletroniaca da bomba. Alguem pode me enviar um exempo de como capturar o encerrante direto da bomba. Utilizo a dll da company tech

[ALA]

Pessoal agardo ajuda da comunidade. Ja estou 5 dias homologando o software da empresa, tenho que teminhar amanha de qualquer forma. Os donos da emprea já estão no meu pe, achando que esta demorando d+. Ja homologuei DAV/PRE VENDA, supermercado e agora estou no ultimo teste do posto. Conto com a colaboração da comunidade. Obrigado

[marciodc]

Supondo que você já tem as rotinas para captura de abastecimentos, é necessário somente colocar mais uma função:

function TSeuForm.Encerrante(RetornoBico: String):Double;

var st : encerrante;

begin

try

st := ConsultaEncerrante('L', RetornoBico);

Result := st.Valor;

except

Result := 0;

end;

end;

[ALA]

Cara, muito obrigado, funcionou bzl. Projeto homologado com sucesso. VAREJO, DAV, PRE VENDA, POSTO DE COMBUSTIVEL.