0024530: TKMesh - remove unused package IntPoly
[occt.git] / src / StepData / StepData_SelectNamed.cdl
1 -- Created on: 1996-12-16
2 -- Created by: Christian CAILLET
3 -- Copyright (c) 1996-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
9 -- under the terms of the GNU Lesser General Public 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 class SelectNamed  from StepData    inherits SelectMember
18
19     ---Purpose : This select member can be of any kind, and be named
20     --           But its takes more memory than some specialised ones
21     --           This class allows one name for the instance
22
23 uses CString, Logical, AsciiString from TCollection,  Field from StepData
24
25 is
26
27     Create  returns mutable SelectNamed;
28
29     HasName (me) returns Boolean  is redefined;
30
31     Name (me) returns CString  is redefined;
32
33     SetName (me : mutable; name : CString)  returns Boolean  is redefined;
34     -- redefined to accept any name
35
36     Field (me) returns Field;
37     ---C++ : return const &
38
39     CField (me : mutable) returns Field;
40     ---C++ : return &
41
42
43     Kind (me) returns Integer  is redefined;
44     --  see Field for Kind (same codes)
45
46     SetKind  (me : mutable; kind : Integer)  is redefined;
47     --  called by various Set*
48
49     Int (me) returns Integer  is redefined;
50     ---Purpose : This internal method gives access to a value implemented by an
51     --           Integer (to read it)
52
53     SetInt (me : mutable; val : Integer)  is redefined;
54     ---Purpose : This internal method gives access to a value implemented by an
55     --           Integer (to set it)
56
57     Real (me) returns Real  is redefined;
58
59     SetReal (me : mutable; val : Real)  is redefined;
60
61     String (me) returns CString  is redefined;
62
63     SetString (me : mutable; val : CString)  is redefined;
64
65 fields
66
67     thename : AsciiString;
68     theval  : Field from StepData;
69
70 end SelectNamed;