blob: 30322b159088098227cd4222600ae2886fda1e9b (
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
|
-- File: StepShape_LimitsAndFits.cdl
-- Created: Tue Apr 24 13:48:52 2001
-- Author: Atelier IED
-- <ied@photox.paris1.matra-dtv.fr>
---Copyright: Matra Datavision 2001
class LimitsAndFits from StepShape inherits TShared
---Purpose : Added for Dimensional Tolerances
uses
HAsciiString from TCollection
is
Create returns mutable LimitsAndFits;
Init (me : mutable; form_variance, zone_variance, grade, source :
HAsciiString from TCollection);
FormVariance (me) returns HAsciiString from TCollection;
SetFormVariance (me : mutable; form_variance : HAsciiString from TCollection);
ZoneVariance (me) returns HAsciiString from TCollection;
SetZoneVariance (me : mutable; zone_variance : HAsciiString from TCollection);
Grade (me) returns HAsciiString from TCollection;
SetGrade (me : mutable; grade : HAsciiString from TCollection);
Source (me) returns HAsciiString from TCollection;
SetSource (me : mutable; source : HAsciiString from TCollection);
fields
theFormVariance : HAsciiString from TCollection;
theZoneVariance : HAsciiString from TCollection;
theGrade : HAsciiString from TCollection;
theSource : HAsciiString from TCollection;
end LimitsAndFits;
|