-- File: StepBasic_ObjectRole.cdl -- Created: Wed May 10 15:09:08 2000 -- Author: Andrey BETENEV -- Generator: ExpToCas (EXPRESS -> CASCADE/XSTEP Translator) V1.1 -- Copyright: Matra Datavision 2000 class ObjectRole from StepBasic inherits TShared from MMgt ---Purpose: Representation of STEP entity ObjectRole uses HAsciiString from TCollection is Create returns ObjectRole from StepBasic; ---Purpose: Empty constructor Init (me: mutable; aName: HAsciiString from TCollection; hasDescription: Boolean; aDescription: HAsciiString from TCollection); ---Purpose: Initialize all fields (own and inherited) Name (me) returns HAsciiString from TCollection; ---Purpose: Returns field Name SetName (me: mutable; Name: HAsciiString from TCollection); ---Purpose: Set field Name Description (me) returns HAsciiString from TCollection; ---Purpose: Returns field Description SetDescription (me: mutable; Description: HAsciiString from TCollection); ---Purpose: Set field Description HasDescription (me) returns Boolean; ---Purpose: Returns True if optional field Description is defined fields theName: HAsciiString from TCollection; theDescription: HAsciiString from TCollection; -- optional defDescription: Boolean; -- flag "is Description defined" end ObjectRole;