Sello Invalido en complemento de CFDI -NOMINA

Es tan comun este tema que he decidido abrir un foro especial para este caso. Se trata de programadores que tienen problemas para crear el Sello Digital y que no pasan la validacion
crono81
Mensajes: 118
Registrado: Lun Dic 16, 2013 6:55 pm

Re: Sello Invalido en complemento de CFDI -NOMINA

Mensajepor crono81 » Lun Mar 17, 2014 12:19 pm

danarzeta escribió:crono81: Si pudiste resolver tu problema con el sellado?, porque yo estoy en las mismas y el tiempo ya esta encima.


Pues en realidad ya no he validado recibos de nomina, pues el pac no me marcó errores al timbrar, supongo que están bien.

El xslt de nomina funciona en conjunto con el del cdfi, el cual a su vez, hace uso de uno de utilerias, que ahi viene el uso de campos opcionales y requeridos

rams
Mensajes: 1
Registrado: Jue Mar 20, 2014 9:14 am

Re: Sello Invalido en complemento de CFDI -NOMINA

Mensajepor rams » Jue Mar 20, 2014 9:19 am

Yo tenia el mismo problema y utilice el siguiente xlst y se resolvió...
http://www.sat.gob.mx/sitio_internet/cfd/3/cadenaoriginal_3_2/cadenaoriginal_3_2.xslt

utilizo la siguiente función para generar la cadena

Código: Seleccionar todo



   Function GeneraCadena(ByVal _PathXML As String, ByVal _PathXLST As String) As String
        Dim strCadena As String
        Dim xmlDoc As New System.Xml.XmlDocument
        Dim CadenaOriginal As String
        Dim transformer As System.Xml.Xsl.XslCompiledTransform

        Dim Archivo_XSLT As String

        Dim document As New System.Xml.XmlDocument
        Dim navigator As System.Xml.XPath.XPathNavigator
        Dim output As New System.IO.StringWriter()
        document = New System.Xml.XmlDocument()
        transformer = New System.Xml.Xsl.XslCompiledTransform

        Try
            Archivo_XSLT = _PathXLST
            document.Load(_PathXML)

            navigator = document.CreateNavigator

            transformer.Load(Archivo_XSLT)

            transformer.Transform(navigator, Nothing, output)
            Console.WriteLine(output.ToString)

            CadenaOriginal = output.ToString

            strCadena = _PathXML.Substring(0, _PathXML.LastIndexOf("\") + 1) & "cadena.txt"

            System.IO.File.WriteAllText(strCadena, CadenaOriginal)

            output.Close()

            'MessageBox.Show(CadenaOriginal)
            Return strCadena
        Catch ex As Exception
            MsgBox(ex.Message)
            Return ""
        Finally
            document = Nothing
            transformer = Nothing
            navigator = Nothing
            output.Dispose()

        End Try

    End Function


Espero te ayude

freevirus78
Mensajes: 5
Registrado: Vie Dic 17, 2010 11:02 am

Re: Sello Invalido en complemento de CFDI -NOMINA

Mensajepor freevirus78 » Jue Mar 20, 2014 9:36 pm

rams escribió:Yo tenia el mismo problema y utilice el siguiente xlst y se resolvió...
http://www.sat.gob.mx/sitio_internet/cfd/3/cadenaoriginal_3_2/cadenaoriginal_3_2.xslt

utilizo la siguiente función para generar la cadena

Código: Seleccionar todo



   Function GeneraCadena(ByVal _PathXML As String, ByVal _PathXLST As String) As String
        Dim strCadena As String
        Dim xmlDoc As New System.Xml.XmlDocument
        Dim CadenaOriginal As String
        Dim transformer As System.Xml.Xsl.XslCompiledTransform

        Dim Archivo_XSLT As String

        Dim document As New System.Xml.XmlDocument
        Dim navigator As System.Xml.XPath.XPathNavigator
        Dim output As New System.IO.StringWriter()
        document = New System.Xml.XmlDocument()
        transformer = New System.Xml.Xsl.XslCompiledTransform

        Try
            Archivo_XSLT = _PathXLST
            document.Load(_PathXML)

            navigator = document.CreateNavigator

            transformer.Load(Archivo_XSLT)

            transformer.Transform(navigator, Nothing, output)
            Console.WriteLine(output.ToString)

            CadenaOriginal = output.ToString

            strCadena = _PathXML.Substring(0, _PathXML.LastIndexOf("\") + 1) & "cadena.txt"

            System.IO.File.WriteAllText(strCadena, CadenaOriginal)

            output.Close()

            'MessageBox.Show(CadenaOriginal)
            Return strCadena
        Catch ex As Exception
            MsgBox(ex.Message)
            Return ""
        Finally
            document = Nothing
            transformer = Nothing
            navigator = Nothing
            output.Dispose()

        End Try

    End Function


Espero te ayude


Que tal, espero me puedan apoyar, estoy intentando timbrar mi recibo pero me dice que el sello es invalido, utilizo xsltproc y cadenaoriginal_3_2.xslt para generar la cadena original, al parecer la genera de forma correcta ya que esta tomando en cuenta el complemento de nomina, utilizo openssl para generar el sello, pero no funciona, les dejo los comando que utilizo:

xsltproc cadenaoriginal_3_2.xslt FA-CFDI.xml > CADORIG.txt

openssl dgst -sha1 -sign LLAVEPRIVADA.pem.txt -out SelloBin.txt CADORIG.TXT

openssl enc -base64 -in SelloBin.txt -out SELLO.txt

Cabe mencionar que estas mismas instrucciones las utilizo para sellar las facturas y trabaja correctamente.

Alguien podria ayudarme???? Ya estuve buscando por todos lados pero no encuentro la solucion.

Gracias.

crono81
Mensajes: 118
Registrado: Lun Dic 16, 2013 6:55 pm

Re: Sello Invalido en complemento de CFDI -NOMINA

Mensajepor crono81 » Sab Mar 22, 2014 1:09 pm

freevirus78 escribió:

Que tal, espero me puedan apoyar, estoy intentando timbrar mi recibo pero me dice que el sello es invalido, utilizo xsltproc y cadenaoriginal_3_2.xslt para generar la cadena original, al parecer la genera de forma correcta ya que esta tomando en cuenta el complemento de nomina, utilizo openssl para generar el sello, pero no funciona, les dejo los comando que utilizo:

xsltproc cadenaoriginal_3_2.xslt FA-CFDI.xml > CADORIG.txt

openssl dgst -sha1 -sign LLAVEPRIVADA.pem.txt -out SelloBin.txt CADORIG.TXT

openssl enc -base64 -in SelloBin.txt -out SELLO.txt

Cabe mencionar que estas mismas instrucciones las utilizo para sellar las facturas y trabaja correctamente.

Alguien podria ayudarme???? Ya estuve buscando por todos lados pero no encuentro la solucion.

Gracias.


Te has fijado en tu sello generado?, que valor trae, si tienes el error que yo tenia (y que pienzo que es lo mismo), prueba lo siguiente:
Verifica tu archivo XSLT (cadenaoriginal_3_2.xslt), abrelo con bloc de notas, y busca esta linea "<xsl:stylesheet version="2.0">", donde dice version ponle 1.0, en lugar de 2.0, pero como se usa tambien este archivo: "http://www.sat.gob.mx/sitio_internet/cfd/nomina/nomina11.xslt", puedes verificarlo en tu xslt a donde hace referencia para el nomina11.xslt, en archivo nomina tambien trae version 2, hay que descargar el xslt, cambiarle a 1.0, luego en tu xslt de cadena original 3.2, cambiar la referencia de la nomina y que se dirija a tu archivo local modificado de nomina

freevirus78
Mensajes: 5
Registrado: Vie Dic 17, 2010 11:02 am

Re: Sello Invalido en complemento de CFDI -NOMINA

Mensajepor freevirus78 » Lun Mar 24, 2014 8:22 pm

crono81 escribió:
freevirus78 escribió:

Que tal, espero me puedan apoyar, estoy intentando timbrar mi recibo pero me dice que el sello es invalido, utilizo xsltproc y cadenaoriginal_3_2.xslt para generar la cadena original, al parecer la genera de forma correcta ya que esta tomando en cuenta el complemento de nomina, utilizo openssl para generar el sello, pero no funciona, les dejo los comando que utilizo:

xsltproc cadenaoriginal_3_2.xslt FA-CFDI.xml > CADORIG.txt

openssl dgst -sha1 -sign LLAVEPRIVADA.pem.txt -out SelloBin.txt CADORIG.TXT

openssl enc -base64 -in SelloBin.txt -out SELLO.txt

Cabe mencionar que estas mismas instrucciones las utilizo para sellar las facturas y trabaja correctamente.

Alguien podria ayudarme???? Ya estuve buscando por todos lados pero no encuentro la solucion.

Gracias.


Te has fijado en tu sello generado?, que valor trae, si tienes el error que yo tenia (y que pienzo que es lo mismo), prueba lo siguiente:
Verifica tu archivo XSLT (cadenaoriginal_3_2.xslt), abrelo con bloc de notas, y busca esta linea "<xsl:stylesheet version="2.0">", donde dice version ponle 1.0, en lugar de 2.0, pero como se usa tambien este archivo: "http://www.sat.gob.mx/sitio_internet/cfd/nomina/nomina11.xslt", puedes verificarlo en tu xslt a donde hace referencia para el nomina11.xslt, en archivo nomina tambien trae version 2, hay que descargar el xslt, cambiarle a 1.0, luego en tu xslt de cadena original 3.2, cambiar la referencia de la nomina y que se dirija a tu archivo local modificado de nomina


Crono81, te agradezco infinitamente, funcionó y ya logre timbrar.

Excelente aporte.

Saludos!!

IsraelMorales
Mensajes: 1
Registrado: Mar Abr 01, 2014 9:41 pm

Re: Sello Invalido en complemento de CFDI -NOMINA

Mensajepor IsraelMorales » Mar Abr 01, 2014 9:43 pm

rams escribió:Yo tenia el mismo problema y utilice el siguiente xlst y se resolvió...
http://www.sat.gob.mx/sitio_internet/cfd/3/cadenaoriginal_3_2/cadenaoriginal_3_2.xslt

utilizo la siguiente función para generar la cadena

Código: Seleccionar todo



   Function GeneraCadena(ByVal _PathXML As String, ByVal _PathXLST As String) As String
        Dim strCadena As String
        Dim xmlDoc As New System.Xml.XmlDocument
        Dim CadenaOriginal As String
        Dim transformer As System.Xml.Xsl.XslCompiledTransform

        Dim Archivo_XSLT As String

        Dim document As New System.Xml.XmlDocument
        Dim navigator As System.Xml.XPath.XPathNavigator
        Dim output As New System.IO.StringWriter()
        document = New System.Xml.XmlDocument()
        transformer = New System.Xml.Xsl.XslCompiledTransform

        Try
            Archivo_XSLT = _PathXLST
            document.Load(_PathXML)

            navigator = document.CreateNavigator

            transformer.Load(Archivo_XSLT)

            transformer.Transform(navigator, Nothing, output)
            Console.WriteLine(output.ToString)

            CadenaOriginal = output.ToString

            strCadena = _PathXML.Substring(0, _PathXML.LastIndexOf("\") + 1) & "cadena.txt"

            System.IO.File.WriteAllText(strCadena, CadenaOriginal)

            output.Close()

            'MessageBox.Show(CadenaOriginal)
            Return strCadena
        Catch ex As Exception
            MsgBox(ex.Message)
            Return ""
        Finally
            document = Nothing
            transformer = Nothing
            navigator = Nothing
            output.Dispose()

        End Try

    End Function


Espero te ayude


Después de 3 días batallando, esto era exactamente lo que necesitaba, muchas gracias!


Volver a “SELLO DIGITAL INVALIDO”

¿Quién está conectado?

Usuarios navegando por este Foro: No hay usuarios registrados visitando el Foro y 10 invitados