您如何计算 Microsoft Access SQL 查询中的连续日期？

Question

我正在处理一个需要这个的查询，但对于这个论坛的问题，我将使用一个假设场景，因为我最感兴趣的是这种方法而不是一次性解决方案。

假设每天一个孩子做得很好，他/她的老师记录了孩子的名字和他/她做得很好的日期。

Table: Kids
*PID    Name
----    ----
 1      Abigail
 2      Jim
 3      Peter

Table: GoodJobHistory
*KidID     *EventDate
 -----      ---------
 1          1/1/2015
 1          1/2/2015
 1          1/3/2015
 1          1/4/2015
 2          1/1/2015
 2          1/2/2015
 3          1/1/2015
 3          1/5/2015
 2          1/5/2015

* refers to a table key

我想要一个会产生如下内容的查询：

Query: query_GoodJobStreak
KidID     EndOfStreak   ConsecutiveDays
-----     -----------   ---------------
1         1/4/2015      4
2         1/2/2015      2
3         1/1/2015      1
3         1/5/2015      1
2         1/5/2015      1

大多数情况下，我正在寻找示例、资源链接，或者甚至是关于我将如何进行此操作的简要说明。

我意识到那里有一些资源，但它们要么 (a) 不适合 Access，(b) 只计算最新记录而忽略历史记录，或者 (c) 只是没有用.提前谢谢你。

Answer 1

您可以使用一个巧妙的技巧来查找连续范围。首先，对历史表中的所有行进行编号，按 KidID 分区并按事件日期排序。

KidID      EventDate  Number
-----      ---------  ------
1          1/1/2015   1
1          1/2/2015   2
1          1/3/2015   3
1          1/4/2015   4

2          1/1/2015   1
2          1/2/2015   2
2          1/5/2015   3

3          1/1/2015   1
3          1/5/2015   2

然后找出行号和事件日期之间的数值差。要找到日期和数字之间的“差异”，我们首先必须将日期转换为数字。 Access 可以自动执行此操作，因为日期实际上存储为幕后的数字（如自 1900 年 1 月 1 日以来的天数）。

KidID      EventDate  Number  EventDateNumber  Diff
-----      ---------  ------  ---------------  ----
1          1/1/2015   1       42005            42004  a
1          1/2/2015   2       42006            42004  a
1          1/3/2015   3       42007            42004  a
1          1/4/2015   4       42008            42004  a

2          1/1/2015   1       42005            42004  b
2          1/2/2015   2       42006            42004  b
2          1/5/2015   3       42009            42006  c

3          1/1/2015   1       42005            42004  d
3          1/5/2015   2       42009            42006  e

您应该已经看到了该模式。任何连续的值集共享完全相同的差异值！我在 Diff 旁边用字母标记了五个连续的范围。这是一个简单的技巧，可用于将数据分成连续范围的集合并找到您想要的结果。

首先，我们需要一种将行号添加到原始数据的方法。这可以通过一个简单的DCount 函数来完成（注意这从0 开始计数，但逻辑是一样的）：

SELECT GoodJobHistory.KidID,
       GoodJobHistory.EventDate,
       DCount("KidID", "GoodJobHistory","KidID=" & [KidID] &
                       " And EventDate<#" & [EventDate] & "#") AS RowNumber
FROM GoodJobHistory;

单独保存上面的查询，以便子查询可以引用它（在我的示例中我称之为GoodJobHistoryNumbered）然后对日期和行号之间的差异进行简单的分组得到我们正在寻找的结果：

SELECT GoodJobHistoryNumbered.KidID,
       Max(GoodJobHistoryNumbered.EventDate) AS EndOfStreak,
       Count(GoodJobHistoryNumbered.RowNumber) AS ConsecutiveDays
FROM GoodJobHistoryNumbered
GROUP BY GoodJobHistoryNumbered.KidID, [EventDate]-[RowNumber];

结果：

KidID   EndOfStreak ConsecutiveDays
1       1/4/2015    4
2       1/2/2015    2
2       1/5/2015    1
3       1/1/2015    1
3       1/5/2015    1