7fd59977 |
1 | -- File: IGESDefs_ToolTabularData.cdl |
2 | -- Created: Thu Oct 14 19:16:58 1993 |
3 | -- Author: Christian CAILLET |
4 | -- <cky@bravox> |
5 | ---Copyright: Matra Datavision 1993 |
6 | |
7 | |
8 | class ToolTabularData from IGESDefs |
9 | |
10 | ---Purpose : Tool to work on a TabularData. Called by various Modules |
11 | -- (ReadWriteModule, GeneralModule, SpecificModule) |
12 | |
13 | uses TabularData from IGESDefs, |
14 | IGESReaderData, ParamReader, IGESWriter, EntityIterator, |
15 | DirChecker, ShareTool, Check, CopyTool, IGESDumper, Messenger from Message |
16 | |
17 | raises DomainError |
18 | |
19 | is |
20 | |
21 | Create returns ToolTabularData; |
22 | ---Purpose : Returns a ToolTabularData, ready to work |
23 | |
24 | |
25 | ReadOwnParams (me; ent : mutable TabularData; |
26 | IR : IGESReaderData; PR : in out ParamReader) |
27 | raises DomainError is static; |
28 | ---Purpose : Reads own parameters from file. <PR> gives access to them, |
29 | -- <IR> detains parameter types and values |
30 | |
31 | WriteOwnParams (me; ent : TabularData; |
32 | IW : in out IGESWriter) is static; |
33 | ---Purpose : Writes own parameters to IGESWriter |
34 | |
35 | |
36 | OwnShared (me; ent : TabularData; |
37 | iter : in out EntityIterator) is static; |
38 | ---Purpose : Lists the Entities shared by a TabularData <ent>, from |
39 | -- its specific (own) parameters |
40 | |
41 | DirChecker (me; ent : TabularData) returns DirChecker is static; |
42 | ---Purpose : Returns specific DirChecker |
43 | |
44 | OwnCheck (me; ent : TabularData; |
45 | shares : ShareTool; ach : in out Check) is static; |
46 | ---Purpose : Performs Specific Semantic Check |
47 | |
48 | |
49 | OwnCopy (me; entfrom : TabularData; entto : mutable TabularData; |
50 | TC : in out CopyTool) is static; |
51 | ---Purpose : Copies Specific Parameters |
52 | |
53 | |
54 | OwnDump (me; ent : TabularData; |
55 | dumper : IGESDumper; S : Messenger from Message; own : Integer) |
56 | is static; |
57 | ---Purpose : Dump of Specific Parameters |
58 | |
59 | end ToolTabularData; |