b311480e |
1 | -- Created on: 2001-04-24 |
2 | -- Created by: Christian CAILLET |
973c2be1 |
3 | -- Copyright (c) 2001-2014 OPEN CASCADE SAS |
b311480e |
4 | -- |
973c2be1 |
5 | -- This file is part of Open CASCADE Technology software library. |
b311480e |
6 | -- |
d5f74e42 |
7 | -- This library is free software; you can redistribute it and/or modify it under |
8 | -- the terms of the GNU Lesser General Public License version 2.1 as published |
973c2be1 |
9 | -- by the Free Software Foundation, with special exception defined in the file |
10 | -- OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT |
11 | -- distribution for complete text of the license and disclaimer of any warranty. |
b311480e |
12 | -- |
973c2be1 |
13 | -- Alternatively, this file may be used under the terms of Open CASCADE |
14 | -- commercial license or contractual agreement. |
7fd59977 |
15 | |
16 | class MeasureRepresentationItemAndQualifiedRepresentationItem from StepShape |
17 | inherits RepresentationItem from StepRepr |
18 | |
19 | ---Purpose : Added for Dimensional Tolerances |
20 | -- Complex Type between MeasureRepresentationItem and |
21 | -- QualifiedRepresentationItem |
22 | |
23 | uses |
24 | HArray1OfValueQualifier from StepShape, |
25 | ValueQualifier from StepShape, |
26 | HAsciiString from TCollection, |
27 | Unit from StepBasic, |
28 | MeasureWithUnit from StepBasic, |
29 | MeasureValueMember from StepBasic |
30 | |
31 | is |
32 | |
6e33d3ce |
33 | Create returns MeasureRepresentationItemAndQualifiedRepresentationItem; |
7fd59977 |
34 | |
35 | Init (me : mutable; |
6e33d3ce |
36 | aName : HAsciiString from TCollection; |
7fd59977 |
37 | aValueComponent : MeasureValueMember from StepBasic; |
38 | aUnitComponent : Unit from StepBasic; |
39 | qualifiers : HArray1OfValueQualifier from StepShape); |
40 | |
41 | -- About MeasureReprItem |
42 | |
43 | SetMeasure (me: mutable; Measure: MeasureWithUnit from StepBasic); |
44 | Measure (me) returns MeasureWithUnit from StepBasic; |
45 | |
46 | -- About QualifiedReprItem |
47 | |
48 | Qualifiers (me) returns HArray1OfValueQualifier from StepShape; |
49 | NbQualifiers (me) returns Integer; |
50 | SetQualifiers (me : mutable; qualifiers : HArray1OfValueQualifier from StepShape); |
51 | QualifiersValue (me; num : Integer) returns ValueQualifier from StepShape; |
52 | SetQualifiersValue (me : mutable; num : Integer; aqualifier : ValueQualifier from StepShape); |
53 | |
54 | fields |
55 | |
56 | myMeasure: MeasureWithUnit from StepBasic; |
57 | theQualifiers : HArray1OfValueQualifier from StepShape; |
58 | |
59 | end MeasureRepresentationItemAndQualifiedRepresentationItem; |