0028714: Dimension of TDataStd_Real is not serialized to document
[occt.git] / src / StdLPersistent / StdLPersistent_Variable.hxx
1 // Copyright (c) 2015 OPEN CASCADE SAS
2 //
3 // This file is part of Open CASCADE Technology software library.
4 //
5 // This library is free software; you can redistribute it and/or modify it under
6 // the terms of the GNU Lesser General Public License version 2.1 as published
7 // by the Free Software Foundation, with special exception defined in the file
8 // OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
9 // distribution for complete text of the license and disclaimer of any warranty.
10 //
11 // Alternatively, this file may be used under the terms of Open CASCADE
12 // commercial license or contractual agreement.
13
14
15 #ifndef _StdLPersistent_Variable_HeaderFile
16 #define _StdLPersistent_Variable_HeaderFile
17
18 #include <StdObjMgt_Attribute.hxx>
19 #include <StdLPersistent_HString.hxx>
20
21 #include <TDataStd_Variable.hxx>
22
23
24 class StdLPersistent_Variable : public StdObjMgt_Attribute<TDataStd_Variable>
25 {
26 public:
27   //! Read persistent data from a file.
28   inline void Read (StdObjMgt_ReadData& theReadData)
29     { theReadData >> myIsConstant >> myUnit; }
30   //! Write persistent data to a file.
31   inline void Write (StdObjMgt_WriteData& theWriteData) const
32     { theWriteData << myIsConstant << myUnit; }
33   //! Gets persistent child objects
34   inline void PChildren(StdObjMgt_Persistent::SequenceOfPersistent& theChildren) const 
35     { theChildren.Append(myUnit); }
36   //! Returns persistent type name
37   inline Standard_CString PName() const { return "PDataStd_Variable"; }
38
39   //! Import transient attribuite from the persistent data.
40   void Import (const Handle(TDataStd_Variable)& theAttribute) const
41   {
42     theAttribute->Constant (myIsConstant);
43     if (myUnit)
44       theAttribute->Unit (myUnit->Value()->String());
45   }
46
47 private:
48   Standard_Boolean                      myIsConstant;
49   Handle(StdLPersistent_HString::Ascii) myUnit;
50 };
51
52 #endif