ValidaCFD

Situacion: Facturar V3.2 con timbre fiscal con codigo fuente de dado con delphi 2010

batalle un poco para facturar CFDI con timbre fiscal con la version 3.2

Timbre fiscal siempre me mando el error:
"Version de CFDi no soportada por el servicio (codigo 800)"

en el modulo TimbreFiscalMx.pas esta definido la variable B64 como string.
Contacté timbre fiscal y me dijeron que en el archivo que es el B64 no viene todo el CFDI (respondieron en menos de un dia?!?).
Y si fue cierto cuando lo regresé del la codificacion.

Despues de unas pruebas me di cuenta que hay que cambiar la routina

function TTimbreEngine.Solicita(TipoDeSolicitud : TTipoDeSolicitudTF; CFD : TCFD; CertPEM_FileName, KeyPEM_FileName : string; var RespuestaDelPAC : string) : boolean;
var URLdelPAC, B64, SOAPMsg : string

a

function TTimbreEngine.Solicita(TipoDeSolicitud : TTipoDeSolicitudTF; CFD : TCFD; CertPEM_FileName, KeyPEM_FileName : string; var RespuestaDelPAC : string) : boolean;
var URLdelPAC, SOAPMsg : string;
B64: ansistring;


es cambiar la variable B64 de string a ansistring;

asi ya valida bien.

Espero que les es de ayuda.

Gracias por el tip

En este momento voy a hacer pruebas para ver si lo puedo dejar en AnsiString tambien para Delphi 7 y si es asi entonces hago el cambio permanente

Buen día.

Me interesa contactarte, para integrar a mi sistema tu rutina, para realizar el timbrado, mediante el PAC Timbre Fiscal.

Podria usted ponerse en contacto conmigo.

Muchas Gracias.