0031668: Visualization - WebGL sample doesn't work on Emscripten 1.39
[occt.git] / src / RWStepDimTol / RWStepDimTol_RWSurfaceProfileTolerance.cxx
1 // Created on: 2003-06-04
2 // Created by: Galina KULIKOVA
3 // Copyright (c) 2003-2014 OPEN CASCADE SAS
4 //
5 // This file is part of Open CASCADE Technology software library.
6 //
7 // This library is free software; you can redistribute it and/or modify it under
8 // the terms of the GNU Lesser General Public License version 2.1 as published
9 // by the Free Software Foundation, with special exception defined in the file
10 // OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
11 // distribution for complete text of the license and disclaimer of any warranty.
12 //
13 // Alternatively, this file may be used under the terms of Open CASCADE
14 // commercial license or contractual agreement.
15
16 // Generator:   ExpToCas (EXPRESS -> CASCADE/XSTEP Translator) V1.2
17
18 #include <Interface_Check.hxx>
19 #include <Interface_EntityIterator.hxx>
20 #include <RWStepDimTol_RWSurfaceProfileTolerance.hxx>
21 #include <StepBasic_MeasureWithUnit.hxx>
22 #include <StepData_StepReaderData.hxx>
23 #include <StepData_StepWriter.hxx>
24 #include <StepDimTol_GeometricToleranceTarget.hxx>
25 #include <StepDimTol_SurfaceProfileTolerance.hxx>
26
27 //=======================================================================
28 //function : RWStepDimTol_RWSurfaceProfileTolerance
29 //purpose  : 
30 //=======================================================================
31 RWStepDimTol_RWSurfaceProfileTolerance::RWStepDimTol_RWSurfaceProfileTolerance ()
32 {
33 }
34
35 //=======================================================================
36 //function : ReadStep
37 //purpose  : 
38 //=======================================================================
39
40 void RWStepDimTol_RWSurfaceProfileTolerance::ReadStep (const Handle(StepData_StepReaderData)& data,
41                                                        const Standard_Integer num,
42                                                        Handle(Interface_Check)& ach,
43                                                        const Handle(StepDimTol_SurfaceProfileTolerance) &ent) const
44 {
45   // Check number of parameters
46   if ( ! data->CheckNbParams(num,4,ach,"surface_profile_tolerance") ) return;
47
48   // Inherited fields of GeometricTolerance
49
50   Handle(TCollection_HAsciiString) aGeometricTolerance_Name;
51   data->ReadString (num, 1, "geometric_tolerance.name", ach, aGeometricTolerance_Name);
52
53   Handle(TCollection_HAsciiString) aGeometricTolerance_Description;
54   data->ReadString (num, 2, "geometric_tolerance.description", ach, aGeometricTolerance_Description);
55
56   Handle(StepBasic_MeasureWithUnit) aGeometricTolerance_Magnitude;
57   data->ReadEntity (num, 3, "geometric_tolerance.magnitude", ach, STANDARD_TYPE(StepBasic_MeasureWithUnit), aGeometricTolerance_Magnitude);
58
59   StepDimTol_GeometricToleranceTarget aGeometricTolerance_TolerancedShapeAspect;
60   data->ReadEntity (num, 4, "geometric_tolerance.toleranced_shape_aspect", ach, aGeometricTolerance_TolerancedShapeAspect);
61
62   // Initialize entity
63   ent->Init(aGeometricTolerance_Name,
64             aGeometricTolerance_Description,
65             aGeometricTolerance_Magnitude,
66             aGeometricTolerance_TolerancedShapeAspect);
67 }
68
69 //=======================================================================
70 //function : WriteStep
71 //purpose  : 
72 //=======================================================================
73
74 void RWStepDimTol_RWSurfaceProfileTolerance::WriteStep (StepData_StepWriter& SW,
75                                                         const Handle(StepDimTol_SurfaceProfileTolerance) &ent) const
76 {
77
78   // Inherited fields of GeometricTolerance
79
80   SW.Send (ent->StepDimTol_GeometricTolerance::Name());
81
82   SW.Send (ent->StepDimTol_GeometricTolerance::Description());
83
84   SW.Send (ent->StepDimTol_GeometricTolerance::Magnitude());
85
86   SW.Send (ent->StepDimTol_GeometricTolerance::TolerancedShapeAspect().Value());
87 }
88
89 //=======================================================================
90 //function : Share
91 //purpose  : 
92 //=======================================================================
93
94 void RWStepDimTol_RWSurfaceProfileTolerance::Share (const Handle(StepDimTol_SurfaceProfileTolerance) &ent,
95                                                     Interface_EntityIterator& iter) const
96 {
97
98   // Inherited fields of GeometricTolerance
99
100   iter.AddItem (ent->StepDimTol_GeometricTolerance::Magnitude());
101
102   iter.AddItem (ent->StepDimTol_GeometricTolerance::TolerancedShapeAspect().Value());
103 }