blob: b1f4f1a465a57cd1aa5e64a7209478a0e38b8385 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
|
--
-- File : DimensionTolerance.cdl
-- Created : Sat 9 Jan 1993
-- Author : CKY / Contract Toubro-Larsen (Anand NATRAJAN)
--
---Copyright : MATRA-DATAVISION 1993
--
class DimensionTolerance from IGESDimen inherits IGESEntity
---Purpose: defines Dimension Tolerance, Type <406>, Form <29>
-- in package IGESDimen
-- Provides tolerance information for a dimension which
-- can be used by the receiving system to regenerate the
-- dimension.
uses Integer, Real, Boolean -- no one specific type
is
Create returns mutable DimensionTolerance;
-- Specific Methods pertaining to the class
Init (me : mutable;
nbPropVal : Integer;
aSecTolFlag : Integer;
aTolType : Integer;
aTolPlaceFlag : Integer;
anUpperTol : Real;
aLowerTol : Real;
aSignFlag : Boolean;
aFracFlag : Integer;
aPrecision : Integer);
---Purpose : This method is used to set the fields of the class
-- DimensionTolerance
-- - nbPropVal : Number of property values, default = 8
-- - aSecTolFlag : Secondary Tolerance Flag
-- 0 = Applies to primary dimension
-- 1 = Applies to secondary dimension
-- 2 = Display values as fractions
-- - aTolType : Tolerance Type
-- 1 = Bilateral
-- 2 = Upper/Lower
-- 3 = Unilateral Upper
-- 4 = Unilateral Lower
-- 5 = Range - min before max
-- 6 = Range - min after max
-- 7 = Range - min above max
-- 8 = Range - min below max
-- 9 = Nominal + Range - min above max
-- 10 = Nominal + Range - min below max
-- - aTolPlaceFlag : Tolerance Placement Flag
-- 1 = Before nominal value
-- 2 = After nominal value
-- 3 = Above nominal value
-- 4 = Below nominal value
-- - anUpperTol : Upper Tolerance
-- - aLowerTol : Lower Tolerance
-- - aSignFlag : Sign Suppression Flag
-- - aFracFlag : Fraction Flag
-- 0 = Display values as decimal numbers
-- 1 = Display values as mixed fractions
-- 2 = Display values as fractions
-- - aPrecision : Precision Value
NbPropertyValues (me) returns Integer;
---Purpose : returns the number of property values, always = 8
SecondaryToleranceFlag (me) returns Integer;
---Purpose : returns the Secondary Tolerance Flag
ToleranceType (me) returns Integer;
---Purpose : returns the Tolerance Type
TolerancePlacementFlag (me) returns Integer;
---Purpose : returns the Tolerance Placement Flag, default = 2
UpperTolerance (me) returns Real;
---Purpose : returns the Upper or Bilateral Tolerance Value
LowerTolerance (me) returns Real;
---Purpose : returns the Lower Tolerance Value
SignSuppressionFlag (me) returns Boolean;
---Purpose : returns the Sign Suppression Flag
FractionFlag (me) returns Integer;
---Purpose : returns the Fraction Flag
Precision (me) returns Integer;
---Purpose : returns the Precision for Value Display
fields
--
-- Class : IGESDimen_DimensionTolerance
--
-- Purpose : Declaration of variables specific to the definition
-- of the Class DimensionTolerance.
--
-- Reminder : A DimensionTolerance instance is defined by :
-- - Number of property values, always = 8
-- - Secondary Tolerance Flag
-- - Tolerance Type
-- - Tolerance Placement Flag
-- - Upper Tolerance
-- - Lower Tolerance
-- - Sign Suppression Flag
-- - Fraction Flag
-- - Precision Value
theNbPropertyValues : Integer;
theSecondaryToleranceFlag : Integer;
theToleranceType : Integer;
theTolerancePlacementFlag : Integer;
theUpperTolerance : Real;
theLowerTolerance : Real;
theSignSuppressionFlag : Boolean;
theFractionFlag : Integer;
thePrecision : Integer;
end DimensionTolerance;
|
