1 -- File: StepBasic_Certification.cdl
2 -- Created: Fri Nov 26 16:26:33 1999
3 -- Author: Andrey BETENEV
4 -- Generator: ExpToCas (EXPRESS -> CASCADE/XSTEP Translator) V1.0
5 -- Copyright: Matra Datavision 1999
7 class Certification from StepBasic
8 inherits TShared from MMgt
10 ---Purpose: Representation of STEP entity Certification
13 HAsciiString from TCollection,
14 CertificationType from StepBasic
17 Create returns Certification from StepBasic;
18 ---Purpose: Empty constructor
20 Init (me: mutable; aName: HAsciiString from TCollection;
21 aPurpose: HAsciiString from TCollection;
22 aKind: CertificationType from StepBasic);
23 ---Purpose: Initialize all fields (own and inherited)
25 Name (me) returns HAsciiString from TCollection;
26 ---Purpose: Returns field Name
27 SetName (me: mutable; Name: HAsciiString from TCollection);
28 ---Purpose: Set field Name
30 Purpose (me) returns HAsciiString from TCollection;
31 ---Purpose: Returns field Purpose
32 SetPurpose (me: mutable; Purpose: HAsciiString from TCollection);
33 ---Purpose: Set field Purpose
35 Kind (me) returns CertificationType from StepBasic;
36 ---Purpose: Returns field Kind
37 SetKind (me: mutable; Kind: CertificationType from StepBasic);
38 ---Purpose: Set field Kind
41 theName: HAsciiString from TCollection;
42 thePurpose: HAsciiString from TCollection;
43 theKind: CertificationType from StepBasic;