Alterações para Passar na homologação do SITEF

[rodrigoogioni]

resolvi, tive que atualziar as outras units também

 

[Daniel Simoes]

Esse método teve a assinatura modificada na semana passada...

[rodrigoogioni]

Fiz alguns testes, mas  quando faz multiplos cartões, passa o primeiro em credito e depois em debito, se no segundo cartao depois de finalizar a maquina reiniciar, nao deveria estornar os dois pagamentos?

 

Grato

[adriano.quintino]

Bom dia @rodrigoogioni Tudo bem ? No caso, estávamos tratando apenas de homologação SiTEF, eu não tratei código de PayGoWeb.

[rodrigoogioni]

27 minutos atrás, adriano.quintino disse:

Bom dia @rodrigoogioni Tudo bem ? No caso, estávamos tratando apenas de homologação SiTEF, eu não tratei código de PayGoWeb.

Sim, mas é no sitef mesmo que estou mencionando.

[Daniel Simoes]

Analisando os fontes sugeridos.. parece haver um "memory leak" em ACBrTEFAPICliSiTef

notei uma repetição do código abaixo?

                if not Assigned(LRespostaTEFPendente) then
                  LRespostaTEFPendente := TACBrTEFRespCliSiTef.Create;

e esse objeto LRespostaTEFPendente  parece que nunca é destruído... mas adicionado na lista de respostas pendentes, apenas se vier um registrador 1319

Eu achei esse código inseguro, na minha opinião o LRespostaTEFPendente poderia ser criado em um método (uma sub-function)... a adicionar ele na lista, no finaly, se ele não for nulo...

[Daniel Simoes]

Também acho que não precisamos da propriedade ConfirmarPendente  em TACBrTEFResp...  a propriedade Confirmar, parece ter a mesma funcionalidade...

Como ela é inicializada como False, na criação de TACBrTEFResp,  bastaria ligar ela quando a 899-105 estiver True...

E deveríamos também usar ela como Boolean e não String

[EMBarbosa]

@adriano.quintino

Não entendi o motivo de ter adicionado o parâmetro "Funcao" na  procedure TACBrTEFAPIClassCliSiTef.ContinuarRequisicaoSiTef(Funcao:Integer);

Não parece ser utilizado.

[adriano.quintino]

4 minutos atrás, EMBarbosa disse:

@adriano.quintino

Não entendi o motivo de ter adicionado o parâmetro "Funcao" na  procedure TACBrTEFAPIClassCliSiTef.ContinuarRequisicaoSiTef(Funcao:Integer);

Não parece ser utilizado.

Oi @EMBarbosa. É verdade, pode remover ele. Acabei me esquecendo de retirá-lo. Eu estava utilizando ele pra fazer o loop de cancelamento conforme fosse recebendo os registros pendentes. Daí eu fiz as correções depois e acabei me esquecendo de remover este parâmetro.

Segue a correção em anexo

ACBrTEFAPICliSiTef.pas

[EMBarbosa]

21 minutos atrás, Daniel Simoes disse:

e esse objeto LRespostaTEFPendente  parece que nunca é destruído... mas adicionado na lista de respostas pendentes, apenas se vier um registrador 1319

Eu achei esse código inseguro, na minha opinião o LRespostaTEFPendente poderia ser criado em um método (uma sub-function)... a adicionar ele na lista, no finaly, se ele não for nulo...

Daniel acho que o @Juliomar Marchetti quando implementou essa parte e não quebrou propositalmente o layout do código atual.

Me parece que esse loop do ContinuarRequisicaoSiTef vai retornando os dados da venda um por um e não me parece que a ordem da execução é garantida (não testei e não parece ter menção disso na documentação que achei via buscador da internet)...

Por isso, eu até tinha notado essa possível falha, mas achei melhor não mexer até enxergar uma outra possibilidade. Talvez precisemos modularizar um pouco mais esse fluxo.

[EMBarbosa]

22 horas atrás, adriano.quintino disse:

acrescentei a propriedade TokenRegistro para receber o valor que a SiTEF passar para a empresa

Para o que serve essa informação TokenRegistro e o parâmetro TLSGWP mesmo?

[Daniel Simoes]

no código, também me parece que ele não teria suporte, a tratar mais de uma transação pendente.. uma vez, que ele só cria um Objeto TACBrTEFResp, dentro do Loop

[EMBarbosa]

4 minutos atrás, Daniel Simoes disse:

no código, também me parece que ele não teria suporte, a tratar mais de uma transação pendente.. uma vez, que ele só cria um Objeto TACBrTEFResp, dentro do Loop

Se eu entendi bem, o código assume(1) que o Sitef vai retornar os dados de uma transação por vez e que sempre vai retornar valor da transação por último...

Daí na primeira coleta de dado, o LRespostaTEFPendente é criado. Então, segue o loop os outros dados são coletados.

Quando for coletar o valor (1319) é chamdo o método fpACBrTEFAPI.RespostasTEF.AdicionarRespostaTEF que clona o objeto LRespostaTEFPendente.

De posse do clone na lista de objetos, o LRespostaTEFPendente é destruído, possibilitando o Sitef retornar outra transação que passará pelo mesmo processo.

(1) Não sei se o que assumimos corretamente essas premissas pois o fluxo não é descrito na documentação.

[adriano.quintino]

14 minutos atrás, EMBarbosa disse:

Para o que serve essa informação TokenRegistro e o parâmetro TLSGWP mesmo?

Segundo o manual do TLS, temos que passar estes parâmetros ao chamar a função ConfiguraIntSiTefInterativoEx em ParametrosAdicionais

[adriano.quintino]

Eu só não coloquei os parâmetros para proxy porque eu não utilizo, mas caso queiram acrescentar estes parâmetros também é possível.

Um detalhe é que estes parâmetros são exigidos nos testes de homologação, pelo menos o Token e o TLSGWP.

Editado 10 Setembro por adriano.quintino

[Daniel Simoes]

3 horas atrás, EMBarbosa disse:

(1) Não sei se o que assumimos corretamente essas premissas pois o fluxo não é descrito na documentação.

Eu acho que não devemos acatar essas mudanças, elas estão muito suscetíveis a quebrar se mudar qualquer coisas do fluxo do SiTef...

A rotina já coleta todos os retornos do SiTef em ACBrTEFResp.Conteudo.. bastaria no final, varrer o log de retorno, e montar as respostas pendentes...

Sabem se há algum link ou documentação, que descreva a transação 130 ?

[EMBarbosa]

13 minutos atrás, Daniel Simoes disse:

A rotina já coleta todos os retornos do SiTef em ACBrTEFResp.Conteudo.. bastaria no final, varrer o log de retorno, e montar as respostas pendentes...

Não sei se eu entendi essa parte.

13 minutos atrás, Daniel Simoes disse:

Sabem se há algum link ou documentação, que descreva a transação 130 ?

Está que está no link que eu mandei antes. Veja abaixo o link no texto achei via buscador :

4 horas atrás, EMBarbosa disse:

Me parece que esse loop do ContinuarRequisicaoSiTef vai retornando os dados da venda um por um e não me parece que a ordem da execução é garantida (não testei e não parece ter menção disso na documentação que achei via buscador da internet)...

 

[Daniel Simoes]

Acho que podemos implementar tudo na rotina do SiTef, onde ele procuraria tratar os arquivos de Backup... chamar o método indicado, criar uma lista de transações pendentes, e iniciar o tratamento delas, conforme a parametrização do componente

[Daniel Simoes]

7 horas atrás, adriano.quintino disse:

Um detalhe é que estes parâmetros são exigidos nos testes de homologação, pelo menos o Token e o TLSGWP.

onde posso achar informações sobre esses novos registradores de autenticação ?

Eles variam para cada terminal na mesma Loja ? ou são os mesmos parâmetros para o CNPJ ?

[Juliomar Marchetti]

8 horas atrás, EMBarbosa disse:

Me parece que esse loop do ContinuarRequisicaoSiTef vai retornando os dados da venda um por um e não me parece que a ordem da execução é garantida (não testei e não parece ter menção disso na documentação que achei via buscador da internet)...

só para ajudar sim
vai retornar  nessa ordem que coloquei
e a cada um que existir pendente

semana que vem estarei com pinpad e dai consigo fazer um teste gravado mostrando funcionando e com o código que está no svn

[Juliomar Marchetti]

47 minutos atrás, Daniel Simoes disse:

onde posso achar informações sobre esses novos registradores de autenticação ?

Eles variam para cada terminal na mesma Loja ? ou são os mesmos parâmetros para o CNPJ ?

SiTef - Interface Simplificada com a aplicação(VRS-253).pdf

[Daniel Simoes]

12 horas atrás, Juliomar Marchetti disse:

SiTef - Interface Simplificada com a aplicação(VRS-253).pdf 1.84 MB · 0 downloads

Não existe a palavra "Token", nesse documento...

[adriano.quintino]

5 horas atrás, Daniel Simoes disse:

Não existe a palavra "Token", nesse documento...

Boa tarde @Daniel Simoes 

Dê uma olhada na página 18, item 9.1 - Exemplo 1 ou exemplo 2.

CliSiTef - Projeto TLS - 1.05.pdf

[EMBarbosa]

23 horas atrás, Daniel Simoes disse:

Acho que podemos implementar tudo na rotina do SiTef, onde ele procuraria tratar os arquivos de Backup... chamar o método indicado, criar uma lista de transações pendentes, e iniciar o tratamento delas, conforme a parametrização do componente

Mas não teria que seguir o mesmo loop da ContinuarRequisicaoSiTef ? Essa parte é que acho que não entendi.

[Daniel Simoes]

Estou terminando uma possível implementação.. já mando aqui...