Desenvolvimento do ConsultarReciboEvento R-2055 Sped Reinf.

[magistech]

pcnReinfConsulta.pasDesenvolvi o procedimento de consultar o recibo para o evento R-2055. Para que possamos ter resposta correta WebService a montagem do xml tem como parâmetro:

1 - Tipo do Evento.

2 - Tipo de Inscrição do Contribuinte.

3 - Número de Inscrição do Contribuinte.

4 - Período de Apuração.

5 - Tipo de Inscrição do Estabelecimento Adquirente da produção.

6 - Número de Inscrição do Estabelecimento Adquirente da produção .

7 - Tipo de Inscrição do produtor.

8 - Número de Inscrição do produtor.

A unt com as modificações encontra-se anexada.

pcnReinfConsulta.pas

Editado 10 Agosto, 2021 por magistech

[Juliana Tamizou]

Obrigado pela contribuição, em breve será validada para possível inclusão ao svn

TK-1818

[EMBarbosa]

Em 10/08/2021 at 14:24, magistech disse:

pcnReinfConsulta.pasDesenvolvi o procedimento de consultar o recibo para o evento R-2055. Para que possamos ter resposta correta WebService a montagem do xml tem como parâmetro:

1 - Tipo do Evento.

2 - Tipo de Inscrição do Contribuinte.

3 - Número de Inscrição do Contribuinte.

4 - Período de Apuração.

5 - Tipo de Inscrição do Estabelecimento Adquirente da produção.

6 - Número de Inscrição do Estabelecimento Adquirente da produção .

7 - Tipo de Inscrição do produtor.

8 - Número de Inscrição do produtor.

A unt com as modificações encontra-se anexada.

pcnReinfConsulta.pas 7 kB · 2 downloads

Bom dia.

Surgiu aqui uma dúvida na implementação, o valor das duas propriedades

    "FnrInscAdq"
    "FtpInscAdq"

Não seriam o mesmo das já existentes abaixo?

    "FtpInscEstab"
    "FnrInscEstab"

 

Quero dizer, será que as linhas abaixo:

       Gerador.wCampo(tcInt, 'C07', 'tpInscAdq    ', 01, 01, 1, FtpInscContrib, 'XXX');
       Gerador.wCampo(tcStr, 'C08', 'nrInscAdq    ', 11, 14, 1, nrInscAdq, 'XXX');

Não seriam assim? :

       Gerador.wCampo(tcInt, 'C07', 'tpInscAdq    ', 01, 01, 1, FtpInscEstab, 'XXX');
       Gerador.wCampo(tcStr, 'C08', 'nrInscAdq    ', 11, 14, 1, FnrInscEstab, 'XXX');

Edit:

Recebemos uma outra implementação relacionada que parece concordar com meu raciocínio acima:

O que acham?

[magistech]

EMBarbosa bom dia.

É isso mesmo, nessa pcnReinfConsulta há necessidade de cria mais duas propriedade:

"FtpInscEstab"
"FnrInscEstab" 

Exatamente as que esta mencionando. Além disso há necessidade de alterar a  ACBrReinfWebServices, que no processo de consultar, para o R-2055 as propriedades criadas precisam ser instanciadas.

obrigado.

[EMBarbosa]

3 horas atrás, magistech disse:

EMBarbosa bom dia.

É isso mesmo, nessa pcnReinfConsulta há necessidade de cria mais duas propriedade:

"FtpInscEstab"
"FnrInscEstab" 

Exatamente as que esta mencionando. Além disso há necessidade de alterar a  ACBrReinfWebServices, que no processo de consultar, para o R-2055 as propriedades criadas precisam ser instanciadas.

obrigado.

Então... esses campos já existem.
Vamos fazer assim, eu vou fazer o commit basicamente da sua proposta e a partir daí a gente discute se será necessário outras alterações no tópico já mencionado, ok?

[magistech]

OK. Obrigado.

[EMBarbosa]

2 horas atrás, magistech disse:

OK. Obrigado.

Nós agradecemos pela sua contribuição.
Subi as alterações para o SVN na Revisão  22858.
Pelo que vi está tudo certo.
Queira por favor atualizar, testar e reportar qualquer problema.

Apenas como combinado, vamos continuar no tópico relacionado: