FiveTech Software tech support forums

Luis, el XML se maneja por nodos, sin embargo no deja de ser un archivo de texto, con la función AT() Yo ubico cierta información, la que indicas puede ser asi (y cualquier otra) : cTxt:=Memoread ( cNomXml ) nPoi:=AT("<ds:SignatureValue>",cTxt) nPof:=AT("</ds:SignatureValue&g...

Hola Enrrique

Nuevamente abordando el tema:

Como obtienes el contenido del elemento <SignatureValue> de los XML, con manzanitas por favor

Gracias

... XML pero como se firma???, como se incluye al XML??? He comprado la firma digital en .pfx, ya la pasé a .cer (que es como la recepciona SUNAT en Peru) como se usa ??? Por favor si alguien ya pasó por esto, agradeceré compartan su experiencia y ejemplos. Gracias

Enrrique

Es exactamente lo que hice, aumentarle "R-" al zip de origen, como no encontraba una funcion que lo hiciera.. no me quedó otra.

Un saludo y gracias nuevamente

Luis, que bueno ...

Lo del nombre no lo entiendo, el nombre que debe tener el ZIP es "R-" y el resto del nombre del documento electrónico enviado, y de ahí podras extraer el "R-" con extensión .XML que es donde vendrá la respuesta Sunat

Enrrique

Excelente!! lo incorporé y funcionó

Lo que no ubico es como recuperar el nombre del archivo CDR

Muchas Gracias

cResSun es el archivo que se creara
cTxtSun64 es la respuesta de Sunat en applicationResponse

Enrrique

Asi es, lo logico es que debía hacer a la inversa, y lo intenté con:

Base64ToStr(applicationResponse)

applicationResponse=al contenido del TAG

Probare con el codigo que compartiste

cResSun = archivo resultante
cTxtSun64 = es el contenido de applicationResponse?

Gracias

Luis, lo que recibes es un archivo ZIP en Base64, hay que hacer la operación inversa y después descomprimirlo para leer el contenido.

hFile := FCreate( cResSun, FC_NORMAL )
FWrite( hFile, Base64ToStr( cTxtSun64 ) )
FClose( hFile )

Hola Enrrique Al parecer habia resuelto el envio mediante SendBill, digo al parecer porque Sunat me reporta imagino el CDR en produccion, este viene de esta forma: <?xml version='1.0' encoding='UTF-8'?><S:Envelope xmlns:S="http://schemas.xmlsoap.org/soap/envelope/"><S:Body&g...

Luis Yo lo leo invocando a esta function, y ya lo regresa convertido a base64 cNewArc:=xlee(cAcrZip) //----------------------------------- Funcion para Leer ZIP ------------------------------------// function xlee(hsource) local hTarget local cBuffer := Space(4000) local nBytes, nFile := 0, nTotal :...

Hola Benjiben143

Hice lo que me dijiste y..

Dio lo mismo

Gracias

Hola luis

con eso se instalo la dll

a hora prueba el ejemplo




saludos

Buenos Dias Benjamin bajé el archivo y ejecuté r r ClassLibrary2 me dió esta respuesta en modo a prueba de fallos y normal RegAsm : Warning RA0000 : El registro de un ensamblado sin signo puede provocar que dicho ensamblado interfiera con otras aplicaciones en el mismo equipo. El modificador /codeba...

Hola
buenos dias

en esta liga esta con lo que la registro


www.eleben.com.mx\regis.zip

ejecutar

r classlibrary2

en modo de prueba
saludos