Ir para conteúdo
  • Cadastre-se

dev botao

Erro Na Impressão Do Danfe Em Fast Reports Para Crt = 2


adenilton
Ver Solução Respondido por juaumkiko,
  • Este tópico foi criado há 4120 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

Boa tarde,

 

Observei que o DANFE em Fast Reports está imprimindo a informação de CSOSN para empresas com CRT = 2 " Simples Nacional - excesso de sublimite de receita bruta", quando deveria imprimir as informações de CST, semelhante às empresas com tributação Normal.

 

O erro está na linha 643 da unit ACBrNFeDANFEFRDM.pas onde encontramos:

         case FNFe.Emit.CRT of
            crtSimplesNacional, crtSimplesExcessoReceita:
              begin
                case CSOSN of
                  csosn101, csosn102, csosn103, csosn201, csosn202, csosn203, csosn300, csosn400, csosn500, csosn900:
                    begin
                      FieldByName('CST').AsString  := CSOSNIcmsToStr(CSOSN);
                      FieldByName('VBC').AsFloat   := vBC;
                      FieldByName('PICMS').AsFloat := pICMS;
                      FieldByName('VICMS').AsFloat := vICMS;
                    end;
                end;
              end;
          else

Quando deveria ser:

         case FNFe.Emit.CRT of
            crtSimplesNacional:
              begin
                case CSOSN of
                  csosn101, csosn102, csosn103, csosn201, csosn202, csosn203, csosn300, csosn400, csosn500, csosn900:
                    begin
                      FieldByName('CST').AsString  := CSOSNIcmsToStr(CSOSN);
                      FieldByName('VBC').AsFloat   := vBC;
                      FieldByName('PICMS').AsFloat := pICMS;
                      FieldByName('VICMS').AsFloat := vICMS;
                    end;
                end;
              end;
          else

E na linha 868 da unit ACBrNFeDANFEFRDM.pas onde encontramos:

if Trim(FieldByName('CRT').AsString) = '3' then 
  FieldByName('DESCR_CST').AsString := 'CST'   
else
  FieldByName('DESCR_CST').AsString  := 'CSOSN';

Quando deveria ser:

if Trim(FieldByName('CRT').AsString) = '1' then 
  FieldByName('DESCR_CST').AsString := 'CSOSN'   
else
  FieldByName('DESCR_CST').AsString  := 'CST';

Alguém poderia verificar isso?

 

Link para o comentário
Compartilhar em outros sites

  • Moderadores
  • Solution

Boa tarde,

 

Observei que o DANFE em Fast Reports está imprimindo a informação de CSOSN para empresas com CRT = 2 " Simples Nacional - excesso de sublimite de receita bruta", quando deveria imprimir as informações de CST, semelhante às empresas com tributação Normal.

 

Correções sugeridas enviadas para o SVN.

Revisao 5481

 

Obrigado pela Ajuda

João Henrique de Souza

 

Manual de como configurar o TortoiseSVN para não ficar mostrando a senha repetidas vezes (somente para commiters):

https://sourceforge.net/p/forge/community-docs/TortoiseSVN/

 

 

Link para o comentário
Compartilhar em outros sites

  • Este tópico foi criado há 4120 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.