blob: 5afb8fc579fe9be9df24a9bafc69975bb3a24385 (
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
|
-- File: StepBasic_ContractAssignment.cdl
-- Created: Fri Nov 26 16:26:37 1999
-- Author: Andrey BETENEV
-- Generator: ExpToCas (EXPRESS -> CASCADE/XSTEP Translator) V1.0
-- Copyright: Matra Datavision 1999
class ContractAssignment from StepBasic
inherits TShared from MMgt
---Purpose: Representation of STEP entity ContractAssignment
uses
Contract from StepBasic
is
Create returns ContractAssignment from StepBasic;
---Purpose: Empty constructor
Init (me: mutable; aAssignedContract: Contract from StepBasic);
---Purpose: Initialize all fields (own and inherited)
AssignedContract (me) returns Contract from StepBasic;
---Purpose: Returns field AssignedContract
SetAssignedContract (me: mutable; AssignedContract: Contract from StepBasic);
---Purpose: Set field AssignedContract
fields
theAssignedContract: Contract from StepBasic;
end ContractAssignment;
|
