alessandro pancotte

Bom dia pessoal, Aqui no Paraná, estou com o mesmo problema de retorno. Eu envio a Nfe ja na versao 3.10, o sistema gera a nfe, mas nao traz informacao no retorno. Estou fazendo da seguinte forma: NfeEnviada := false; dm.ACBrNFe.NotasFiscais.GerarNFe(); if not(dm.ACBrNFe.WebServices.StatusServico.Executar) then raise Exception.Create(dm.ACBrNFe.WebServices.StatusServico.Msg); dm.ACBrNFe.Enviar(0,True,true); // Transmitir a Nota para o Sefaz} dm.ACBrNFe.WebServices.Retorno.Recibo := dm.ACBrNFe.WebServices.Enviar.Recibo; dm.ACBrNFe.WebServices.Retorno.Executar; dm.ACBrNFe.Consultar; CarregaMemoNfe; if DM.ACBrNFe.WebServices.Consulta.cStat in [100,101,110] then NfeEnviada := True; Estou mudando da v200 para a 310 em tempo de execucao: dm.ACBrNFe.Configuracoes.Geral.ModeloDF := moNFe; // moNFe ou moNFCe dm.ACBrNFe.Configuracoes.Geral.VersaoDF := ve310; dm.ACBrNFe.Configuracoes.Geral.PathSchemas := ExtractFilePath(Application.ExeName)+'Schemas\V310\'; dm.DANFECB.TipoDANFE := tiRetrato; dm.DanfeRL.TipoDANFE := tiRetrato; O erro acontece ja na linha -> dm.ACBrNFe.WebServices.Enviar.Recibo que vem em branco ai qdo mando executar o retorno, nao traz nada. entrei consultado o status neste 02 links http://hom.nfe.fazenda.gov.br/portal/disponibilidade.aspx?versao=3.10&tipoConteudo=Skeuqr8PQBY= http://hom.nfe.fazenda.gov.br/portal/disponibilidade.aspx?versao=2.00&tipoConteudo=Skeuqr8PQBY=

Boa tarde, Romulo. Obrigado pela resposta, perguntei sobre qual seria o procedimento mas para saber o que fazer depois que eu mexer nos fontes, se mando para alguem. Mas assim que testá-lo disponibilizo aqui no forum...Vlw

Ola, realmente pelo portal da nfe consta o Parana com a versao 2.0 ainda, porém no site da secretaria da fazenda do parana http://boletim.fazenda.pr.gov.br/boletins/item/2014/4, ja consta o ambiente de homologacao desde março. E também liguei na receita estadual na sexta-feira e me disseram que o ambiente de homologação já estava funcionando. Neste, caso como devo proceder com relação ao acbr?

Pessoal, alguem me de um help, com relacao ao erro citado acima por mim Motivo: Cabeçalho - Versão do arquivo xml nao suportada, estava vendo os fontes de ACBR e no arquivo acbrnfeutil.pas, na function geturlpr nao tem indicacao para a versao 310 no parana, sera que nao tem feito para o parana ou atualizei o componente do lugar errado

Acabei de baixar o acbr pelo svn. Na pasta D:\Projetos\Delphi\Componentes\Acbr\trunk\Exemplos\ACBrNFe2\Delphi\Schemas, tem 3 pastas (v200, v300 e v310) Fiz o seguinte: - Apaguei minha pasta de schemas - Voltei meu fonte para a versao 2.00 - Copiei o conteudo da pasta v200 para minha pasta de schemas e funcionou como antes Depois fiz o seguinte: - Alterei o fonte para versao 310 - Apaguei o conteudo da pasta schemas - Copiei o conteudo da pasta v310 para minha pasta de schemas e da o mesmo problema Motivo: Cabeçalho - Versão do arquivo xml nao suportada Tem mais alguma coisa para fazer, alem do que estou fazendo? * eu baixei os fontes hoje pelo svn, mas ainda nao reinstalei meu acbr, somente atualizei a pasta de schemas. (já havia instalado em março/2014)

Italo, bom dia. Comecei a fazer os teste da Nfe 3.10 aqui para o PR, hoje ao efetuar a consulta status (DM.ACBrNFe.WebServices.StatusServico.Executar;) aparece a mensagem Motivo: Cabeçalho - Versão do arquivo xml nao suportada Ja estou trabalhando com a versao do acbrnfe2 que aparece (VersaoDF := ve310) desde o começo do ano, mas so agora comecei a testar. Para testar a 3.10 somente mudei a VERSAODF:= 3.10, na pasta de schemas baixei o pl_008d e deixei da seguinte forma: Schemas\ (com seus arquivos originais e tbem copiei para cá os arquivos que constam no arq pl_008d Schemas\pl_008d (com o arquivo pl_008d descompactado) Notei que ao executar .StatusServico.Executa a aplicacao entra no arquivo acbr\fontes\acbrnfe2\ACBrNFeWebServices.pas e passa como parametro a 3.10 Texto := Texto + '<versaoDados>' + GetVersaoNFe(FConfiguracoes.Geral.ModeloDF, ---> monfe FConfiguracoes.Geral.VersaoDF, --> esta recebendo ve310 LayNfeStatusServico) + Só que nesta (function TNFeStatusServico.Executar: Boolean) em varios lugares aparece NfeStatusServico2 As ultimas vezes que atualizei o acbr foi em março/2014 e hoje neste caminho -> svn://svn.code.sf.net/p/acbr/code

Bom dia Andre, Desculpe, esta funcionando normalmente. O problema estava no xml, por alguma razão ele foi gerado zerado. E só vi isso agora por acaso. Égua veia do caramba!!!!

Bom dia! Será que este problema é tosco demais para responderem. Ou não é o ideal trabalhar deste jeito.

Ola, Para ficar mais facil estou colocando todos os componentes do Acbrnfe na minha UDM. Algumas rotinas funcionaram bem, mas tem uma em especial que nao funciona Se faco a consulta desse jeito da erro de schemas if chavef = nxmlf then begin if FileExists(ExtractFilePath(Application.ExeName)+'NFE\'+TRIM(DM.qEmpresaCNPJ.VALUE)+ '\' + FormatDateTime('YYYYMM', QRYDATAEMISSAO.AsDateTime)+ '\'+Xmls.Items.Strings) then begin nota := ExtractFilePath(Application.ExeName)+'NFE\'+TRIM(DM.qEmpresaCNPJ.VALUE)+ '\' + FormatDateTime('YYYYMM', QRYDATAEMISSAO.AsDateTime)+ '\'+Xmls.Items.Strings; dm.ACBrNFe.WebServices.Consulta.NFeChave := COPY(Xmls.Items.Strings, 1, length(Xmls.Items.Strings) - 4);//ACBrNFe.NotasFiscais.Items[0].XML.NFeChave; dm.ACBrNFe.WebServices.Consulta.Executar; Se faco deste jeito da mensagem Nota Fiscal Eletronica na encontrada! if chavef = nxmlf then begin if FileExists(ExtractFilePath(Application.ExeName)+'NFE\'+TRIM(DM.qEmpresaCNPJ.VALUE)+ '\' + FormatDateTime('YYYYMM', QRYDATAEMISSAO.AsDateTime)+ '\'+Xmls.Items.Strings) then begin DM.ACBrNFe.NotasFiscais.Clear; DM.ACBrNFe.NotasFiscais.LoadFromFile(ExtractFilePath(Application.ExeName)+'NFE\'+TRIM(DM.qEmpresaCNPJ.VALUE)+ '\' + FormatDateTime('YYYYMM', QRYDATAEMISSAO.AsDateTime)+ '\'+Xmls.Items.Strings); DM.ACBrNFe.Consultar; Tem algum problema colocar o componente em outro form, pq esta rotina estava funcionando da seguinte forma, eu so acrecentei dm. if chavef = nxmlf then begin if FileExists(ExtractFilePath(Application.ExeName)+'NFE\'+TRIM(DM.qEmpresaCNPJ.VALUE)+ '\' + FormatDateTime('YYYYMM', QRYDATAEMISSAO.AsDateTime)+ '\'+Xmls.Items.Strings) then begin ACBrNFe.NotasFiscais.Clear; ACBrNFe.NotasFiscais.LoadFromFile(ExtractFilePath(Application.ExeName)+'NFE\'+TRIM(DM.qEmpresaCNPJ.VALUE)+ '\' + FormatDateTime('YYYYMM', QRYDATAEMISSAO.AsDateTime)+ '\'+Xmls.Items.Strings); ACBrNFe.Consultar;

Ola, Nao estou conseguindo gerar nfe de homologacao no estado do Parana desde 09/04 quarta-feira, alguem sabe o que por que? e se há previsao de volta Erro no suporte a canais seguros - URL:https://homologacao.nfe2.fazenda.pr.gov.br/nfe/NFeRecepcao2 - SOAPAction:http://www.portalfiscal.inf.br/nfe/wsdl/NfeRecepcao2

Bom dia, Estou começando a estudar sobre importar o xml da nfe direto da base da receita. O que você mencionou acima seria isso também. Se for qual aplicação você esta usando... e poderia me dizer como esta fazendo este processo. Obrigado

Desculpe a ignorância, mas como faz para marcar um tópico de minha autoria como resolvido ou cancelado.

Ola! Estou com o seguinte problema para visualizar os xmls gerados, qdo tento abrir pelo IE da esse erro. Mas se uso o xml para abrir a danfe ele abre normalmente. Erro: Está faltando um espaço em branco necessário. Erro ao processar o recurso 'file:///D:/domynus/NFE/80199375000161/201306/411... <?xml version="1.0" encoding="UTF-8"?><nfeProc versao="versao="2.00"" xmlns="http://www.portalfiscal.inf.br/nfe">...

Ola Regys! Alguma novidade sobre esta questao da descricao dos impostos na danfe. So uma duvida, este procedimento servirá para empresas optante simples e regime normal?

Ola Amigos! Utilizo o D 2006 e instalei o Fortes Report pela Rllibwind2006vcl.bpl, ate ai eu vejo a paleta de componentes do Fortes pelo Delphi blz. Agora estou tentando instalar o ACBr_BoletoFC_Fortes pela package e esta dando erro [Pascal Fatal Error] RLReport.pas(34): F1026 File not found: 'Qt.dcu' e nao sei como resolver. Ja add na library path as pastas Componentes\FortesReport\Bin e \FortesReport\src\bin, mas o erro continua. Alguem tem uma sugestao... Desde ja agradeco.