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