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