1 -- File: IGESAppli_ToolRegionRestriction.cdl
2 -- Created: Thu Oct 14 19:16:58 1993
3 -- Author: Christian CAILLET
5 ---Copyright: Matra Datavision 1993
8 class ToolRegionRestriction from IGESAppli
10 ---Purpose : Tool to work on a RegionRestriction. Called by various Modules
11 -- (ReadWriteModule, GeneralModule, SpecificModule)
13 uses RegionRestriction from IGESAppli,
14 IGESReaderData, ParamReader, IGESWriter, EntityIterator,
15 DirChecker, ShareTool, Check, CopyTool, IGESDumper, Messenger from Message
21 Create returns ToolRegionRestriction;
22 ---Purpose : Returns a ToolRegionRestriction, ready to work
25 ReadOwnParams (me; ent : mutable RegionRestriction;
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
31 WriteOwnParams (me; ent : RegionRestriction;
32 IW : in out IGESWriter) is static;
33 ---Purpose : Writes own parameters to IGESWriter
36 OwnShared (me; ent : RegionRestriction;
37 iter : in out EntityIterator) is static;
38 ---Purpose : Lists the Entities shared by a RegionRestriction <ent>, from
39 -- its specific (own) parameters
41 OwnCorrect (me; ent : mutable RegionRestriction) returns Boolean is static;
42 ---Purpose : Sets automatic unambiguous Correction on a RegionRestriction
43 -- (NbPropertyValues forced to 3, Level cleared if Subordinate != 0)
45 DirChecker (me; ent : RegionRestriction) returns DirChecker is static;
46 ---Purpose : Returns specific DirChecker
48 OwnCheck (me; ent : RegionRestriction;
49 shares : ShareTool; ach : in out Check) is static;
50 ---Purpose : Performs Specific Semantic Check
53 OwnCopy (me; entfrom : RegionRestriction; entto : mutable RegionRestriction;
54 TC : in out CopyTool) is static;
55 ---Purpose : Copies Specific Parameters
58 OwnDump (me; ent : RegionRestriction;
59 dumper : IGESDumper; S : Messenger from Message; own : Integer)
61 ---Purpose : Dump of Specific Parameters
63 end ToolRegionRestriction;