Anderson.OL Posted February 22, 2010 Report Share Posted February 22, 2010 Estou com problemas para testar a NFe com a solução do Gilmer. Tenho conhecimento que muitos já implementaram em em seus sistemas esta solução e por isso acredito que eu esteja pecando em algum ponto, mas não sei onde. Acredito que alguem já tenha tido esta experiencia e por isso decidi postar, para ver se alguma alma caridosa compartilha a solução. Abaixo segue a sequencia de erros, a partir da seleção do certificado digital. Imagem 1id=size4> Imagem 2id=size4> Imagem 3id=size4> Desde já agradeço a quem ajudar. Abraços Fw 2.6 | Clipper 5.3b | DBFCDX -- FwxH 8.02 | xHb 1.1.0 | DBFCDX -- FwxH 9.06 | xHb 1.2.1 | SqlLibid=brown> O burro nunca aprende, o inteligente aprende com sua própria experiência, o sábio com a experiência dos outros. Editado por - anderson.ol on 23/02/2010 15:29:03 Quote Link to comment Share on other sites More sharing options...
Anderson.OL Posted February 22, 2010 Author Report Share Posted February 22, 2010 Estou com problemas para testar a NFe com a solução do Gilmer. Tenho conhecimento que muitos já implementaram em em seus sistemas esta solução e por isso acredito que eu esteja pecando em algum ponto, mas não sei onde. Acredito que alguem já tenha tido esta experiencia e por isso decidi postar, para ver se alguma alma caridosa compartilha a solução. Abaixo segue a sequencia de erros, a partir da seleção do certificado digital. Imagem 1id=size4> Imagem 2id=size4> Imagem 3id=size4> Desde já agradeço a quem ajudar. Abraços Fw 2.6 | Clipper 5.3b | DBFCDX -- FwxH 8.02 | xHb 1.1.0 | DBFCDX -- FwxH 9.06 | xHb 1.2.1 | SqlLibid=brown> O burro nunca aprende, o inteligente aprende com sua própria experiência, o sábio com a experiência dos outros. Editado por - anderson.ol on 23/02/2010 15:29:03 Quote Link to comment Share on other sites More sharing options...
pauloaraujo Posted February 22, 2010 Report Share Posted February 22, 2010 Anderson, tudo bem?? Basicamente, após a geração do XML, a rotina fica assim: oNFEUtil:=tVoNFeUtil():New(CADPARAM->UF,val(cTpAmb),cCertificado,wProxy,wUsuario,wSenha,cLicenca,.t.) //-. Consulta Status do SITE DA SEFAZ NX := oNFEUtil:ConsultaStatus() If NX = 0 //-> nada a fazer ELSE TONE( 900, 2 ) DO CASE CASE NX = 105 cMensa := ( "em processamento na secretaria da fazenda" ) CASE NX = 107 cMensa := ( "Serviço Paralisado Momentaneamente (curto prazo) " ) CASE NX = 108 cMensa := ( "Serviço Paralisado Momentaneamente (curto prazo) " ) CASE NX = 109 cMensa := ( "Serviço Paralisado sem Previsão de Retorno " ) CASE NX = 281 cMensa := ( "Rejeição: Certificado Transmissor Data Validade" ) OTHERWISE cMensa := OemToAnsi( "Problemas na TransmissÆo/ConexÆo. " + ; "Internet Pode Estar com Problemas." ) ENDCASE oMensa:Refresh() oRetorno:Refresh() oRecibo:Refresh() oDetalhes:Refresh() //-> Abre Notas Fiscais SELECT CADNFE XFOCUS( oBmp6 ) //-> permanecer somente transmissao habilitado lGerar := .T. lTransmite := .F. lConsulta := .F. lCancela := .F. lConsStatus := .F. RETURN NIL ENDIF SELECT CADNFE cChaveAcesso:=alltrim(CADNFE->CHAVEACES) cMensa:="";cRetorno:="";xRecibo:="";cDetalhes:="" oMensa:Refresh() oRetorno:Refresh() oRecibo:Refresh() oDetalhes:Refresh() carq:="REMESSA\nfe"+cChaveAcesso+"-nfe.xml" cXmlAssinado:="" cRecibo:="" IF oNFeUtil:ValidaXml(cArq, 1) != 0 oNfeUtil:End() lProblema_na_transmissao:= .T. SELECT CADNFE RLOCK() REPL STATUS WITH " " // voltar para pendente de geracao - 30/08/2009 COMMIT UNLOCK // habilitar somente gerar // desabilitar botao transmitir / consulta //-> permanecer somente transmissao habilitado lGerar := .F. lTransmite := .T. lConsulta := .F. lCancela := .F. lConsStatus := .F. RETURN( .F. ) ENDIF SELECT CADNFE RLOCK() REPL RETNFE WITH "IT" COMMIT //-> Aqui, o RETORNO tem que ser 103 - LOTE RECEBIDO COM SUCESSO - MANUAL //-> NX ‚ numerico nX:=oNFEUtil:EnviaNFe(cArq,@cxmlassinado,@crecibo) IF oNfeUtil:lAutorizada oNfe := TVoNFe():New() oNfe:PegaChaveAcesso(cXmlAssinado) oNFe:SaveXml(,cXmlAssinado, 2 ) CURSORWAIT() RETURN( .T. ) id=code>id=code> Quote Link to comment Share on other sites More sharing options...
gilmer Posted February 23, 2010 Report Share Posted February 23, 2010 Bom Dia, Você verificou o certificado como tinha dito para você? e-mail: gilmer@fivewin.com.br msn: fivewinbrasil@hotmail.com Quote Link to comment Share on other sites More sharing options...
Eroni Posted February 23, 2010 Report Share Posted February 23, 2010 Na minha opinião, pode ser que a Dll da flex docs não esteja licenciada para modo de produção ou; O certificado não é válido ainda. Att. Eroni (48) 3045-1575 xHarbour 0.99.5 & FWH 2.4 SqlLib, MySql & Dbf Quote Link to comment Share on other sites More sharing options...
Anderson.OL Posted February 23, 2010 Author Report Share Posted February 23, 2010 Gilmer, eu postei este problema antes de conversar com você pelo skype. Eu consegui hoje uma conexão sem proxy e comparando o certificado digital vi que agora consigo usar. Abaixo posto uma imagem do certificado digital em um pc com proxy e outro sem proxy. Imagem 1id=size4> Agora não está mais gerando este o erro citado acima. Obrigado a todos. Fw 2.6 | Clipper 5.3b | DBFCDX -- FwxH 8.02 | xHb 1.1.0 | DBFCDX -- FwxH 9.06 | xHb 1.2.1 | SqlLibid=brown> O burro nunca aprende, o inteligente aprende com sua própria experiência, o sábio com a experiência dos outros. Quote Link to comment Share on other sites More sharing options...
gilmer Posted February 23, 2010 Report Share Posted February 23, 2010 Fala Dr.! Perfeito! e-mail: gilmer@fivewin.com.br msn: fivewinbrasil@hotmail.com Quote Link to comment Share on other sites More sharing options...
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.