Access を用いた構造の問題（その 2）

質問

以前 Access に関し質問した者です。ご面倒でなければ下記をご覧下さい。質問の仕方も悪く明確な回答を頂けなかったで改めて質問します。

http://okwave.jp/qa4477357.html

【前提】輸入の船積みのデータの管理。船積（shipment）は各サプライヤーから送られ、米国とメキシコの国境にある倉庫に一時保管される。これらの船積から逐次いくつか選び、トラックにて簡易通関がされ、国境通過となる（つまり、トラック 1台に就き複数の shipment が該当します）。更に、週にいくつかあるこれらトラックの国境通過に対し、毎週確定の通関手続きがなされる。

【質問】shipment のデータを登録するのは、shipment と言うフォーム（invoice number、supplier name などのデータを登録）を作り、そこに出て来るサブフォーム shipment details（パートナンバー、個数などのデータを登録し、shipment ID にてリンクさせる）事で問題ありません。しかし、これら shipment のデータから（この時点では国境通過のフィールドはブランクになっている）選んで国境通過のデータ（日付なら日付け）をどう入れるかが判りません。

例えば、クエリを使って「国境通過フィールドがブランクになっているレコードを選ぶ」と言う事は小生でも何とか出来ると思います。ところが、そのクエリをベースにしたフォームを開き、そこに国境通過のデータ（例えば今日通過させたい shipment を選び、今日の日付）を入力すると、元データにその入力は反映されるのでしょうか。そのクエリ（及びそのクエリをベースにしたフォーム）を使い、データを入力若しくは改変したら、新しい別個のテーブルとしてセーブする必要があるのでしょうか（その方法は？）。

もっと具体的に言えば、例えば「国境通過」と言うテーブルから出来たフォームを作り、そこでブランクのレコードを開き（新しいレコードのデータ入力画面）で、サブフォームに shipment のデータを表示させ、選べるようにしたい訳ですが、どうすれば良いでしょうか。繰り返しになりますが、当然選択する際には shipment のテーブルでは国境通過のデータはブランクであり、選択した後には「国境通過」のフィールドに通過した日の日付がデータとして残されることになります。

色々判らない事が多く困っています。どなたかご親切な方ご教授願いたくお願いします。また、説明が貧しく判らないと言う場合、補足致します。

回答No.1

noname#140971 · ベストアンサー

開発手順

１、データを３つに分類。

(1)基礎データ。
(2)台帳データ。
(3)伝票データ。

２、入力画面と出力画面・出力帳票のレイアウトの検討。

クエリ云々はさておいて、先に入力と出力とを検討。

３、実際の開発。

(1)　各種ライブラリ。
(2)　入力作法の確立。
(3)　出力作法の確立。
(4)　個々の開発。

で、質問は、一足飛びにある特殊な入力フォームに焦点があっているようですね。

まず、上記の台帳データですが、これには２種類あります。
一つは、いわゆるマスターと言われるものです。
二つは、いわゆる管理台帳系のものです。
で、この管理台帳系の入力フォームというのは一般の入力フォームとは多少趣が違っているものです。

例えば、テーブル「「国境通過管理台帳」なるものを用意したとしましょう。
例えば、カレンダーとコマンド釦を配置したフォーム「国境通過管理」を用意したとしましょう。
フォーム「国境通過管理」には、サプライヤーを絞り込むコンボボックスを配置することもあるでしょう。
ともかく、これで「国境通過管理台帳」の抽出条件に見合ったフォーム「国境通過管理」を仮定。
「当日、国境通過管理データ入力」なるコマンド釦をクリック。
そうすると、フォーム「国境通過管台帳」がオープン。
フォームの上部には、抽出した日付、抽出したサプライヤーが表示されているかも知れません。
ここで、サプライヤーを選び直す機能があれば便利かも知れません。
フォームの下部には、通過番号を入力する欄があるかも知れません。
通過番号を入力する欄が一桁入力する度に候補が絞りこまれますので、それを表示してもいいでしょう。
で、確定すれば、台帳の所定位置をスクロール表示。
上方に隠れていれば台帳画面の最上部に表れるでしょう。
下方に隠れていれば台帳画面の最下部に表れるでしょう。
で、ブランクだった日付に通過日が書き込まれるでしょう。

　　Dim frmKTKDaicho As Form
　　Dim rstKTKdaicho As Recordset

　　Set frmKTLDaicho = Screen.ActiveForm
　　Set rstrstKTKdaicho = frmKTLDaicho.RecordsetClone

　　rstrstKTKdaicho.FindFirst XXXXXXXXX
　　If rstrstKTKdaicho=NoMatch Then
　　　　ｘｘｘｘｘｘｘｘ
　　Else
　　　　xxxxxxxxx
　　End If

フォーム画面上で矢印キーを送出することで画面はスクロールさせることができます。

某工場の進捗管理台帳を、こういう感じで作成しました。
私は、管理台帳の上に更にフォーム「管理データ入力」を配置しました。

※ここまで立ち入れば、正に、各自の作法というかアイデアの問題。
※OKWave での質疑応答の範囲を越えていると思います。

回答No.2

noname#140971

補足: 管理台帳は伝票をもとに生成。

管理台帳原始データ・・・伝票入力。
管理台帳・・・・・・・・伝票入力フォームを閉じた後に生成。

二つは、分けて管理した方が良いと思います。
バックアップの意味もありますから・・・。