blob: de50d7ff974740ff9b79594f27e2ec002fa1cbd4 (
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
|
-- File: Document_ReferenceIterator.cdl
-- Created: Mon Aug 4 17:06:07 1997
-- Author: Jean-Louis Frenkel
-- <rmi@frilox.paris1.matra-dtv.fr>
---Copyright: Matra Datavision 1997
class ReferenceIterator from CDM
uses Document from CDM, ListIteratorOfListOfReferences from CDM
is
Create(aDocument: Document from CDM);
More(me) returns Boolean from Standard;
Next(me: in out);
Document(me) returns Document from CDM;
ReferenceIdentifier(me) returns Integer from Standard;
DocumentVersion(me) returns Integer from Standard;
---Purpose: returns the Document Version in the reference.
fields
myIterator: ListIteratorOfListOfReferences from CDM;
end ReferenceIterator from CDM;
|