renato.pavan

Obrigado pela resposta Juliomar, eu ja voltei pra revisão que não tem problema no delphi 7, só quis reportar o erro, pois não sabia que ja estavam cientes! Obrigado.

Bom dia, não tenho acesso a este fórum, da acesso negado. Obrigado

Boa tarde! Depois da atualização do ACBrInstall no dia 06/05/2014, o mesmo passou a não reconhecer o caminho correto da BPL e DCP no delphi 7. No XE5 instalei corretamente mas no delphi 7 em 2 máquina diferente aparece: Dir. BPL: \Bpl Dir. DCP: \Dcp Ao invés de aparecer: C:\Program Files (x86)\Borland\Delphi7\Projects\Bpl Obrigado

Boa tarde, Respondendo ao Erick, aqui na empresa fazemos da seguinte forma: for I := 0 to ACBrNFe1.WebServices.Consulta.procEventoNFe.Count - 1 do begin if ACBrNFe1.WebServices.Consulta.procEventoNFe.Items[i].RetEventoNFe.InfEvento.tpEvento = teCancelamento then begin if ACBrNFe1.WebServices.Consulta.procEventoNFe.Items[i].RetEventoNFe.retEvento.Count > 0 then begin Protocolo := ACBrNFe1.WebServices.Consulta.procEventoNFe.Items[i].RetEventoNFe.retEvento.Items[0].RetInfEvento.nProt; Status := 101; if ACBrNFe1.WebServices.Consulta.procEventoNFe.Items[i].RetEventoNFe.retEvento.Items[0].RetInfEvento.cStat = 135 then Motivo := 'Cancelamento de NF-e homologado' else Motivo := ACBrNFe1.WebServices.Consulta.procEventoNFe.Items[i].RetEventoNFe.retEvento.Items[0].RetInfEvento.xMotivo; end; end; end;

Bom dia, No delphi 7 não compilou o pacote boleto do quick, tenho o quick padrão que vem com o delphi 7, falta essa unit QRWebFilt. Obrigado.

Boa tarde! A unit ACBrNFeDANFEFR não compila no delphi 7, da erro na função ReplaceStr na linha 272. Obrigado.

Bom dia Herik, Eu faço da seguinte forma, após o envio do cancelamento por evento se retornar com status 135, evento confirmado eu faço uma consulta na nota pra capturar os dados do cancelamento, protocolo, status e descrição. []'s

Faço da seguinte forma: Dados.Justificativa := ACBrNFe1.WebServices.Consulta.procEventoNFe.Items[I].RetEventoNFe.InfEvento.DetEvento.xJust;

Comigo não, sempre volta um nsu diferente. E esse nsu eu informo na próxima consulta. Att.

Repare que o Ind. Continuação e igual a 1, isso significa que ha documento para o CNPJ consultado, você deve realizar nova consulta passando o NSU do retorno da consulta anterior. No meu caso tive que realizar 500 consulta para obter uma lista de 12 notas emitidas para o meu cnpj. Att.

Boa tarde, O ACBr implementou a impressão de eventos direto pelo componente, você pode testar fazendo da seguinte forma: ACBrNFe1.NotasFiscais.Clear; ACBrNFe1.NotasFiscais.LoadFromStream(XMLNFe); ACBrNFe1.EventoNFe.Evento.Clear; ACBrNFe1.EventoNFe.LerXMLFromString(XMLCCe.DataString); ACBrNFe1.ImprimirEvento; Se você passar os 2 XMLs ele emite a carta com os dados do emitente e destinatário se você passar apenas o XML da CCe ele também emite, mas somente com os dados do evento. []'s

Bom dia André Atualizei os fontes pela manhã e também está imprimindo corretamente a CCe, gostaria de propor uma alteração, aliás eu ja alterei aqui no meu fonte e esta funcionando 100%. Eu utilizo os arquivos xml em memória e o método ACBrNFe1.EventoNFe.LerXML pede um caminho de arquivo. Na unit pcnEnvEventoNFe, na linha 223 onde era: ArqEvento.LoadFromFile(CaminhoArquivo); Alterei para: if (FileExists(CaminhoArquivo)) then ArqEvento.LoadFromFile(CaminhoArquivo) else ArqEvento.Text := CaminhoArquivo; Dessa forma posso passar para o método LerXML da seguinte forma: ACBrNFe1.EventoNFe.LerXML(XMLCCe.DataString); XMLCCe é do tipo TStringStream. []'s

Bom dia, Alguém ja esta conseguindo realizador download de nfe enviadas em produção? Nos meus teste só retorna conforme xml anexo. []'s 20120921092007-down-nfe.xml

Fabiane, mas fizemos essa mudança pra teste da manifestação, acredito que o componente não possa ser modificado, pois o manual da sefaz pede que as notas em homologação seja enviada com o cnpj 99.999.999/0001-01 e sem a razão social. Att.

Boa noite, Nos alteramos essa unit tb pra enviar com os dados válidos. Att.

Bom dia Fabiane, Com relação a segunda pergunta, emitimos NF-e em homologação com cnpj válidos para poder testarmos a manifestação do destinatário e nf-e destinadas. []'s

Você testou em homologação ou produção? []'s

Hoje estou tentando realizar download de 1 NFe pelo acbr no ambiente de produção, estou recebendo a seguinte rejeição conforme xml anexo. A nota ja foi confirmada o recebimento: 20120823113030-ped-down-nfe.xml 20120823113031-down-nfe.xml

Bom dia markapollo, tudo bom e você como está? Eu não estava conseguindo confirmar a operação pelo ACBr em ambiente de produção, enviava em produção só que o retorno vinha como se eu estivesse enviando pro ambiente de homologação, isso também já esta ok, consigo confirmar a operação e fazer download pelo acbr. []'s

Bom dia Italo, Ainda esta retornando nenhum documento localizado para o destinatário. Testes em Produção. Ambiente : 1 Versão Aplicativo : 1.0.0 Status Código : 137 Status Descrição : Nenhum documento localizado para o destinatario Recebimento : 23/08/2012 10:47:33 Ind. Continuação : 1 Último NSU : 5308470561 []'s

Você consegue ver a lista de NF-e Destinadas? Porque aqui continua dando erro de violação, mesmo com a alteração sugerida por você. []'s

Bom dia Amigo, No constructor da classe inclua a seguinte linha: SystemPreview.FormState := wsMaximized; []'s

Bom dia Italo, Olhe o teste que fiz: // Movido para fora do try por Italo em 16/08/2012 if Assigned(FretConsNFeDest) then FretConsNFeDest.Free; //O cursor cai aqui, executa o free porém parece que ele esta sendo criado novamente if not Assigned(FretConsNFeDest) // Pois inclui esse if antes do create e o cursor não esta caindo no create then FretConsNFeDest.Create; //Sem o if, ele tenta criar novamente gerando a excessão Abraços,

Olá Marcos, Consulta NFe Destinadas estava com problema na SEFAZ também, ontem fizemos vários testes mas sem sucesso no retorno. []'s

Sim, em conversa com o João Henrrique, ele me disse a mesma coisa. Desde segunda estou testando. essas novas funcionalidades.