david
7c35d651bc
Ticket #92 -> Considerar la dirección fiscal de un cliente como dirección a elegir. git-svn-id: https://192.168.0.254/svn/Proyectos.Tecsitel_FactuGES2/trunk@552 0c75b7a4-871f-7646-8a2f-f78d34cc349f
31 lines
796 B
ObjectPascal
31 lines
796 B
ObjectPascal
unit uIEditorElegirDireccionEntrega;
|
|
|
|
interface
|
|
|
|
uses
|
|
uBizContactos, uBizDireccionesContacto, uGUIBase;
|
|
|
|
type
|
|
IEditorElegirDireccionEntrega = interface
|
|
['{AB909782-25E1-4715-B98A-EA62FB9DC03C}']
|
|
function GetContacto: IBizContacto;
|
|
procedure SetContacto(const Value: IBizContacto);
|
|
property Contacto : IBizContacto read GetContacto write SetContacto;
|
|
|
|
procedure SetMensaje (const AValue: String);
|
|
function GetMensaje: String;
|
|
property Mensaje : String read GetMensaje write SetMensaje;
|
|
|
|
function GetDireccionSeleccionada: IBizDireccionesContacto;
|
|
property DireccionSeleccionada: IBizDireccionesContacto read GetDireccionSeleccionada;
|
|
|
|
function ShowModal : Integer;
|
|
procedure Release;
|
|
end;
|
|
|
|
|
|
implementation
|
|
|
|
end.
|
|
|