Elviro

mas se observar o código, está dm.IBChaveNFEManifesto.close; dm.IBChaveNFEManifesto.SelectSQL.Clear; dm.IBChaveNFEManifesto.SelectSQL.Add('SELECT * FROM ChaveNFEManifesto'); dm.IBChaveNFEManifesto.SelectSQL.Add('WHERE CODMANIFESTO = ' + QuotedStr(dm.IBManifestoCODIGO.text) + ''); dm.IBChaveNFEManifesto.SelectSQL.Add('ORDER BY CODIGO'); dm.IBChaveNFEManifesto.open; dm.IBChaveNFEManifesto.first; While not dm.IBChaveNFEManifesto.eof do begin chNFe := dm.IBChaveNFEManifestoCHAVENFE.Text; dm.IBChaveNFEManifesto.Next; end;

Segue minha rotina que estou gerando o arquivo MDFe, mas infelizmente não consigo inserir mais de uma chave da NFe favor anexar o arquivo

Obrigado, deu certo!

Estou fazendo uma MDFe de PE até SE, onde devo informar os estados do percurso?

Bom dia Italo, meu cliente tem caminhão e emite a NFe, agora estão exigindo que ele faça o manifesto eletrônico informando as notas do caminhão, mas sempre está aparecendo o esse erro que citei acima!

Infelizmente tentei esse código e a resposta é a mesma, "Rejeição: IE do destinatário não informada" mesmo informado que estou em ambiente de homologação if dm.IBParametrosNFEAMBIENTE.text = 'taHomologacao' then begin Dest.CNPJCPF := '99999999000191'; Dest.IE := ''; Dest.indIEDest := inNaoContribuinte; //inContribuinte, inIsento, inNaoContribuinte Ide.indFinal := cfConsumidorFinal; Dest.xNome := 'NF-E EMITIDA EM AMBIENTE DE HOMOLOGACAO – SEM VALOR FISCAL'; end else begin Dest.indIEDest := inContribuinte; if DM.IBClientesTIPO.text = 'JURÍDICA' then begin Dest.IE := DM.IBClientesCPFCNPJ.Text; if (dm.IBClientesRGINSC.text = 'ISENTO') or (dm.IBClientesRGINSC.text = 'ISENTA') then begin Dest.IE := ''; Dest.indIEDest := inIsento end; end else if dm.IBClientesTIPO.text = 'FÍSICA' then begin Dest.indIEDest := inNaoContribuinte; Ide.indFinal := cfConsumidorFinal; end; end; Dest.EnderDest.Fone := dm.IBClientesFONE.text; Dest.EnderDest.CEP := Strtoint(dm.IBClientesCEP.text); Dest.EnderDest.xLgr := dm.IBClientesENDERECO.text; Dest.EnderDest.nro := dm.IBClientesNUMERO.text; Dest.EnderDest.xCpl := dm.IBClientesCOMPLEMENTO.text; Dest.EnderDest.xBairro := dm.IBClientesBAIRRO.text; Dest.EnderDest.cMun := Strtoint(dm.IBClientesCODMUNICIPIO.text); Dest.EnderDest.xMun := dm.IBClientesCIDADE.text; Dest.EnderDest.UF := dm.IBClientesUF.text; Dest.EnderDest.cPais := 1058; Dest.EnderDest.xPais := 'BRASIL';

Boa tarde, estou tentando gerar meu primeiro manifesto eletrônico, quando finalizo ele mostra um erro " Rejeição: Código da UF do emitente diverge da UF autorizadora " , alguém já teve esse erro?

Alterei o campos de CSOSN e esse erro passou, mas agora quando vai finalizar uma nota de homologação informa : Rejeição: NF-e sem informação da IE do destinatário if dm.IBParametrosNFEAMBIENTE.text = 'taHomologacao' then begin Dest.CNPJCPF := '99999999000191'; Dest.IE := ''; Dest.ISUF := ''; Dest.xNome := 'NF-E EMITIDA EM AMBIENTE DE HOMOLOGACAO – SEM VALOR FISCAL'; end else begin Dest.CNPJCPF := dm.IBClientesCPFCNPJ.text; Dest.IE := dm.IBClientesRGINSC.Text; Dest.ISUF := ''; Dest.xNome := dm.IBClientesNOME.Text; end;

O que seria esse ICMSSN ?

Boa tarde, estou passando por algumas dúvidas, estou utilizando pela primeira vez o acbr para emissão de nota eletrônica e quando vou gerar a minha primeira nota aparece esse erro Falha na validação dos dados da nota : 1 Element '{http://www.portalfiscal.inf.br/nfe}ICMSSN' is unexpected according to content model of parant element Segue abaixo meu código para análise Anexe, não cole no post o código