B4J Question how to sign XML documents with digital signatures

[Ivan Fernando Paz]

hi all
I have some xml files (invoices) which must be include digital signatures according to "XML Signature Syntax and Processing Version 1.1" (https://www.w3.org/TR/xmldsig-core/)"

Is there any library to perform this?
Thanks for advance

 

[focus330]

Hi
I have the same problem. Did you resolve ?

 

[rosippc64a]

XML Digital Signature API Overview and Tutorial

 

[Ivan Fernando Paz]

Hi
I have the same problem. Did you resolve ?

Hello, i used web services from third party in my country

 

[focus330]

Thanks. Muchas gracias

 

[EnriqueGonzalez]

hi @focus330 do you mean create a signature with a certificate, key file and a password? I did it sometime ago for some fiscal documents in my country (i guess it is the same country as ivan)

 

[Ivan Fernando Paz]

hi @focus330 do you mean create a signature with a certificate, key file and a password? I did it sometime ago for some fiscal documents in my country (i guess it is the same country as ivan)

yes, having a xml invoice and a certicate file, sign them and then send to dian(colombia)

 

[EnriqueGonzalez]

yes, having a xml invoice and a certicate file, sign them and then send to dian(colombia)

aaah okey, right. no i did it for mexico

 

[focus330]

Hi Enrique, hi people

It's the same problem: invoices ( xml files ) to be send to finance governance here in Italy with signature. But it must be an automatic process inside the b4j app.

 

[roerGarcia]

aaah okey, right. no i did it for mexico

¿Y cómo es ese proceso, a grandes rasgos Enrique?
Google translated
And how is that process, broadly speaking, Enrique?

 

[EnriqueGonzalez]

And how is that process, broadly speaking, Enrique?

you need first to create an original chain with an xlst

Dim ins As InputStream = File.OpenInput(File.DirApp & "\sat","cadenaoriginal_3_3.xslt")
'a lot of code here in between
Dim cadenaOriginal As String = strWriter.RunMethod("toString",Null)

after a long medling with java security features i sign it with the certificate, the key and the password

    signer.RunMethod("update",Array(cadenaOriginal.GetBytes("UTF8")))
    
    Dim selloBytes() As Byte = signer.RunMethod("sign",Null)
    Dim sello As String = su.EncodeBase64(selloBytes)
    
    comprobante.Sello = sello

Then with that info you sign the document with the certificate, keyfile and string.

Then you have you CFDI33 xml file signed.

i guess this is the same process for any xml signing feature, but i wouldnt know.