Jump to content

dev botao

Seja bem-vindo
Seja um membro do ACBr Pro e agilize seu software Taxpay Summit 2025 - ACBr Patrocinador Ouro Combo Alpha da Ettera - Condições especiais para comunidade Participe do Discord do ACBr Regras e orientações da nossa comunidade

Novos indicadores do tipo de frete no sped Fiscal

Gracilane Lima

By Gracilane Lima
in ACBrSPEDFiscal

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

Recommended Posts

  • Consultores
EMBarbosa Veteran

EMBarbosa

Posted
  • Consultores
Posted

Especificamente, quais registros você está falando?

[]'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
EMBarbosa Veteran

EMBarbosa

Posted
  • Consultores
Posted
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
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.
Ubirajara Enthusiast

Ubirajara

Posted
Posted

@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.

  • Consultores
EMBarbosa Veteran

EMBarbosa

Posted
  • Consultores
Posted

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

[]'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.
  • 3 weeks later...
  • Membros Pro
Ederson Selvati Enthusiast

Ederson Selvati

Posted
  • Membros Pro
Posted

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

  • Moderadores
Juliomar Marchetti Grand Master

Juliomar Marchetti

Posted
  • Moderadores
Posted
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
 

Projeto ACBr

skype: juliomar
telegram: juliomar
e-mail: [email protected]
http://www.juliomarmarchetti.com.br 		MVP_NewLogo_100x100_Transparent-02.png
 

 

  • Moderadores
Juliomar Marchetti Grand Master

Juliomar Marchetti

Posted
  • Moderadores
Posted
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
 

Projeto ACBr

skype: juliomar
telegram: juliomar
e-mail: [email protected]
http://www.juliomarmarchetti.com.br 		MVP_NewLogo_100x100_Transparent-02.png
 

 

  • 2 weeks later...
CalixtoJB Explorer

CalixtoJB

Posted
Posted

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.

  • 2 weeks later...
SHDW Collaborator

SHDW

Posted
Posted
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.

  • 3 weeks later...
Daniel Sonda Contributor

Daniel Sonda

Posted
Posted

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;

  • Moderadores
Juliomar Marchetti Grand Master

Juliomar Marchetti

Posted
  • Moderadores
Posted
21 horas atrás, Daniel Sonda disse:

Ok, arquivos anexados.

ACBrEFDBloco_C_Class.pas

ACBrEFDBloco_D_Class.pas

ACBrEFDBlocos.pas

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
 

Projeto ACBr

skype: juliomar
telegram: juliomar
e-mail: [email protected]
http://www.juliomarmarchetti.com.br 		MVP_NewLogo_100x100_Transparent-02.png
 

 

  • Este tópico foi criado há 2522 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
 Share
Go to topic listing
×
×
  • Create New...

Important Information

We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.

The popup will be closed in 10 seconds...