BlogJava-
大大毛的笔记
DDM's Note
-文章分类-SQL

實例解析如何實現行間運算

大大毛 — Tue, 04 Sep 2007 03:37:00 GMT

問題

通常來說實現表級的關聯以及在列之間實現運算還算是比較容易，可是利用SQL來實現行間的關聯運算就顯得比較困難，這裏就一個實例來解析如何來思考及解決此類的問題。

表結構

      表結構說明
         kID               主關鍵字，例如合約號
         iYear            第幾年度( >= 1)，連續遞增
         iTime           第幾期[1, 12]，連續遞增，根據付款方式有所不同
         D1                  開始日期，數字類型的民國日期
         PayMode   付款方式，取值 A--年繳，S--半年繳，Q--季繳，M--月繳
      要求
         找到那些 D1 有問題的合約。因為根據PayMode來說相同 kID 的 D1 變化是存在有規律的，例如如果是A--年繳則應該是一年一跳，M--月繳則應該是一個月一跳，因此要找到那些跳的間隔有錯的合約。
      數據現狀
         iYear / iTime 兩列上的數據就很亂，有跳期的現象存在，例如月繳1年1期--1年3期。
         D1 列上有誤，例如月繳方式下  950505 -- 950718 (正確應該是950505 -- 959604)

      表結構與我的上一篇示例2中所用表完全相同，只不過上一篇是為了找出年度+月份不連續的問題件，而這裏則是要解決數據行Row之間的對比，不過這一次還是要用到上回講述到的那些解決方案，只不過要更加複雜。

思考

      1. 要達到間隔的計算，就要實現行間數據的對比，因此大體的思路應該是使用自連接的方式來完成。
      2. 根據數據現狀可以看出，上一篇中提到的將 iYear + iTime 兩列合併的方案已經不可用，因為根據現狀這兩列雖然保持唯一和增加，但是增加的 Step(步長) 已經不可信任。根據自連接的特點，我們必須找到一個絕對可以信賴的遞增列，然後再在該列上實現自連接，問題是這一列該如何選取呢？
      3. D1 列是數字值的民國日期，要用日期的間隔來判斷需要先將該列轉換成正常的西元日期型列才可以實現。

解決方法

      1. 找到那個 Step 可以信賴的遞增列。
         既然 iYear + iTime 的 Step 不可信賴可是兩列唯一和增加還是可用的，因為可以用自行構建Identity的方法來據此生成一個可用的 Identity 列。
      2. D1的西元日期型轉換，可以用幾個用於SQL的日期轉換函數(vb) 中功能2所示的 parseDate(strSQL) 來實現。
      3. 問題日期的間隔這裏只簡單的按大於32天/月來判斷。

SQL語句

SQL語句

         從該SQL語句可以看到為了實現自連接，構建了2張表 AL(2-14行) 和 AR(16-28行)，兩表的內容完全一致，中間使用了自定義 Identity 列 Index1 (4-11行) ，然後再將AL 與 AR 實現錯值連接(29行)。
         對連接後表記錄的日期間隔運算，放在Where子句中(30-38行)，這裏寫的是僞語句，需要用前面提到的 VB函數轉換才可以運行，不過這樣看起來就會明子許多。

         可以看到，只要在處理裏靈活運用各種技巧就可以解決更加複雜的邏輯。

大大毛 2007-09-04 11:37 发表评论

幾個用於SQL的日期轉換函數(vb)

大大毛 — Mon, 03 Sep 2007 11:56:00 GMT

這幾個小函數很早就寫了，項目做完後沒想到有一天有公司的兄弟說要用，於是就想著放在這上面來。

功能1
   現在公司接的活是臺灣的，數據庫中免不了要保存民國日期(公元年份 - 1911即為民國日期)，而運算時又要轉成西元日期，因此在運用時會要求進行轉換，通常用兩類。
   1. 在程序中轉換，通常用類型轉換函數將日期轉成長整型再減去19110000。
   2. 在抓資料時就完成轉換，為了方便我做了兩個小函數來完成。
   適用於MS - SQL

民國日期列轉換為西元列

西元列轉換為民國日期列

功能2
在用DB2時數據庫中以數值類型來存放民國日期，要做日期類型運算就要先轉換成日期類型

數值型民國日期列轉換為日期列

大大毛 2007-09-03 19:56 发表评论

查找不連續數據的多種方法

大大毛 — Mon, 03 Sep 2007 11:31:00 GMT

問題：

經常會遇到在業務邏輯上數據連續的而需要找到那些不連續數據的情況。
解決此類問題的方法有很多，可以根據具體的數據結構來加以選擇運用，現就示例說明：

示例1：

表A結構

   表結構說明
      kID      主關鍵字，例如合同號
      iNo      序號(>=1)，從業務邏輯上來說對於同一筆合同號該列的值應該保持連續遞增
   要求
      找到那些有問題的 kID

解決方法：
      表A屬於是一種比較單純、簡單的結構，對於這類只要直接在表上做一次處理即可。
      1. 方法A -- 自連接
         利用對自身表的 iNo 進行錯值(+1或-1)外連, 找到無法連接的數據。

自連接

      這樣就可以定位到那些有問題的 kID 上。
      這種解決方法是最通用的方法，不過在編寫上比較複雜。

      2. 方法B -- 利用Count(*)

利用Count(*)

      看看這個實現就可以發現，這裏比較巧妙的利用了 iNo 列上的邏輯規則 (int型的連續遞增)，如果 iNo 不從1開始計數則在Having 子句中加一點點運算即可。
      這個解決方法比較巧妙，執行效率較高。

      3. 方法C -- 利用函數

利用公式運算

方法C 與方法B 的思路實際上是一致的，就是利用 Group ，在 iNo 列上直接實施檢查，方法C 功能更加強大一些，因為如果 iNo 的規則有變更的話(如奇數遞增, :P )，改改這裏用的 n(n+1) / 2 的公式就好。

示例2：
這裏是另外一種情況，相比示例1 來說更加複雜一些，它的 iNo 列由多列組成，示例如下。

表B結構

      表結構說明
         kID            主關鍵字，例如合同號
         iYear         第幾年度( >= 1)，連續遞增
         iMonth     第幾月份[1, 12]，連續遞增
      要求
         找到那些年度+月份不連續的 kID

解決方法：
      表B 的結構與表A 相比在需要檢查的列上變成多列的結構，而且多列的內部還有著一些隱含關係(如這裏示例中的年/月，顯然不可能第1年度未滿12月就跳到第2年度)，不過就實質來看與表A 的結構一致 ( 可以將iYear , iMonth 看成一列 )，因此同樣可以適用示例1中的方法，只要多加合併 iYear, iMonth的邏輯就好。
      這裏對iYear, iMonth列的合併，使用自定義列 + 表封裝的方式來實現，下面就示例上面的Count方式。

利用Count(*)

大大毛 2007-09-03 19:31 发表评论

根據時間間隔抽樣數據

大大毛 — Fri, 04 May 2007 06:08:00 GMT

問題：

按時間順序來存放的資料量很大，此時通常需要根據一個時間間隔來抽樣數據，例如說有一張表存放的是設備的運行狀態，現在需要根據輸入的時間間隔（比如5分鍾）來進行數據抽樣。

表結構及測試數據

   這個表只做了幾個數據，實際情況下數據條數會很多，而且時間上是連續的(比如說每秒都至少會有一條資料)。
   當然了，這類問題為了實現抽樣，就一定會有幾個關鍵數據需要提供：
   1. 開始抽樣的時間，因為所謂間隔必須具有一個開始點；
   2. 抽樣的時間段；
   3. 抽樣的間隔；

解決：
   先來說一下思路，解決這個問題的關鍵在於：
   1. 先得到一個"時間上的間隔"；
   這個間隔是相對於上面提到的第1個關鍵點即開始時間(比如說開始時間為'2007-05-04 12:00:00' )，因為是時間上的計算，可以利用MS-SQL的 Datediff 時間函數來實現。
   2. 在第1點所得到的"間隔"上進行篩選。

   現在就利用嵌套SQL來分步實現(按分鍾間隔)：
   1. 得到"間隔"計算列，並應用抽樣的時間範圍(提高效率)

Select
         * , datediff (mi, ' 2007-05-04 12:00:00 ' ,snapshotTime) As interval
     From
        tbRunStatus
     Where
        snapshotTime Between ' 2007-05-04 00:00:00 ' And ' 2007-05-05 23:59:59 '

2.0 在第一步的結果集上做篩選

Select
         *
     From
        ( Select
                 * , datediff (mi, ' 2007-05-04 12:00:00 ' ,snapshotTime) As interval
             From
                tbRunStatus
             Where
                snapshotTime Between ' 2007-05-04 00:00:00 ' And ' 2007-05-05 23:59:59 '
        ) t
     Where
        interval % 5 = 0

需要注意的一點就是條件中所應用的 interval % 5 = 0 ，意圖是每隔5分鍾抽一條出來，但是如果是在一分鍾內會有多條而我們只需要最近的那一條數據該怎麽辦呢(如果上面的數據按天來做間隔的話，那麽前3條的間隔都會是0)？

2.1 這樣一來就需要用 Group By 分組來解決(按天做為間隔)

Select * From tbRunStatus Join (
Select
         Min (rID) As rID     -- 由於應用了分組,這裏只要取用關鍵列就好
     From
        ( Select
                 * , datediff ( day , ' 2007-05-04 12:00:00 ' ,snapshotTime) As interval
             From
                tbRunStatus
             Where
                snapshotTime Between ' 2007-05-04 00:00:00 ' And ' 2007-05-05 23:59:59 '
        ) t
     Where
        interval % 1 = 0
     Group By
        interval
) tbRunStatus1 On tbRunStatus.rID = tbRunStatus1.rID

可以看到，實際上的處理也並不複雜，只是將結果集與表做了一次連接就成了，最後的抽樣結果會是兩條。

更深入的思考一下，如果間隔比較特殊造成並不是卡的每個時刻都會有數據，例如間隔卡在4分鍾，那麽就會存在著近似的存在，看看下面SQL以及結果就明白了：

Select
         * , interval / 4.0 As d
     From
        ( Select
                 * , datediff (mi, ' 2007-05-04 12:00:00 ' ,snapshotTime) As interval
             From
                tbRunStatus
             Where
                snapshotTime Between ' 2007-05-04 00:00:00 ' And ' 2007-05-05 23:59:59 '
        ) t

結果集會是這樣：

rID	snapshotTime	thermometry	hygrometry	interval	d
10	2007-05-04 12:05:12.077	30	85	5	1.250000
11	2007-05-04 12:06:38.340	30	85	6	1.500000
12	2007-05-04 12:10:39.750	30	85	10	2.500000
13	2007-05-05 01:05:38.340	31	87	785	196.250000

可以通過這裏的示範列"d"的數值看出，如果是按4分鍾做為間隔的話，那麽 [4-8) 分鍾內有2條資料,而[8-12)分鍾內有1條，而按上面的方法則是一條資料也拿不到的。現在需要在每4分鍾的間隔內取一條(如果有的話)，即應該取rID = (10,12,13)這3條才對。

2.2 對於這種近似匹配區間的情況，我們只需要改改就好

Select * From tbRunStatus Join (
Select
         Min (rID) As rID
     From
        ( Select
                 * , datediff (mi, ' 2007-05-04 12:00:00 ' ,snapshotTime) / 4    As interval
             From
                tbRunStatus
             Where
                snapshotTime Between ' 2007-05-04 00:00:00 ' And ' 2007-05-05 23:59:59 '
        ) t
     Group By
        interval
) tbRunStatus1 On tbRunStatus.rID = tbRunStatus1.rID

呵呵，改改那個計算列的計算邏輯就能達到目的。

大大毛 2007-05-04 14:08 发表评论

分类小计的实现

大大毛 — Fri, 04 May 2007 03:52:00 GMT

問題：

分類小計的情況很多，通常情況下我們可能會在SQL的外部來實現分類小計，但是相比直接使用SQL得到滿意的結果集來說效率上就會差太多，現在就來解決它好了。先看表結構：

表結構及示例數據

可以看到這3個層表現出的是一個3層的結構，tbCategory 是第一層代表大的類別 tbType 是第二層代表出版物的類型 tbBook 是最下一層，現在我們想要實現分類匯總，需要實現下面的效果：
效果表：

名稱	金額	數量
生物	118.4	3
印刷品	113.4	2
昆蟲學	23.5	1
海洋生物探索	89.9	1
電子書	5	1
昆蟲學	5	1

      從這張效果表可以看到，我們需要對數據分類匯總才能實現如上表的效果。

解決：

      平時如果只是2層的關係，直接在SQL語句中實現 Group By 關鍵字即可以實現，但是現在的3層呢？答案是相同的，只是需要將2次匯總的結果集 Union 就好，下面將步驟分解來看：
      1. 我們先對類別實施匯總

Select
        cID, Sum (price) as price, Count ( * ) as bookCount
     From
        tbBook
     Group By
        cID

2. 我們再對出版物的類別匯總

Select
        cID,tID, Sum (price) as price, Count ( * ) as bookCount
     From
        tbBook
     Group By
        cID,tID

3. 將上面兩條 SQL Union

Select
        cID, '' as tID, Sum (price) as price, Count ( * ) as bookCount
     From
        tbBook
     Group By
        cID
Union
Select
        cID,tID, Sum (price) as price, Count ( * ) as bookCount
     From
        tbBook
     Group By
        cID,tID
Order By
    cID,tID

出來的結果是這樣：

cID	tID	price	bookCount
1	0	118.4	3
1	1	113.4	2
1	2	5	1
2	0	157.8	4
2	1	136	2
2	2	21.8	2
3	0	235.5	3
3	1	235.5	3

4. 代入類別名稱和出版物類型的名稱並 Union tbBook表的記錄，得到最終的結果集，为了能够达到排序的效果，我们会在这一步插入一个标识列，用它来控制显示的顺序：

Select ' 0 ' as flag,tbBook.cID as cID, min (tbBook.tID) as tID, min (tbCategory.cName) as cName, Sum (price) as price, Count ( * ) as bookCount From tbBook Join tbCategory On tbBook.cID = tbCategory.cID Group By tbBook.cID
union
Select ' 1 ' ,tbBook.cID,tbBook.tID, min (tbType.tName), Sum (price) as price, Count ( * ) From tbBook Join tbType On tbBook.tID = tbType.tID Group By tbBook.cID,tbBook.tID
union
Select ' 2 ' ,cID,tID,bName,price, 1 From tbBook
Order By cID,tID,Flag

這樣即可實現最終的效果了。

大大毛 2007-05-04 11:52 发表评论

複雜SQL語句的構建以及內部的封裝調試--續章1(視圖變更)

大大毛 — Fri, 09 Feb 2007 04:52:00 GMT

前言：
上回提到過的架構及一些細節上的分析，馬上(時隔2天)就要拉出來蹓蹓了。這次的起因是需求變動。對頁面的顯示效果進行變更。

需求變動：
要求將相同職場的單位進行合併，以前產出的記錄集會是這樣：

職場單位	職場	其它信息
Unit1	AA001	....
Unit2	AA001	....
Unit3	AA002	....

現在頁面要顯示成這樣：

職場單位	職場	其它信息
Unit1,Unit2	AA001	....
Unit3	AA002	....

思考及方案選擇：
      這次的變動算是不大，對邏輯沒有影響，難度較低，可選方案有2個。
      1. 直接修改視圖，例如在ASP頁面中對產出記錄集的職場單位字段按職場實施合併;
      2. 在產出記錄集前實施修改，例如在VB的DLL代碼中增加處理。
      沒有什麼可以盤旋的余地，直接選擇方案2，原因是
      a. 模塊的視圖掛了兩種，一種是ASP頁面的“預覽”，另一種是Excel數據文件的產出，方案1的變更需要在多處進行。
      b. 留下適應再次變更的余地。

實施細節：
      這次的變更屬於視圖層的變更，不需要去變更實現邏輯，因此不會考慮去變更實施邏輯的SQL(而且SQL也不擅長解決此類問題)，采取體外手術的方式解決。
      實施的流程示例：
            SQL－＞原RS－＞處理(適應這次的需求變更)－＞新RS－＞產出
      這樣一來改動的影響會是極其特別以及肯定的非常小，在cls中增加功能函數就好。

代碼：
      在原來的功能模塊fGetFreePlace中插入一行

If pretreatmentRsPlace(rsPlace) = False Then GoTo ErrHandler

增加的處理FUNCTION，為能重復使用分割成2個了(cloneRsFrame是准備以後復用的)。

''****************************************************************************************************
'*程式功能  :       預處理"待退（閒置）租約資料報表"所需的職場記錄集
'*功能說明  :       現階段要求將相同"職場" && "同狀態"的單位合併成一條記錄,單位檔合併成"單位1,單位2",以逗號分隔
'*開發人員  :　     ddm 2006/12/17
''****************************************************************************************************
Private Function pretreatmentRsPlace(ByRef rsPlace As Variant) As Boolean
On Error GoTo ErrHandler
    Dim rsResult As New ADODB.Recordset
    Dim tmpArr As Variant
    Dim strCPlaceCode As String, strFlagState As String, strCUnitName As String
    Dim strCPlaceCodeFlag As String, strFlagStateFlag As String, strCUnitNameList As String, index As Long, i As Long
    '如果源記錄集為空則返回
    If rsPlace.EOF Then
        pretreatmentRsPlace = True
        Exit Function
    End If
    '准備記錄集
    Set rsResult = cloneRsFrame(rsPlace)
    If rsResult Is Nothing Then GoTo ErrHandler

    '變量初始化
    ReDim tmpArr(rsResult.Fields.Count - 1)
    strCPlaceCodeFlag = "i am ddm"
    strCUnitNameList = ""
    index = 0
    Do While Not rsPlace.EOF
        strCUnitName = Trim(rsPlace("CUnitName"))
        strCPlaceCode = Trim(rsPlace("CPlaceCode"))
        strFlagState = Trim(rsPlace("FlagState"))
        '比較是否一條新的職場記錄,由於同一個單位既可能屬於"閒置",同時該職場在考察期也可能會"退租",因此分開
        If Not ((strCPlaceCodeFlag = strCPlaceCode) And (strFlagStateFlag = strFlagState)) Then
            If index = 0 Then
                '第1條記錄,更新標識
            Else
                '更新記錄集
                rsResult.AddNew
                For i = 0 To rsResult.Fields.Count - 1
                    rsResult(i) = tmpArr(i)
                Next
                '使用合併單位名稱列表的值
                rsResult("CUnitName") = strCUnitNameList
                '清除單位列表，保存標識
                strCUnitNameList = ""
            End If
            strCPlaceCodeFlag = strCPlaceCode
            strFlagStateFlag = strFlagState
        Else
            ' do nothing
        End If
        '保存當前記錄
        For i = 0 To rsPlace.Fields.Count - 1
            tmpArr(i) = rsPlace(i)
        Next
        '合併單位名稱
        If Len(strCUnitNameList) < 1 Then
            strCUnitNameList = strCUnitName
        Else
            strCUnitNameList = strCUnitNameList & ", " & strCUnitName
        End If

        index = index + 1
        rsPlace.MoveNext
    Loop
    '更新記錄集
    rsResult.AddNew
    For i = 0 To rsResult.Fields.Count - 1
        rsResult(i) = tmpArr(i)
    Next
    '使用合併單位名稱列表的值
    rsResult("CUnitName") = strCUnitNameList

    '處理完畢,關閉源記錄集,返回處理過的記錄集
    If rsPlace.State = 1 Then rsPlace.Close
    Set rsPlace = rsResult
    rsPlace.MoveFirst

    pretreatmentRsPlace = True
    Exit Function
ErrHandler:
    pretreatmentRsPlace = False
    objCommon.WriteErrLog TheMdlName, "pretreatmentRsPlace", "克隆記錄集結構異常", Err.Number, Err.Description
End Function

'*****************************************************************************************************
'*程式功能  :       克隆記錄集結構
'*開發人員  :       ddm 2006/12/19
'*異動人員
'*傳入值    :       templetRs           --樣本記錄集
'*回傳值    :       Recordset           --克隆記錄集
'*****************************************************************************************************
Public Function cloneRsFrame(templetRs As Variant) As ADODB.Recordset
On Error GoTo ErrHandler
    Dim newRs As New ADODB.Recordset, f As Field
    If templetRs Is Nothing Then
        Set cloneRsFrame = Null
    Else
        Set newRs = New ADODB.Recordset
        '克隆字段結構
        For Each f In templetRs.Fields
           newRs.Fields.Append f.Name, f.Type, f.DefinedSize, adFldIsNullable
        Next
        newRs.Open
    End If
    Set cloneRsFrame = newRs
    Exit Function
ErrHandler:
    Set cloneRsFrame = Nothing
    objCommon.WriteErrLog TheMdlName, "cloneRsFrame", "克隆記錄集結構異常", Err.Number, Err.Description
End Function

後記：
      算是一個小插曲，不過也是從這次的實現中(cloneRsFrame)受益。
      後來USER增加了資料匯入的功能，當俺們完成後就發現不得不“適當”的修改一下表(僅僅是因為USER在Excel導入文件中某些列上寫了過多的說明而已)，修改表是最簡單的那種，放列寬。
      有兄弟的模塊中使用了這樣的代碼：

    Dim rsPlace as new ADODB.RecordSet
    rsPlace.Fields.Append "CAddress", adChar, 200
    rsPlace.AddNew
    rsPlace("CAddress") = Trim(rsSource("CAddress"))
   .

當N列放寬後，終於...掛了。

大大毛 2007-02-09 12:52 发表评论

外聯陷阱

大大毛 — Fri, 19 Jan 2007 04:47:00 GMT

前言：
這裡講的外聯指的是 Left/Right Join，這兩個是等效的，出於習慣用 Left Join。在遇到需要使用外聯的地方，大家通常會按照 Inner Join 的思路來進行改造，特別是在原有的內聯邏輯需要轉變到外聯邏輯的時候。雖然有某些時候內聯改外聯只要變關鍵字就好，但遺憾的是絕大部分情況都不會如此簡單，得要小心從事才行。下面就我遇到過的例舉一二：

DDL：

示例用DDL

   表間關係是：
      合約－－場地;合約－(合約房東)－房東;
   說明：
      各表的 CDelFlag 字段是一個刪除標識，CDelFlag='N' 的記錄才是可用的。
      場地的 CIsUse 字段是個類型標識，下面的示例中會引用到。

示例1：
    邏輯：
         搜尋在指定時段內結束的合約房東。
    代入參數：
        1.PlaceCode:場地的PK，Like匹配;
        2.StartDate:開始日期;
        3.EndDate:結束日期。

   DML：

DML：
     -- 原邏輯：搜尋在指定時段內結束的(有效)合約房東資料
     Select
             *
         From
            tbContractRent Join tbContractOwner On tbContractRent.CContractId = tbContractOwner.CContractId
             Join tbOwner On tbContractOwner.COwnerId = tbOwner.COwnerId
         Where
            tbContractRent.CDelFlag = ' N '
             And tbContractOwner.CDelFlag = ' N '
             And tbOwner.CDelFlag = ' N '
             And tbContractRent.CEndDate Between @StartDate And @EndDate
             And tbContractRent.CPlaceCode Like ' %@PlaceCode% '

       可以看到，這段DML代碼的邏輯是非常簡單的，構造也很容易，就是將 tbContractRent 與 tbOwner 通過中間表 tbContractOwner來連接，只要代入參數以及實現 CDelFlag = 'N' 就好。

      邏輯變更:
         搜尋在指定時段內結束的所有(有效)合約且帶出房東資料(部分合約無匹配的房東資料)
         根據邏輯此時要做的是需要將上面的內聯改成外聯關係。

-- 陷阱1：
     Select
             *
         From
            tbContractRent Left Join tbContractOwner On tbContractRent.CContractId = tbContractOwner.CContractId
             Join tbOwner On tbContractOwner.COwnerId = tbOwner.COwnerId
         Where
            tbContractRent.CDelFlag = ' N '
             And tbContractOwner.CDelFlag = ' N '
             And tbOwner.CDelFlag = ' N '
             And tbContractRent.CEndDate Between @StartDate And @EndDate
             And tbContractRent.CPlaceCode Like ' %@PlaceCode% '

上面SQL的意圖很明顯，是想將合約左聯中間表，再關聯到房東。但是改造的結果是失敗，失敗的原因很明顯，就是3表是逐步關聯起來的，只將合約與中間表實現了左聯，但與房東表的關聯卻沒有改動，現在重新改動一下。

-- 陷阱2：
     Select
             *
         From
            tbContractRent Left Join tbContractOwner On tbContractRent.CContractId = tbContractOwner.CContractId
             Left Join tbOwner On tbContractOwner.COwnerId = tbOwner.COwnerId
         Where
            tbContractRent.CDelFlag = ' N '
             And tbContractOwner.CDelFlag = ' N '
             And tbOwner.CDelFlag = ' N '
             And tbContractRent.CEndDate Between @StartDate And @EndDate
             And tbContractRent.CPlaceCode Like ' %@PlaceCode% '

         這一次已經將3張表的關聯都改成了外聯，可是還是失敗，因為你無論怎麼查詢都會發現它與第1條SQL的內聯是等效的，為什麼會這樣呢？原因很簡單，在SQL語法中 Join 是連接關係，它會在 Where 子句之前完成，因此這條SQL的工作鎏程變成這樣：
         a.三表之間外聯 --> b.Where
         步驟a形成的外聯結果集是包含全部的 tbContractRent 記錄的，未連接上的 tbContractOwner，tbOwner 表記錄的全部字段的值都會是 Null ，再從這個記錄上選取 tbOwner.CDelFalg='N'...，無疑就將這些 Null 值的記錄給排除掉了，產生了與 Inner Join 等效的結果。
         原因說清楚，就好解決。首先看 CDelFlag = 'N'，這個條件，它在邏輯中屬於“前置”條件，應該在連接表時進行。
    解決方案：

     Select
             *
         From
            tbContractRent Left Join tbContractOwner On tbContractRent.CContractId = tbContractOwner.CContractId And tbContractOwner.CDelFlag = ' N '
             Left Join tbOwner On tbContractOwner.COwnerId = tbOwner.COwnerId And tbOwner.CDelFlag = ' N '
         Where
            tbContractRent.CDelFlag = ' N '
             And tbContractRent.CEndDate Between @StartDate And @EndDate
             And tbContractRent.CPlaceCode Like ' %@PlaceCode% '

      說明：由於合約表是關聯的入口表(即 Left 的左表)，因此它的 CDelFlag='N' 可以放在後部實現篩選。

示例2：
      邏輯：
         搜尋異常數據，查找有合約卻沒有對應房東的記錄，前置條件是該合約所在場所的 CIsUse='N'
   DML：

-- 陷阱1：
     Select
            tbContractRent. *
         From
            tbContractRent Left Join tbPlace on tbContractRent.CPlaceCode = tbPlace.CPlaceCode
             Left Join tbContractOwner on tbContractRent.CContractid = tbContractOwner.CContractid
             Left Join tbOwner on tbContractOwner.COwnerid = tbOwner.COwnerid
         Where
            tbPlace.CIsUse = ' N '
             And tbContractOwner.CContractid is null

結果是失敗的，它並沒有按照設定的邏輯來正常工作。參照示例1中的解釋，問題應該是出在 tbPlace.CIsUse='N' 這個Where條件上，該條件將需要搜尋的數據全部給過濾出去了，那麼按照示例1的方法將該條件前置能夠解決問題嗎？

-- 陷阱2：
     Select
            tbContractRent. *
         From
            tbContractRent Left Join tbPlace on tbContractRent.CPlaceCode = tbPlace.CPlaceCode And tbPlace.CIsUse = ' N '
             Left Join tbContractOwner on tbContractRent.CContractid = tbContractOwner.CContractid
             Left Join tbOwner on tbContractOwner.COwnerid = tbOwner.COwnerid
         Where
            tbContractOwner.CContractid is null

條件前置，這是前例中的解決方案，但它不是萬能的，需要依據邏輯來判斷是否合適。在該示例中如果將 tbPlace.CIsUse='N' 條件前置，雖然可以先排除掉不符合該條件的 tbPlace 記錄，但是 Left Join 關鍵字卻會將它們重新給拉回來，只不過拉回來的結果是除了合約表的記錄外，其它字段全部為 Null 。正好完全符合下面的 tbContractOwner.CContractid is null 條件，很有欺騙性吧。
解決方案：

     Select
            tbContractRent. *
         From
            tbContractRent Left Join tbPlace on tbContractRent.CPlaceCode = tbPlace.CPlaceCode
             Left Join tbContractOwner on tbContractRent.CContractid = tbContractOwner.CContractid
             Left Join tbOwner on tbContractOwner.COwnerid = tbOwner.COwnerid
         Where
            tbContractOwner.CContractid is null
             And (tbPlace.CIsUse = ' N '
                 OR tbPlace.CPlaceCode is null
            )

這個有一點點復雜：根據邏輯 tbPlace.CIsUse='N' 這個條件是後置條件，應該放在後部，但是僅僅這樣處理就會產生陷阱1的效果，對應於合約的 Left Join 關聯，需要加入 OR tbPlace.CPlaceCode is null 來維護外聯的結果集。

大大毛 2007-01-19 12:47 发表评论

自行構建 Identity 列的方法

大大毛 — Mon, 15 Jan 2007 04:51:00 GMT

問題：
SQL查詢中經常需要借助於表的 primary key 來實現記錄的唯一性標識，但是有的場合中卻不方便對主鍵進行直接處理，例如我遇到的這種情況：

create table A( char ( 500 ) pkCol,col1,col2);

      表A具有PK列，我現在需要在頁面上Show出以 CheckBox 表示的記錄條，類似於郵件列表的選取。
      通常的做法會是利用表A的PK列來形成頁面元素的ID，這樣在FORM的Submit中就可以拿到選取的記錄PK值，可以很方便的組織SQL來完成整個篩選邏輯。
       現在的問題是出在這個表A的PK列上，通常表的PK列會利用 Int 類型來建立，這樣建立唯一索引的代價會比較小，用Char來建立PK時的情況也是很多，但是也會保證該列的規則性。可是表A的PK列是建立在一個具有實際含義的Char列上，該列的內容會是用戶手工輸入的結果，可想而知如果用它來構造頁面元素的ID會發生什麼情況：
        1.如果該列寬很大的話，當然就會出錯;
        2.由於該列內容不會是非常“正規”的內容，很有可能包含一些特殊字符，這樣一定會使瀏覽器在解析頁面時產生歧義。

   解決方法：
       問題2的情況可以通過對表的PK列進行字符替換等手段來排除掉特殊字符，但是問題1的長度過長依舊不能夠解決。
       我想到的解決該問題的方法是：
      1.對PK列進行字符替換處理這樣可以被保存在 textarea 這樣的元素裡;
      2.而需要提交的元素ID則由我以SQL構造的 Identity 列來構造;
      3.生成頁面的時候只需要建立起提交元素與 textarea 的關聯即可，最終提交的還是PK的值。
      可能有人會對解決方法3提出疑問，既然可以構造 Identity 列，為啥不直接用它來實現提交呢？
      看過實現就知道了：

     Select
            MyIDCol = (
                 Select Count ( * ) From A subA Where subA.pkCol = A.pkCol And A.pkCol < subA.pkCol
            ),
            pkCol,
            col1,
            col2
         From
            A

      這裡可以看 Identity 列(MyIDCol) 是構建在唯一查詢的排序結果集上的，因此它在工作時總能夠保證唯一的區分每一行記錄。
      但是需要注意的一點就是這條語句形成的 Identity 是關聯到某一時刻的，換句話說，如果在用戶對記錄進行過 Insert/Delete 操作之後，這個Identity的值與做DML之前的記錄是關聯不上的，因此需要在Select時帶出PK列的值，在提交時使用PK值才能保證數據的正確性。

      當然，改變DB的設計也是可行的，只不過前提是必須在DB的設計階段。

大大毛 2007-01-15 12:51 发表评论

複雜SQL語句的構建以及內部的封裝調試

大大毛 — Tue, 02 Jan 2007 00:54:00 GMT

摘要: 前言：這段時間還一直在努力之中，這一次在SQL的構建上遇到一個挑戰，不過這一次的挑戰是自找的。開發環境是VB6的DLL＋ASP，分到的活是一個報表模塊。需求我這一塊的報表，現階段是要實現兩個功能(就我看應該只是一個，需求理解錯誤可不是我的事兒)，為了與其它的模塊保持一致，工作流程如下： 1.輸入查詢的年 / 月; ... 阅读全文

大大毛 2007-01-02 08:54 发表评论

SQLServer數據庫結構的獲取

大大毛 — Tue, 21 Nov 2006 14:54:00 GMT

   這段時間好不容易找著一份臨時工，工作難找，只有苦干了。由於現在的項目需要通過VPN來連接遠程的網絡，工作中經常需要通過遠程桌面的方式來查看遠程主機上的SQLServer系統的庫/表及數據集的特征和結構，但是同時連接的數量卻是有限，沒有辦法只能自行使用Select语句以獲取自己所需的資料了。

      日常的需求是：
      1.知道該DBMS上存在有哪些數據庫
      2.知道具體的庫上存在有哪些用戶表
      3.知道表的字段結構，類型，寬度以及Select順序
      4.獲取表中的特征數據

      而要從SQLServer的DBMS中獲取以上資料非常容易，只要具有權限，通過簡單的SQL語句即可實現。

      1.獲取DBMS上存在有哪些數據庫

select
        name,
        dbid
    from
        master.dbo.sysdatabases
    WHERE
        name not in ('master','tempdb','model','msdb')

2.獲取具體的庫上存在有哪些用戶表

select
        name,
        id
    from
        [ddmDataBaseName].dbo.sysobjects
    where
        xtype ='U'

這條SQL語句需要傳遞一個參數(數據庫的名稱)以替換 [ddmDataBaseName] 參數。

3.獲取表的字段結構，類型，寬度以及Select順序

select
        col.name colName,
        type_Name(col.xtype) colType,
        col.length colWidth,
        case isnullable when 1 then '允許' else '禁止' end  nullable
    from
        [ddmDataBaseName].dbo.syscolumns col join [ddmDataBaseName].dbo.sysobjects tab on col.id = tab.id
    where
        tab.xtype ='U'
        and tab.name='[ddmTableName]'
    order by
        tab.id,
        col.colorder

         同樣的，這條SQL語句需要傳遞兩個參數：
         [ddmDataBaseName]:數據庫名稱
         [ddmTableName]:表名稱

      4.獲取表的特征數據集

select
        top 200 *
    from
        [ddmDataBaseName].dbo.[ddmTableName]
    Order by
        NewID()

         由于表的记录条数可能会很大，通常并不需要全部Select出来，因此使用了 Top 200 的关键字，而为了能够随机抽取数据，这里使用了 Order by NewID() 。
         通过使用 3 + 4 的组合可以很容易地拼装出一张表格出来，以便在日常工作中使用。

      由于现在工作的系统是繁体系统，上班时又封网，搞到文章中显得简繁一体了，呵呵。

大大毛 2006-11-21 22:54 发表评论

树型结构的处理

大大毛 — Sat, 14 Oct 2006 19:16:00 GMT

   树型结构在应用中被广泛的运用，在数据操作上需要一定的技巧来进行处理：

   在表结构的定义上，有多种方式可以采用。
  .数据表：
      a.单向链表式的结构 ( 这是藕给它起的名称，因为它与链表的结构相似，除了必要的自身描述外，就只包含父节点的位置)
         DDL示例：

--相当于单向链表
create table linkTree (
    id varchar(10) primary key,         --节点自身ID
    nodeContent varchar(50),          --节点内容
    parentId varchar(10) default ''    --父节点ID
)

         优点：
            .列宽固定，表结构易维护；
            .查找指定节点的上/下游节点效率高；
            .维护树型结构方便(增/删层)；
         缺点，如在下列情况中，都需要多次Select完成：
            .从指定节点开始列出全部子树 ( 除 Oracle 提供支持外 )；
            .返回从指定节点A到其子节点B的路径 ( B 与 A 的层数相差会大于 1 )；

         DML示例：
            向下查找及统计子节点(仅一层)
            (1)通过父节点的ID

通过父节点的ID

(2)通过父节点的内容

条件列nodeContent上存在唯一性约束

由于条件列无唯一性约束，所以在查找时有可能会返回一个记录集，需要做一些处理：

条件列nodeContent上无唯一性约束

(3)查找兄弟节点

查找兄弟节点

            (4)遍历树
            由于链表式表结构的特点，决定了无法用通用的单次 Select 完成操作，对于不同的 DBMS 可以采取不同的策略：
            如Oracle
               select * from linkTree start with id='00' connect by PRIOR  id = parentId;
            如Ms-SQL2000
               表的结构决定了数据只能逐层查找，网上常见的有使用存储过程进行递归返回表变量来实现。
               这里我用循环的方式来实现，效率比递归+表变量要高。

Ms-SQL2000遍历树

      注：这里引入一个site列，是为了能够在输出时更加好的进行排序，因为在最终输出至网页时很有可能是顺序向下输出的，这里正好体现出这种结构。

      b.位置描述式的结构 ( 这是藕给它起的名称，它有一个列，该列描述了当前节点在树中的位置)
         DDL示例：

create table siteTree (
    id varchar(2) primary key,
    nodeContent varchar(20),
    site varchar(200)
)

         例子：
            01      Root      01
            02      dep1      0102
            03      dep2      0103
            04      dep11    010201

         优点：
            由于该表结构中带一个位置描述列site，因此对于关于树的遍历等问题的解决将变得异常的轻松。位置列按从根结点到当前结点的ID连接而成。

         缺点：
            有利即有弊，位置描述列也同时突出该种结构的缺点，它最大的缺点就是树的层次不可能是无穷的，由于它由整个路径的ID连接而已，因此该列的宽度并不是固定的，如根节点的长度将是ID列的宽度，而当前节点位置列所需要空间 = 当前节点层次 * ID列宽度。
            针对链表式结构的优点，这里就成了缺点，层次间的增删将变得较为困难。

         遍历树：

--输出指定节点的全部子节点
select * from siteTree where CHARINDEX('00',site)=1 order by site

大大毛 2006-10-15 03:16 发表评论

查询投票的例子(向表中临时插入特征列)

大大毛 — Tue, 15 Aug 2006 10:23:00 GMT

问题(示例)：
投票表vote，根据条件查询有效/失效/全部的投票主题，是否有效的条件是将当前日期与投票的有效期进行比较

vote表结构

示例数据:

insert into vote values ( 'topic01',dateadd(day,-2,getdate()),dateadd(day,2,getdate()) )
insert into vote values ( 'topic02',dateadd(day,-20,getdate()),dateadd(day,-10,getdate()) )

      实现效果
         有效投票为 topic01 ，无效投票为 topic02

   解决方法：

自连接查询1

在使用自连接查询时，使用判断条件生成一个临时的子表进行自连接。利用左/右连接时子表对应列为 null 的转换从而达到在 vote 表中插入一个特征列的目的，忽略掉最后的 where 子句，手工在 select vote.* 处加入 ,isValid即可以看到效果。

可以将SQL语句改写成下面这样，可以看得清楚一些。

自连接查询2

也可以根据需要，改写成子查询语句：

子查询

   使用 exec vote_getAllVote 参数，即可演示效果(sqlServer2000)
   当然，生成两个临时表 validVote,invalidVote再联合查询或者用IF 加开关分开select也是可以的，这里就不赘述了。

   后记：
      SQL语法上并没有规定解决问题只能使用一种方案，它采用了非常灵活的工作方式，因此具体使用哪一种解决方案取决于具体的应用及个人喜好。

大大毛 2006-08-15 18:23 发表评论

MsSQL中合并条件语句的方法

大大毛 — Tue, 15 Aug 2006 09:06:00 GMT

   起因：
      在工作中经常都会用到根据一个参数的值来做不同的 Where 条件的情况，例如：
      1.在提供给用户的查询界面上提供了多个筛选条件，如果用户选了就使用条件，如果不选就放弃该条件；
      2.存储过程的预留扩充功能，如当前要求返回条件为真的记录，为了扩充，让存储过程根据参数可以返回条件为真/假/全部的记录等。
      在这些情况下，通常有3种实现方法：
         a.在外部(相对于数据库)拼装查询语句，我称它为外部动态SQL，嘻嘻；
         b.在内部(同上)拼装查询语句，我称它为内部动态SQL；
         c.在存储过程中使用大量的 IF 开关，搭配 ctrl+C,ctrl+V,edit操作，写上N条的SQL语句。

   问题的分析：
      a 方法，该方法最多见，因为这是非常easy的办法，而且适用面最广，干啥事都直接来个SQL语句发往连接对象即可。当然这种方法在实现时也是N多的 IF，同时这种方法也会遗留下隐患，稍不留神就会成为 SQL注入 的牺牲品。
      b 方法，只是在存储过程实现了 a 方法，在减少隐患的同时，缩小了适用面，比如低版本的 mysql 就不支持存储过程。
      c 方法，是 b 方法的变种，虽然代码量非常的大，但是结构上很清晰，执行速度快。

   解决方法：
      在工作中找到的一个方法，适用于一定的问题域，可以将N多的SQL合并。
      为了能够清楚的说明，举个例子先。
      例(特定值的条件查询)：
            现在提供一个查询界面给管理员，让他能够对 log表的查询条件进行定制。
            查询条件有：
               1.组ID，对应字段gID
               2.用户ID，对应字段uID
               3.记录类型，对应字段logType
            条件的判断为：
               如果用户选择了条件，那么就在Where中进行筛选，否则就忽略该条件，例如用户如果选择了 gID=1，那么就只选择组ID=1的用户Log，否则就返回全部的用户。通常是用上IF，这样：

string sql = " select * from log " ;
string where = "" ;

if (gID != null ) {
where = where + " gID= " + gID + " and " ;
}
// 更多的IF
// where字串还要处理一下
sql += where;

现在使用MS SQL 的存储过程可以这样实现：

定值条件查询

      仔细分析一下上面的存储过程不难看出问题所在，实际上就是用了Ms SQL的 isNull系统函数，它在判断特征值或列为空时，就用第2参数所示的值或列去取代，否则就取原值，就拿 gID = isNull ( @gID , gID ) 语句来说吧，
      @gID 为一个非空值时，如 @gID = 1，那么表达式成为 where gID = 1
      @gID的值为空 =null 时 ,那么该表达式实现上就成了 where gID = gID，多了这个不用担心会增加负荷，数据库还是有点智能会忽略掉这个条件的，嘻。
      上面的代码是一个比较简单的例子，可以在存储过程的代码区增加对输入参数的过滤，如 if not exists(select 1 from log where gID = @gID) set @gID=null 等。
      这样一来，既可以利用存储过程带来的好处，又利用了 isNull 带来的实惠，一举N得啊。

   后记：
      这个解决方案是存在有局限性的，并不是什么地方都能适用，但是它也不失为一个解决问题的方法。
      --是人总要有点自己的想法，呵呵。

大大毛 2006-08-15 17:06 发表评论

BlogJava-大大毛 的笔记 DDM's Note-文章分类-SQL

大大毛 的笔记

DDM's Note