7fd59977 |
1 | -- File: StepDimTol_DatumReference.cdl |
2 | -- Created: Wed Jun 4 13:34:35 2003 |
3 | -- Author: Galina KULIKOVA |
4 | -- Generator: ExpToCas (EXPRESS -> CASCADE/XSTEP Translator) V1.2 |
5 | -- Copyright: Open CASCADE 2002 |
6 | |
7 | class DatumReference from StepDimTol |
8 | inherits TShared from MMgt |
9 | |
10 | ---Purpose: Representation of STEP entity DatumReference |
11 | |
12 | uses |
13 | Datum from StepDimTol |
14 | |
15 | is |
16 | Create returns DatumReference from StepDimTol; |
17 | ---Purpose: Empty constructor |
18 | |
19 | Init (me: mutable; aPrecedence: Integer; |
20 | aReferencedDatum: Datum from StepDimTol); |
21 | ---Purpose: Initialize all fields (own and inherited) |
22 | |
23 | Precedence (me) returns Integer; |
24 | ---Purpose: Returns field Precedence |
25 | SetPrecedence (me: mutable; Precedence: Integer); |
26 | ---Purpose: Set field Precedence |
27 | |
28 | ReferencedDatum (me) returns Datum from StepDimTol; |
29 | ---Purpose: Returns field ReferencedDatum |
30 | SetReferencedDatum (me: mutable; ReferencedDatum: Datum from StepDimTol); |
31 | ---Purpose: Set field ReferencedDatum |
32 | |
33 | fields |
34 | thePrecedence: Integer; |
35 | theReferencedDatum: Datum from StepDimTol; |
36 | |
37 | end DatumReference; |