Ir para conteúdo
  • Cadastre-se

dev botao

  • Este tópico foi criado há 4649 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

Postado

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.

  • Consultores
Postado

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.

[]'s

Consultor SAC ACBr

Elton
Profissionalize o ACBr na sua empresa, conheça o ACBr Pro.

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.

Um engenheiro de Controle de Qualidade(QA) entra num bar. Pede uma cerveja. Pede zero cervejas.
Pede 99999999 cervejas. Pede -1 cervejas. Pede um jacaré. Pede asdfdhklçkh.
  • Consultores
Postado

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.

[]'s

Consultor SAC ACBr

Elton
Profissionalize o ACBr na sua empresa, conheça o ACBr Pro.

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.

Um engenheiro de Controle de Qualidade(QA) entra num bar. Pede uma cerveja. Pede zero cervejas.
Pede 99999999 cervejas. Pede -1 cervejas. Pede um jacaré. Pede asdfdhklçkh.
Postado

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?

  • Consultores
Postado

ainda não...

[]'s

Consultor SAC ACBr

Elton
Profissionalize o ACBr na sua empresa, conheça o ACBr Pro.

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.

Um engenheiro de Controle de Qualidade(QA) entra num bar. Pede uma cerveja. Pede zero cervejas.
Pede 99999999 cervejas. Pede -1 cervejas. Pede um jacaré. Pede asdfdhklçkh.
  • Consultores
Postado

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.

[]'s

Consultor SAC ACBr

Elton
Profissionalize o ACBr na sua empresa, conheça o ACBr Pro.

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.

Um engenheiro de Controle de Qualidade(QA) entra num bar. Pede uma cerveja. Pede zero cervejas.
Pede 99999999 cervejas. Pede -1 cervejas. Pede um jacaré. Pede asdfdhklçkh.
Postado

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;

Att.:

W7 Soluções
Ricardo Mendes
Analista/Programador
Skype: ricardo_w7
[email protected]

  • 2 semanas depois ...
  • Consultores
Postado

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.

[]'s

Consultor SAC ACBr

Elton
Profissionalize o ACBr na sua empresa, conheça o ACBr Pro.

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.

Um engenheiro de Controle de Qualidade(QA) entra num bar. Pede uma cerveja. Pede zero cervejas.
Pede 99999999 cervejas. Pede -1 cervejas. Pede um jacaré. Pede asdfdhklçkh.
  • Este tópico foi criado há 4649 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Crie uma conta ou entre para comentar

Você precisar ser um membro para fazer um comentário

Criar uma conta

Crie uma nova conta em nossa comunidade. É fácil!

Crie uma nova conta

Entrar

Já tem uma conta? Faça o login.

Entrar Agora
×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.

The popup will be closed in 10 segundos...