blob: d7cf6ae4b58178d16cc5fd721d1904c7010f614f (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
|
-- File: PAppStd_DocumentStorageDriver.cdl
-- Created: Sep 7 16:30:56 2000
-- Author: TURIN Anatoliy <ati@nnov.matra-dtv.fr>
-- Copyright: Matra Datavision 2000
class DocumentStorageDriver from StdLDrivers inherits DocumentStorageDriver from MDocStd
---Purpose: storage driver of a Part document
uses Document from CDM,
MessageDriver from CDM,
Document from PCDM,
SequenceOfDocument from PCDM,
ExtendedString from TCollection,
ASDriverTable from MDF
is
Create
returns mutable DocumentStorageDriver from StdLDrivers;
Make(me : mutable; aDocument : Document from CDM;
Documents : out SequenceOfDocument from PCDM)
is redefined;
AttributeDrivers(me : mutable; theMessageDriver : MessageDriver from CDM)
returns ASDriverTable from MDF
is redefined;
end DocumentStorageDriver;
|