7fd59977 |
1 | -- |
2 | -- File : LevelFunction.cdl |
3 | -- Created : Mon 11 Jan 1993 |
4 | -- Author : CKY / Contract Toubro-Larsen ( Arun MENON ) |
5 | -- |
6 | ---Copyright : MATRA-DATAVISION 1993 |
7 | -- |
8 | |
9 | class LevelFunction from IGESAppli inherits IGESEntity |
10 | |
11 | ---Purpose: defines LevelFunction, Type <406> Form <3> |
12 | -- in package IGESAppli |
13 | -- Used to transfer the meaning or intended use of a level |
14 | -- in the sending system |
15 | |
16 | uses |
17 | |
18 | HAsciiString from TCollection |
19 | |
20 | is |
21 | |
22 | Create returns mutable LevelFunction; |
23 | |
24 | -- Specific Methods pertaining to the class |
25 | |
26 | Init (me : mutable; |
27 | nbPropVal : Integer; |
28 | aCode : Integer; |
29 | aFuncDescrip : HAsciiString); |
30 | ---Purpose : This method is used to set the fields of the class |
31 | -- LevelFunction |
32 | -- - nbPropVal : Number of Properties, always = 2 |
33 | -- - aCode : Function Description code |
34 | -- default = 0 |
35 | -- - aFuncDescrip : Function Description |
36 | -- default = null string |
37 | |
38 | NbPropertyValues (me) returns Integer; |
39 | ---Purpose : is always 2 |
40 | |
41 | FuncDescriptionCode (me) returns Integer; |
42 | ---Purpose : returns the function description code . Default = 0 |
43 | |
44 | FuncDescription (me) returns HAsciiString from TCollection; |
45 | ---Purpose : returns the function description |
46 | -- Default = null string |
47 | |
48 | fields |
49 | |
50 | -- |
51 | -- Class : IGESAppli_LevelFunction |
52 | -- |
53 | -- Purpose : Declaration of variables specific to the definition |
54 | -- of the Class LevelFunction. |
55 | -- |
56 | -- Reminder : A LevelFunction instance is defined by : |
57 | -- - Function Description code, default = 0 |
58 | -- - Function Description, default = null string |
59 | |
60 | theNbPropertyValues : Integer; |
61 | theFuncDescripCode : Integer; |
62 | theFuncDescrip : HAsciiString; |
63 | |
64 | end LevelFunction; |