hytos / DTI_PID / SPPIDConverter / MDatatable.vb @ 6e10659e
이력 | 보기 | 이력해설 | 다운로드 (7.37 KB)
| 1 | 6ba3e887 | Gyusu | Imports Llama |
|---|---|---|---|
| 2 | |||
| 3 | Module MDatatable |
||
| 4 | |||
| 5 | #Region "Load Pipe" |
||
| 6 | Public Function LoadPipe_DT() As DataTable |
||
| 7 | Dim oDt As New DataTable |
||
| 8 | oDt.Columns.Add("start_x")
|
||
| 9 | oDt.Columns.Add("start_y")
|
||
| 10 | oDt.Columns.Add("end_x")
|
||
| 11 | oDt.Columns.Add("end_y")
|
||
| 12 | oDt.Columns.Add("SystemPath")
|
||
| 13 | Return oDt |
||
| 14 | |||
| 15 | End Function |
||
| 16 | |||
| 17 | #End Region |
||
| 18 | |||
| 19 | #Region "Load Symbol" |
||
| 20 | Public Function LoadSymbol_DT() As DataTable |
||
| 21 | Dim oDt As New DataTable |
||
| 22 | oDt.Columns.Add("Class")
|
||
| 23 | oDt.Columns.Add("Name")
|
||
| 24 | oDt.Columns.Add("Item")
|
||
| 25 | oDt.Columns.Add("Type")
|
||
| 26 | oDt.Columns.Add("x")
|
||
| 27 | oDt.Columns.Add("y")
|
||
| 28 | oDt.Columns.Add("Angle")
|
||
| 29 | oDt.Columns.Add("SystemPath")
|
||
| 30 | oDt.Columns.Add("Text")
|
||
| 31 | oDt.Columns.Add("uid")
|
||
| 32 | Return oDt |
||
| 33 | End Function |
||
| 34 | #End Region |
||
| 35 | |||
| 36 | |||
| 37 | #Region "Load DWG DataSet" |
||
| 38 | Public Function Load_Dwg_Ds() As DataSet |
||
| 39 | Dim oDs As New DataSet |
||
| 40 | |||
| 41 | |||
| 42 | |||
| 43 | |||
| 44 | End Function |
||
| 45 | |||
| 46 | |||
| 47 | |||
| 48 | |||
| 49 | #End Region |
||
| 50 | |||
| 51 | #Region "Check LineNoText above Line" |
||
| 52 | Public Function PipeRun_Dt() As DataTable |
||
| 53 | Dim oDt As New DataTable |
||
| 54 | oDt.Columns.Add("Piperun", GetType(LMPipeRun))
|
||
| 55 | oDt.Columns.Add("startx")
|
||
| 56 | oDt.Columns.Add("starty")
|
||
| 57 | oDt.Columns.Add("endx")
|
||
| 58 | oDt.Columns.Add("endy")
|
||
| 59 | oDt.Columns.Add("value")
|
||
| 60 | Return oDt |
||
| 61 | End Function |
||
| 62 | |||
| 63 | #End Region |
||
| 64 | |||
| 65 | |||
| 66 | Public Function Drawing_Dt() As DataTable |
||
| 67 | Dim oDt As New DataTable |
||
| 68 | oDt.Columns.Add("Name")
|
||
| 69 | oDt.Columns.Add("Path")
|
||
| 70 | Return oDt |
||
| 71 | End Function |
||
| 72 | |||
| 73 | Public Function Line_Dt() As DataTable |
||
| 74 | Dim oDt As New DataTable |
||
| 75 | oDt.Columns.Add(_XML_LINE_UID) |
||
| 76 | oDt.Columns.Add(_XML_LINE_LINENOUID) |
||
| 77 | oDt.Columns.Add(_XML_LINENO_TEXT) |
||
| 78 | 76f465d0 | Gyusu | oDt.Columns.Add(_XML_LINE_RUNNAME) |
| 79 | 6ba3e887 | Gyusu | oDt.Columns.Add(_XML_LINE_STARTPOINT) |
| 80 | oDt.Columns.Add(_XML_LINE_ENDPOINT) |
||
| 81 | oDt.Columns.Add(_XML_LINE_SYSTEMPATH) |
||
| 82 | oDt.Columns.Add(_XML_LINE_DRAWING_TF) |
||
| 83 | oDt.Columns.Add(_XML_LINE_TYPE) |
||
| 84 | oDt.Columns.Add(_XML_LINE_Conn1_Uid) |
||
| 85 | oDt.Columns.Add(_XML_LINE_Conn2_Uid) |
||
| 86 | 76f465d0 | Gyusu | oDt.Columns.Add(_XML_LINE_Direction) |
| 87 | 6ba3e887 | Gyusu | oDt.Columns.Add(_XML_LINE_FlowDirection) |
| 88 | oDt.Columns.Add(_XML_LINE_SPID) |
||
| 89 | oDt.Columns.Add(_XML_LINE_LMCONNECTOR, GetType(LMConnector)) |
||
| 90 | oDt.Columns.Add(_XML_LINE_LMCONNECTOR_1, GetType(LMConnector)) |
||
| 91 | oDt.Columns.Add(_XML_LINE_LMCONNECTOR_2, GetType(LMConnector)) |
||
| 92 | |||
| 93 | 76f465d0 | Gyusu | |
| 94 | oDt.Columns.Add(_XML_LINE_STARTPOINT_X) |
||
| 95 | oDt.Columns.Add(_XML_LINE_STARTPOINT_Y) |
||
| 96 | oDt.Columns.Add(_XML_LINE_ENDPOINT_X) |
||
| 97 | oDt.Columns.Add(_XML_LINE_ENDPOINT_Y) |
||
| 98 | |||
| 99 | oDt.Columns.Add(_XML_LINE_DWG_STARTPOINT_X) |
||
| 100 | oDt.Columns.Add(_XML_LINE_DWG_STARTPOINT_Y) |
||
| 101 | oDt.Columns.Add(_XML_LINE_DWG_ENDPOINT_X) |
||
| 102 | oDt.Columns.Add(_XML_LINE_DWG_ENDPOINT_Y) |
||
| 103 | |||
| 104 | 6ba3e887 | Gyusu | oDt.Columns.Add(_XML_LINE_Check) |
| 105 | 76f5e1a8 | Gyusu | oDt.Columns.Add(_XML_LINE_ValieLine, GetType(Boolean)) |
| 106 | 76f465d0 | Gyusu | |
| 107 | |||
| 108 | 6ba3e887 | Gyusu | Return oDt |
| 109 | End Function |
||
| 110 | |||
| 111 | Public Function ModelingResult_Dt() As DataTable |
||
| 112 | Dim oDt As New DataTable |
||
| 113 | oDt.Columns.Add(_Modeling_Uid) |
||
| 114 | oDt.Columns.Add(_Modeling_LineNoUid) |
||
| 115 | oDt.Columns.Add(_Modeling_Location_X) |
||
| 116 | oDt.Columns.Add(_Modeling_Location_Y) |
||
| 117 | oDt.Columns.Add(_Modeling_Connection1_X) |
||
| 118 | oDt.Columns.Add(_Modeling_Connection1_Y) |
||
| 119 | oDt.Columns.Add(_Modeling_Connection2_X) |
||
| 120 | oDt.Columns.Add(_Modeling_Connection2_Y) |
||
| 121 | oDt.Columns.Add(_Modeling_Connection3_X) |
||
| 122 | oDt.Columns.Add(_Modeling_Connection3_Y) |
||
| 123 | oDt.Columns.Add(_Modeling_Connection4_X) |
||
| 124 | oDt.Columns.Add(_Modeling_Connection4_Y) |
||
| 125 | oDt.Columns.Add(_Modeling_Type) |
||
| 126 | oDt.Columns.Add(_Modeling_Angle) |
||
| 127 | Return oDt |
||
| 128 | End Function |
||
| 129 | |||
| 130 | Public Function Symbol_Dt() As DataTable |
||
| 131 | Dim oDt As New DataTable |
||
| 132 | oDt.Columns.Add(_XML_SYMBOL_UID) |
||
| 133 | f291ddcb | Gyusu | oDt.Columns.Add(_XML_SYMBOL_OWNER) |
| 134 | 6ba3e887 | Gyusu | oDt.Columns.Add(_XML_SYMBOL_LINENOUID) |
| 135 | oDt.Columns.Add(_XML_LINENO_TEXT) |
||
| 136 | 76f465d0 | Gyusu | oDt.Columns.Add(_XML_SYMBOL_RUNNAME) |
| 137 | 6ba3e887 | Gyusu | oDt.Columns.Add(_XML_SYMBOL_NAME) |
| 138 | oDt.Columns.Add(_XML_SYMBOL_CLASS) |
||
| 139 | oDt.Columns.Add(_XML_SYMBOL_LOCATION) |
||
| 140 | oDt.Columns.Add(_XML_SYMBOL_ORIGINALPOINT) |
||
| 141 | oDt.Columns.Add(_XML_SYMBOL_SIZE) |
||
| 142 | oDt.Columns.Add(_XML_SYMBOL_ANGLE) |
||
| 143 | oDt.Columns.Add(_XML_SYMBOL_TYPE) |
||
| 144 | oDt.Columns.Add(_XML_SYMBOL_SYSTEMPATH) |
||
| 145 | oDt.Columns.Add(_XML_SYMBOL_DRAWING_TF) |
||
| 146 | oDt.Columns.Add(_XML_SYMBOL_Conn1_Uid) |
||
| 147 | oDt.Columns.Add(_XML_SYMBOL_Conn2_Uid) |
||
| 148 | oDt.Columns.Add(_XML_SYMBOL_Conn3_Uid) |
||
| 149 | oDt.Columns.Add(_XML_SYMBOL_Conn4_Uid) |
||
| 150 | 76f465d0 | Gyusu | oDt.Columns.Add(_XML_SYMBOL_LMSYMBOL, GetType(LMSymbol)) |
| 151 | 6ba3e887 | Gyusu | oDt.Columns.Add(_XML_SYMBOL_LMCONNECTOR_1, GetType(LMConnector)) |
| 152 | oDt.Columns.Add(_XML_SYMBOL_LMCONNECTOR_2, GetType(LMConnector)) |
||
| 153 | oDt.Columns.Add(_XML_SYMBOL_LMCONNECTOR_3, GetType(LMConnector)) |
||
| 154 | oDt.Columns.Add(_XML_SYMBOL_LMCONNECTOR_4, GetType(LMConnector)) |
||
| 155 | |||
| 156 | oDt.Columns.Add(_XML_SYMBOL_Conn1_Point) |
||
| 157 | oDt.Columns.Add(_XML_SYMBOL_Conn2_Point) |
||
| 158 | oDt.Columns.Add(_XML_SYMBOL_Conn3_Point) |
||
| 159 | oDt.Columns.Add(_XML_SYMBOL_Conn4_Point) |
||
| 160 | |||
| 161 | |||
| 162 | |||
| 163 | oDt.Columns.Add(_XML_SYMBOL_CONNECTIONPOINT) |
||
| 164 | oDt.Columns.Add(_XML_SYMBOL_SPID) |
||
| 165 | 76f465d0 | Gyusu | |
| 166 | oDt.Columns.Add(_XML_SYMBOL_CENTERPOINT_X) |
||
| 167 | oDt.Columns.Add(_XML_SYMBOL_CENTERPOINT_Y) |
||
| 168 | oDt.Columns.Add(_XML_SYMBOL_DWG_CENTERPOINT_X) |
||
| 169 | oDt.Columns.Add(_XML_SYMBOL_DWG_CENTERPOINT_Y) |
||
| 170 | |||
| 171 | oDt.Columns.Add(_XML_SYMBOL_CONN1_POINT_X) |
||
| 172 | oDt.Columns.Add(_XML_SYMBOL_CONN1_POINT_Y) |
||
| 173 | oDt.Columns.Add(_XML_SYMBOL_CONN2_POINT_X) |
||
| 174 | oDt.Columns.Add(_XML_SYMBOL_CONN2_POINT_Y) |
||
| 175 | oDt.Columns.Add(_XML_SYMBOL_CONN3_POINT_X) |
||
| 176 | oDt.Columns.Add(_XML_SYMBOL_CONN3_POINT_Y) |
||
| 177 | oDt.Columns.Add(_XML_SYMBOL_CONN4_POINT_X) |
||
| 178 | oDt.Columns.Add(_XML_SYMBOL_CONN4_POINT_Y) |
||
| 179 | |||
| 180 | oDt.Columns.Add(_XML_SYMBOL_DWG_CONN1_POINT_X) |
||
| 181 | oDt.Columns.Add(_XML_SYMBOL_DWG_CONN1_POINT_Y) |
||
| 182 | oDt.Columns.Add(_XML_SYMBOL_DWG_CONN2_POINT_X) |
||
| 183 | oDt.Columns.Add(_XML_SYMBOL_DWG_CONN2_POINT_Y) |
||
| 184 | oDt.Columns.Add(_XML_SYMBOL_DWG_CONN3_POINT_X) |
||
| 185 | oDt.Columns.Add(_XML_SYMBOL_DWG_CONN3_POINT_Y) |
||
| 186 | oDt.Columns.Add(_XML_SYMBOL_DWG_CONN4_POINT_X) |
||
| 187 | oDt.Columns.Add(_XML_SYMBOL_DWG_CONN4_POINT_Y) |
||
| 188 | |||
| 189 | 6ba3e887 | Gyusu | oDt.Columns.Add(_XML_SYMBOL_Check) |
| 190 | 9c86a823 | Gyusu | oDt.Columns.Add(_XML_SYMBOL_CHILD) |
| 191 | e38f99a7 | Gyusu | |
| 192 | oDt.Columns.Add(_XML_SYMBOL_MIN_X) |
||
| 193 | oDt.Columns.Add(_XML_SYMBOL_MAX_X) |
||
| 194 | |||
| 195 | oDt.Columns.Add(_XML_SYMBOL_MIN_Y) |
||
| 196 | oDt.Columns.Add(_XML_SYMBOL_MAX_Y) |
||
| 197 | |||
| 198 | |||
| 199 | 6ba3e887 | Gyusu | Return oDt |
| 200 | End Function |
||
| 201 | |||
| 202 | Public Function Attribute_Dt() As DataTable |
||
| 203 | Dim oDt As New DataTable |
||
| 204 | oDt.Columns.Add(_XML_ATTRIBUTE_UID) |
||
| 205 | oDt.Columns.Add(_XML_ATTRIBUTE_NAME) |
||
| 206 | oDt.Columns.Add(_XML_ATTRIBUTE_VALUE) |
||
| 207 | Return oDt |
||
| 208 | End Function |
||
| 209 | |||
| 210 | |||
| 211 | Public Function ImageSymbol_Dt() As DataTable |
||
| 212 | Dim oDt As New DataTable |
||
| 213 | oDt.Columns.Add(_Sheet_ImageSymbol_Type) |
||
| 214 | oDt.Columns.Add(_Sheet_ImageSymbol_StartCell) |
||
| 215 | oDt.Columns.Add(_Sheet_ImageSymbol_EndCell) |
||
| 216 | Return oDt |
||
| 217 | End Function |
||
| 218 | |||
| 219 | Public Function DrawLind_Dt() As DataTable |
||
| 220 | Dim oDt As New DataTable |
||
| 221 | oDt.Columns.Add(_XML_LINE_UID) |
||
| 222 | oDt.Columns.Add(_XML_LINE_STARTPOINT_X) |
||
| 223 | oDt.Columns.Add(_XML_LINE_STARTPOINT_Y) |
||
| 224 | oDt.Columns.Add(_XML_LINE_ENDPOINT_X) |
||
| 225 | oDt.Columns.Add(_XML_LINE_ENDPOINT_Y) |
||
| 226 | Return oDt |
||
| 227 | End Function |
||
| 228 | |||
| 229 | End Module |
