0024057: Eliminate compiler warning C4100 in MSVC++ with warning level 4
[occt.git] / src / IGESAppli / IGESAppli_LevelToPWBLayerMap.cdl
1 -- Created on: 1993-01-11
2 -- Created by: CKY / Contract Toubro-Larsen ( Anand NATRAJAN )
3 -- Copyright (c) 1993-1999 Matra Datavision
4 -- Copyright (c) 1999-2012 OPEN CASCADE SAS
5 --
6 -- The content of this file is subject to the Open CASCADE Technology Public
7 -- License Version 6.5 (the "License"). You may not use the content of this file
8 -- except in compliance with the License. Please obtain a copy of the License
9 -- at http://www.opencascade.org and read it completely before using this file.
10 --
11 -- The Initial Developer of the Original Code is Open CASCADE S.A.S., having its
12 -- main offices at: 1, place des Freres Montgolfier, 78280 Guyancourt, France.
13 --
14 -- The Original Code and all software distributed under the License is
15 -- distributed on an "AS IS" basis, without warranty of any kind, and the
16 -- Initial Developer hereby disclaims all such warranties, including without
17 -- limitation, any warranties of merchantability, fitness for a particular
18 -- purpose or non-infringement. Please see the License for the specific terms
19 -- and conditions governing the rights and limitations under the License.
20
21
22 class LevelToPWBLayerMap from IGESAppli  inherits IGESEntity
23
24         ---Purpose: defines LevelToPWBLayerMap, Type <406> Form <24>
25         --          in package IGESAppli
26         --          Used to correlate an exchange file level number with
27         --          its corresponding native level identifier, physical PWB
28         --          layer number and predefined functional level
29         --          identification
30
31 uses
32
33         HAsciiString           from TCollection,
34         HArray1OfInteger       from TColStd,
35         HArray1OfHAsciiString  from Interface
36
37 raises DimensionMismatch, OutOfRange
38
39 is
40
41         Create returns mutable LevelToPWBLayerMap;
42
43         -- Specific Methods pertaining to the class
44
45         Init (me              : mutable;
46               nbPropVal       : Integer;
47               allExchLevels   : HArray1OfInteger;
48               allNativeLevels : HArray1OfHAsciiString;
49               allPhysLevels   : HArray1OfInteger;
50               allExchIdents   : HArray1OfHAsciiString)
51         raises DimensionMismatch;
52         ---Purpose : This method is used to set the fields of the class
53         --           LevelToPWBLayerMap
54         --       - nbPropVal       : Number of property values
55         --       - allExchLevels   : Exchange File Level Numbers
56         --       - allNativeLevels : Native Level Identifications
57         --       - allPhysLevels   : Physical Layer Numbers
58         --       - allExchIdents   : Exchange File Level Identifications
59         -- raises exception if allExchLevels, allNativeLevels, allPhysLevels
60         -- and all ExchIdents are not of same dimensions
61
62         NbPropertyValues (me) returns Integer;
63         ---Purpose : returns number of property values
64
65         NbLevelToLayerDefs (me) returns Integer;
66         ---Purpose : returns number of level to layer definitions
67
68         ExchangeFileLevelNumber (me; Index : Integer) returns Integer
69         raises OutOfRange;
70         ---Purpose : returns Exchange File Level Number
71         -- raises exception if Index <= 0 or Index > NbLevelToLayerDefs
72
73         NativeLevel (me; Index : Integer) returns HAsciiString from TCollection
74         raises OutOfRange;
75         ---Purpose : returns Native Level Identification
76         -- raises exception if Index <= 0 or Index > NbLevelToLayerDefs
77
78         PhysicalLayerNumber (me; Index : Integer) returns Integer
79         raises OutOfRange;
80         ---Purpose : returns Physical Layer Number
81         -- raises exception if Index <= 0 or Index > NbLevelToLayerDefs
82
83         ExchangeFileLevelIdent (me; Index : Integer)
84                     returns HAsciiString from TCollection
85         raises OutOfRange;
86         -- returns Exchange File Level Identification
87         -- raises exception if Index <= 0 or Index > NbLevelToLayerDefs
88
89 fields
90
91 --
92 -- Class    : IGESAppli_LevelToPWBLayerMap
93 --
94 -- Purpose  : Declaration of variables specific to the definition
95 --            of the Class LevelToPWBLayerMap.
96 --
97 -- Reminder : A LevelToPWBLayerMap instance is defined by :
98 --            - Number of property values
99 --            - Exchange File Level Numbers
100 --            - Native Level Identifications
101 --            - Physical Layer Numbers
102 --            - Exchange File Level Identifications
103
104         theNbPropertyValues        : Integer;
105         theExchangeFileLevelNumber : HArray1OfInteger;
106         theNativeLevel             : HArray1OfHAsciiString;
107         thePhysicalLayerNumber     : HArray1OfInteger;
108         theExchangeFileLevelIdent  : HArray1OfHAsciiString;
109
110 end LevelToPWBLayerMap;