Nfe Referenciada

[softcom.wendel]

Boa tarde pessoal.

Estou com um problema na Nfe referenciada, segue trecho do código

//:: Abre a qry para pegar o numero da chave de acesso da NFe.

BuscaNFe.Close;

BuscaNFe.ParamByName('NFE').AsInteger := VendasNFE_REFERENCIADA.Value;

BuscaNFe.Open;

//:: Verifica a existencia da nfe nos arquivos de NFe's emitidas

if not BuscaNFe.IsEmpty then

begin

ReferenciadaTipoNFe := True;

end else

begin

raise Exception.Create('Nota a ser complementada não encontrada com base no [NÚMERO DA NFE] informado, ou foi cancelada!!!');

end;

if ReferenciadaTipoNFe then // TAG - Informação das NF/NF-e referenciadas - - Ocorrência 0-N ********

begin // Se a nota referenciada for um NFe preencher o campo abaixo:

Ano := Copy(IntToStr(YearOf(BuscaNFeDATA_NF.AsDateTime)), 3, 2);

Mes := FormatFloat('00', MonthOf(BuscaNFEDATA_NF.AsDateTime));

Ide.NFref.Add;

Ide.NFref[0].refNFe := BuscaNFeCHAVE_NFE.AsString; // B13 - Chave de acesso das NF-e referenciadas

Ide.NFref[0].RefNF.CNPJ := edtEmitCNPJ.Text ; // B17 - CNPJ do emitente

Ide.NFref[0].RefNF.cUF := Codigo_Ibge_Uf(Trim(edtEmitUF.Text)); // B15 - Código da UF do emitente do Documento Fiscal - Tabela do IBGE

Ide.NFref[0].RefNF.modelo := BuscaNFeMODELO.AsInteger; // B18 - Modelo do Documento Fiscal - Ex. 01

Ide.NFref[0].RefNF.nNF := BuscaNFeNF.AsInteger; // B20 - Número do Documento Fiscal

Ide.NFref[0].RefNF.AAMM := Ano+Mes; // B16 - Ano e Mês de emissão da NF-e

Ide.NFref[0].RefNF.serie := BuscaNFeSERIE.AsInteger; // B19 - Série do Documento Fiscal - informar zero se inexistente

end;

BuscaNFe.Close;

Esta dando o erro de Modelo inválido, mas olhei o Xml ( Em anexo ) e o modelo esta correto, creio eu.

Alguem poderia me ajudar. Segue em anexo a tela do erro e o xml.

Agradeço a Atenção

50111009517945000150550010000002111000002113-NFe.xml

[Kiko Fernandes]

Olha, pelo que eu entendo as tags:

cUF-AAMM-CNPJ-mod-serie-nNF só serão preenchidas se a nota não for NFe.

Se vc olhar a pág. 110 do Manual de integração, irá encontrar:

refNF - Grupo de informação da NF modelo 1/1A referenciada

Então para referenciar uma NFe eu creio que o campo necessário será apenas "refNFe"

50111009517945000150550010000002101000002108

Para modelo 1/1A ficaria

50

1110

09517945000150

01

1

210

[softcom.wendel]

Ola Kiko... fiz a alteração mas tbm deu erro...segue em anexo o xml....mas agora da o erro CANNOT BE EMPTY ACCORDING TO THE DTD/SCHEMA

Segue em anexo o xml..

vlw pela ajuda

50111009517945000150550010000002111000002113-NFe.xml

[Kiko Fernandes]

Ok, vou fazer uns testes, pode ser necessário então as outras informações.

Acho que interpretei mal o manual.

[Kiko Fernandes]

Olha, não me enganei não, está correta a interpretação do manual.

No teu xml tem uma tag a mais em que vc não informou nada. Veja:

5003702

50111009517945000150550010000002101000002108

<==[tag errada - Está sem informação. Tirar ela]

1

Correto:

5003702

50111009517945000150550010000002101000002108

1

[softcom.wendel]

Bom Dia

Kiko...era isso mesmo...

Tinha este código logo acima

with Ide.NFref.Add do

begin

e nos dados estava assim

if ReferenciadaTipoNFe then // TAG - Informação das NF/NF-e referenciadas - - Ocorrência 0-N ********

begin // Se a nota referenciada for um NFe preencher o campo abaixo:

Ano := Copy(IntToStr(YearOf(BuscaNFeDATA_NF.AsDateTime)), 3, 2);

Mes := FormatFloat('00', MonthOf(BuscaNFEDATA_NF.AsDateTime));

ChaveRef := BuscaNFeCHAVE_NFE.AsString;

Ide.NFref.Add;

Ide.NFref[0].refNFe := ChaveRef; // B13 - Chave de acesso das NF-e referenciadas

end;

Ou seja, estava dando dois ADD..retirei a linha e deu tudo certo.....obrigado pela ajuda....t+

[raosistemas]

Aproveitando o Assunto nRef...

estou referenciando no ambiente 3.10 uma nota emitida no ambiente 2.0 e está ocorrendo erro.

nota referenciada não encontrada...

 

isso em SP... vai ter que realizar um processo diferente???