ValidaCFD

dado escribió: ..prepare un DLL de Prueba con todas las combinaciones para que hagas pruebas. Nota importante, este DLL NO TIENE NADA de factura electronica, es otro proyecto totalmente distinto, es solo para probar el envio de datos en su diferentes sabores (string, integer, real, etc).

dado escribió:Una solucion es programar el RFC del emisor a un valor fijo, tal como lo hago en la demo, de esa forma por mas que copien el DLL solo le va a servir a quien es "dueño" del RFC en cuestion.
Incluso tambien de esa forma puedes distibuir demos de tu programa y ya cuando registren y paguen les liberas el DLL pero con el RFC fijo para que solo le sea util a tu cliente.

Error - 1) Siempre regresa un valor > 0 la funcion GeneraCFD, a pesar de que se genera correctamente el archivo XML, cuando se crea el archivo devuelve: 39936
y manda otros codigos cuando no se logro crear el archivo y en este caso las funciones de GetError si me regresan la descripcion del error sin problema.

Me podrías pasar una lista de los codigos de error de TError ? para saber en que forma coninciden con los valores que me regresa la funcion.

type TError = (PRUEBA CON UN TIPO DE DATO BYTE)
(
	OK = 0
	Arch_No_Encontrado = 1
	Dato_Obligatorio = 2
	Problemas_Certificado = 3
	Vigencia_Certificado = 4
	LlavePrivada = 5
);

Un pequeño detalle: Puesto que al generar el archivo XML se guarda en memoria de la DLL la cadenaoriginal y el sello, del ultimo archivo ini procesado,
al momento de intentar generar otro XML con otros datos de factura pero en esta ocacion se genera un error y no se crea el archivo XML,
limpiar las variables de memoria de cadanaoriginal y sellodigital de la memoria de la DLL, para que las funciones que lo devuelven regresen
cadana vacia cuando no se ha logrado crear el archivo XML.

dado escribió: Por cierto, si logras hacerlo funcionar en Power Builder te ofrezco 20% de descuento si me pasas el ejemplo para poderlo compartir con otros usuarios que esten interesados.

metraje escribió: Listo ! ! Por fin la funcion GeneraCFD() quedo implementada en powerbuilder al 100% junto con las funciones de CadenaOriginal(), SelloDigital(), GetError() y GetErrorExt()

Solo falto PruebaClaveDeLlavePrivada() funcionara bien, pues siempre devuelve "true" , si te mando el demo con codigo fuente me aplicas mi descuento ?

Saludos

dado escribió:Listo, ya en el primer post de este hilo esta una nueva version de la libreria.

Se hicieron los siguientes cambios :

- Soporte para insertar el nodo aduana en los conceptos (revisen el archivo ini para ver los nuevos tags)
- Posibilidad de agregar un segundo IVATrasladado para las facturas que manejan dos tasas de iva (0% y 16% por ejemplo) (revisen el ini para ver los nuevos tags)
- Se programo una funcion y un procedimiento nuevo para ayudar en las pruebas de conexion al DLL

function CFDLibVersion : PChar;
Esta funcion no toma ningun parametro y devuelve una cadena con el numero de la version

procedure PruebaSimple;
Este procedimiento es el mas simple que se me pudo ocurrir, no toma ningun parametro ni tampoco devuelve nada, lo que hace es mostrar una ventana como la que se muestra, la intencion es que traten de llamar desde su lenguaje a este procedimiento, si logran que aparezca la ventana entonces pueden empezar a hacer pruebas de llamado con las otras funciones que si requieren parametros.

prueba.jpg

diazantonio7 escribió: ¿Y como tengo acceso al nuevo dll?...

metraje escribió:Estoy haciendo pruebas con la DLL ya liberada que te pague ( y que me enviaste por email) y sigue creando el XML con el RFC y Nombre del emisor a: rfc="DEMO010101XXX" nombre="EMPRESA DEMO SA DE CV" aunque el
archivo .ini tiene otros valores. Es una broma o que paso ???