Jump to content

Delphi Enterprise 
pela METADE DO PREÇO

botao_delphi.png

Curso Dominando o ACBrMonitor
Novo Módulo Soluções de Varejo
Assine o SAC ACBr em qualquer plano e tenha acesso

Saiba Mais

Balança SM100 performance surpreendente

Tecnologia Japonesa   Teclado e Visor resistentes a água
Consumo inteligente de etiquetas   Baixo custo de manutenção
Comunicação Ethernet e WIFI independentes

Saiba Mais

Impressora de Etiquetas ELGIN - L42 PRO

Protocolos PPLA, PPLB, ZPL, EPL (automático)
Porta USB padrão Opcionais: Ethernet, Serial, Paralela
Sensor de Etiquetas Móvel Garantia de 18 meses

Saiba mais

Gracilane Lima

Novos indicadores do tipo de frete no sped Fiscal

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

Recommended Posts

Especificamente, quais registros você está falando?


[]'s

Consultor SAC ACBr

Elton
Ajude o Projeto ACBr crescer - Assine o SAC

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.

Share this post


Link to post
Share on other sites
42 minutos atrás, Gracilane Lima disse:

O registro é o C100.

Realmente. Só que precisamos analisar como alterar o tipo.

Note que o D100 usa o mesmo tipo pra frete no entanto, os novos valores não são válidos pra ele.


[]'s

Consultor SAC ACBr

Elton
Ajude o Projeto ACBr crescer - Assine o SAC

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.

Share this post


Link to post
Share on other sites

@EMBarbosa, boa tarde. No registro D100 foram incluídos os campos COD_MUN_ORIG e COD_MUN_DEST que ainda não constam no ACBr, apenas nos registros que já possuíam o campo. Eles também têm alguma particularidade ou é por que ainda não são obrigatórios? Desde já, obrigado.

Share this post


Link to post
Share on other sites

Acho que não tem particularidade. Se quiserem podem implementar e anexar aqui os arquivos alterados.


[]'s

Consultor SAC ACBr

Elton
Ajude o Projeto ACBr crescer - Assine o SAC

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.

Share this post


Link to post
Share on other sites

Bom dia Elton

Estou implementando parte dos ajustes, assim que terminar posto, estou sem acesso a commit no repositório.

  • Like 1

Ederson Selvati
www.criareti.com.br

Skype: eselvati

Share this post


Link to post
Share on other sites

Seguem modificações para os dois novos campos COD_MUN_ORIG, COD_MUN_DEST, caso esteja não conforme, por gentileza me avisem que ajusto.

 

http://sped.rfb.gov.br/estatico/0D/2DC4C346EDFCDFAFA26C391C7398D060594B50/GUIA PRÁTICO DA EFD - Versão 2.0.22.pdf

 

 

 

 

ACBrEFDBloco_D_Class.pas

ACBrEFDBloco_D.pas

  • Like 2

Ederson Selvati
www.criareti.com.br

Skype: eselvati

Share this post


Link to post
Share on other sites
2 horas atrás, Ederson Selvati disse:

Seguem modificações para os dois novos campos COD_MUN_ORIG, COD_MUN_DEST, caso esteja não conforme, por gentileza me avisem que ajusto.

 

http://sped.rfb.gov.br/estatico/0D/2DC4C346EDFCDFAFA26C391C7398D060594B50/GUIA PRÁTICO DA EFD - Versão 2.0.22.pdf

 

 

 

 

ACBrEFDBloco_D_Class.pas

ACBrEFDBloco_D.pas

No svn


Consultor SAC ACBr Juliomar Marchetti
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr

skype: juliomar
telegram: juliomar
http://www.juliomarmarchetti.com.br
Embarcadero MVP
Projeto ACBr - A maior comunidade Open Source de Automação Comercial do Brasil

Share this post


Link to post
Share on other sites
Em 06/01/2018 at 09:30, Ederson Selvati disse:

Boa tarde

Dois novos ajustes foram necessários, agora no bloco K, registro 220.

ACBrEFDBloco_D.pas

ACBrEFDBloco_D_Class.pas

ACBrEFDBloco_K.pas

ACBrEFDBloco_K_Class.pas

No svn as alterações

Obrigado

  • Like 1

Consultor SAC ACBr Juliomar Marchetti
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr

skype: juliomar
telegram: juliomar
http://www.juliomarmarchetti.com.br
Embarcadero MVP
Projeto ACBr - A maior comunidade Open Source de Automação Comercial do Brasil

Share this post


Link to post
Share on other sites

Boa tarde,

No arquivo ACBrEFDBloco_K_Class.pas ao alterar:

De:
          Add( LFill('K220') +
               LFill( DT_MOV ) +
               LFill( COD_ITEM_ORI  ) +
               LFill( COD_ITEM_DEST  ) +
               DFill( QTD, 3 ) );

 

Para: 
          Add( LFill('K220') +
               LFill( DT_MOV ) +
               LFill( COD_ITEM_ORI  ) +
               LFill( COD_ITEM_DEST  ) +
               DFill( QTD, 3 )+
                     DFill( QTD_DEST, 3 ));

Deveria ter a checagem igual ao arquivo ACBrEFDBloco_D_Class.pas 

IfThen(DT_INI >= EncodeDate(2018,01,01),

 

Grato.

Share this post


Link to post
Share on other sites

Bom dia,

Desculpe a demora.

 

ACBrEFDBloco_K_Class.pas \Fontes\ACBrTXT\ACBrSPED\ACBrSPEDFiscal\ACBrEFDBloco_K_Class.pas

Também fiz umas correções e melhorias no exemplo do Sped, segue fontes para análise:

Frm_SPEDFiscal.pas \Fontes\Exemplos\ACBrTXT\ACBrSPED\Delphi\Fiscal\Frm_SPEDFiscal.pas
Frm_SPEDFiscal.dfm \Fontes\Exemplos\ACBrTXT\ACBrSPED\Delphi\Fiscal\Frm_SPEDFiscal.dfm
 

 

  • Like 1

Share this post


Link to post
Share on other sites
Em 19/12/2017 at 09:11, Gracilane Lima disse:

Bom dia! 

 

Com o novo manual do sped fiscal para 2018 foram criados dois tipos de campos no frete. 

Não consigo localizar os campos no ACBR, já foi liberado?

 

image.png.e58bda353bf6bb7e5659ef1e6e584bbd.png

 

Esbarrei neste mesmo problema.

Share this post


Link to post
Share on other sites

Boa tarde.

Mesmo que o registro D100 use uma lista diferente de tipos para o campo do indicador do frete no registro C100, creio que seja possível usar o mesmo tipo de dados e apenas mapear os valores ao gerar o conteúdo do arquivo.

Não vou postar as units porque uso uma versão modificada do projeto, com propriedades adicionais. Então, pra reduzir os conflitos, vou postar apenas o código modificado em cada unit.

ACBrEFDBlocos.pas

  /// Indicador do tipo do frete
  TACBrIndFrt = (tfPorContaEmitente,            // 0 - Contratação do Frete por conta do Remetente (CIF)
                 tfPorContaDestinatario,        // 1 - Contratação do Frete por conta do Destinatário (FOB)
                 tfPorContaTerceiros,           // 2 - Contratação do Frete por conta de Terceiros
                 tfProprioPorContaRemetente,    // 3 - Transporte Próprio por conta do Remetente
                 tfProprioPorContaDestinatario, // 4 - Transporte Próprio por conta do Destinatário
                 tfSemCobrancaFrete,            // 9 - Sem Ocorrência de Transporte
                 tfNenhum                       // Preencher vazio
                 );

ACBrEFDBloco_D_Class.pas

          if DT_INI < EncodeDate(2012,07,01) then
          begin
             case IND_FRT of
               tfPorContaTerceiros:                                   strIND_FRT := '0';
               tfPorContaEmitente, tfProprioPorContaRemetente:        strIND_FRT := '1';
               tfPorContaDestinatario, tfProprioPorContaDestinatario: strIND_FRT := '2';
               tfSemCobrancaFrete:                                    strIND_FRT := '9';
               tfNenhum:                                              strIND_FRT := '';
             end
          end
          else
          begin
             case IND_FRT of
               tfPorContaEmitente, tfProprioPorContaRemetente:        strIND_FRT := '0';
               tfPorContaDestinatario, tfProprioPorContaDestinatario: strIND_FRT := '1';
               tfPorContaTerceiros:                                   strIND_FRT := '2';
               tfSemCobrancaFrete:                                    strIND_FRT := '9';
               tfNenhum:                                              strIND_FRT := '';
             end;
          end;

ACBrEFDBloco_C_Class.pas

          if DT_INI < EncodeDate(2012,01,01) then
          begin
            case IND_FRT of
              tfPorContaTerceiros:                                   strIND_FRT := '0';
              tfPorContaEmitente, tfProprioPorContaRemetente:        strIND_FRT := '1';
              tfPorContaDestinatario, tfProprioPorContaDestinatario: strIND_FRT := '2';
              tfSemCobrancaFrete:                                    strIND_FRT := '9';
              tfNenhum:                                              strIND_FRT := '';
            end
          end
          else if DT_INI < EncodeDate(2018,01,01) then
          begin
            case IND_FRT of
              tfPorContaEmitente, tfProprioPorContaRemetente:        strIND_FRT := '0';
              tfPorContaDestinatario, tfProprioPorContaDestinatario: strIND_FRT := '1';
              tfPorContaTerceiros:                                   strIND_FRT := '2';
              tfSemCobrancaFrete:                                    strIND_FRT := '9';
              tfNenhum:                                              strIND_FRT := '';
            end;
          end
          else
          begin
            case IND_FRT of
              tfPorContaEmitente:            strIND_FRT := '0';
              tfPorContaDestinatario:        strIND_FRT := '1';
              tfPorContaTerceiros:           strIND_FRT := '2';
              tfProprioPorContaRemetente:    strIND_FRT := '3';
              tfProprioPorContaDestinatario: strIND_FRT := '4';
              tfSemCobrancaFrete:            strIND_FRT := '9';
              tfNenhum:                      strIND_FRT := '';
            end;
          end;

Share this post


Link to post
Share on other sites

Buenas 

por favor anexe o arquivo alterado para que possa ser feito o merge e validação


Consultor SAC ACBr Juliomar Marchetti
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr

skype: juliomar
telegram: juliomar
http://www.juliomarmarchetti.com.br
Embarcadero MVP
Projeto ACBr - A maior comunidade Open Source de Automação Comercial do Brasil

Share this post


Link to post
Share on other sites
21 horas atrás, Daniel Sonda disse:

Não é possível aplicar seu código tem em todos os locais que vi um DadosAdicionais que foge ao padrão do componente e não tem esse procedimento nos códigos enviados.


Consultor SAC ACBr Juliomar Marchetti
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr

skype: juliomar
telegram: juliomar
http://www.juliomarmarchetti.com.br
Embarcadero MVP
Projeto ACBr - A maior comunidade Open Source de Automação Comercial do Brasil

Share this post


Link to post
Share on other sites
3 horas atrás, Juliomar Marchetti disse:

Não é possível aplicar seu código tem em todos os locais que vi um DadosAdicionais que foge ao padrão do componente e não tem esse procedimento nos códigos enviados.

Apliquei as alterações nos fontes originais do projeto.

Houve correção também na identação da unit ACBrEFDBloco_C_Class.pas.

ACBrEFDBloco_D_Class.pas

ACBrEFDBlocos.pas

Share this post


Link to post
Share on other sites
20 minutos atrás, Daniel Sonda disse:

Apliquei as alterações nos fontes originais do projeto.

Houve correção também na identação da unit ACBrEFDBloco_C_Class.pas.

ACBrEFDBloco_D_Class.pas

ACBrEFDBlocos.pas

Agora com os arquivos corretos. Me desculpem.

ACBrEFDBloco_C_Class.pas

ACBrEFDBloco_D_Class.pas

ACBrEFDBlocos.pas

  • Like 1

Share this post


Link to post
Share on other sites
Em 20/02/2018 at 18:01, Daniel Sonda disse:

Agora com os arquivos corretos. Me desculpem.

ACBrEFDBloco_C_Class.pas

ACBrEFDBloco_D_Class.pas

ACBrEFDBlocos.pas

Bom dia

no svn a contribuição

Obrigado.

  • Thanks 1

Consultor SAC ACBr Juliomar Marchetti
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr

skype: juliomar
telegram: juliomar
http://www.juliomarmarchetti.com.br
Embarcadero MVP
Projeto ACBr - A maior comunidade Open Source de Automação Comercial do Brasil

Share this post


Link to post
Share on other sites
  • Este tópico foi criado há 827 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now

×
×
  • Create New...