0024057: Eliminate compiler warning C4100 in MSVC++ with warning level 4
[occt.git] / src / IGESAppli / IGESAppli_PWBDrilledHole.cxx
1 // Created by: CKY / Contract Toubro-Larsen
2 // Copyright (c) 1993-1999 Matra Datavision
3 // Copyright (c) 1999-2012 OPEN CASCADE SAS
4 //
5 // The content of this file is subject to the Open CASCADE Technology Public
6 // License Version 6.5 (the "License"). You may not use the content of this file
7 // except in compliance with the License. Please obtain a copy of the License
8 // at http://www.opencascade.org and read it completely before using this file.
9 //
10 // The Initial Developer of the Original Code is Open CASCADE S.A.S., having its
11 // main offices at: 1, place des Freres Montgolfier, 78280 Guyancourt, France.
12 //
13 // The Original Code and all software distributed under the License is
14 // distributed on an "AS IS" basis, without warranty of any kind, and the
15 // Initial Developer hereby disclaims all such warranties, including without
16 // limitation, any warranties of merchantability, fitness for a particular
17 // purpose or non-infringement. Please see the License for the specific terms
18 // and conditions governing the rights and limitations under the License.
19
20 //--------------------------------------------------------------------
21 //--------------------------------------------------------------------
22
23 #include <IGESAppli_PWBDrilledHole.ixx>
24
25 IGESAppli_PWBDrilledHole::IGESAppli_PWBDrilledHole ()    {  }
26
27
28     void  IGESAppli_PWBDrilledHole::Init
29   (const Standard_Integer nbPropVal,
30    const Standard_Real aDrillDia, const Standard_Real aFinishDia,
31    const Standard_Integer aCode)
32 {
33   theNbPropertyValues = nbPropVal;
34   theDrillDiameter    = aDrillDia;
35   theFinishDiameter   = aFinishDia;
36   theFunctionCode     = aCode;
37   InitTypeAndForm(406,26);
38 }
39
40
41     Standard_Integer  IGESAppli_PWBDrilledHole::NbPropertyValues () const
42 {
43   return theNbPropertyValues;
44 }
45
46     Standard_Real  IGESAppli_PWBDrilledHole::DrillDiameterSize () const
47 {
48   return theDrillDiameter;
49 }
50
51     Standard_Real  IGESAppli_PWBDrilledHole::FinishDiameterSize () const
52 {
53   return theFinishDiameter;
54 }
55
56     Standard_Integer  IGESAppli_PWBDrilledHole::FunctionCode () const
57 {
58   return theFunctionCode;
59 }