ACBrNFeNotasFiscais FNFe removido write, somente read

[rodrigod6]

Boa Tarde Pessoal,

Alguém sabe por que no fonte ACBrNFeNotasFiscais.pas foi removida a propriedade write da propriedade NFe?

Era:

property NFe: TNFe read FNFe write FNFe;

Ficou no trunk2:

property NFe: TNFe read FNFe;

Eu utilizava assim:

NFe := TNFe.create;
//Populava
ACBrNFe1.NotasFiscais.Add;
ACBrNFe1.NotasFiscais[countNFe].NFe := NFe;

[Error] Nfe.pas(7348): E2129 Cannot assign to a read-only property

Qual a recomendação?

por enquanto voltei o write no set da propriedade.

property NFe: TNFe read FNFe write FNFe;

Abraços,

 

[Juliomar Marchetti]

Rodrigo tu tem arquivos perdidos de outra versão em seu micro!

veja e faça a limpeza e recompile pois vi em outro post seu falando que mudou isso e voltou aquilo!

se tu tiver o path do trunk junto com o trunk2 ou em mesmo locais vai dar problema mesmo!

[Daniel Simoes]

Essa propriedade é ReadOnly porque não precisa ser Write...

Atribuir um Objeto NFe a ela, poderia causar problemas de A.V.

Se você quer informar dados para o NotasFiscais use a proprieadade "XML"

[rodrigod6]

Obrigado Juliomar,

Já fiz várias tentativas, tenho na VM, rodei o deleta.bat do acbr, apaguei os fontes do trunk dela, removi os caminhos antigos... coloquei trunk2 em novos caminhos para evitar conflitos.

Obrigado Daniel

Vou verificar para fazer utilizando a propriedade XML, dai posto aqui

Abraços,

[rodrigod6]

Daniel, pessoal,

Estou na dúvida se gravo o XML a partir do NFe que gerei e depois carrego no LerXML ou no LoadFromFile

Veja o que estou pensando:

//Criar o XML
NFeW := TNFeW.Create(NFe);
NFeW.GerarXml;
NFeW.gerador.SalvarArquivo(cFileName);

//Recuperar o XML e jogar para txt
cXML := 'xxxx'

ACBrNFe1.NotasFiscais.LerXML(cXML)

ou

//Criar o XML
NFeW := TNFeW.Create(NFe);
NFeW.GerarXml;
NFeW.gerador.SalvarArquivo(cFileName);

ACBrNFe1.NotasFiscais.LoadFromFile(cFileName)

Qual estão utilizando?

[Daniel Simoes]

Nenhum dos dois.. você pode ver um exemplo de uso, no Demo do ACBrNFe

 

procedure TForm1.GerarNFe(NumNFe : String);
begin
  with ACBrNFe1.NotasFiscais.Add.NFe do
   begin
     Ide.cNF       := StrToInt(NumNFe); //Caso não seja preenchido será gerado um número aleatório pelo componente
     Ide.natOp     := 'VENDA PRODUCAO DO ESTAB.';
.....

 

[rodrigod6]

Entendi,

Ao invés de utilizar o TNFe e depois colocar no ACBrNFe,

utilizar diretamente dentro do ACBrNfe.NotasFiscais

Ok, vou tentar aqui

obrigado,