Jump to content

click.png

click.png

click.png

click.png

click.png

click.png

click.png click.png click.png

logo_acbr_paygo.png

TEF ACBr PayGo
Seja um revendedor e ofereça uma solução completa para seu cliente.


Saiba mais

beneficios.png

click.png

click.png

click.png

ConsultaReciboEvento2060


Joffas
Go to solution Solved by Italo Giurizzato Junior,
  • Este tópico foi criado há 958 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui

Recommended Posts

Bom dia saiu o novo manual do Desenvolvedor Versão 1.04.00 Dezembro de 2018, especificando como recuperar o numero do recibo sem o número do protocolo,

Até o momento eu implementei no componente a consulta do recibo do Evento R-2060, acredito não estar muito nos padrões mais já quebra um galho para quem tem mais conhecimento no componente e queira melhorar...

segue os fontes que alterei..

Metodo criado...

function TACBrReinf.ConsultaReciboEvento(const APerApur, ATipoEvento: String): Boolean;
begin
  Result := WebServices.ConsultaReciboEvento(APerApur, ATipoEvento);
end;
 

image.thumb.png.18a844f88b434c1cf7a20f0f9d79a444.png

ACBrReinf.rar

Link to comment
Share on other sites

  • Consultores

Boa tarde Joffas,

O que você acha de trocarmos o tipo do parâmetro ATipoEvento de String para TTipoEvento?

Isso impede que alguém coloque o numero de um evento que não existe no Reinf.

  • Like 1
Consultor SAC ACBr Italo Giurizzato Junior
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr

Analista de Sistemas / e-mail: [email protected] / Fone: (16) 9-9701-5030 / Araraquara-SP

Link to comment
Share on other sites

14 horas atrás, Italo Jurisato Junior disse:

Boa tarde Joffas,

O que você acha de trocarmos o tipo do parâmetro ATipoEvento de String para TTipoEvento?

Isso impede que alguém coloque o numero de um evento que não existe no Reinf.

Bom dia Italo,

Então acredito que o codigo ficou um pouco programado via "POG" pois sou novato no componente rsss....

Mas acredito que não tem problema em mudar pois fiz assim porque faço uma concatenação no parâmetros de envio para o WebService que pedem somente números exemplo:

Consultar um evento R-1000, ConsultaReciboEvento1000

R-2010, ConsultaReciboEvento2010 e assim por diante.

Ai só teria que fazer uma função para converter de R1000 => '1000'.

Link to comment
Share on other sites

  • Consultores

Bom dia Joffas,

Posso ver isso, como disse usar um enumerador evita erros ao informar tipo de eventos que não existem.

  • Like 2
Consultor SAC ACBr Italo Giurizzato Junior
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr

Analista de Sistemas / e-mail: [email protected] / Fone: (16) 9-9701-5030 / Araraquara-SP

Link to comment
Share on other sites

  • Consultores

Joffas,

Favor atualizar os fontes, veja como ficou a implementação agora desse novo método de consulta.

  • Like 1
Consultor SAC ACBr Italo Giurizzato Junior
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr

Analista de Sistemas / e-mail: [email protected] / Fone: (16) 9-9701-5030 / Araraquara-SP

Link to comment
Share on other sites

3 horas atrás, Italo Jurisato Junior disse:

Joffas,

Favor atualizar os fontes, veja como ficou a implementação agora desse novo método de consulta.

Italo,

Ficou muito melhor so fiz uma correção no envio da inscrição do estabelecimento que tem que ir completa e estava indo com 8 digitos

Segue as duas units com as alterações

image.thumb.png.f2831763410103f57ba7e5a3c8d452d9.png

ACBrReinf.rar

Link to comment
Share on other sites

  • Consultores
  • Solution

Boa tarde Joffas,

Fiz mais uma pequena alteração, favor atualizar e faça novos testes.

Caso tenha consulta para os demais eventos, acredito que agora esta fácil de acrescentar.

  • Like 3
Consultor SAC ACBr Italo Giurizzato Junior
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr

Analista de Sistemas / e-mail: [email protected] / Fone: (16) 9-9701-5030 / Araraquara-SP

Link to comment
Share on other sites

1 hora atrás, Italo Jurisato Junior disse:

Boa tarde Joffas,

Fiz mais uma pequena alteração, favor atualizar e faça novos testes.

Caso tenha consulta para os demais eventos, acredito que agora esta fácil de acrescentar.

Fechou Italo perfeito, obrigado, esta funcionando 100%!!

Edited by Joffas
  • Like 3
Link to comment
Share on other sites

  • Este tópico foi criado há 958 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui
Guest
This topic is now closed to further replies.
×
×
  • Create New...

Important Information

We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.