Provedor Elotech - Dados da dedução

[CS Sistemas]

Gostaria que fosse implementadas as propriedades de dados da dedução na parte de Servico.ItemServico ao gerar a nota de serviço.
Para isto, observei que já existe o que preciso em Servico.Deducao mas que ainda não foi implementado para a Elotech.

As informações abaixo se referem ao arquivo XSD e um trecho da nota fiscal de serviço feita no próprio site da prefeitura.

 

Estou à disposição para mais informações... 

Att,

Alex Leiva
CS Sistemas.

 

 

[Italo Giurizzato Junior]

Tópico movido para a área do SAC, para que o SLA de respostas seja considerado

[CS Sistemas]

Bom dia Ítalo.

Só complementando as informações: na tag TipoDeducao, temos dois valores: (M)aterial e (S)ubempreiteira. Na verdade são 3 - adicione (E)quipamento - mas este ainda não consta no arquivo de esquemas.

 

[Italo Giurizzato Junior]

Bom dia Alex,

Já inclui na minha lista de tarefas para analise. TK-3797

[CS Sistemas]

Bom dia Ítalo.

Como eu faço pra acompanhar esta tarefa, por favor?

 

[Diego Foliene]

53 minutos atrás, CS Sistemas disse:

Bom dia Ítalo.

Como eu faço pra acompanhar esta tarefa, por favor?

 

Bom dia.

Essa tarefa é para controle interno.

Fique de olho neste tópico, qualquer novidade o será comentada aqui.

[Italo Giurizzato Junior]

Boa tarde Alex,

Já esta no SVN.

Favor atualizar todos os fontes de todas as pastas, reinstale o ACBr e faça novos testes.

[CS Sistemas]

Bom dia Ítalo.

Ok, vou fazer isto e informo aqui... obrigado...

 

[CS Sistemas]

Boa tarde Ítalo.

Ficou legal o que foi feito mas eu tive que alterar algumas coisas para poder se adequar com a exigê ncia do provedor.

Em anexo o arquivo modificado.

Também tive que colocar uma um condição para que o bloco dos DadosDedução não fosse gerado em todas as sequencias dos ItensServiços, mesmo que os dados estivessem vazios.

function TNFSeW_Elotech203.GerarDadosDeducao(Item: Integer): TACBrXmlNode;
var
  aDoc: string;
begin
  if NFSe.Servico.ItemServico[Item].DadosDeducao.TipoDeducao = tdNenhum then
    Exit;
 

Eu fiz conforme está acima, mas se achar que pode ser feito de uma forma melhor... da forma que eu fiz atendeu a necessidade. 

Fico no aguardo para mais informações, se precisar...

Att,
Alex Leiva

 

EloTech.GravarXml.pas

[Italo Giurizzato Junior]

Boa tarde Alex,

Muito obrigado pela contribuição, já inclui na minha lista de tarefas. TK-3814

[Italo Giurizzato Junior]

Alex,

Já esta no SVN.

[CS Sistemas]

Boa noite Ítalo.

Desculpe-me não ter reportado antes... mas as últimas alterações resolveram os problemas.

Obrigado

 

[Italo Giurizzato Junior]

Obrigado por reportar.

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