blob: 112d1201a1127fd8bfd7cdbb1393a44aa0091af1 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
|
-- File: MDataStd.cdl
-- Created: Thu Aug 7 16:12:08 1997
-- Author: VAUTHIER Jean-Claude
-- modified Sergey Zaritchny
---Copyright: Matra Datavision 1997
package MDataXtd
---Purpose: Storage and Retrieval drivers for modelling
-- attributes. Transient attributes are defined in
-- package TDataStd and persistent one are defined in
-- package PDataStd
uses TDF,
PDF,
MDF,
CDM,
TDataStd,
TDataXtd,
Geom, -- a supprimer des que Translate est poussee dans MgtGeom
PGeom -- a supprimer des que Translate est poussee dans MgtGeom
is
---Purpose: Storage drivers for TDataXtd attributes
-- =======================================
class ShapeStorageDriver;
class PointStorageDriver;
class AxisStorageDriver;
class PlaneStorageDriver;
class GeometryStorageDriver;
class ConstraintStorageDriver;
class PlacementStorageDriver;
class PatternStdStorageDriver;
---Purpose: Retrieval drivers for PDataXtd attributes
-- =========================================
class ShapeRetrievalDriver;
class PointRetrievalDriver;
class AxisRetrievalDriver;
class PlaneRetrievalDriver;
class GeometryRetrievalDriver;
class ConstraintRetrievalDriver;
class PlacementRetrievalDriver;
class PatternStdRetrievalDriver;
AddStorageDrivers(aDriverSeq : ASDriverHSequence from MDF; theMessageDriver : MessageDriver from CDM);
---Purpose: Adds the attribute storage drivers to <aDriverSeq>.
AddRetrievalDrivers(aDriverSeq : ARDriverHSequence from MDF; theMessageDriver : MessageDriver from CDM);
---Purpose: Adds the attribute retrieval drivers to <aDriverSeq>.
Translate (Geometry : Geometry from Geom)
---Purpose: Method to launch in MgtGeom
-- Delete MDataStd_1.cxx
-- Modify MDataStd_GeometryStorageDriver::Paste
returns Geometry from PGeom;
Translate (Geometry : Geometry from PGeom)
---Purpose : Method to lasunch in MgtGeom
-- Delete MDataStd_1.cxx
-- Modify MDataStd_GeometryRetrievalDriver::Paste
returns Geometry from Geom;
---Purpose: Translation of TDataXtd enumerations to integer
-- ===============================================
ConstraintTypeToInteger (e : ConstraintEnum from TDataXtd)
returns Integer from Standard;
IntegerToConstraintType (i : Integer from Standard)
returns ConstraintEnum from TDataXtd;
GeometryTypeToInteger (e : GeometryEnum from TDataXtd)
returns Integer from Standard;
IntegerToGeometryType (i : Integer from Standard)
returns GeometryEnum from TDataXtd;
end MDataXtd;
|
