hleorj

@CelsoPossui a mesma regra da descrição do produto

@Celso, valor entre 100 - 120 , estará ótimo. @Celso , @RicardoVoigt , o que estão pensando sobre quebra de linha no código do produto ? Possuem alguma dica ?

Use danferetrato.fr3 ou danferetratonovo.fr3

Bom dia , informe mas detalhes. fez atualização ? , Fez testes com o demo ? Post seu XML para facilitar.

Eu não uso o monitorplus. mas vi que realmente que configuração tem o máximo de 60. @Celso , existe alguma possibilidade de aumentar o limite no monitor ?

Enviado na revisão : 12901 Favor , efetuar testes. Grato por reportar.

Efetue alguns testes com o demo . Alterando a propriedade LarguraCodProd para 73 ou outro valor

Procure uma configuração tenha Largura do Código do Produto , altere o valor para 73 ou outro.

Não era mas simples , abrir um novo post. Do que aproveitar o mesmo post para colocar vários assuntos ? Favor, sempre abrir um novo para assuntos diferentes. Grato.

Claro que sim.

Não existe configuração/ propriedade na danfe fastreport que execute o procedimento. Na danfe Forte report , existe uma propriedade que é possível fazer o controle.

Enviado ao SVN. na revisão 12874 Grato pela ajuda de todos os envolvidos.

Minha sugestão, otimizada : - Remoção de variáveis - Refatoração / remoção no uso do if.. else.. end; - Remoção de códigos duplicados - Nova inicialização de variáveis ; Se passar nos seus testes, envio ao SVN. ACBrNFeDANFeRLRetrato.pas ACBrNFeDANFeRLPaisagem.pas

Para facilitar .. post a tag prod completa dos produtos.

Pesquisou ?

Segue a analise de alteração Antes teContingencia, teFSDA, teSCAN, teSVCAN, teSVCRS, teSVCSP : begin sChaveContingencia := TACBrNFe(TACBrNFeDANFeRL(Owner).ACBrNFe).GerarChaveContingencia(FNFe); rlbCodigoBarrasFS.Caption := sChaveContingencia; rlbCodigoBarrasFS.Visible := True; rllDadosVariaveis3_Descricao.Caption:= 'DADOS DA NF-E'; rllDadosVariaveis3.Caption := FormatarChaveAcesso(sChaveContingencia); if (dhCont > 0) and (xJust > '') then rllContingencia.Caption := ACBrStr( 'Data / Hora da entrada em contingência: ') + FormatDateTime('dd/mm/yyyy hh:nn:ss', dhCont) + ' Motivo contingência: ' + xJust; end; Depois teContingencia, teFSDA, teSCAN, teSVCAN, teSVCRS, teSVCSP : begin sChaveContingencia := TACBrNFe(TACBrNFeDANFeRL(Owner).ACBrNFe).GerarChaveContingencia(FNFe); if FNFe.Ide.tpEmis = teFSDA then begin rlbCodigoBarrasFS.Caption := sChaveContingencia; rlbCodigoBarrasFS.Visible := True; rllDadosVariaveis3_Descricao.Caption:= 'DADOS DA NF-E'; rllDadosVariaveis3.Caption := FormatarChaveAcesso(sChaveContingencia); end else begin rllDadosVariaveis1a.Visible := ( FNFe.procNFe.cStat > 0 ); rllDadosVariaveis1b.Visible := rllDadosVariaveis1a.Visible; rllDadosVariaveis1c.Visible := rllDadosVariaveis1a.Visible; if FProtocoloNFe <> '' then rllDadosVariaveis3.Caption := FProtocoloNFe else rllDadosVariaveis3.Caption := FNFe.procNFe.nProt + ' ' + DateTimeToStr(FNFe.procNFe.dhRecbto); end; if (dhCont > 0) and (xJust > '') then rllContingencia.Caption := ACBrStr( 'Data / Hora da entrada em contingência: ') + FormatDateTime('dd/mm/yyyy hh:nn:ss', dhCont) + ' Motivo contingência: ' + xJust; end; @Kiko Fernandes, @BigWings @medeiros.sunsystem, Favor analisarem o código e o pdf anexo 35170112342787000159550140000070426005016418.pdf

@Kiko Fernandes, obrigado pela orientação no detalhe. @BigWings, obrigado pela dica, vou ter que ler o pai dos burros com mas atenção, para controlar as variáveis de mensagem. @medeiros.sunsystem, foi possível simular o erro no demo, com o seu XML. Mas alguma orientação ou dica ?

Problema foi solucionado. Só esperar a nova versão do acbrmonitor.

Quais ?

Ok . Postem o xml .. rlbCodigoBarrasFS.Visible := (FNFe.Ide.tpEmis = teFSDA ); para eu testar o código

@medeiros.sunsystem, post o xml , gerado.. @Kiko Fernandes , me ajude a pensar case FNFe.Ide.tpEmis of .. teContingencia, teFSDA, teSCAN, teSVCAN, teSVCRS, teSVCSP : begin sChaveContingencia := TACBrNFe(TACBrNFeDANFeRL(Owner).ACBrNFe).GerarChaveContingencia(FNFe); rlbCodigoBarrasFS.Caption := sChaveContingencia; rlbCodigoBarrasFS.Visible := True; rllDadosVariaveis3_Descricao.Caption:= 'DADOS DA NF-E'; rllDadosVariaveis3.Caption := FormatarChaveAcesso(sChaveContingencia); if (dhCont > 0) and (xJust > '') then rllContingencia.Caption := ACBrStr( 'Data / Hora da entrada em contingência: ') + FormatDateTime('dd/mm/yyyy hh:nn:ss', dhCont) + ' Motivo contingência: ' + xJust; end; De rlbCodigoBarrasFS.Visible := True; Para rlbCodigoBarrasFS.Visible := (FNFe.Ide.tpEmis = teSVCRS ); Seria a solução ?

@Kiko Fernandes, é possível reproduzir no demo ?

Qual gerador que foi utilizado ( fast ou forte ) . Se fast qual arquivo fr3 q foi utlilizado.

Assunto está em analise.. Grato por reportar