Buenas para todos...
Estoy desarrollando un sistema de facturacion, y ahora estoy con el tema de la facturacion fiscal.
Dentro de algunos codigos viejos, encontre codigo para la fiscal EPSON, pero me tira el siguiente error al compilar el programa.
[DCC Error] UDmUtilidadesImpresoras.pas(12): E2003 Undeclared identifier: '_PrinterFiscalDisp'
El codigo es el siguiente:
Código Delphi
[-]
unit UDmUtilidadesImpresoras;
interface
uses
Windows, SysUtils, Classes, COmObj, EPSON_Impresora_Fiscal_TLB,
FiscalPrinterLib_TLB;
type
TDmUtilidadesImpresoras = class(TDataModule)
private
impEpson:_PrinterFiscalDisp;
public
procedure inicializarImpFiscalEpson(impEpson:_PrinterFiscalDisp);
procedure ImprimirItemFiscalEpson(impEpson:_PrinterFiscalDisp; DetalleItem:WideString; cant:WideString; prec:WideString; Iva:WideString);
procedure imprimirFinFiscalFiscalEpson(impEpson:_PrinterFiscalDisp);
end;
var
DmUtilidadesImpresoras: TDmUtilidadesImpresoras;
implementation
{$R *.dfm}
procedure TDmUtilidadesImpresoras.inicializarImpFiscalEpson(impEpson: _PrinterFiscalDisp);
var comenzar:boolean;
dom,loc,letraDoc,tipoDoc,nroDoc,respIVAComp,nombre,tipo,desc,cant,precioU,
tasa,impIntP,impIntF,bultos,calificador,texto,importePago,numero,nroCajon:WideString;
num,suc,tasaAcr,ivaVta,blanco,tipoF,tipoPapel,copias,tform,tLetra,bienUso,tipoTAbla:WideString;
begin
impEpson:=nil;
impEpson:=CreateComObject(CLASS_PrinterFiscal) as _PrinterFiscalDisp;
.......
(sigue)
Estoy programando con Delphi XE en windows 7 de 32 bits.
No se si los OCX que tengo son viejos, y por ese motivo es que el DXE no reconoce _PrinterFiscalDisp.
Desde ya muchas gracias... abrazo!