7fd59977 |
1 | -- File: StepShape_MeasureQualification.cdl |
2 | -- Created: Tue Apr 24 13:58:11 2001 |
3 | -- Author: Christian CAILLET |
4 | -- <cky@photox.paris1.matra-dtv.fr> |
5 | ---Copyright: Matra Datavision 2001 |
6 | |
7 | class MeasureQualification from StepShape inherits TShared |
8 | |
9 | ---Purpose : Added for Dimensional Tolerances |
10 | |
11 | uses |
12 | HAsciiString from TCollection, |
13 | MeasureWithUnit from StepBasic, |
14 | ValueQualifier from StepShape, |
15 | HArray1OfValueQualifier from StepShape |
16 | |
17 | is |
18 | |
19 | Create returns mutable MeasureQualification; |
20 | |
21 | Init (me : mutable; name : HAsciiString from TCollection; |
22 | description : HAsciiString from TCollection; |
23 | qualified_measure : MeasureWithUnit from StepBasic; |
24 | qualifiers : HArray1OfValueQualifier from StepShape); |
25 | |
26 | Name (me) returns HAsciiString from TCollection; |
27 | SetName (me : mutable; name : HAsciiString from TCollection); |
28 | |
29 | Description (me) returns HAsciiString from TCollection; |
30 | SetDescription (me : mutable; description : HAsciiString from TCollection); |
31 | |
32 | QualifiedMeasure (me) returns MeasureWithUnit from StepBasic; |
33 | SetQualifiedMeasure (me : mutable; qualified_measure : MeasureWithUnit from StepBasic); |
34 | |
35 | Qualifiers (me) returns HArray1OfValueQualifier from StepShape; |
36 | NbQualifiers (me) returns Integer; |
37 | SetQualifiers (me : mutable; qualifiers : HArray1OfValueQualifier from StepShape); |
38 | QualifiersValue (me; num : Integer) returns ValueQualifier from StepShape; |
39 | SetQualifiersValue (me : mutable; num : Integer; aqualifier : ValueQualifier from StepShape); |
40 | |
41 | fields |
42 | |
43 | theName : HAsciiString from TCollection; |
44 | theDescription : HAsciiString from TCollection; |
45 | theQualifiedMeasure : MeasureWithUnit from StepBasic; |
46 | theQualifiers : HArray1OfValueQualifier from StepShape; |
47 | |
48 | end MeasureQualification; |