20 lines
381 B
ObjectPascal
20 lines
381 B
ObjectPascal
|
unit uIDataModuleComerciales;
|
||
|
|
|
||
|
|
interface
|
||
|
|
|
||
|
|
uses
|
||
|
|
uBizContactos, uIDataModuleContactos;
|
||
|
|
|
||
|
|
type
|
||
|
|
IDataModuleComerciales = interface(IDataModuleContactos)
|
||
|
|
['{C9CEA27B-106A-4864-A401-B0896CED0D38}']
|
||
|
|
function GetItem(const ID : Integer) : IBizComercial;
|
||
|
|
function NewItem : IBizComercial;
|
||
|
|
function GetItems : IBizComercial;
|
||
|
|
end;
|
||
|
|
|
||
|
|
|
||
|
|
implementation
|
||
|
|
|
||
|
|
end.
|