프로젝트

일반

사용자정보

통계
| 개정판:

hytos / DTI_PID / SPPIDConverter / Drawing.vb @ 4c2584c5

이력 | 보기 | 이력해설 | 다운로드 (5.58 KB)

1 6ba3e887 Gyusu
Public Class Drawing
2
3
    Private _DWGNAME As String = ""
4
    Private _SIZE As String = ""
5
    Private _UNIT As String = ""
6
    Private _LINE_NO As List(Of Line_no)
7
    Private _TRIM_LINE_NO As List(Of Line_no)
8
    Private _EQP_NO As List(Of Eqp_no)
9
10
    Public Property DwgName() As String
11
        Get
12
            Return _DWGNAME
13
        End Get
14
        Set(value As String)
15
            _DWGNAME = value
16
        End Set
17
    End Property
18
19
    Public Property Size() As String
20
        Get
21
            Return _SIZE
22
        End Get
23
        Set(value As String)
24
            _SIZE = value
25
        End Set
26
    End Property
27
28
    Public Property Unit() As String
29
        Get
30
            Return _UNIT
31
        End Get
32
        Set(value As String)
33
            _UNIT = value
34
        End Set
35
    End Property
36
37
38
39
    Public Property Line_nos As List(Of Line_no)
40
        Get
41
            Return _LINE_NO
42
        End Get
43
        Set(value As List(Of Line_no))
44
            _LINE_NO = value
45
        End Set
46
    End Property
47
48
    Public Property TrimLine_nos As List(Of Line_no)
49
        Get
50
            Return _TRIM_LINE_NO
51
        End Get
52
        Set(value As List(Of Line_no))
53
            _TRIM_LINE_NO = value
54
        End Set
55
    End Property
56
57
58
59
    Public Property Eqp_nos As List(Of Eqp_no)
60
        Get
61
            Return _EQP_NO
62
        End Get
63
        Set(value As List(Of Eqp_no))
64
            _EQP_NO = value
65
        End Set
66
    End Property
67
End Class
68
69
70
Public Class Line_no
71
    Private _UID As String = ""
72
    Private _TEXT As String = ""
73
    Private _LOCATION As String = ""
74
    Private _ANGLE As String = ""
75
    Private _SYSTEMPATH As String = ""
76
77
    Private _Line_Dt As DataTable
78
    Private _Symbol_Dt As DataTable
79
    Private _Attribute_Dt As DataTable
80
81
    Private _Line As List(Of Line)
82
    Private _Symbol As List(Of Symbol)
83
    Private _Attribute As List(Of Attribute)
84
85
    Public Property Uid() As String
86
        Get
87
            Return _UID
88
        End Get
89
        Set(value As String)
90
            _UID = value
91
        End Set
92
    End Property
93
94
    Public Property Text() As String
95
        Get
96
            Return _TEXT
97
        End Get
98
        Set(value As String)
99
            _TEXT = value
100
        End Set
101
    End Property
102
103
    Public Property Location() As String
104
        Get
105
            Return _LOCATION
106
        End Get
107
        Set(value As String)
108
            _LOCATION = value
109
        End Set
110
    End Property
111
112
    Public Property Angle() As String
113
        Get
114
            Return _ANGLE
115
        End Get
116
        Set(value As String)
117
            _ANGLE = value
118
        End Set
119
    End Property
120
121
    Public Property SystemPath() As String
122
        Get
123
            Return _SYSTEMPATH
124
        End Get
125
        Set(value As String)
126
            _SYSTEMPATH = value
127
        End Set
128
    End Property
129
130
    Public Property Dt_Line As DataTable
131
        Get
132
            Return _Line_Dt
133
        End Get
134
        Set(value As DataTable)
135
            _Line_Dt = value
136
        End Set
137
    End Property
138
139
    Public Property Dt_Symbol As DataTable
140
        Get
141
            Return _Symbol_Dt
142
        End Get
143
        Set(value As DataTable)
144
            _Symbol_Dt = value
145
        End Set
146
    End Property
147
148
    Public Property Dt_Attribute As DataTable
149
        Get
150
            Return _Attribute_Dt
151
        End Get
152
        Set(value As DataTable)
153
            _Attribute_Dt = value
154
        End Set
155
    End Property
156
157
158
159
    Public Property Line As List(Of Line)
160
        Get
161
            Return _Line
162
        End Get
163
        Set(value As List(Of Line))
164
            _Line = value
165
        End Set
166
    End Property
167
168
    Public Property Symbol As List(Of Symbol)
169
        Get
170
            Return _Symbol
171
        End Get
172
        Set(value As List(Of Symbol))
173
            _Symbol = value
174
        End Set
175
    End Property
176
177
    Public Property Attribute As List(Of Attribute)
178
        Get
179
            Return _Attribute
180
        End Get
181
        Set(value As List(Of Attribute))
182
            _Attribute = value
183
        End Set
184
    End Property
185
186
End Class
187
Public Class Eqp_no
188
    Private _UID As String = ""
189
    Private _TEXT As String = ""
190
    Private _LOCATION As String = ""
191
    Private _ANGLE As String = ""
192
    Private _SYSTEMPATH As String = ""
193
194
    Private _Eqp_Dt As DataTable
195
    Private _Attribute_Dt As DataTable
196
197
198
    Public Property Uid() As String
199
        Get
200
            Return _UID
201
        End Get
202
        Set(value As String)
203
            _UID = value
204
        End Set
205
    End Property
206
207
    Public Property Text() As String
208
        Get
209
            Return _TEXT
210
        End Get
211
        Set(value As String)
212
            _TEXT = value
213
        End Set
214
    End Property
215
216
    Public Property Location() As String
217
        Get
218
            Return _LOCATION
219
        End Get
220
        Set(value As String)
221
            _LOCATION = value
222
        End Set
223
    End Property
224
225
    Public Property Angle() As String
226
        Get
227
            Return _ANGLE
228
        End Get
229
        Set(value As String)
230
            _ANGLE = value
231
        End Set
232
    End Property
233
234
    Public Property SystemPath() As String
235
        Get
236
            Return _SYSTEMPATH
237
        End Get
238
        Set(value As String)
239
            _SYSTEMPATH = value
240
        End Set
241
    End Property
242
    Public Property Dt_Equipment As DataTable
243
        Get
244
            Return _Eqp_Dt
245
        End Get
246
        Set(value As DataTable)
247
            _Eqp_Dt = value
248
        End Set
249
    End Property
250
251
    Public Property Dt_Attribute As DataTable
252
        Get
253
            Return _Attribute_Dt
254
        End Get
255
        Set(value As DataTable)
256
            _Attribute_Dt = value
257
        End Set
258
    End Property
259
260
End Class
261
262
Public Class Symbol
263
264
End Class
265
266
Public Class Line
267
268
End Class
269
270
Public Class Attribute
271
272
End Class
클립보드 이미지 추가 (최대 크기: 500 MB)