5 Correções Para Uma Mesma Nfe

[M_Albuquerque]

Utilizando o demo do ACBrNFe como eu procedo para fazer 5 correções (CCe) numa mesma NF-e, sendo que cada correção tem 100 caracteres ? (totalizando 500 caracteres)

 

Muito obrigado pela atenção.

Márcio

[Italo Giurizzato Junior]

Boa tarde Márcio,

 

E qual é o problema de totalizar 500 caracteres ou 500 bytes?

 

O XML final a ser enviado para SEFAZ tem que ficar dentro dos 500 Kbytes.

 

E 500 bytes é 1/2 KByte (arredondando).

[Régys Silveira]

Complementando o Italo, lembre que a carta de correção é cumulativa para a nota, a ultima sempre sobrepõe todas as outras, portanto, deve conter sempre todas as correções até o momento.

Como você deseja fazer 5 correções o correto seria fazer as 5 todas em uma mesma CC-e e não fazer 5 em sequencia.

[M_Albuquerque]

É que pelo demo do ACBrNFe (infEvento.detEvento.xCorrecao := Correcao;) esta variável para o texto da correção está definida como string (255 caracteres).

Na classe utilizada a propriedade 'xCorrecao' também está como string (255) portanto não dará certo eu colocar 500 caracteres para uma só CCe.

Como eu não sei se alterando a classe detEvento.'xCorreção' de string para widestring poderei afetar negativamente as demais units do ACBrNFe então surgiu a dúvida (ex-idéia..rs) de fazer 5 CCe´s de 100 caracteres cada.

Dessa forma eu acho (me corrijam se eu escrever besteira) que nem criando um form próprio p/ 500 caracteres eu conseguirei o que pretendo. Estou certo?

 

Muito obrigado pela atenção.

[Régys Silveira]

Você está misturando as coisas, ShortString é que é limitada a 255 caracteres, em delphi o tipo string tem o tamanho de: ~2^30 characters (4 bytes to 2GB) basicamente o limite dela é limitado pela memória se for menos de 2GB e não por tamanho.

[M_Albuquerque]

Régys,

Primeiramente muito obrigado pelo retorno e pela aula.

Mas porque está ocorrendo o seguinte erro quando compilo o demo:

 

Alterei a linha

infEvento.detEvento.xCorrecao := Correcao;

para

infEvento.detEvento.xCorrecao := 'CFOP Correto......Natureza correta......Transportador.......Dados Adicionais................'  (até completar 500 caracteres)

(isto é, eu digitei o texto que eu preciso no lugar da variável Correcao)

 

Ao compilar o demo dá o seguinte erro exatamente nessa linha que alterei:

"String literals may have at most 255 elements"

 

Por isso eu supus (errado cf vc me mostrou) que uma variável string estava limitada a 255 caracteres.

 

Mas aí, dentro da sua enorme paciência, pergunto:

Por que está dando esse erro exatamente onde eu alterei? (colocando um texto de 500 caracteres no lugar de uma variável)

 

Novamente muito obrigado pela atenção e ajuda.

 

Márcio

Editado 5 Dezembro, 2013 por M_Albuquerque

[Carlos Tre]

Márcio,

 

Esta é uma limitação que vem dos tempos do Turbo Pascal, e é interna ao compilador. Constantes (ou "string literals") são limitadas em 255 caracteres, variáveis tipo string, não. O que você precisa fazer é algo do tipo:

  infEvento.detEvento.xCorrecao := 'CFOP Correto......' + // string literal 1 abaixo de 255 caracteres
                                   'Natureza correta..' + // string literal 2 abaixo de 255 caracteres
                                   .... e assim por diante

Cordialmente,

Carlos

Editado 5 Dezembro, 2013 por Carlos Tre

[Régys Silveira]

Basicamente é isso ai que o Carlos falou, a limitação não existe, mas nosso amiguinho compilador encherga

Quando você monta um string o compilador entende como uma grande constante, fazendo picado ele divide em várias menores.

[M_Albuquerque]

Carlos e Régys;

 

Muito obrigado pela enorme ajuda, e grande aula!!!

Aprendi mais uma!

 

Att,

Márcio