blob: 6f663b568b090ed4d299b6fe9a2c1378009bc4be (
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
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
|
-- File: CDM_Application.cdl
-- Created: Wed Oct 22 15:05:47 1997
-- Author: Jean-Louis Frenkel
-- <rmi@frilox.paris1.matra-dtv.fr>
---Copy: Matra Datavision 1997
deferred class Application from CDM inherits Transient from Standard
uses Document from CDM,
MetaData from CDM,
Reference from CDM,
MessageDriver from CDM,
Manager from Resource,
ExtendedString from TCollection
is
Retrieve(me: mutable; aMetaData: MetaData from CDM; UseStorageConfiguration: Boolean from Standard)
returns mutable Document from CDM
is deferred private;
DocumentVersion(me: mutable; aMetaData: MetaData from CDM)
returns Integer from Standard
is deferred private;
---Purpose: returns -1 if the metadata has no modification counter.
SetDocumentVersion(me; aDocument: Document from CDM; aMetaData: MetaData from CDM)
is protected;
SetReferenceCounter(me:mutable ; aDocument: Document from CDM; aReferenceCounter: Integer from Standard)
is protected;
Resources(me: mutable)
returns Manager from Resource
is deferred;
---Purpose: the manager returned by this virtual method will be
-- used to search for Format`.Retrieval resource items.
--
MessageDriver(me: mutable) returns MessageDriver from CDM
is virtual;
---Purpose: By default returns a NullMessageDriver;
BeginOfUpdate(me:mutable; aDocument: Document from CDM)
is virtual;
---Purpose: this method is called before the update of a document.
-- By default, writes in MessageDriver().
EndOfUpdate(me:mutable; aDocument: Document from CDM; Status: Boolean from Standard; ErrorString: ExtendedString from TCollection)
is virtual;
---Purpose: this method is called affter the update of a document.
-- By default, writes in MessageDriver().
Write(me: mutable; aString: ExtString from Standard);
---Purpose: writes the string in the application MessagerDriver.
friends
class Reference from CDM,
class MetaData from CDM
end Application from CDM;
|
