Ir para conteúdo
  • Cadastre-se

dev botao

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

Recommended Posts

  • Moderadores
Postado
  Em 11/11/2019 at 12:23, Ana Paula Fernandes de Souza disse:

Realmente a propriedade chama ImprimeEmUmaLinha, cometi um erro na descrição do problema, mas a imagem do código mostra que já está no padrão novo.

Expandir  

Atualizei agora e parece normal:

image.png

Veja se o objeto que está tentando alterar é realmente da classe ACBrNFeDANFCeFortes.

Equipe ACBr BigWings
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr

 

 

  • Moderadores
  • Solution
Postado
  Em 11/11/2019 at 14:08, Ana Paula Fernandes de Souza disse:

O nome do componente é TACBrNFeDANFeRL, antes da atualização ele tinha a propriedade imprimeEmUmaLinha, agora não tem .

Expandir  

Como se trata de DANFE NFe essa propriedade realmente não era utilizada, nem fazia sentido manter. Foi sim removida e mantida apenas para os componentes NFCe.

  • Curtir 1
Equipe ACBr BigWings
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr

 

 

Postado

O erro Esta sendo quando imprime NFCE com FastReport
com forte esta Normal

 

Unit ACBrNFeDANFEFRDM
Linha 1748


    if (FDANFEClassOwner is TACBrNFeDANFCEClass) then
    begin
      FieldByName('ImprimeEm1Linha').AsString        := IfThen( TACBrNFeDANFCEClass(FDANFEClassOwner).ImprimeEmUmaLinha, 'S', 'N');
//    FieldByName('ImprimeEmDuasLinhas').AsString    := IfThen( TACBrNFeDANFCEClass(FDANFEClassOwner).ImprimeEmDuasLinhas, 'S', 'N');
      FieldByName('QrCodeLateral').AsString          := IfThen( TACBrNFeDANFCEClass(FDANFEClassOwner).ImprimeQRCodeLateral, 'S', 'N');
      FieldByName('ImprimeDescAcrescItem').AsInteger := IfThen( TACBrNFeDANFCEClass(FDANFEClassOwner).ImprimeDescAcrescItem, 1 , 0 );
    end;

 

  • Moderadores
Postado
  Em 11/11/2019 at 18:22, EdmarFrazao disse:

O erro Esta sendo quando imprime NFCE com FastReport
com forte esta Normal

 

Unit ACBrNFeDANFEFRDM
Linha 1748


    if (FDANFEClassOwner is TACBrNFeDANFCEClass) then
    begin
      FieldByName('ImprimeEm1Linha').AsString        := IfThen( TACBrNFeDANFCEClass(FDANFEClassOwner).ImprimeEmUmaLinha, 'S', 'N');
//    FieldByName('ImprimeEmDuasLinhas').AsString    := IfThen( TACBrNFeDANFCEClass(FDANFEClassOwner).ImprimeEmDuasLinhas, 'S', 'N');
      FieldByName('QrCodeLateral').AsString          := IfThen( TACBrNFeDANFCEClass(FDANFEClassOwner).ImprimeQRCodeLateral, 'S', 'N');
      FieldByName('ImprimeDescAcrescItem').AsInteger := IfThen( TACBrNFeDANFCEClass(FDANFEClassOwner).ImprimeDescAcrescItem, 1 , 0 );
    end;

Expandir  

Esse já é outro caso, já foi corrigido.

  • Curtir 3
Equipe ACBr BigWings
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr

 

 

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