質問編集履歴
2
SQL、テーブルについて追記しています。
title
CHANGED
File without changes
|
body
CHANGED
@@ -81,12 +81,12 @@
|
|
81
81
|
Microsoft Access 2019(.accdb)
|
82
82
|
|
83
83
|
以下追記です。
|
84
|
-
フィルター3のSQLです。
|
84
|
+
・フィルター3のSQLです。
|
85
85
|
```
|
86
86
|
SELECT DISTINCTROW [フィルター1].ID, CInt(DCount("[フィルター1].[ID]","フィルター3","[フィルター1].[ID]<=" & [フィルター1].[ID])) AS [No], [フィルター1].[BNo], [フィルター1].日付, [フィルター1].[NGNo], [フィルター1].発注, 充填量.規定量, [フィルター1].規定量 AS F1規定量, IIf([No]=1,0,[総重量]-(DLookUp("[総重量]","フィルター3","[No]=" & Nz([No]-1,1)))) AS 測定量, [フィルター1].測定量 AS F1測定量, [フィルター1].総重量, [フィルター1].[所属], [フィルター1].種類, [フィルター1].区分, [フィルター1].担当者
|
87
87
|
FROM フィルター1 LEFT JOIN 充填量 ON [フィルター1].発注 = 充填量.発注
|
88
88
|
```
|
89
|
-
フィルター1のSQLです。
|
89
|
+
・フィルター1のSQLです。
|
90
90
|
```
|
91
91
|
SELECT 履歴.ID, Year([日付]) AS 移充填年, Month([日付]) AS 移充填月, 履歴.種類, 履歴.[所属], 履歴.[BNo], 履歴.日付, 履歴.区分, 履歴.[NGNo], 履歴.発注, 履歴.規定量, 履歴.測定量, 履歴.担当者, 履歴.総重量
|
92
92
|
FROM 担当者 INNER JOIN 履歴 ON 担当者.ID = 履歴.担当者
|
@@ -94,4 +94,17 @@
|
|
94
94
|
|
95
95
|
```
|
96
96
|
|
97
|
+
テーブルについては以下です。
|
98
|
+
・履歴テーブル(入力毎に増え最大200ほど)
|
99
|
+
ID:オートナンバー型
|
100
|
+
日付:日付/時刻型
|
101
|
+
区分、担当者、所属、種類:数値型(長整数型)
|
102
|
+
規定量、測定量、総重量:数値型(倍精度浮動小数点型、小数点以下3桁)
|
103
|
+
発注、BNo、NGNo:テキスト型(フィールドサイズ20)
|
104
|
+
|
105
|
+
・充填量テーブル(規定でそこまで増えません。データ数1500ほど)
|
106
|
+
規定量:数値型(単精度浮動小数点型、小数点以下3桁)
|
107
|
+
発注:テキスト型(フィールドサイズ7)
|
108
|
+
回収ID:数値型
|
109
|
+
|
97
110
|
情報が足りていなければ申し訳ありません。追記します。
|
1
フィルター1、3のSQL追記しました。
title
CHANGED
File without changes
|
body
CHANGED
@@ -80,4 +80,18 @@
|
|
80
80
|
|
81
81
|
Microsoft Access 2019(.accdb)
|
82
82
|
|
83
|
+
以下追記です。
|
84
|
+
フィルター3のSQLです。
|
85
|
+
```
|
86
|
+
SELECT DISTINCTROW [フィルター1].ID, CInt(DCount("[フィルター1].[ID]","フィルター3","[フィルター1].[ID]<=" & [フィルター1].[ID])) AS [No], [フィルター1].[BNo], [フィルター1].日付, [フィルター1].[NGNo], [フィルター1].発注, 充填量.規定量, [フィルター1].規定量 AS F1規定量, IIf([No]=1,0,[総重量]-(DLookUp("[総重量]","フィルター3","[No]=" & Nz([No]-1,1)))) AS 測定量, [フィルター1].測定量 AS F1測定量, [フィルター1].総重量, [フィルター1].[所属], [フィルター1].種類, [フィルター1].区分, [フィルター1].担当者
|
87
|
+
FROM フィルター1 LEFT JOIN 充填量 ON [フィルター1].発注 = 充填量.発注
|
88
|
+
```
|
89
|
+
フィルター1のSQLです。
|
90
|
+
```
|
91
|
+
SELECT 履歴.ID, Year([日付]) AS 移充填年, Month([日付]) AS 移充填月, 履歴.種類, 履歴.[所属], 履歴.[BNo], 履歴.日付, 履歴.区分, 履歴.[NGNo], 履歴.発注, 履歴.規定量, 履歴.測定量, 履歴.担当者, 履歴.総重量
|
92
|
+
FROM 担当者 INNER JOIN 履歴 ON 担当者.ID = 履歴.担当者
|
93
|
+
WHERE (((Year([日付]))=[Forms]![入力画面]![年選択]) AND ((Month([日付]))=[Forms]![入力画面]![月選択]) AND ((履歴.種類)=[Forms]![入力画面]![種類選択]) AND ((履歴.[所属])=[Forms]![入力画面]![所属選択]));
|
94
|
+
|
95
|
+
```
|
96
|
+
|
83
97
|
情報が足りていなければ申し訳ありません。追記します。
|