7fd59977 |
1 | -- File: IGESSelect_IGESName.cdl |
2 | -- Created: Wed Dec 21 13:01:09 1994 |
3 | -- Author: Christian CAILLET |
4 | -- <cky@anion> |
5 | ---Copyright: Matra Datavision 1994 |
6 | |
7 | |
8 | class IGESName from IGESSelect inherits Signature from IFSelect |
9 | |
10 | ---Purpose : IGESName is a Signature specific to IGESNorm : |
11 | -- it considers the Name of an IGESEntity as being its ShortLabel |
12 | -- (some sending systems use name, not to identify entities, but |
13 | -- ratjer to classify them) |
14 | |
15 | uses CString, Transient, InterfaceModel |
16 | |
17 | is |
18 | |
19 | Create returns mutable IGESName; |
20 | ---Purpose : Creates a Signature for IGES Name (reduced to ShortLabel, |
21 | -- without SubscriptLabel or Long Name) |
22 | |
23 | Value (me; ent : any Transient; model : InterfaceModel) returns CString; |
24 | ---Purpose : Returns the ShortLabel as being the Name of an IGESEntity |
25 | -- If <ent> has no name, it returns empty string "" |
26 | |
27 | end IGESName; |