Observações Complementares

[Dangelo2010]

As informações complementares estão sendo truncadas na hora de enviar para a sefaz e na impressão do DANFE. Está sendo limitada para 337 linhas e ja fiz de tudo e nada, alquem teria alguma ideia do que poderia ser isso.

Dangelo!

[Mark Apollo]

Qual relatório você usa? Rave? Fortes? Quick? poderia postar um xml para testes?

[Dangelo2010]

Fortes

Mais o problema não e a impressão e sim o componente, e que dei uma debugada aqui e eu estou passando a quantidade de linhas correto

mais o componente esta truncando ou seja estou passado assim

InfAdic.infCpl := MensagemEmp + Alltrim(ObsComplementar);

mais quando passa para a unit "pcnNFeW"

procedure TNFeW.GerarInfAdic;

begin

if (trim(nfe.InfAdic.infAdFisco) <> EmptyStr) or

(trim(nfe.InfAdic.infCpl) <> EmptyStr) or

(nfe.InfAdic.obsCont.Count > 0) or

(nfe.InfAdic.obsFisco.Count > 0) or

(nfe.InfAdic.procRef.Count > 0) then

begin

Gerador.wGrupo('infAdic', 'Z01');

Gerador.wCampo(tcStr, 'Z02', 'infAdFisco', 01, 2000, 0, nfe.InfAdic.infAdFisco, DSC_INFADFISCO);

****** AQUI JA TRUNCA *****************

--> Gerador.wCampo(tcStr, 'Z03', 'infCpl ', 01, 5000, 0, nfe.InfAdic.infCpl, DSC_INFCPL);

****** AQUI JA TRUNCA *****************

(**)GerarInfAdicObsCont;

(**)GerarInfAdicObsFisco;

(**)GerarInfAdicProcRef;

Gerador.wGrupo('/infAdic');

end;

end;

[Angelo Gomes]

O componente limita a 5000 caracteres pq esse é o limite imposto pelo layout da NFe. Não é "erro" do componente.

[Dangelo2010]

Sim e isso mesmo sao 5000 mil linhas mais isso aconteceu de ontem para hoje o cliente foi gerar uma nota de numero 142 com a mesma mensagem e fico certo dai ele gero uma outra de numero 144 tambem com a mesma mensagem e foi justamente nessa hora que teve o erro foi truncado ai eu debuquei para ver e passa certinho com 466 linhas mais na hora que chega na unit pcnNFeW ele ja chega com 337 linhas cortando o resto da observação.

[Dangelo2010]

Veja so as imagens onde estou debugando

veja como estou passando e como o componente esta recebendo.

[André Ferreira de Moraes]

Vc não deve informar quebra de linha nas mensagens complementares.

Para quebrar as mensagens use ;(ponto e vírgula)

Os webservices não aceitam quebra de linha no XML enviado.

[Dangelo2010]

Mais porque ele quebra justamente aonde nao tem quebra?

Pois essa parte das mensagens ja funciona a quase dois anos e só ontem começo a dar esse problema do nada.

[Dangelo2010]

Já fiz desta forma tambem e nao deu certo

InfAdic.infCpl := MensagemEmp;

InfAdic.infCpl := InfAdic.infCpl + Alltrim(ObsComplementar);

trunca do mesmo jeito.

[Angelo Gomes]

qual é o tamanho EM CARACTERES da msg q vc esta passando pro componente?

[Dangelo2010]

466

[Angelo Gomes]

Desculpa a ignorancia, "alltrim" é uma função tua ou nativa do Delphi.

Testa jogar todo o texto em uma variavel e depois atribuir a propriedade do componente.

[Dangelo2010]

o alltrim e funcao minha e a mesma coisa do trim

e ja esta sendo jogado para uma variavel mais ate agora nao entendi o porque disso

ja ate troquei os schemas e ainda nao achei o que poderia ser

InfAdic.infCpl := MensagemEmp;

InfAdic.infCpl := InfAdic.infCpl + Alltrim(ObsComplementar);

[Angelo Gomes]

Vc não entendeu o que falei, teste assim, apesar que acho q não vai fazer diferença:

var_temp := MensagemEmp + Alltrim(ObsComplementar);

InfAdic.infCpl := var_temp;

[Kiko Fernandes]

Sim e isso mesmo sao 5000 mil linhas mais isso aconteceu de ontem para hoje o cliente foi gerar uma nota de numero 142 com a mesma mensagem e fico certo dai ele gero uma outra de numero 144 tambem com a mesma mensagem e foi justamente nessa hora que teve o erro foi truncado ai eu debuquei para ver e passa certinho com 466 linhas mais na hora que chega na unit pcnNFeW ele ja chega com 337 linhas cortando o resto da observação.

qual é o tamanho EM CARACTERES da msg q vc esta passando pro componente?

466

Dangelo2010, me parece que vc está confundindo linha com caracteres. O limite é 5.000 caracteres (ou seja 5.000 letras - incluídos espaços, vírgulas, ponto e vírgulas etc). O Angelo perguntou o tamanho em caracteres, vc informou 466 que olhando a tua primeira resposta este número coincide com o numero de linhas que vc informou.

É possível vc postar o texto da informação complentar que vc está enviando?

Vc também deve tomar cuidado com o caracter ' (apóstrofe) que pode estar fechando o conteúdo do teu texto.

Se possível anexe o texto completo para facilitar a compreensão.

[Dangelo2010]

Mim desculpe eu falei errado nao e linha não kkkkk e caracteres mesmo.

mais eu ja consequi muito obrigado pela ajuda era simplemente o Alltrim

Isso ainda esta mim deixando de cabelo em pé pois ja tem tempo que eu não mexo e do nada acontece isso.

[Danilo Turini]

Bom dia, estou com problemas nas impressão das observções no DANFeRetrato.fr3, após exeder o limite de caracteres o resto da observação não está indo para abaixo o último item, como fala a alegislação e sim truncando.

[madrugao]

pessoal to com um problema aqui informações complementares, esta aparecendo assim <infCpl>| Valor Aproximado dos Tributos R$ 1,333(10%) Fonte: IBPT</infCpl>

eu quero assim ><infCpl>| Valor Aproximado dos Tributos: R$ 512.85 (30.75%) Fonte: IBPT</infCpl> depois do ponto quero so duas casas , ja fiz de tudo me mostra um erro de string quando faço as formataçoes , Implicit string cast with potential data loss from 'string' to 'ShortString'

[Italo Giurizzato Junior]

Boa tarde,

 

Já tentou usar o RoundTo( fValor, -2 ) antes de converter de float para string?

[madrugao]

oi obrigado por responder, então somente no InfAdic.infCpl  ele me mostra esse erro ou outros campos que precisei converter deu certo

 

      cobr.Fat.nFat := qrnota.fieldbyname('numero').asstring;

      cobr.Fat.vOrig := RoundTo(qrnota.fieldbyname('TOTAL_NOTA').asfloat, -2);

      cobr.Fat.vDesc := RoundTo(0.0, -2);

      cobr.Fat.vLiq := RoundTo(qrnota.fieldbyname('TOTAL_NOTA').asfloat, -2);

 

esses abaixo são os erros

[DCC Warning] notafiscal_menu.pas(796): W1057 Implicit string cast from 'AnsiString' to 'string'

[DCC Error] notafiscal_menu.pas(1535): E2010 Incompatible types: 'string' and 'Extended'

[DCC Warning] notafiscal_menu.pas(2483): W1057 Implicit string cast from 'RawByteString' to 'string'

[DCC Warning] notafiscal_menu.pas(2956): W1058 Implicit string cast with potential data loss from 'string' to 'ShortString'

[DCC Warning] notafiscal_menu.pas(3083): W1057 Implicit string cast from 'RawByteString' to 'string'

[madrugao]

opa resolvido o, obrigado  Ítalo, ingressado que parece que tinha tentado isso e deu certo, ainda fico loco com progrmação

 

formatfloat('###,###,##0.00',qrnota.fieldbyname('VALOR_IBPT').value

[Fernando Diretrix]

o erro esta nesta linha:
[DCC Error] notafiscal_menu.pas(1535): E2010 Incompatible types: 'string' and 'Extended'

voce esta passando um Valor numerico para um campo string

o resto é só aviso.