Erro Cupom Referenciado

[gutopmc]

Estou enviando os dados do cupom conforme exemplo abaixo:

 

      with dmnfe.ACBrNFe1.NotasFiscais.Items[dmnfe.ACBrNFe1.NotasFiscais.Count-1].NFe.Ide.NFref.add do begin
          RefECF.modelo:=ECFModRef2D;
          RefECF.nECF:=cdIdentificacao.FieldByName('NFE_ECF').AsString;
          RefECF.nCOO:=cdIdentificacao.FieldByName('NFE_COO').AsString;
       end;

 

Porém, ao tentar assinar ocorre o erro abaixo:

 

 

Como resolver?

[Ricardo Miquinioty]

Boa noite, você tem que criar a Tag NFref, como uso o ACBrNFeMonitor não sei como ajudar.

 

-<NFref>

  -<refECF>

      <mod>2D</mod>

      <nECF>002</nECF>

      <nCOO>000005</nCOO>

  </refECF>

</NFref>

 

Sds,

Ricardo.

[gutopmc]

 

Boa noite, você tem que criar a Tag NFref, como uso o ACBrNFeMonitor não sei como ajudar.

 

-<NFref>

  -<refECF>

      <mod>2D</mod>

      <nECF>002</nECF>

      <nCOO>000005</nCOO>

  </refECF>

</NFref>

 

Sds,

Ricardo.

 

O exemplo de comandos que passei, teoricamente, deveria criar a tag.

[gutopmc]

Alguma sugestão pessoal?

[gutopmc]

Componente nao esta adaptado para essa situação? Informo corretamente mas da o erro!

[RCordeiro]

Boa tarde, Guto.

 

O componente está adaptado sim, pois eu uso normalmente e não tenho problemas.

 

Iria sugerir a seguinte alteração no código que você postou:

 

 

procedure SeuMétodo

var

  NFRef : TNFrefCollectionItem;

begin

    {  Sua programação  }

    with dmnfe.ACBrNFe1.NotasFiscais.Items[dmnfe.ACBrNFe1.NotasFiscais.Count-1] do

    begin
        NFRef := NFe.Ide.NFref.add;

        NFRef.RefECF.modelo:=ECFModRef2D;

        NFRef.RefECF.nECF:=cdIdentificacao.FieldByName('NFE_ECF').AsString;

        NFRef.RefECF.nCOO:=cdIdentificacao.FieldByName('NFE_COO').AsString;

    end;

end;

 

Tente esta alteração e me diga.

 

Abraço.

[gutopmc]

Boa tarde, Guto.

 

O componente está adaptado sim, pois eu uso normalmente e não tenho problemas.

 

Iria sugerir a seguinte alteração no código que você postou:

 

 

procedure SeuMétodo

var

  NFRef : TNFrefCollectionItem;

begin

    {  Sua programação  }

    with dmnfe.ACBrNFe1.NotasFiscais.Items[dmnfe.ACBrNFe1.NotasFiscais.Count-1] do

    begin

        NFRef := NFe.Ide.NFref.add;

        NFRef.RefECF.modelo:=ECFModRef2D;

        NFRef.RefECF.nECF:=cdIdentificacao.FieldByName('NFE_ECF').AsString;

        NFRef.RefECF.nCOO:=cdIdentificacao.FieldByName('NFE_COO').AsString;

    end;

end;

 

Tente esta alteração e me diga.

 

Abraço.

Mesmo erro!! Com Chave referenciada funciona normalmente, problema é quando informa cupom!! Você ja utilizou para cupom?

Editado 27 Abril, 2015 por gutopmc

[RCordeiro]

Guto,

 

Eu trabalho informando todos os 3 tipos de documento e não tenho problemas para emitir a NF-e de devolução.

 

Já verificou seus schemas? Tente atualizar eles.

[gutopmc]

Guto,

 

Eu trabalho informando todos os 3 tipos de documento e não tenho problemas para emitir a NF-e de devolução.

 

Já verificou seus schemas? Tente atualizar eles.

Atualizei os schemas e continua o erro!

[Italo Giurizzato Junior]

Bom dia Guto,

 

Você esta fazendo errado, o correto é:

 

with Ide.NFref.add do

begin
     RefECF.modelo:=ECFModRef2D;
     RefECF.nECF:=cdIdentificacao.FieldByName('NFE_ECF').AsString;
     RefECF.nCOO:=cdIdentificacao.FieldByName('NFE_COO').AsString;
end;

[gutopmc]

Bom dia Guto,

 

Você esta fazendo errado, o correto é:

 

with Ide.NFref.add do

begin

     RefECF.modelo:=ECFModRef2D;

     RefECF.nECF:=cdIdentificacao.FieldByName('NFE_ECF').AsString;

     RefECF.nCOO:=cdIdentificacao.FieldByName('NFE_COO').AsString;

end;

Bom dia!

No primeiro exemplo esta dessa forma e deu o erro!

[Italo Giurizzato Junior]

Guto,

 

Não esta, veja a sua rotina:

 

with dmnfe.ACBrNFe1.NotasFiscais.Items[dmnfe.ACBrNFe1.NotasFiscais.Count-1].NFe.Ide.NFref.add do

begin
          RefECF.modelo:=ECFModRef2D;
          RefECF.nECF:=cdIdentificacao.FieldByName('NFE_ECF').AsString;
          RefECF.nCOO:=cdIdentificacao.FieldByName('NFE_COO').AsString;
 end;

[gutopmc]

Bom dia Guto,

 

Você esta fazendo errado, o correto é:

 

with Ide.NFref.add do

begin

     RefECF.modelo:=ECFModRef2D;

     RefECF.nECF:=cdIdentificacao.FieldByName('NFE_ECF').AsString;

     RefECF.nCOO:=cdIdentificacao.FieldByName('NFE_COO').AsString;

end;

Coloquei da forma abaixo e continua o erro!

 

with dmnfe.ACBrNFe1.NotasFiscais.Items[dmnfe.ACBrNFe1.NotasFiscais.Count-1].nfe do

    begin

       with Ide.NFref.add do

       begin

         RefECF.modelo:=ECFModRef2D;

         RefECF.nECF:=cdIdentificacao.FieldByName('NFE_ECF').AsString;

         RefECF.nCOO:=cdIdentificacao.FieldByName('NFE_COO').AsString;

       end;

end;

  end;

[gutopmc]

Sem sugestões? Vou ter que usar o emissor gratuito para transmitir essa nota?

[Juliomar Marchetti]

Sem sugestões? Vou ter que usar o emissor gratuito para transmitir essa nota?

Sim utilize a pesquisa !

veja em questão de 30 segundos de pesquisa

 

 

e é claro existe diversos outros basta pesquisar tem até exemplos

[gutopmc]

Sim utilize a pesquisa !

veja em questão de 30 segundos de pesquisa

 

 

e é claro existe diversos outros basta pesquisar tem até exemplos

Fiz pelo emissor gratuito,porque preenchendo das formas orientadas nos posts não funcionou!