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
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
|
--
-- File : Flow.cdl
-- Created : Mon 11 Jan 1993
-- Author : CKY / Contract Toubro-Larsen ( Anand NATRAJAN )
--
---Copyright : MATRA-DATAVISION 1993
--
class Flow from IGESAppli inherits IGESEntity
---Purpose: defines Flow, Type <402> Form <18>
-- in package IGESAppli
-- Represents a single signal or a single fluid flow path
-- starting from a starting Connect Point Entity and
-- including additional intermediate connect points.
uses
ConnectPoint from IGESDraw,
TextDisplayTemplate from IGESGraph,
HAsciiString from TCollection,
HArray1OfHAsciiString from Interface,
HArray1OfIGESEntity from IGESData,
HArray1OfConnectPoint from IGESDraw,
HArray1OfTextDisplayTemplate from IGESGraph
raises OutOfRange
is
Create returns mutable Flow;
-- Specific Methods pertaining to the class
Init (me : mutable;
nbContextFlags : Integer;
aFlowType : Integer;
aFuncFlag : Integer;
allFlowAssocs : HArray1OfIGESEntity;
allConnectPoints : HArray1OfConnectPoint;
allJoins : HArray1OfIGESEntity;
allFlowNames : HArray1OfHAsciiString;
allTextDisps : HArray1OfTextDisplayTemplate;
allContFlowAssocs : HArray1OfIGESEntity);
---Purpose : This method is used to set the fields of the class Flow
-- - nbContextFlags : Count of Context Flags, always = 2
-- - aFlowType : Type of Flow, default = 0
-- - aFuncFlag : Function Flag, default = 0
-- - allFlowAssocs : Flow Associativity Entities
-- - allConnectPoints : Connect Point Entities
-- - allJoins : Join Entities
-- - allFlowNames : Flow Names
-- - allTextDisps : Text Display Template Entities
-- - allContFlowAssocs : Continuation Flow Associativity Entities
OwnCorrect (me : mutable) returns Boolean;
---Purpose : forces NbContextFalgs to 2, returns True if changed
NbContextFlags (me) returns Integer;
---Purpose : returns number of Count of Context Flags, always = 2
NbFlowAssociativities (me) returns Integer;
---Purpose : returns number of Flow Associativity Entities
NbConnectPoints (me) returns Integer;
---Purpose : returns number of Connect Point Entities
NbJoins (me) returns Integer;
---Purpose : returns number of Join Entities
NbFlowNames (me) returns Integer;
---Purpose : returns number of Flow Names
NbTextDisplayTemplates (me) returns Integer;
---Purpose : returns number of Text Display Template Entities
NbContFlowAssociativities (me) returns Integer;
---Purpose : returns number of Continuation Flow Associativity Entities
TypeOfFlow (me) returns Integer;
---Purpose : returns Type of Flow = 0 : Not Specified (default)
-- 1 : Logical
-- 2 : Physical
FunctionFlag (me) returns Integer;
---Purpose : returns Function Flag = 0 : Not Specified (default)
-- 1 : Electrical Signal
-- 2 : Fluid Flow Path
FlowAssociativity (me; Index : Integer) returns IGESEntity
raises OutOfRange;
---Purpose : returns Flow Associativity Entity
-- raises exception if Index <= 0 or Index > NbFlowAssociativities()
ConnectPoint (me; Index : Integer) returns ConnectPoint
raises OutOfRange;
---Purpose : returns Connect Point Entity
-- raises exception if Index <= 0 or Index > NbConnectPoints()
Join (me; Index : Integer) returns IGESEntity
raises OutOfRange;
---Purpose : returns Join Entity
-- raises exception if Index <= 0 or Index > NbJoins()
FlowName (me; Index : Integer) returns HAsciiString from TCollection
raises OutOfRange;
---Purpose : returns Flow Name
-- raises exception if Index <= 0 or Index > NbFlowNames()
TextDisplayTemplate (me; Index : Integer) returns TextDisplayTemplate
raises OutOfRange;
---Purpose : returns Text Display Template Entity
-- raises exception if Index <= 0 or Index > NbTextDisplayTemplates()
ContFlowAssociativity (me; Index : Integer) returns IGESEntity
raises OutOfRange;
---Purpose : returns Continuation Flow Associativity Entity
-- raises exception if Index <= 0 or Index > NbContFlowAssociativities()
fields
--
-- Class : IGESAppli_Flow
--
-- Purpose : Declaration of variables specific to the definition
-- of the Class Flow.
--
-- Reminder : A Flow instance is defined by :
-- - Count of Context Flags, always = 2
-- - Type of Flow, default = 0
-- - Function Flag, default = 0
-- - Flow Associativity Entities
-- - Connect Point Entities
-- - Join Entities
-- - Flow Names
-- - Text Display Template Entities
-- - Continuation Flow Associativity Entities
theNbContextFlags : Integer;
theTypeOfFlow : Integer;
theFunctionFlag : Integer;
theFlowAssociativities : HArray1OfIGESEntity;
theConnectPoints : HArray1OfConnectPoint;
theJoins : HArray1OfIGESEntity;
theFlowNames : HArray1OfHAsciiString;
theTextDisplayTemplates : HArray1OfTextDisplayTemplate;
theContFlowAssociativities : HArray1OfIGESEntity;
end Flow;
|
