FONTE NFE VB.NET

 Tópico anterior Próximo tópico Novo tópico

FONTE NFE VB.NET

VB.NET

 Compartilhe  Compartilhe  Compartilhe
#478215 - 02/12/2017 15:18:43

NILSONTRES
SAO PAULO
Cadast. em:Março/2012


Citação:
  Alguém conseguiu fazer para o está de GOIÀS, não consigo criar o serviço.

Provavelmente seu caso é falta de atualização da cadeia de certificados.



#478216 - 02/12/2017 15:28:42

TABPRS
GOIANIA
Cadast. em:Dezembro/2003


Não estou conseguindo fazer para funcionar com a versão 4.0, as outras estão corretas.

Tem alguma ideia de qual cadeia está faltando?

Jesus te Ama !
Pedro r. Sousa

#478219 - 02/12/2017 20:19:30

NILSONTRES
SAO PAULO
Cadast. em:Março/2012


Citação:
Tem alguma ideia de qual cadeia está faltando?  

Veja



#478232 - 03/12/2017 14:56:35

TABPRS
GOIANIA
Cadast. em:Dezembro/2003


NILSONTRES

cara já fiz isso é não funciona, não sei mais o que fazer, pois necessito de criar o serviço de web e não está dando certo.

Jesus te Ama !
Pedro r. Sousa

#478242 - 04/12/2017 08:52:31

NILSONTRES
SAO PAULO
Cadast. em:Março/2012


Citação:
  cara já fiz isso é não funciona, não sei mais o que fazer, pois necessito de criar o serviço de web e não está dando certo.

Fiz um teste aqui, e da mesma forma que envio lote para SP, fiz para goias, SP retorna ok, para Goias da esse mesmo erro seu, pode ser la então.



#478252 - 04/12/2017 14:52:13

TABPRS
GOIANIA
Cadast. em:Dezembro/2003


Citação:
:
  cara já fiz isso é não funciona, não sei mais o que fazer, pois necessito de criar o serviço de web e não está dando certo.
Fiz um teste aqui, e da mesma forma que envio lote para SP, fiz para goias, SP retorna ok, para Goias da esse mesmo erro seu, pode ser la então.


Alguém aqui é de GOIÁS e que pode ajudar?

Jesus te Ama !
Pedro r. Sousa

#478999 - 09/01/2018 15:59:07

ANGELOSCARPIN
SAO PAULO
Cadast. em:Março/2010


Citação:
:
Saiu atualização de NT ontem, prorrogando os prazos, inclusive a desativação da versão 3.10 que era pra abril/2018 passou pra julho/2018, no meu ponto de vista, é cedo pra tentar colocar no ar.


Qual o link que voce viu este adiamento de prazo ?

pois olhei no site da fazenda e não vi nada sobre isto ?

Por favor nós informe o link, obrigado.

abraço.



#479000 - 09/01/2018 16:12:57

ANGELOSCARPIN
SAO PAULO
Cadast. em:Março/2010


Última edição em 10/01/2018 14:41:18 por ANGELOSCARPIN

Citação:
:
  cara já fiz isso é não funciona, não sei mais o que fazer, pois necessito de criar o serviço de web e não está dando certo.
Fiz um teste aqui, e da mesma forma que envio lote para SP, fiz para goias, SP retorna ok, para Goias da esse mesmo erro seu, pode ser la então.


Como voce consegui enviar para São Paulo ?

Vc poderia me passar seu codigo de envio do lote para comparar com o meu para encontrar o erro do meu codigo ?

Pois nao estou conseguindo, eu modifiquei o codigo fonte postado aqui inicialmente mas nao estou tendo sucesso.

Fico no aguardo obrigado.


Meu Codigo:

Public Function EnviaLote400(ByVal cArquivoEnviar_xml_texto As String, Optional ByVal cSerieCertificado As String = "", Optional ByRef lSucesso As Boolean = False) As RetEnvio

      

        Dim strRetorno As XmlElement
        Dim XMLDocumentoEnviarReceita = New XmlDocument()


        XMLDocumentoEnviarReceita.Load(cArquivoEnviar_xml_texto) 'Carrega o arquivo XML.

        Dim CERT As X509Certificate2
        CERT = SelecionarCertificado(cSerieCertificado)

        Try

            Dim wsWebService As New NfeAutorizacao4.NfeAutorizacao4(S_Url.UrlNFeAutorizacao400)
            wsWebService.Timeout = 100000
            wsWebService.ClientCertificates.Add(CERT)
            wsWebService.SoapVersion = SoapProtocolVersion.Soap12


      
            Dim Notas As String
            Notas = XMLDocumentoEnviarReceita.OuterXml


            'RETORNO DA SEFAZ

' ->>>>> aqui da o erro.

            strRetorno = wsWebService.nfeAutorizacaoLote(XMLDocumentoEnviarReceita)



            'DESMEMBRAR RETORNO XML
            Dim StrRetNota As RetEnvio = Nothing
            Dim XmlText As XmlDocument = New XmlDocument

            For Each outerNode As XmlNode In strRetorno

                For Each InnerNode As XmlNode In outerNode.ChildNodes

                    If (InnerNode.Name = "verAplic" Or outerNode.Name = "verAplic") Then
                        StrRetNota.verAplic = InnerNode.InnerText
                    End If
                    If (InnerNode.Name = "tMed" Or outerNode.Name = "tMed") Then
                        StrRetNota.tMed = InnerNode.InnerText
                    End If
                    If (InnerNode.Name = "cStat" Or outerNode.Name = "cStat") Then
                        StrRetNota.cStat = InnerNode.InnerText
                    End If
                    If (InnerNode.Name = "xMotivo" Or outerNode.Name = "xMotivo") Then
                        StrRetNota.xMotivo = InnerNode.InnerText
                    End If
                    If (InnerNode.Name = "cUF" Or outerNode.Name = "cUF") Then
                        StrRetNota.cUF = InnerNode.InnerText
                    End If
                    If (InnerNode.Name = "nRec" Or outerNode.Name = "nRec") Then
                        StrRetNota.nRec = InnerNode.InnerText
                    End If
                    If (InnerNode.Name = "dhRecbto" Or outerNode.Name = "dhRecbto") Then
                        StrRetNota.dhRecbto = InnerNode.InnerText
                    End If
                    'If (InnerNode.Name = "tMed" Or outerNode.Name = "tMed") Then
                    'StrRetNota.tMed = InnerNode.InnerText
                    'End If
                    '    Dim verAplic As String
                    '    Dim cStat As String
                    '    Dim xMotivo As String
                    '    Dim cUF As String
                    '    Dim nRec As String
                    '    Dim dhRecbto As String
                    '    Dim tMed As String
                    '    Dim XmlRecibo As String

                    lSucesso = True

                Next

            Next

            Return StrRetNota

        Catch ex As Exception

            MsgBox(ex.Message, MsgBoxStyle.Information, "")
            lSucesso = False
            Return Nothing

        End Try

    End Function


QUANDO ENVIO O EXECUTO ESTA LINHA DO CODIGO RETORNA O SEGUINTE ERRO:
strRetorno = wsWebService.nfeAutorizacaoLote(XMLDocumentoEnviarReceita)

Unable to handle request. The action 'http://www.portalfiscal.inf.br/nfe/wsdl/NfeStatusServico4/nfeStatusServicoNF' was not recognized.


Aflito e desesperado kkkkk...





#479012 - 10/01/2018 15:23:55

GEORGENES
SAO PAULO
Cadast. em:Julho/2012


Citação:
:
  cara já fiz isso é não funciona, não sei mais o que fazer, pois necessito de criar o serviço de web e não está dando certo.
Fiz um teste aqui, e da mesma forma que envio lote para SP, fiz para goias, SP retorna ok, para Goias da esse mesmo erro seu, pode ser la então.



NILSONTRES , boa tarde !
Estou com o mesmo problema do ANGELOSCARPIN , recebendo a mensagem de erro : Unable to handle request. The action 'http://www.portalfiscal.inf.br/nfe/wsdl/NfeStatusServico4/nfeStatusServicoNF' was not recognized

Poderia dar uma dica ?




#479015 - 10/01/2018 17:11:02

GEORGENES
SAO PAULO
Cadast. em:Julho/2012


Citação:
:
:
  cara já fiz isso é não funciona, não sei mais o que fazer, pois necessito de criar o serviço de web e não está dando certo.
Fiz um teste aqui, e da mesma forma que envio lote para SP, fiz para goias, SP retorna ok, para Goias da esse mesmo erro seu, pode ser la então.


NILSONTRES , boa tarde !
Estou com o mesmo problema do ANGELOSCARPIN , recebendo a mensagem de erro : Unable to handle request. The action 'http://www.portalfiscal.inf.br/nfe/wsdl/NfeStatusServico4/nfeStatusServicoNF' was not recognized

Poderia dar uma dica ?


RESOLVIDO !!!!
1 - precisa esta usando net framework 4.5 ou superior
2 - precisa referenciar o protocolo tls antes de enviar =>  System.Net.ServicePointManager.SecurityProtocol = System.Net.SecurityProtocolType.Tls12
3 - precisa liberar no java os sites da SEFAZ em questao, neste caso foi para SP, se receber a mensagem => the underlying connection was closed, an unexpected error occurred on a send => "a conexão subjacente foi fechada, ocorreu um erro inesperado em um envio"
      
4 - fazer  o seguinte, verificar as permissões no console JAVA em painel de controle / Java / Segurança / Lista de Exceções de Sites e insira estes sites abaixo:

http://www.emissornfe.fazenda.sp.gov.br/
http://www.nfe.fazenda.gov.br/portal/principal.aspx
https://www.fazenda.sp.gov.br/nfe/

Além disso, baixem o nível de segurança do Java caso esteja em "Muito Alta"
Verifiquem se o certificado digital não foi revogado (perca da vigência
      
Depois destes ajustes funcionou a conexao em nossos sistemas





 Tópico anterior Próximo tópico Novo tópico


Para responder este tópico o login é requerido
Se você já possui uma conta de usuário por favor faça seu login
Se você não possui uma conta de usuário use a opção Criar usuário