0024830: Remove redundant keyword 'mutable' in CDL declarations
[occt.git] / src / StepRepr / StepRepr_ProductConcept.cdl
1 -- Created on: 1999-11-26
2 -- Created by: Andrey BETENEV
3 -- Copyright (c) 1999 Matra Datavision
4 -- Copyright (c) 1999-2014 OPEN CASCADE SAS
5 --
6 -- This file is part of Open CASCADE Technology software library.
7 --
8 -- This library is free software; you can redistribute it and/or modify it under
9 -- the terms of the GNU Lesser General Public License version 2.1 as published
10 -- by the Free Software Foundation, with special exception defined in the file
11 -- OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
12 -- distribution for complete text of the license and disclaimer of any warranty.
13 --
14 -- Alternatively, this file may be used under the terms of Open CASCADE
15 -- commercial license or contractual agreement.
16
17 -- Generator:   ExpToCas (EXPRESS -> CASCADE/XSTEP Translator) V1.0
18
19 class ProductConcept from StepRepr
20 inherits TShared from MMgt
21
22     ---Purpose: Representation of STEP entity ProductConcept
23
24 uses
25     HAsciiString from TCollection,
26     ProductConceptContext from StepBasic
27
28 is
29     Create returns ProductConcept from StepRepr;
30         ---Purpose: Empty constructor
31
32     Init (me: mutable; aId: HAsciiString from TCollection;
33                        aName: HAsciiString from TCollection;
34                        hasDescription: Boolean;
35                        aDescription: HAsciiString from TCollection;
36                        aMarketContext: ProductConceptContext from StepBasic);
37         ---Purpose: Initialize all fields (own and inherited)
38
39     Id (me) returns HAsciiString from TCollection;
40         ---Purpose: Returns field Id
41     SetId (me: mutable; Id: HAsciiString from TCollection);
42         ---Purpose: Set field Id
43
44     Name (me) returns HAsciiString from TCollection;
45         ---Purpose: Returns field Name
46     SetName (me: mutable; Name: HAsciiString from TCollection);
47         ---Purpose: Set field Name
48
49     Description (me) returns HAsciiString from TCollection;
50         ---Purpose: Returns field Description
51     SetDescription (me: mutable; Description: HAsciiString from TCollection);
52         ---Purpose: Set field Description
53     HasDescription (me) returns Boolean;
54         ---Purpose: Returns True if optional field Description is defined
55
56     MarketContext (me) returns ProductConceptContext from StepBasic;
57         ---Purpose: Returns field MarketContext
58     SetMarketContext (me: mutable; MarketContext: ProductConceptContext from StepBasic);
59         ---Purpose: Set field MarketContext
60
61 fields
62     theId: HAsciiString from TCollection;
63     theName: HAsciiString from TCollection;
64     theDescription: HAsciiString from TCollection; -- optional
65     theMarketContext: ProductConceptContext from StepBasic;
66     defDescription: Boolean; -- flag "is Description defined"
67
68 end ProductConcept;