Ir para conteúdo
  • Cadastre-se

dev botao

IE não sai na impressão com destinatário CPF


Thiago Porto
Ver Solução Respondido por Ricardo Miquinioty,
  • Este tópico foi criado há 2834 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

Bom dia!

Estamos com uma dúvida. Temos um destinatário fazendeiro(CPF com IE).

A NFe transmitiu sem problemas mas na impressão não sai a IE e ao consultar na SEFAZ tmb não mostra.

Não sei se estou passando os valores errados ou é assim mesmo.

if (int_modelonf = 55) then  //NFe
begin
  if Length(DmNFe.cdsNFePED_CPFCNPJ.AsString) > 11 then
  begin
    Dest.indIEDest := inContribuinte;
    Dest.IE        := DmNFe.cdsNFePED_IE.AsString;
    ide.indFinal   := cfNao;

    if (Dest.IE = 'ISENTO') or (Dest.IE = '') then
    begin
     //p/evitar a rejeição 805 - A SEFAZ do destinatário não permite Contribuinte Isento de Inscrição Estadual
     case AnsiIndexStr(Dest.EnderDest.UF,['AM','BA','CE','GO','MG','MT','PE','RN','SE','SP']) of
      0,1,2,3,4,5,6,7,8,9: Dest.indIEDest := inNaoContribuinte;
     else
      Dest.indIEDest := inIsento;
     end;
     Dest.IE      := '';
     ide.indFinal := cfConsumidorFinal;
    end;
  end
  else
  begin // Quando for pessoa física
    ide.indFinal   := cfConsumidorFinal; // não contribuinte
    Dest.indIEDest := inIsento;
    Dest.IE        := '';
    if (DmNFe.cdsNFePED_IE.AsString <> '') or (DmNFe.cdsNFePED_IE.AsString <> 'ISENTO') then
     Dest.IE := DmNFe.cdsNFePED_IE.AsString;
  end;
end;

Não consegui anexar o xml, abaixo a tag do destinatário:

<dest>
  <CPF>59839040944</CPF>
  <xNome>001506-PEDRO HENRIQUE CERVI</xNome>
  <enderDest>
    <xLgr>FAZENDA TABATINGA, 00</xLgr>
    <nro>.</nro>
    <xBairro>ZONA RURAL</xBairro>
   	<cMun>2101400</cMun>
    <xMun>BALSAS</xMun>
    <UF>MA</UF>
    <CEP>65800000</CEP>
    <cPais>1058</cPais>
    <xPais>BRASIL</xPais>
    <fone>9935416304</fone>
  </enderDest>
  <indIEDest>2</indIEDest>
</dest>

 

Link para o comentário
Compartilhar em outros sites

  • Solution

Boa tarde, eu uso o ACBrMonitorPLUS, não sei programar em Delphi, você está informando:

<indIEDest>2</indIEDest>

Isento de IE, têm que informar <indIEDest>9</indIEDest> - pode ou não ter IE.

Alguém que programe em Delphi possa ajudá-lo.

Sds,

Ricardo.

selo_equipe_acbr.pngRicardo Miquinioty
Ajude o Projeto ACBr crescer - Assine o SAC

Link para o comentário
Compartilhar em outros sites

  • Este tópico foi criado há 2834 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Crie uma conta ou entre para comentar

Você precisar ser um membro para fazer um comentário

Criar uma conta

Crie uma nova conta em nossa comunidade. É fácil!

Crie uma nova conta

Entrar

Já tem uma conta? Faça o login.

Entrar Agora
×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.

The popup will be closed in 10 segundos...