|
Author：水如烟
自联表的应用层抽象
这方面我没有把握，因为对数据类的总是半知且不解。一样的按自己理解来应用。
自联表的数据存储形式一般有三种，一种是直接的，一种的多表级联的，还有本身就是自联表。三种情形可以相互转换。
直接的，比如行政区划码（其实我做这个也是为行政区划码方案服务的，那个还没写完）：
数据形式为：代码，名称，即：XXXXXX 名称。
六位代码分为三组，每组两位，字符型。可以表示为“00,00,00”。其中第一组表示省，第二组表示市，第三组表示县。当然还有别的意义，暂且如此理解。
对于一项数据，可以这样追寻它的意义，如
340405 八公山区，找市，340400，为淮南市，找省，340000，为安徽省，其意义也就是全称便是安徽省淮南市八公山区。
多表级联的，可以做成三个表：
省（省ID，省），市（市ID，市，省ID），县（县ID，县，省ID）
自联表（示意）：
| ID |
ParentID |
Code |
Name |
| 1 |
0 |
00 |
Root |
| 2 |
1 |
11 |
北京市 |
| . |
|
|
|
| . |
|
|
|
| 25 |
1 |
34 |
安徽省 |
| . |
|
|
|
| . |
|
|
|
| 203 |
25 |
01 |
合肥市 |
| 204 |
25 |
02 |
芜湖市 |
| 205 |
25 |
03 |
蚌埠市 |
| 206 |
25 |
04 |
南淮市 |
| . |
|
|
|
| . |
|
|
|
| 290 |
206 |
01 |
市辖区 |
| 291 |
206 |
02 |
大通区 |
| . |
|
|
|
| . |
|
|
|
| 294 |
206 |
05 |
八公山区 |
| . |
|
|
|
| . |
|
|
|
| . |
|
|
|
| . |
|
|
|
| |
|
|
|
| |
|
|
|
上面是自联表数据的基本的存储形式。很多情形，是从多表级联的形式存储，此时的ID一般是integer类型，也有string类型的（此处数据类型与.NET的对应）。
多表级联的形式，可以通过视图转换为 （代码，名称） 的形式输出来。代码为String类型，格式类似于 “00，000，0000”，每组的位数视相应表的ID大小范围而定，一般的可以事前知道。如公司、部门、班组这类，公司可能有10来个，每个公司的部门也就是20来个吧，班组多些，算是有100个，那样，可以确定为“00，00，000”做为代码基准。
至于本身是自联表的，设置一下最高层级，那么代码形式也是确定的。
所以，不管数据的存储形式如何，最终到应用时，就以（代码，名称）的形式来统一表示。
于是应用层可以抽象成这样：
Namespace uSystem.uCollection.SinceLink
<Serializable()> _
Public MustInherit Class ItemBase
Private gName As String
Private gCode As String
Sub New()
End Sub
Sub New(ByVal code As String, ByVal name As String)
gName = name
gCode = code
End Sub
Public Property Code() As String
Get
Return gCode
End Get
Set(ByVal value As String)
gCode = value
End Set
End Property
Public Property Name() As String
Get
Return gName
End Get
Set(ByVal value As String)
gName = value
End Set
End Property
Public ReadOnly Property ID() As Object
Get
End Get
End Property
Public ReadOnly Property ParentID() As Object
Get
End Get
End Property
''' <summary>
''' ID和ParentID的数据类型,为String或Integer
''' </summary>
Protected MustOverride Function DefinedDataTypeCodeOfID() As TypeCode
''' <summary>
''' 代码的数据格式,形如“00,000,0000”
''' </summary>
Protected MustOverride Function DefinedCodeFormat() As String
Public Function Clone() As ItemBase
Return uSystem.uRuntime.uSerialization.SerializeHelper.Clone(Of ItemBase)(Me)
End Function
End Class
End Namespace
| 
当前位置：开发者网络 >> 技术教程 >> .NET教程 >> 评论及其它 >> 内容
