Alteração Campo IND_FRT

[malk182]

No bloco C registro C100 o campo 17 IND_FRT deve ser de:

          case IND_FRT of

            tfPorContaTerceiros:    strIND_FRT := '0';

            tfPorContaEmitente:     strIND_FRT := '1';

            tfPorContaDestinatario: strIND_FRT := '2';

            tfSemCobrancaFrete:     strIND_FRT := '9';

            tfNenhum:               strIND_FRT := '';

          end;

Para

          case IND_FRT of

            tfPorContaEmitente:     strIND_FRT := '0';

            tfPorContaDestinatario: strIND_FRT := '1;

            tfPorContaTerceiros:    strIND_FRT := '2';

            tfSemCobrancaFrete:     strIND_FRT := '9';

            tfNenhum:               strIND_FRT := '';

          end;

Alteração realizada na versão 1.0.4 do Guia Pratico.

[analista.edilson]

Então, alguem já alterou isso no código do ACBr?

[EMBarbosa]

Não. Ainda continua assim.

PS.:

Vale a pena notar que o guia prático explica:

Obs.: A partir de 01/01/2012 passará a ser:

Indicador do tipo do frete:

0- Por conta do emitente;

1- Por conta do destinatário/remetente;

2- Por conta de terceiros;

9- Sem cobrança de frete.

O grifo é meu.

[analista.edilson]

Então parece já estar defasado.

[EMBarbosa]

Parece que sim.

O problema é, após corrigir isso, quem tiver armazenado os dados como integer ou string na hora de fazer conversão para o tipo TACBrTipoFrete vai encontrar problemas. Ou vai ter que atualizar o BD antes de gerar o arquivo SPED ou vai ter que, na hora da geração, fazer essa conversão.

De qualquer forma, vou verificar isso o mais rápido possível.

Não sei se entenderam, mas isso é um pouco mais complicado do que aparenta pra quem já tem dados lançados.

[malk182]

Mas não tem jeito isso sempre que mudarem a legislação vai dar problema, eu mesmo guardo a posição dos box no banco porém na hora de testar eu faço a associação entre o código meu interno e o Enum correto.

Essa ultima alteração já foi feita no SVN?

[EMBarbosa]

ainda não...

[malk182]

Problema é quem ja envio o Sped Pis Cofins do mês de janeiro vai enviar o arquivo incorreto.

[EMBarbosa]

malk182,

vou corrigir hoje isso. É que a ideia era usar um método que seria um tipo de conversor para isso, mas não estou tendo tempo de testar tudo esses dias. Vou colocar um aviso no Changelog no entanto avisando sobre esse problema de compatibilidade.

[ricardomendes]

Boa Tarde pessoal...

Elton....não seria uma solução criar um if nesse trecho...

Ficando algo parecido com o codigo abaixo (não testei...apenas estou dando a ideia)

if(DT_DOC > '01.01.2012')then

begin

case IND_FRT of

tfPorContaEmitente: strIND_FRT := '0';

tfPorContaDestinatario: strIND_FRT := '1';

tfPorContaTerceiros: strIND_FRT := '2';

tfSemCobrancaFrete: strIND_FRT := '9';

tfNenhum: strIND_FRT := '';

end;

end

else

case IND_FRT of

tfPorContaTerceiros: strIND_FRT := '0';

tfPorContaEmitente: strIND_FRT := '1';

tfPorContaDestinatario: strIND_FRT := '2';

tfSemCobrancaFrete: strIND_FRT := '9';

tfNenhum: strIND_FRT := '';

end;

end;

[EMBarbosa]

Talvez a sua ideia resolvesse.

Mas seria muito melhor se a receita quando mudasse esses detalhes incrementassem a versão do arquivo.

Seria muito mais fácil tratar no código.