blob: 6d4043d61a09d7a34cdb297241f20b950823fe0c (
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
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
|
-- File: CDM_Reference.cdl
-- Created: Wed Oct 22 14:36:28 1997
-- Author: Jean-Louis Frenkel
-- <rmi@frilox.paris1.matra-dtv.fr>
---Copyright: Matra Datavision 1997
private class Reference from CDM inherits Transient from Standard
uses Document from CDM, DocumentPointer from CDM, Application from CDM, MetaData from CDM
is
Create(aFromDocument: Document from CDM; aToDocument: Document from CDM; aReferenceIdentifier: Integer from Standard; aToDocumentVersion: Integer from Standard)
returns mutable Reference from CDM
is private;
Create(aFromDocument: Document from CDM; aMetaData: MetaData from CDM; aReferenceIdentifier: Integer from Standard; anApplication: Application from CDM; aToDocumentVersion: Integer from Standard; UseStorageConfiguration: Boolean from Standard)
returns mutable Reference from CDM
is private;
FromDocument(me: mutable) returns Document from CDM;
ToDocument(me: mutable) returns Document from CDM;
ReferenceIdentifier(me: mutable) returns Integer from Standard;
---Category: methods to modifiy the reference.
Update(me: mutable; aMetaData: MetaData from CDM)
is private;
IsUpToDate(me) returns Boolean from Standard
is private;
---Purpose: compares the actual document version with the
-- document version at the creation of the reference
SetIsUpToDate(me: mutable)
is private;
UnsetToDocument(me: mutable; aMetaData: MetaData from CDM; anApplication: Application from CDM) is private;
IsOpened(me) returns Boolean from Standard is private;
---Purpose: returns true if the ToDocument has been retrieved
-- and opened.
DocumentVersion(me) returns Integer from Standard;
IsReadOnly(me) returns Boolean from Standard;
Document(me) returns Document from CDM
is private;
MetaData(me) returns MetaData from CDM
is private;
Application(me) returns Application from CDM
is private;
UseStorageConfiguration(me) returns Boolean from Standard
is private;
IsInSession(me) returns Boolean from Standard
is private;
IsStored(me) returns Boolean from Standard
is private;
fields
myToDocument: Document from CDM;
myFromDocument: DocumentPointer from CDM;
myReferenceIdentifier: Integer from Standard;
myApplication: Application from CDM;
myMetaData: MetaData from CDM;
myDocumentVersion: Integer from Standard;
myUseStorageConfiguration: Boolean from Standard;
friends class Document from CDM
end Reference from CDM;
|
