david
00077c4227
- Build de FinalBuilder con opción 'Release' para intentar que el programa vaya más rápido. git-svn-id: https://192.168.0.254/svn/Proyectos.Acana_FactuGES2/trunk@652 f4e31baf-9722-1c47-927c-6f952f962d4b
25 lines
767 B
ObjectPascal
25 lines
767 B
ObjectPascal
unit uIDataModuleContactos;
|
|
|
|
interface
|
|
|
|
uses
|
|
SysUtils, Classes,
|
|
uBizContactos, uBizContactosDatosBancarios, uBizDireccionesContacto,
|
|
uBizContactosPersonal, uBizContactosDirecciones;
|
|
|
|
type
|
|
IDataModuleContactos = interface
|
|
['{835FFC4D-1AE9-4020-A042-C9D84EC25A2C}']
|
|
function _GetItems (IDCategoria : Integer): IBizContacto;
|
|
function _GetDatosBancarios : IBizContactosDatosBancarios;
|
|
function _GetDirecciones: IBizDireccionesContacto;
|
|
function _GetPersonal: IBizContactoPersonal;
|
|
function NewDireccion : IBizDireccionesContacto;
|
|
function GetContactosDirecciones : IBizContactosDirecciones;
|
|
function GetContactoDirecciones(const IDContacto: Integer) : IBizContactosDirecciones;
|
|
end;
|
|
|
|
implementation
|
|
|
|
end.
|