ACBrTEFAPI: Contribuição

[antoniojmsjr]

Boa noite!

 

Fiz algumas implementações no componente e gostaria de compartilhar com vocês:

 

1º Implementação da Versão da API: Foi criado o método VersaoAPI para recuperar a versão da DLL ou a versão da API WEB, no meu caso foi para o modelo tefApiCliSiTEF, mas pode ser extendido para outros modelos.

- Utilizado para implementação o manual: SiTef - Interface Simplificada com a aplicação(VRS-255).pdf

2º Implementado a rotina VerificarPresencaPinPad: Foi implementado a rotina TACBrTEFAPIClassCliSiTef.VerificarPresencaPinPad para o modelo tefApiCliSiTEF. 

ACBrTEFAPI_Implementacoes.zipFetching info...

[Daniel Simoes]

Show, obrigado @antoniojmsjr

já vou analisar...

[Daniel Simoes]

Obrigado pela contribuição...

Revi as demais classes, e implementei nas que tem a informação da Versão.. Commit [r39573]

[antoniojmsjr]

Boa Daniel!

Cara, o trabalho de vocês é de outro planeta, o que vocês fazem é excepcional, parabéns!

 

[antoniojmsjr]

Bom dia @Daniel Simoes

Encontrei mais uma correção para incluir:

 

Na unit ACBrTEFComum da classe  TACBrTEFResp falta implementar os campos:

property Voucher: Boolean read fpVoucher write fpVoucher;
property EndToEndID: string read fpEndToEndID write fpEndToEndID; 

nos métodos 

procedure TACBrTEFResp.Assign(Source: TACBrTEFResp);
procedure TACBrTEFResp.Clear;

 

 

[Daniel Simoes]

oi @antoniojmsjr, poderia por favor, anexar a Unit modificada ?

[antoniojmsjr]

  Em 13/06/2025 at 13:11, antoniojmsjr disse:

Assign

Expandir  

Bom dia @Daniel Simoes

Segue as alterações

 

ACBrTEFAPI_Alteracoes.zipFetching info...

[Daniel Simoes]

Não encontrei na documentação oficial, informações sobre o retorno do campo 2021

https://dev.softwareexpress.com.br/docs/clisitef/clisitef_documento_principal/

Ele não seria a mesma coisa, que o campo 136 (BIN) ?

 

[antoniojmsjr]

Nós usamos esse campo para auditória, nem tem na documentação, mas fica disponível para leitura

 

[Daniel Simoes]

@antoniojmsjr, enviei ao SVN, modificações, baseado em suas sugestões... Commit [r39850]

-- ACBrTEFComum --
[+] Adicionada a propriedade TACBrTEFResp.PAN
[*] Quando atribui algum valor a PAN, calcula o BIN e NFCeSAT.UltimosQuatroDigitos,
    caso essas propriedades sejam vazias