Cita:
Empezado por newtron
me da el error: E2010 Incompatible types: 'IDFacturaExpedidaType' and 'string'
|
¿Puede ser porque el IDFactura no es un tipo simple?
Tal y como está en el documento que han adjuntado más arriba...
Código Delphi
[-]
LRfacturasEmitidasType = class(RegistroSii)
private
FIDFactura: IDFacturaExpedidaType;
FFacturaExpedida: FacturaExpedidaType;
public
destructor Destroy; override;
published
property IDFactura: IDFacturaExpedidaType read FIDFactura write FIDFactura;
property FacturaExpedida: FacturaExpedidaType read FFacturaExpedida write FFacturaExpedida;
end;
Y el tipo IDFacturaExpedidaType está definido tal que así:
Código Delphi
[-]
IDFacturaExpedidaType = class(TRemotable)
private
FIDEmisorFactura: IDEmisorFactura3;
FNumSerieFacturaEmisor: TextoIDFacturaType;
FNumSerieFacturaEmisorResumenFin: TextoIDFacturaType;
FNumSerieFacturaEmisorResumenFin_Specified: boolean;
FFechaExpedicionFacturaEmisor: fecha;
procedure SetNumSerieFacturaEmisorResumenFin(Index: Integer; const ATextoIDFacturaType: TextoIDFacturaType);
function NumSerieFacturaEmisorResumenFin_Specified(Index: Integer): boolean;
public
destructor Destroy; override;
published
property IDEmisorFactura: IDEmisorFactura3 read FIDEmisorFactura write FIDEmisorFactura;
property NumSerieFacturaEmisor: TextoIDFacturaType read FNumSerieFacturaEmisor write FNumSerieFacturaEmisor;
property NumSerieFacturaEmisorResumenFin: TextoIDFacturaType Index (IS_OPTN) read FNumSerieFacturaEmisorResumenFin write SetNumSerieFacturaEmisorResumenFin stored NumSerieFacturaEmisorResumenFin_Specified;
property FechaExpedicionFacturaEmisor: fecha read FFechaExpedicionFacturaEmisor write FFechaExpedicionFacturaEmisor;
end;
Es un comentario.