Ir para conteúdo
  • Cadastre-se

dev botao

DANFe da NFC-e está saindo com o valor total dos itens cortado


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

Recommended Posts

Postado

Boa Tarde, 

Gostaria de pedir ajuda aos amigos do ACBr, quando vou imprimir um DANFe de uma NFC-e utilizando o Fortes, o valor total dos itens da linha está saindo sem as casas decimais, ou seja, está cortando um pedacinho.

Anexei uma imagem com algumas tentativas de configuração, a que chegou mais perto foi a seguinte:

Result := TACBrNFe.Create(nil);
 //........
TACBrNFeDANFCEClass(Result.DANFE).ImprimeQRCodeLateral := True;
TACBrNFeDANFCEClass(Result.DANFE).ImprimeLogoLateral   := True;
TACBrNFeDANFCEClass(Result.DANFE).LarguraBobina := 275;
Result.DANFE.ImprimeEmUmaLinha                         := True;
Result.DANFE.MargemEsquerda := 2;
Result.DANFE.MargemDireita  := 2;

Se eu alterar a propriedade ImprimeEmUmaLinha para false, funciona perfeitamente, ma eu gostaria que funcionasse imprimindo somente em uma linha... Alguém já passou por esse problema?9999.thumb.png.aa6558d2f78dd4bbdec8edcbe5ada608.png

Postado
6 horas atrás, Augusto Knirsch disse:

Boa Tarde @Daniel Simoes,

Se alterar para:


Result.DANFE.ImprimeEmUmaLinha := False;

Fica conforme imagem em anexo, corta 4 caracteres, mas na descrição quando a mesma for longa.

222222222222222.png

Está informando qual valor na margem esquerda?

_____________

Prates, Agnaldo

Postado
24 minutos atrás, Augusto Knirsch disse:

Bom Dia @Agnaldo Prates,

Testei com várias combinações de valores, o melhor resultado foi:


Result.DANFE.MargemEsquerda := 2;
Result.DANFE.MargemDireita  := 2;

 

Bom dia Augusto.

Cara na minha rotina eu faço assim, porém uso o Fast Report, veja o resultado na imagem anexa.

        case NFE.Configuracoes.Geral.ModeloDF  of
        moNFe :
        begin
            NFE.DANFE.MargemInferior:=0.3;
            NFE.DANFE.MargemSuperior:=0.3;
            NFE.DANFE.MargemEsquerda:=0.5;
            NFE.DANFE.MargemDireita :=0.5;
            NFE.DANFE.MostraPreview := True;
            NFE.DANFE.TipoDANFE              := tiRetrato;
            DANFE_FR.FastFile                := DM.NFE_DANFE+'DANFeRetratoNovo.fr3';
            DANFE_FR.FastFileEvento          := DM.NFE_DANFE+'EVENTOS.fr3';
            DANFE_FR.FastFileInutilizacao    := DM.NFE_DANFE+'inutilizacao.fr3';
            NFE.DANFE.ImprimeTotalLiquido    := True;
        end;
        moNFce :
        begin
            NFE.DANFE.MargemInferior:=0.1;
            NFE.DANFE.MargemSuperior:=0.1;
            NFE.DANFE.MargemEsquerda:=0.1;
            NFE.DANFE.MargemDireita :=0.1;
            NFE.DANFE.MostraPreview := True;
            NFE.DANFE.TipoDANFE              := tiNFCe;
            NFE.DANFE.ImprimeTotalLiquido    := True;
            DANFE_FR.FastFile                := DM.NFE_DANFE+'DANFeNFCe.fr3';
        End;

 

nfe.png

_____________

Prates, Agnaldo

Postado

@Agnaldo Prates Obrigado pela resposta,

Infelizmente sem sucesso, testei com os valores utilizados por você. Se eu usar a propriedade 

Result.DANFE.ImprimeEmUmaLinha := False;

A impressão fica boa, o valor não é cortado, a descrição quando muito longa até corta, mas a impressão como um todo fica boa, o problema é que eu gostaria de utilizar a propriedade

Result.DANFE.ImprimeEmUmaLinha := True;

Pois economiza papel e acho que fica um layout mais agradável visualmente.

  • Consultores
  • Solution
Postado
55 minutos atrás, Augusto Knirsch disse:

Bom Dia @Daniel Simoes,

Gostaria de enviar uma alteração que fiz para analise e possível inclusão ao SVN, segue imagens e arquivo alterado.

2.jpg.cf16be888ae6e815eb61e3ba894c3d4e.jpg1.png.a4dc1966718d677c66286f6bb396af4e.png

ACBrDANFCeFortesFr.pas

Enviei a sua sugestão ao SVN na revisão 16081.

Queira por favor testar e reportar qualquer problema.

  • Curtir 1

[]'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.
  • Membros Pro
Postado

Estou com um problema que os descontos não estao mais aparecendo, antes ele somava os descontos e saia um totalizados agora so aparece o desconto se eu der no item o taotal não esta aparecendo.

Postado
32 minutos atrás, brajan disse:

Estou com um problema que os descontos não estao mais aparecendo, antes ele somava os descontos e saia um totalizados agora so aparece o desconto se eu der no item o taotal não esta aparecendo.

Boa Tarde @brajan, 

Acredito que seja outro tópico... Mas verifica se a propriedade

TACBrNFeDANFCEClass(Result.DANFE).ImprimeDescAcrescItem := True;

está marcada como True.

  • Administradores
Postado

Boa tarde @brajan.

Conforme citado pelo @Augusto Knirsch seu relato é outro tópico, caso ainda precise de ajuda, por favor crie um novo para seu problema.

Att.

  • Curtir 1
Consultora SAC ACBr

Juliana Tamizou

Gerente de Projetos ACBr / Diretora de Marketing AFRAC
Ajude o Projeto ACBr crescer - Seja Pro

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

Projeto ACBr - A maior comunidade Open Source de Automação Comercial do Brasil


Participe de nosso canal no Discord e fique ainda mais próximo da Comunidade !!

  • Este tópico foi criado há 2192 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.
Visitante
Este tópico está agora fechado para novas respostas
×
×
  • 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...