Italo Giurizzato Junior

Boa tarde Doni, Favor atualizar os fontes.

Acredito que ao extrair o CPF da chave, não deva estar fazendo de forma correta. Na chave esta da seguinte forma: 00070033030197. Como esta no certificado? Tente desta forma: NFE.CancelarNFe("51190700070033030197559200000000011520347402","TESTE DE CANCELAMENTO DE NFE PF","70033030197") O terceiro parâmetro é o CPF do emitente sem os zeros a esquerda como costa na chave.

Bom dia Nicolas, Entre na nossa biblioteca pelo link: http://svn.code.sf.net/p/acbr/code/tools/DFe/CTe/NT/2019/ E leia atentamente a Nota Técnica que trata sobre o Comprovante de Entrega. Um breve resumo: Quem emite esse evento é a transportadora, latitude e longitude é opcional. Leia com muita atenção a descrição do campo: hashEntrega.

Bom dia, No comando: NFE.CancelarNFe("51190700070033030197559200000000011520347402","TESTE DE CANCELAMENTO DE NFE PF") O correto não informar o caminho mais o nome do XML em vez de informar somente a chave? Por exemplo: NFE.CancelarNFe("C:\XML\51190700070033030197559200000000011520347402-nfe.xml","TESTE DE CANCELAMENTO DE NFE PF")

Bom dia, O numero do protocolo é retornado no arquivo de retorno do método Enviar. Qual é o método que você esta utilizando para enviar o RPS?

Bom dia, Você utiliza o ACBrMonitor ou os componentes ACBr? Se é o ACBrMonitor não tem como, pois este não atende a emissão de NFS-e. Agora se você usa os componentes, temos o ACBrNFSe, mas a cidade de Sumaré não consta da nossa lista de cidades atendidas pelo componente. Sendo assim será necessário entrar em contato com a prefeitura da cidade para saber qual é a empresa (provedor) contratado por ela para recepcionar as notas. Se o provedor já estiver implementado no componente, será necessário incluir a cidade no arquivo Cidades.ini e talvez as URLs de homologação e de produção no arquivo INI do respectivo provedor. Agora se não estiver implementado, será necessário descobrir se o provedor segue ou não o layout da ABRASF. Se seguir a implementação é mais tranquila, agora se não seguir a implementação será trabalhosa, inclusive com a criação de uma unit especifica para gerar o XML e alteração de varias outras para realizar a leitura dos retornos. Espero lhe dado um Norte.

Boa noite Raylan, O problema é no envio ou na consulta? Na postagem anterior você anexou arquivos referente a consulta, favor anexar o arquivo soap referente a consulta da NFS-e por RPS.

Boa noite Doni, Favor atualizar os fontes, reinstalar a suíte ACBr e faça novos testes.

Obrigado por reportar. Fechando. Para novas dúvidas, criar um novo tópico.

Igor, veja essa rotina: OpenDialog1.Title := 'Selecione o CTe'; OpenDialog1.DefaultExt := '*-cte.xml'; OpenDialog1.Filter := 'Arquivos CTe (*-cte.xml)|*-cte.xml|Arquivos XML (*.xml)|*.xml|Todos os Arquivos (*.*)|*.*'; OpenDialog1.InitialDir := ACBrCTe1.Configuracoes.Arquivos.PathSalvar; if OpenDialog1.Execute then begin ACBrCTe1.Conhecimentos.Clear; ACBrCTe1.Conhecimentos.LoadFromFile(OpenDialog1.FileName); end; OpenDialog1.Title := 'Selecione o CTe'; OpenDialog1.DefaultExt := '*-cte.xml'; OpenDialog1.Filter := 'Arquivos CTe (*-cte.xml)|*-cte.xml|Arquivos XML (*.xml)|*.xml|Todos os Arquivos (*.*)|*.*'; OpenDialog1.InitialDir := ACBrCTe1.Configuracoes.Arquivos.PathSalvar; if OpenDialog1.Execute then begin ACBrCTe1.Conhecimentos.LoadFromFile(OpenDialog1.FileName); ACBrCTe1.Conhecimentos.ImprimirPDF; end; Inicialmente ela pede o primeiro XML, limpa o componente e carrega o XML. Depois pede o segundo XML (chave diferente do primeiro), carrega o XML e executa o método ImprimirPDF. Desta forma essa rotina gerou o PDF dos dois DACTE e salvou eles na pasta definida em PathPDF. A única diferença é que não gera um único PDF com os dois DACTE que acredito que é o que você deseja. Mas talvez seria possível criar uma rotina para gerar um ZIP com todos os PDF.

Boa tarde Igor, Analisando o código abaixo que se encontra na unit ACBrCTeDACTeRLClass, o componente deveria salvar em disco os PDF de cada CT-e carregado no componente. O local onde será salvo é definido na propriedade de configuração PathPDF e os nomes dos PDF seguem o seguinte formato: <chave>-cte.pdf for i := 0 to TACBrCTe(ACBrCTe).Conhecimentos.Count - 1 do begin FPArquivoPDF := PathWithDelim(TACBrCTe(ACBrCTe).DACTE.PathPDF) + OnlyNumber(TACBrCTe(ACBrCTe).Conhecimentos.Items[i].CTe.infCTe.ID) + '-cte.pdf'; TACBrCTe(ACBrCTE).Conhecimentos.Items[i].NomeArqPDF := FPArquivoPDF; // if i < TACBrCTe(ACBrCTe).Conhecimentos.Count - 1 then // FPArquivoPDF := FPArquivoPDF + sLinebreak; case TamanhoPapel of tpA5: TfrmDACTeRLRetratoA5.SalvarPDF(Self, TACBrCTe(ACBrCTe).Conhecimentos.Items[i].CTe, FPArquivoPDF); else TfrmDACTeRLRetrato.SalvarPDF(Self, TACBrCTe(ACBrCTe).Conhecimentos.Items[i].CTe, FPArquivoPDF); end; end;

Boa tarde Dercide, Realmente parece que não esta obedecendo a configuração. Vou analisar o problema.

ALA, Peça um XML completo com a tag <Envelope> de envio, consulta, cancelamento, etc.

Boa tarde Raylan, Favor configurar o componente para salvar os arquivos Soap. Configuracoes.WebServices.Salvar := True; Faça um novo teste e anexe os arquivos *-soap.xml

Boa tarde ALA, Abra a URL definida em defWSDL em um navegador, você vai encontrar as URLs do SoapAction. Essa URL definida em defURL já é a URL de homologação ou de produção, precisa descobrir depois. A parte mais chata vai ser descobrir como é o layout do <Envelope>

Gilvano, Muito obrigado pela colaboração, já enviei para o repositório.

Boa tarde Doni, Mesmo alterado o valor da propriedade GerarInfMDFeSupl não gera a Tag no XML?

Obrigado por reportar. Fechando. Para novas dúvidas, criar um novo tópico.

Bom dia Gilvano, Favor anexar as Units alteradas para que possamos analisar.

Boa tarde Adair, É muito estranho, pois a Classe SSL é uma só para todos os modelos de Documentos Fiscais Eletrônicos.

Boa tarde Milton, Uma solução a custo zero existe sim. Em vez do Delphi você pode baixar e instalar o Lazarus que é gratuito. Como os DA - Documentos Auxiliares (DANFE, DACTE, etc) são feitos em Fortes Report, você baixar e instalar o Fortes Report CE que é gratuito. Os fontes do ACBr (que são gratuitos), você já baixar pelo Tortoise. Para você ter uma versão mais recente do Demo_ACBrNFSe compilado é muito simples. 1. Baixe e Instale o Lazarus; 2. Baixe e Instale o Fortes Report CE; 3. Atualize os Fontes do ACBr através do Tortoise; 4. Instale a Suite ACBr no Lazarus, essa é a parte mais trabalhosa, pois não existe um instalador, logo vai ter que instalar pacote por pacote. Para saber a ordem dos pacotes, basta seguir a ordem que consta no PDF - Bem_Vindo_ao_Trunk2. Por fim, basta abrir o projeto do Demo_ACBrNFSe no Lazarus e compilar o mesmo. Espero ter ajudado.

Boa tarde Alberto, Qual é o erro?

Boa tarde Milton, Vamos ver se eu entendi o que você deseja. Você deseja uma aplicação que emite Nota Fiscal de Serviço Eletrônica, já compilada para o Windows, correto? E não o arquivo ACBrNFeServicos.ini que contem as URLs de Homologação e de Produção dos Webservices de todas as SEFAZ?

Tatiane, Favor atualizar os fontes e faça novos testes.

ALA, Você precisa verificar quais campos desse provedor que não existe e incluir no pnfsNFSe.pas para ser utilizado no pnfsNFSeW_SigISS.pas