Imagen

DESCARGA SOFTWARE PARA FACTURA ELECTRONICA DE AQUI.
Facturacion, Validacion, Addendas, Librerias de programacion, etc.


CARTA PORTE V3.1

ECODEX TIENE ESTOS NUEVOS DATOS DE CONTACTO :
Comercializacion y Ventas - Evelia Vicke evicke@ecodex.com.mx 33-16-03-03-48
Soporte - Humberto Guerrero soporte@ecodex.com.mx 33-34-90-46-03


.

ERROR AL COMPILAR TIMBRADO CON BUZONE

Este es el foro para resolver dudas y hacer comentarios del Codigo Fuente para Delphi de generacion y timbrado que se ofrece aqui en el foro
[[ FORO CERRADO DEBIDO A QUE YA LA INFORMACION YA NO ES VIGENTE ]]
Cerrado
masrmty
Mensajes: 18
Registrado: Jue Jul 22, 2010 12:07 pm

ERROR AL COMPILAR TIMBRADO CON BUZONE

Mensaje por masrmty »

Buenas noches, tengo el siguiente problema al tratar de compilar la version basica con el modulo de timbrado con Buzone:
[DCC Error] BuzonE.pas(84): E2003 Undeclared identifier: 'XMLDecode'
[DCC Error] BuzonE.pas(124): E2003 Undeclared identifier: 'XMLEncode'

Estoy con delphi version 2010.

Saludos y gracias.
Avatar de Usuario
Dado
Mensajes: 15981
Registrado: Mar Jul 06, 2010 7:56 pm

Re: ERROR AL COMPILAR TIMBRADO CON BUZONE

Mensaje por Dado »

masrmty escribió:Buenas noches, tengo el siguiente problema al tratar de compilar la version basica con el modulo de timbrado con Buzone:
[DCC Error] BuzonE.pas(84): E2003 Undeclared identifier: 'XMLDecode'
[DCC Error] BuzonE.pas(124): E2003 Undeclared identifier: 'XMLEncode'

Estoy con delphi version 2010.

Saludos y gracias.
Esas funciones se agregaron a la unidad cfdUtils, te recomiendo descargar nuevamente el "Codigo Basico version febrero-2011" para que tengas las rutinas mas actualizadas, de cualquier manera te anexo aqui la definicion de esas dos funciones :

Código: Seleccionar todo

function XMLEncode(cad : string) : string;
begin
	cad := AnsiReplaceStr(cad,'&','&');
	cad := AnsiReplaceStr(cad,'<','<');
	cad := AnsiReplaceStr(cad,'>','>');
	Result := cad;
end;

function XMLDecode(cad : string) : string;
begin
	cad := AnsiReplaceStr(cad,'"','"');
	cad := AnsiReplaceStr(cad,'&apos;','''');
	cad := AnsiReplaceStr(cad,'&','&');
	cad := AnsiReplaceStr(cad,'<','<');
	cad := AnsiReplaceStr(cad,'>','>');
	Result := cad;
end;
pd. tambien te recomiendo hacer una busqueda en el foro, pudiste haber buscado "xmlencode" esta listada la funcion y una explicacion de donde o porque se agrego despues
ADDENDAS? VALIDACION? CODIGO PARA PROGRAMAR TU PROPIA SOLUCION? TODO LO TENEMOS EN WWW.VALIDACFD.COM VISITANOS !!
masrmty
Mensajes: 18
Registrado: Jue Jul 22, 2010 12:07 pm

Re: ERROR AL COMPILAR TIMBRADO CON BUZONE

Mensaje por masrmty »

Ya baje lo nuevo del proyecto basico y ya no me marco eso.
Al momento de agregar la unidad buzone y al compilar me pide muchas unidades que estan en la carpeta Sinapse\source\lib esto es normal vdd?
Saludos y gracias por tu ayuda.
Avatar de Usuario
Dado
Mensajes: 15981
Registrado: Mar Jul 06, 2010 7:56 pm

Re: ERROR AL COMPILAR TIMBRADO CON BUZONE

Mensaje por Dado »

masrmty escribió:Ya baje lo nuevo del proyecto basico y ya no me marco eso.
Al momento de agregar la unidad buzone y al compilar me pide muchas unidades que estan en la carpeta Sinapse\source\lib esto es normal vdd?
Saludos y gracias por tu ayuda.
Si claro, por eso inclui el sinapse, es un componente necesario.
ADDENDAS? VALIDACION? CODIGO PARA PROGRAMAR TU PROPIA SOLUCION? TODO LO TENEMOS EN WWW.VALIDACFD.COM VISITANOS !!
Cerrado