17 lines
240 B
ObjectPascal
17 lines
240 B
ObjectPascal
|
unit uIDataModuleSubFamilias;
|
||
|
|
|
||
|
|
interface
|
||
|
|
|
||
|
|
uses
|
||
|
|
uBizSubFamilias;
|
||
|
|
|
||
|
|
type
|
||
|
|
IDataModuleSubFamilias = interface
|
||
|
|
['{EFCADCC8-E644-4F48-984B-7680F9A4E71B}']
|
||
|
|
function GetItems: IBizSubFamilia;
|
||
|
|
end;
|
||
|
|
|
||
|
|
implementation
|
||
|
|
|
||
|
|
end.
|