ConsultaReciboEvento2060

[Joffas]

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;
 

ACBrReinf.rar

[Joffas]

Ultima versão consultando os eventos R1000, R2010, R2020, R2060, R2098 e R2099 (Que são os que eu utilizo).

ACBrReinf.rar

[Italo Giurizzato Junior]

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.

[Joffas]

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'.

[Italo Giurizzato Junior]

Bom dia Joffas,

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

[Italo Giurizzato Junior]

Joffas,

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

[Joffas]

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

ACBrReinf.rar

[Italo Giurizzato Junior]

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.

[Joffas]

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%!!

Editado 18 Dezembro, 2018 por Joffas

[Italo Giurizzato Junior]

Obrigado por reportar.

Fechando. Para novas dúvidas, criar um novo tópico.