Programa CFD2PDF convierte el XML a PDF

[Dado]

Ok, deja reviso que esta pasando, no te prometo contestar hoy porque ando ocupado, pero en cuanto tenga algo lo comento aqui

[VMHH]

me APARECE EL MISMO ERROR LOS TOTALES, SUBTOTALES, IVA Y PU APARECEN EN 0, ADEMAS DE QUE NO APARECE LA CANTIDAD CON LETRA.

[Dado]

me APARECE EL MISMO ERROR LOS TOTALES, SUBTOTALES, IVA Y PU APARECEN EN 0, ADEMAS DE QUE NO APARECE LA CANTIDAD CON LETRA.

Pudieras decirme que Windows estas usando (recuerda comentar version, subversion, bits de proceso p.ejemplo "Windows 7 Home Premium 64 bits")

Tambien pudieras decirme si esta configurado Mexico en la configuracion regional.

Les comento porque pido todo esto. Mi compu de desarrollo tiene Windows 7 Home Premium 64 bits y la rutina funciona bien, ahora, lo de la configuracion regional es una sospecha porque en la muestra del PDF con ceros dice $0,00 y esa coma solo puede haberse cambiado si la configuracion regional no es Mexico sino otro pais donde usen la coma como delimitador.

Le di una revisada rapida al asunto y no encontre porque puede estar pasando esto, les prometo que en los proximos dias hago mas pruebas.....

[VMHH]

La version es windows Ultimate de 32 bits la configuración regional es español, mexico.

[Dado]

La version es windows Ultimate de 32 bits la configuración regional es español, mexico.

Mmmh, la misma que la de visitante32 el usuario que reporto esta situacion por primera vez.....ok, sigo analizando mis rutinas........

[Dado]

@visitante32
@vmhh

Les envie un mail privado con una version de prueba del CFD2PDF que tiene programado unas 4 formas de enviar los datos al reporte, por favor si pueden ejecutar esa prueba y enviarme el PDF para ver cual funciono y cual no. De antemano muchas gracias por su apoyo.

[Dado]

ERROR CON WIN 7 ULTIMATE CORREGIDO

Confirmo que el error de mi programita en Windows 7 Ultimate se debe como lo sospeche desde el principio a diferencias en el formato para representar un numero, por alguna razon Delphi 7 no extrae correctamente la configuracion Español-Mexico que tiene configurado Windows 7 Ultimate.

Tambien confirmo que esto no pasa en Windows 7 Home Premium, no me pregunten porque .....

Lo importante es que ya esta resuelto, @visitante32 y @vmhh podrian porfavor volver a descargar el programita que esta en el primer post y probarlo para confirmar que realmente este resuelto. Gracias por adelantado.

Para los que les pase el codigo fuente hay que hacer la siguiente correccion, se debe agregar una linea :

Código: Seleccionar todo

procedure TPDFForm.XML2PDF(XMLFName, PDFFName, RepFName, LogoFName, TipoDestino : string);
begin
	DecimalSeparator := '.';  //AGREGAR ESTA LINEA
	try
		XMLDoc.LoadFromFile(XMLFName);
		XMLDoc.Active := true;
		CFD := GetComprobante(XMLDoc);
		GeneraCadenaOriginal;
		RaveExport(TipoDestino,PDFFName,RepFName,LogoFName);
	except
	end;
end;

[condor0086]

Con este problema con el Windows Ultimate sería interesante que hicieran un pequeñito experimento:

Vayan a Panel de Control -> Configuración Regional y de Idioma -> Configuración Adicional -> y denle click en el botón "Restablecer"

Hay posibilidades de que con esto se componga, si lo prueban me platican si les funcionó

Saludos

[visitante32]

Ajua... vean el PDF creado con el nuevo exe.
Dado, el pdf usa el formato_areli1.rav y ha quedado muy bonito.

Ok, ok, solo un par de detalles.

Donde dice: Lugar y fecha de expedición: MEXICO, , a 2010-12-10 10:31:13
Nota que hay dos ,, supongo que ahí va el DISTRITO FEDERAL pero no sale en el pdf

La otra es en SELLO DIGITAL se pasa por algunos caracteres fuera del espacio reservado para la cadena.

Voy a ver que es eso del navreport para aprender a usarlo.

Gracias Dado y también a Arely por el formato

Saludos
Fernando

[Salim Giacoman]

ERROR CON WIN 7 ULTIMATE CORREGIDO

Confirmo que el error de mi programita en Windows 7 Ultimate se debe como lo sospeche desde el principio a diferencias en el formato para representar un numero, por alguna razon Delphi 7 no extrae correctamente la configuracion Español-Mexico que tiene configurado Windows 7 Ultimate.

Tambien confirmo que esto no pasa en Windows 7 Home Premium, no me pregunten porque .....

Lo importante es que ya esta resuelto, @visitante32 y @vmhh podrian porfavor volver a descargar el programita que esta en el primer post y probarlo para confirmar que realmente este resuelto. Gracias por adelantado.

Para los que les pase el codigo fuente hay que hacer la siguiente correccion, se debe agregar una linea :

Código: Seleccionar todo

procedure TPDFForm.XML2PDF(XMLFName, PDFFName, RepFName, LogoFName, TipoDestino : string);
begin
	DecimalSeparator := '.';  //AGREGAR ESTA LINEA
	try
		XMLDoc.LoadFromFile(XMLFName);
		XMLDoc.Active := true;
		CFD := GetComprobante(XMLDoc);
		GeneraCadenaOriginal;
		RaveExport(TipoDestino,PDFFName,RepFName,LogoFName);
	except
	end;
end;

Fijate que a mi me paso eso con un programa en Delphi (750,000 lineas de codigo), al actualizar a Win7 (probados casi todas las versiones) por alguna razon extraña ALGUNAS funciones nativas del delphi no reconocian el separador decimal y tubimos que hacer alguans tecnicas ninja para corregirlo