Pesquisar na Comunidade

Olá, há alguns dias atrás postei aqui no forum a dificuldade em retornar o CSTAT. Recuperando o que trouxe no ultimo post é o seguinte. Resolvi não mas enviar o txt e usar o componente. Até ai tudo bem, seguindo o exemplo ACBr consigo emitir a nota normalmente. Porém aprimorando a aplicação não consigo obter o retorno do CSTAT Segue minha linha de envio frm_COMPONENTE.ACBrNFe1.Enviar(vNumLote,true,Sincrono); retornacstat :=inttostr(frm_COMPONENTE.ACBrNFe1.WebServices.Retorno.cStat); showmessage(inttostr(frm_COMPONENTE.ACBrNFe1.WebServices.Retorno.cStat)); Só retorna 0; Já revirei aqui mas não estou conseguindo entender o que pode estar errado.

Antes usava a geração do arquivo via TXT resolvi mudar para o componente. Estou fazendo assim acbrnfe1.notasfiscais.assinar; acbrnfe1.notasfiscais.gravarxml; acbrnfe1.notasfiscais.validar; acbrnfe1.notasfiscais.gerarnfe; acbrnfe1.enviar(1,false,true); Estou usando acbrnfe1.webservice.retorno.cstat para obter o retorno mas só volta com 0, mas pelo VISUALIZAR vejo que foi autorizada. Onde estou errando?

Pessoal, eu tenho desenvolvido a manifestação de destinatário da NFe e agora preciso fazer da CTe e futuramente para a MDFe. Em uma parte do código eu tenho de consultar o webservice e comparar com um código, mas eu não encontrei a lista destes códigos. Como eu faço para encontrar a lista de códigos de retorno do webservice da CTe? isTerminated := NFe.WebServices.DistribuicaoDFe.retDistDFeInt.cStat = 137;

Boa tarde.. Quando abro o retorno sincrono do acbr de um envio de uma nfce vem as chaves: [Envio] [Retorno] [NFe5674] a palavra CSTAT no [Retorno] e [NFe5674] estão diferentes. Na realidade algumas palavras estão diferentes: [Envio] NRec= DhRecbto= [Retorno] CStat= nRec= [NFe5674] cStat= dhRecbto= Teria possibilidade de normatizar essas palavras? ficarem tudo no mesmo estilo de caixa alta e caixa baixa? Na minha linguagem cStat não é igual CStat, daí tem que ficar convertendo com upper ou lower. E há possibilidade também de inserir na chave número da nota [NFe5674] o nRec=? Isso facilitaria a leitura porque não precisar ler duas chaves dentro da resposta. Com o nRec é possível consultar a nota caso não receba os dados. Se ler só o [Retorno] não pega o protocolo. Retorno do AcbrMonitor [Envio] CStat=103 CUF=51 DhRecbto=18/11/2019 12:14:55 Msg=Lote recebido com sucesso NRec=510000605062837 TMed=1 VerAplic=MT_A2RL-4.00 Versao=4.00 XMotivo=Lote recebido com sucesso tpAmb=1 Autorizado o uso da NF-e [Retorno] CStat=104 CUF=51 ChaveDFe=51191107407005000182550010000056741001047656 Msg=Autorizado o uso da NF-e Protocolo=151190062215237 VerAplic=MT_A2RL-4.00 Versao=4.00 XMotivo=Lote processado cMsg=0 nRec=510000605062837 tpAmb=1 xMsg= [NFe5674] Id= XML=<protNFe versao="4.00"><infProt><tpAmb>1</tpAmb><verAplic>MT_A2RL-4.00</verAplic><chNFe>51191107407005000182550010000056741001047656</chNFe><dhRecbto>2019-11-18T12:14:55-04:00</dhRecbto><nProt>151190062215237</nProt><digVal>Ss33YbeO2SuAzP9+JcUEwhHfqvo=</digVal><cStat>100</cStat><xMotivo>Autorizado o uso da NF-e</xMotivo></infProt></protNFe> cStat=100 chNFe=51191107407005000182550010000056741001047656 dhRecbto=18/11/2019 12:14:55 digVal=Ss33YbeO2SuAzP9+JcUEwhHfqvo= nProt=151190062215237 tpAmb=1 verAplic=MT_A2RL-4.00 xMotivo=Autorizado o uso da NF-e [NFe_Arq5674] Arquivo=C:\ACBrNfe2\NFE\201911\NFe\51191107407005000182550010000056741001047656-nfe.xml 18/11/2019 12:14:57 - NFE.ImprimirDANFEPDF("C:\ACBRNFE2\RETORNO\51191107407005000182550010000056741001047656-NFE.XML") 18/11/2019 12:14:58 - OK: Arquivo criado em: C:\ACBrNfe2\PDF\51191107407005000182550010000056741001047656-NFe.pdf 18/11/2019 12:14:59 - NFE.ImprimirDANFE("C:\ACBRNFE2\RETORNO\51191107407005000182550010000056741001047656-NFE.XML") 18/11/2019 12:14:59 - OK: DANFe Impresso com sucesso Obrigado Rubens

Estamos com problema no servidor de Minas gerias já faz mais de 10 dias, mas eu liguei na receita e me disseram que ja voltou a normalidade, mas no meu sistema quando executa a funcao Nfe.WebServices.StatusServico.Executar o xml me retorna <?xml version="1.0" encoding="UTF-8"?> -<retConsStatServ versao="4.00" xmlns="http://www.portalfiscal.inf.br/nfe"> <tpAmb xmlns="http://www.portalfiscal.inf.br/nfe">2</tpAmb> <verAplic xmlns="http://www.portalfiscal.inf.br/nfe">W-1.4.26</verAplic> <cStat xmlns="http://www.portalfiscal.inf.br/nfe">107</cStat> <xMotivo xmlns="http://www.portalfiscal.inf.br/nfe">Serviço em Operação</xMotivo> <cUF xmlns="http://www.portalfiscal.inf.br/nfe">31</cUF> <dhRecbto xmlns="http://www.portalfiscal.inf.br/nfe">2019-10-03T09:17:07-03:00</dhRecbto> <tMed xmlns="http://www.portalfiscal.inf.br/nfe">1</tMed> <dhRetorno xmlns="http://www.portalfiscal.inf.br/nfe">2019-10-03T09:17:07-03:00</dhRetorno> </retConsStatServ> Mas a variavel Nfe.WebServices.Retorno.cStat; me retorna com valor 0. Alguem sabe o que pode ser? Houve alguma mudança neste retorno?

Olá, enfrentei um problema ao efetuar a consulta de status dos servidores da Sefaz para o estado de Minas Gerais (MG). O contexto é o seguinte: Efetuei dois testes de consulta de status dos servidores esperando o retorno 107 (cStat), um voltado para o MG e o outro para RJ. As URLs utilizadas foram as disponibilizadas no arquivo NFeServicos.ini, sendo para o MG a url https://nfe.fazenda.mg.gov.br/nfe2/services/NFeStatusServico4 e para o RJ a url www.fazenda.rj.gov.br/nfce/consulta. Percebi que ao efetuar os testes com o estado de MG, havia retorno da Sefaz porém os valores não estavam sendo setados, e para o RJ sim. Para ficar mais claro o "setado", estou me referindo a unit pcnRetConsStatServ, para a função LerXml e para a função rCampo contida na unit pcnLeitor: function TRetConsStatServ.LerXml: Boolean; var ok: Boolean; begin Result := False; try Leitor.Grupo := Leitor.Arquivo; if leitor.rExtrai(1, 'retConsStatServ' + FtagGrupoMsg) <> '' then begin Fversao := Leitor.rAtributo('versao', 'retConsStatServ' + FtagGrupoMsg); FtpAmb := StrToTpAmb(ok, Leitor.rCampo(tcStr, 'tpAmb')); FverAplic := Leitor.rCampo(tcStr, 'verAplic'); FcStat := Leitor.rCampo(tcInt, 'cStat'); FxMotivo := Leitor.rCampo(tcStr, 'xMotivo'); FcUF := Leitor.rCampo(tcInt, 'cUF'); FdhRecbto := Leitor.rCampo(tcDatHor, 'dhRecbto'); FtMed := Leitor.rCampo(tcInt, 'tMed'); FdhRetorno := Leitor.rCampo(tcDatHor, 'dhRetorno'); FxObs := Leitor.rCampo(tcStr, 'xObs'); Result := True; end; except Result := False; end; end; A estrutura de retorno é a seguinte: MG <retConsStatServ xmlns="http://www.portalfiscal.inf.br/nfe" versao="4.00"> <tpAmb xmlns="http://www.portalfiscal.inf.br/nfe">1 </tpAmb> <verAplic xmlns="http://www.portalfiscal.inf.br/nfe">W-1.4.23 </verAplic> <cStat xmlns="http://www.portalfiscal.inf.br/nfe">107 </cStat> <xMotivo xmlns="http://www.portalfiscal.inf.br/nfe">Serviço em Operação </xMotivo> <cUF xmlns="http://www.portalfiscal.inf.br/nfe">31 </cUF> <dhRecbto xmlns="http://www.portalfiscal.inf.br/nfe">2019-10-02T12:11:19-03:00 </dhRecbto> <tMed xmlns="http://www.portalfiscal.inf.br/nfe">0 </tMed> <dhRetorno xmlns="http://www.portalfiscal.inf.br/nfe">2019-10-02T12:11:19-03:00 </dhRetorno> </retConsStatServ> RJ <retConsStatServ versao="4.00" xmlns="http://www.portalfiscal.inf.br/nfe"> <tpAmb>2</tpAmb> <verAplic>SVRSnfce201805211008</verAplic> <cStat>107</cStat> <xMotivo>Servico em Operacao</xMotivo> <cUF>33</cUF> <dhRecbto>2019-10-02T12:06:49-03:00</dhRecbto> <tMed>1</tMed> </retConsStatServ> O problema é devido a diferente estrutura de retorno para cada estado, pois a função rCampo espera que a tag inicial, tag de abertura seja a tag padrão (<tpAmb>, <verAplic>, <cStat>) sem nada além. Devido a isso, quando é feito a operação para o retorno de MG, os valores das tags não são encontrados, pois além da tag inicial também há a tag/url xmlns="http://www.portalfiscal.inf.br/nfe". Para resolver o problema precisei comentar o sinal de maior ">" para que não ficasse "limitado" somente as tags padrões. Antes: inicio := pos('<' + Tag + '>', UpperCase(FGrupo)); Depois inicio := pos('<' + Tag {+ '>'}, UpperCase(FGrupo)); A partir dai conseguir prosseguir. Essa seria a melhor abordagem a ser tomada? Seria realmente a correção definitiva ? Agradeço e espero que fique claro. Obrigado.

Pessoal, a nfe em anexo aparenta estar tudo certo. Usei a ferramenta de validação do XML do site da SEFAZ RS e não acusou nenhum erro. Mas o comando "ACBrNFe1.WebServices.Retorno.cStat" retorna 0, e por isso a nota não é enviada. Eu sempre usei assim: main.ACBrNFe1.NotasFiscais.Validar; main.ACBrNFe1.Enviar(0) ; icStat := main.ACBrNFe1.WebServices.Retorno.cStat; if icStat = 100 then begin // salvo informações de retorno end else begin // exibo mensagem de erro ShowMessage('REJEIÇÃO: ' + IntToStr(icStat) + ' - ' + main.ACBrNFe1.WebServices.Retorno.xMotivo + #13 + 'Usuário: faça a correção nos campos indicados acima e tente novamente' ); end; Já li os tópicos referentes a esse mesmo assunto, mas nenhum solucionou o meu problema, inclusive isso acontece com um único cliente (MG). Os demais clientes (todos de SP) rodam o mesmo programa e sem problemas. As configurações internas da rede do cliente (firewall, anti-virusm etc..) podem impedir o envio do XML ? Obrigado. 31171204404145000109550010000000931000000938-nfe.xml

olá amigos, alguém saberia me informar qual é o código do retorno do Evento quando o server do sefaz está Inativo ou Inoperante? Hoje trato muitas mensagens, mas essa não sei como pegar o código, uso o RetInfEvento.cStat para pegar os valores. Gostaria de fazer um tratamento para expor para o cliente uma mensagem mais simples

Estou com este problema ao tentar fazer um cancelamento de uma nfe. obs: versão .28 do acbrmonitorplus. Envio: 21/02/2017 20:04:00 - NFe.EnviarEvento("[EVENTO] idLote= [EVENTO001] chNFe=35170212342787000159550140000070911000013272 cOrgao=35 CNPJ=12342787000159 dhEvento=21/02/2017 20:01:47 tpEvento=110111 nSeqEvento=1 versaoEvento=1.00 descEvento=Cancelamento xCorrecao= xCondUso= nProt= xJust=aaaaaaaaaaaaaaaaaaaaaaaaaaaa ") Retorno: 21/02/2017 20:04:01 - OK: idLote=0 tpAmb=2 verAplic=SP_EVENTOS_PL_100 cOrgao=35 cStat=128 xMotivo=Lote de Evento Processado [EVENTO001] id= tpAmb=2 verAplic=SP_EVENTOS_PL_100 cOrgao=35 cStat=493 xMotivo=Rejeição: Evento não atende o Schema XML específico chNFe=35170212342787000159550140000070911000013272 tpEvento=110111 xEvento= nSeqEvento=1 CNPJDest= emailDest= dhRegEvento=21/02/2017 20:03:59 nProt= Arquivo= XML= 0-ped-eve-soap.xml Entrei na opção do acbrmonitorplus .28, Enviar Cancelamento, e associei o xml e aí foi. Porém, não sei o que aconteceu ainda, pois minha solução estava funcionando e deu o erro acima. Alguém poderia me dar uma luz quanto á isto ? Testei pelo meu sistema, com outra notas e acontece o mesmo problema.

Boa noite, Estou anexando uma função que criei e coloquei no arquivo pcnConversaoNFe.pas que retorna a descrição dos códigos de retorno cStat. Como disse, coloquei-a no arquivo pcnConversaoNFe.pas para que eu possa utilizá-la em todos os meus projetos. Se quiser incluí-las no trunk 2, estou anexando somente a função... NELSON SANTOS Funcao Retorno Descricao cStat.txt

Boa noite a todos, Ainda estou usando o Delphi 7 (conforme vi que até janeiro/2017 será mantida a compatibilidade do ACBr). Vi no site do Sefaz RS que houve uma alteração na Manifestação do Destinatário aqui no RS. (conforme link https://www.sefaz.rs.gov.br/Site/MontaDuvidas.aspx?al=l_nfe_aviso) Com base nisso, baixei toda a pasta ACBr (mantive backup da minha pasta anterior), desinstalei o ACBr com o apagarAcbr.bat e fiz nova instalação do ACBr através do Setup ACBrInstall_Trunk2.exe Feito isso, abri o Delphi, abri meu fonte onde faço a manifestação do destinatário e mandei compilar todos os projetos (Project - Compile All Projects) e depois mandei fazer fazer um Build de todos os projetos (Project - Build All Projects). Após esse dois procedimentos (Compile e Build), mandei salvar todos os arquivos (File - Save All). Quando executo a minha aplicação e faço uma pesquisa de notas (funcionava esse comando até o dia 03/10/2016), O cStat que normalmente retornaria 138, está somente retornando=137 Nenhum documento localizado para o destinatário. Mas existe documentos para a empresa que está efetuando essa pesquisa. Me dei o trabalho de instalar o Manifestação de Destinatário do governo, e no momento que pesquisamos lá, retorna 12 documentos para a empresa em questão. O comando que estou executando é o seguinte: nfe.DistribuicaoDFe(43,'26081151000105','000000000000000',''); para buscar todos os documentos, pois esse meu cliente começou agora a operar essa empresa. E após a execução desse comando, pego o cStat e Motivo do comando acima da seguinte forma: sStat := IntToStr(nfe.WebServices.DistribuicaoDFe.retDistDFeInt.cStat); sMotivo := nfe.WebServices.DistribuicaoDFe.retDistDFeInt.xMotivo; Porém, o sStat está sempre vindo como 137. Preciso fazer algo diferente do que fiz para que a minha busca pela manifestação de destinatário volte a funcionar no RS ? Grato desde já, Geison C. Shida

bom dia amigos, gostaria de saber porque no arquivo de retorno do SAT, não temos a informação cStat e xMotivo, assim como ocorre no retorno da NFe ??? conforme manual, essa informação é retornada "5.17. Tabela de Códigos de Retorno e Descrições de Mensagens de Retorno" isso facilitaria muito para nós o tratamento das informações, se estiver falando bobagem peço perdão aos colegas. no aguardo.

Boa tarde, Estou fazendo uma consulta em um MDF-e e está sempre retornando o mesmo cStat “104 - Arquivo processado” e não volto para o cStat “100 - Autorizado o uso do MDF-e”. Está parecendo que o governo não está processando a solicitação. Já fiz o debug e vi que o componente está atualizado. Conforme faq do MDFe em ambiente de homologação o tempo de processamento máximo é de 3 minutos (https://mdfe-portal.sefaz.rs.gov.br/Site/Faq), mais no meu caso já passou de 1 hora. Os componentes do ACBR já está atualizado até a data e hora desta mensagem. Informações adicionais Ambiente: Homologação Versão do documento fiscal: 100 A consulta está sendo realizada desta maneira (uma parte do código). ACBrMDFe1.WebServices.Recibo.Recibo := aux; ACBrMDFe1.WebServices.Recibo.Executar; O retorno está sendo testado recuperado desta maneira (uma parte do código). ACBrMDFe1.WebServices.Recibo.cStat; Está correto a maneira que está sendo recuperada e consultada o MDFe? Tem outra maneira de realizar a consulta ou testar o retorno? Obrigado.

Boa noite a todos primeiramente, estou com uma dúvida devido a um problema que ocorreu nesses tempos que a receita(PR) estava ociosa, funcionava e parava, aconteceu a seguinte situação, supondo que o cliente selecionou duas notas para o envio, o sistema enviava as mesma e tudo ok, só que o cliente me questionou que quando imprimi a X sai os dados da Y, quando fui perceber e não sei porque as duas notas estava com a mesma chave e etc, ou seja, os dados do retorno do werService iguais, agora Não sei se é o processo que faço ou a receita, na dúvida irei colocar um pedaço do meu código para analisarem : Lembrando que outra coisa que reparei que o ACBr somente gravou os arquivo "-env-lot.xml" e "-rec.xml". if ((trim(cds_nota.fieldbyname('nfe_resultado').asstring) <> '100') and (trim(cds_nota.fieldbyname('nfe_resultado').asstring) <> '110') and (trim(cds_nota.fieldbyname('nfe_resultado').asstring) <> '301') and (trim(cds_nota.fieldbyname('nfe_resultado').asstring) <> '302') and (trim(cds_nota.fieldbyname('nfe_resultado').asstring) <> '101')) then begin acbrnfe.Enviar(numero_nota,false); "--> Aqui está o X da questão, quero que independe do resultado o sistema grave em uma tabela o retorno nota a nota." if (acbrnfe.WebServices.Retorno.NFeRetorno <> nil) then begin atualiza_pfnfe_status(cod_empr, acbrnfe.WebServices.Retorno.NFeRetorno.ProtNFe.Items[0].cStat, trunc(numero), cod_evento, numero, acbrnfe.WebServices.Retorno.NFeRetorno.ProtNFe.Items[0].xMotivo, tipo, acbrnfe.WebServices.Retorno.NFeRetorno.ProtNFe.Items[0].chNFe, acbrnfe.WebServices.Retorno.NFeRetorno.ProtNFe.Items[0].nProt, acbrnfe.WebServices.Retorno.NFeRetorno.nRec,''); if acbrnfe.WebServices.Retorno.NFeRetorno.ProtNFe.Items[0].cStat = 100 then begin acbrnfe_danfe_cb.NumCopias := emi.num_cop; acbrnfe.NotasFiscais.Imprimir;

Pessoal bom dia. Estou com dificuldades em pegar os códigos de retorno de uma consulta de nfe pela chave. var vChave : String; begin vChave:='351301009112450001705500100000...................'; ACBrNFe1.WebServices.Consulta.NFeChave := vChave; ACBrNFe1.WebServices.Consulta.Executar; ShowMessage(IntToStr(ACBrNFe1.WebServices.Retorno.cStat)+' '+(ACBrNFe1.WebServices.Retorno.xmotivo)); Está retornando código 0 mas quando vou olhar o XML aparece o código 101. Então porque está retornando 0? Desde já agradeço a quem puder me ajudar.