Access 時系列グラフ２

Question

お世話になります。
先日、質問させていただいた際にうまく説明することができていないにも
関わらずご回答ありがとうございました。

その後、少し頭を整理する時間があり再度取り組んでみましたが
VBAを使用せずにうまい具合にクエリで解決する方法がどうしても浮かびません。
お知恵をお貸しいただけないでしょうか。

ある期間の累計申請数とその内訳（タスク）をグラフ化したいです。

★月度累計数⁼その月までの申請数となり、必ず右肩あがりになります
★受付後、TB_処理にレコードがなければ未処理でカウントします
★動きがない月は、前月と同じタスクでカウントします
★月度内にタスクが２以上ある場合は日付の最大でカウントします

未処理のレコードは、TB_申請とTB_処理を管理番号の不一致クエリで取得できるため
毎月のタスクの方がうまく取得できればUnionしようと思っています。

実際のレコードは約1200件あるので、６カ月分グラフ化するとなると
1200×6のデータソースが必要です。

表示までの時間もできるだけ早くしたいため、どうかご教示お願いします。

《テーブル構成》

【TB_申請】 管理番号（主キー）、受付日、案件名称
【TB_処理】 管理番号（複合キー）、処理日　（複合キー）、タスクID
【TB_タスク】ID（主キー）、名称

《レコード》

【TB_申請】

管理番号	受付日	案件名称
A001	2021/1/1	変更依頼１
A002	2021/3/9	変更依頼２
A003	2021/4/6	変更依頼３
A004	2021/5/4	変更依頼４

【TB_処理】

管理番号	処理日	タスク
A001	2021/2/10	タスク１
A001	2021/2/25	タスク２
A001	2021/4/21	受理
A002	2021/4/3	タスク１
A002	2021/5/5	不受理

【TB_グラフ期間】

年月
2021年1月
2021年2月
2021年3月
2021年4月
2021年5月
2021年6月

《出力したいクエリ》

《作成したいグラフ》

---

アドバイスいただいて、以下のデータソースまで作成できました。
Unionすることなく、意図するものに近いクエリが作成できました。

あとは、動きがない月の管理番号を前月タスクで出力できれば完成です。
どうかお知恵をお貸しください。よろしくお願いいたします。

![

★判定ありの月度MAXタスク

SELECT Format(A.処理日,'yyyy\年m\月') AS 月度, A.管理番号, A.[タスク], A.処理日

FROM TB_処理 AS A INNER JOIN (SELECT 管理番号, MAX(処理日) AS 処理日最大 FROM TB_処理

GROUP BY TB_処理.[管理番号], Format([処理日],'yyyy\年m\月'))  AS B ON (A.処理日 = B.処理日最大) AND (A.管理番号 = B.管理番号)

ORDER BY Format(A.処理日,'yyyy\年m\月'), A.管理番号;

★時系列グラフ月度総数

SELECT TB_申請.管理番号, TB_グラフ期間.年月, TB_申請.受付日

FROM TB_グラフ期間, TB_申請

WHERE (((Format([受付日],"yyyy\年m\月"))<=[年月]))

ORDER BY TB_申請.管理番号, TB_グラフ期間.年月;

★時系列グラフデータソース

SELECT [★時系列グラフ月度総数].管理番号, [★時系列グラフ月度総数].年月, Nz([タスク],"未処理") AS 月度タスク

FROM ★時系列グラフ月度総数 LEFT JOIN ★判定ありの月度MAXタスク

ON ([★時系列グラフ月度総数].管理番号 = [★判定ありの月度MAXタスク].管理番号) AND ([★時系列グラフ月度総数].年月 = [★判定ありの月度MAXタスク].月度)

ORDER BY [★時系列グラフ月度総数].管理番号, [★時系列グラフ月度総数].年月;

Answer 1

未処理のレコードは、TB_申請とTB_処理を管理番号の不一致クエリで取得できるため
毎月のタスクの方がうまく取得できればUnionしようと思っています。

月毎のクエリーは以下の様な感じですね。
TB_グラフ期間.年月は文字型より日付時刻型にしておいて、selectでFormatするようにした方が良いかと思います。

select  TB_グラフ期間.年月 as 月度, TB_処理.管理番号, TB_タスク.名称 as タスク名称
from  (
      TB_グラフ期間 
      inner join TB_処理
      on    TB_グラフ期間.年月 = Format(TB_処理.処理日, 'yyyy年m月')
      ) inner join TB_タスク
      on    TB_処理.タスクID=TB_タスク.ID
order by CDate(TB_グラフ期間.年月)

追記

前月タスクを引き継ぐレコードが作成できていません

TB_グラフ期間から見て直近のTB_処理を求めれば、引き継ぎ用のタスクが取得が出来ます。
以下の様なクエリーを作成し、「★時系列グラフデータソース」に結合してタスクを取得すれば良いと思います。

select TB_処理.管理番号, TB_グラフ期間.年月
     , Format(max(TB_処理.処理日), 'yyyy\年m\月') AS 直近月度
from TB_グラフ期間, TB_処理
where TB_グラフ期間.年月 >= Format(TB_処理.処理日, 'yyyy\年m\月')
group by TB_処理.管理番号, TB_グラフ期間.年月

重ねて言っておきますが、日付は日付型で扱う方が良いですよ。
最低でも、書式を(yyyy\年mm\月)にしておかないと大小比較が意図しないものになってしまいますよ。
例えば('2012年2月'　> '2012年12月')はTrueになります。
上記のSQLも同様です。

Comments

[saksak_planner]

sazi様

いつもありがとうございます。とても助かりました。
ご教示いただいたクエリから月度×総数のデータソースを作成できるまできました。
が、更に問題点がありました。
前月タスクを引き継ぐレコードが作成できていません…あと一息というところです。
コメント追加しましたので、ご確認いただけますと幸いです。

[sazi]

SQLは画像ではなくテキストにして下さい。

[saksak_planner]

コメントありがとうございます。
コード載せましたので、ご確認をお願いします。

[saksak_planner]

無事に意図するグラフを作成でき、大変勉強になりました。
これから日付型に直し、完成形にいたします。
貴重なお時間をありがとうございました！