過去の桐井戸端BBS (桐ver.9)
25917 3階層のメイン&サブフォームから別の3階層のメイン&サブフォームへデータ移動をしたい しぼうかん 2004/04/18-18:19
またお知恵をお貸し下さい。

説明1

請求書と納品書.wfmというフォームが有り、請求済請求書.wfmと
請求前請求書.wfmという2つのサブフォームが配置してあります。

請求済請求書.wfmには請求済請求明細1.wfmというサブフォームが配置してあり、
さらにその請求済請求明細1.wfmには請求済請求明細2.wfmというサブフォームが配置してあります。

請求前請求書.wfmにも請求前請求明細1.wfmというサブフォームが配置してあり、
さらにその請求前請求明細1.wfmには請求前請求明細2.wfmというサブフォームが配置してあります。

それぞれのフォームは以下の様な関係です。

1階層目のメイン&サブフォームの関係

請求書と納品書.wfm(メイン)→/請求済請求書.wfm(サブ1)\
カード型,編集表=無し   \請求前請求書.wfm(サブ2)/


2階層目(請求済請求書.wfm)のメイン&サブフォームの関係

請求済請求書.wfm(メイン)→ 請求済請求明細1(サブ)

編集表=請求済請求書.tbl → 編集表=請求済請求明細1.tbl

主キー=[請求番号]   → 外部キー=[請求番号]

             → グループ項目=[請求番号]

3階層目(請求済請求明細1.wfm)のメイン&サブフォームの関係

請求済請求明細1(メイン)→ 請求済請求明細2(サブ)

編集表=請求済請求明細1 → 編集表=請求済請求明細2

主キー=[納品番号]   → 外部キー=[納品番号]
             
             → グループ項目=[納品番号]

2階層目(請求前請求書.wfm)のメイン&サブフォームの関係

請求前請求書.wfm(メイン)→ 請求前請求明細1(サブ)

編集表=請求前請求書   → 編集表=請求前請求明細1

主キー=[仮請求番号]  → 外部キー=[仮請求番号]

             → グループ項目=[仮請求番号]

3階層目(請求前請求明細1.wfm)のメイン&サブフォームの関係

請求前請求明細1(メイン)→ 請求前請求明細2(サブ)

編集表=請求前請求明細1 → 編集表=請求前請求明細2

主キー=[納品番号]   → 外部キー=[納品番号] 

             → グループ項目=[納品番号]


説明2

上記のフォームの内の請求前請求書.wfmに"発行"というコマンドボタンを作り、
このコマンドボタンを押すことで請求前請求書.tblの1つの[仮請求番号]でグループ化された請求前請求明細1.tblと
請求前請求明細2.tblの全てのデータを請求済請求書.tbl,請求済請求明細1.tbl,請求済請求明細2.tblに
移動したいのです。

ただし移動する時に[請求番号]は請求済請求書に入力済みの[請求番号]の最大値+1の番号を自動的に付けて移動したいのです。

そこで以下の通りのイベントを書いて見たのですが、請求前請求書.tblと請求前請求明細1.tblの
データはうまく移動出来たのですが、請求前請求明細2.tblのデータが移動できません。

手続き定義開始 発行::マウス左クリック(・・・
&得意先=[得意先]
編集表 &請求済請求書多重化
並べ替え 索引名=請求番号降順
&請求番号=[請求番号]+1
条件(&請求番号=1)&請求番号=1001
編集表 &請求前請求書
行訂正 [仮請求番号]=&請求番号
編集表 &請求済請求書
行追加 [請求番号]=&請求番号,[得意先]=&得意先
ジャンプ 行番号=最終
編集表 &請求済請求明細1
グループ選択解除
読み込み 表,&請求前請求明細1,編集表=する,{[請求番号][仮請求番号],[納
品番号],[得意先]}
編集表 &請求済請求明細2
グループ選択解除
読み込み 表,&請求前請求明細2,編集表=する,{[請求番号][仮請求番号],[納
品番号],[商品名],[金額]}
グループ選択
編集表 &請求済請求明細1
グループ選択
編集表 &請求前請求書
行削除
手続き定義終了


いつも通り説明が苦手なのでファイルをUPして置きました。

請求書と納品書.wfmをダブルクリックして"発行"というコマンドボタンを押して
データの移動をしようとすると上記の説明の通りうまく行きません。

桐v8sp6または桐v9sp1です。

25934 Re:3階層のメイン&サブフォームから別の3階層のメイン&サブフォームへのデータ移動 アックン(=^・^=) 2004/04/19-14:25
記事番号25917へのコメント
しぼうかんさん、こんにちは。たちまち気づいた点と、一部動作確認だけですが。

(1)サンプルには、質問の下記ファイルが見あたりませんが・・・・。

"請求済請求明細2.TBL","請求済請求明細2.TBL"
"請求前請求明細1.TBL","請求前請求明細2.TBL"

(2)サンプルのフォームの編集対象表は、質問の編集対象表と少々違うようです。

(3)"請求前納品明細.TBL"が、サンプルでは"請求双納品明細.TBL"になっています。

(4)参照整合性のリレーションを設定する画面に、"請求前納品明細.tbl"がありません。
そこで、「表の追加」をして、あらためて「参照整合性定義」で設定し直した後、"請求書と納品書.wfm"を開いて
テストしたところ、"請求前納品明細.tbl"と"請求前納品明細.tbl"にデータが保存されました。確認したのはここまでです。


25935 Re:3階層のメイン&サブフォームから別の3階層のメイン&サブフォームへのデータ移動 アックン(=^・^=) 2004/04/19-14:29
記事番号25934へのコメント
誤)書と納品書.wfm"を・・・"請求前納品明細.tbl"と"請求前納品明細.
正)書と納品書.wfm"を・・・"請求前納品明細.tbl"と"請求済納品明細.

25942 Re:3階層のメイン&サブフォームから別の3階層のメイン&サブフォームへのデータ移動 しぼうかん 2004/04/19-19:10
記事番号25935へのコメント
アックン(=^・^=)さん、こんばんは.

返信有り難うございます。

>(1)サンプルには、質問の下記ファイルが見あたりませんが・・・・。
>
>"請求済請求明細2.TBL","請求済請求明細2.TBL"
>"請求前請求明細1.TBL","請求前請求明細2.TBL"


すいません、上記の部分を間違えてしまいました。
サンプルが正しくて説明が間違っていました。

正しくは以下の通りです。

間違い          正解
編集表=請求前請求明細1→編集表=請求前納品書.TBL
編集表=請求前請求明細2→編集表=請求前納品明細.TBL
編集表=請求済請求明細1→編集表=請求済納品書.TBL
編集表=請求済請求明細2→編集表=請求済納品明細.TBL

この部分を訂正してもう一度投稿しておきます

>(2)サンプルのフォームの編集対象表は、質問の編集対象表と少々違うようです。
>
>(3)"請求前納品明細.TBL"が、サンプルでは"請求双納品明細.TBL"になっています。


もう一度BBSからダウンロードしてみましたが"請求双納品明細.TBL"は見つかりませんでした。


>(4)参照整合性のリレーションを設定する画面に、"請求前納品明細.tbl"がありません。
>そこで、「表の追加」をして、あらためて「参照整合性定義」で設定し直した後、"請求
>書と納品書.wfm"を開いてテストしたところ、"請求前納品明細.tbl"と"請求前納品明細.
>tbl"にデータが保存されました。確認したのはここまでです。


サンプルの参照整合性をチェックして見ましたがちゃんと設定されているように思えます。
最初の説明が間違っていた事もあり、説明が悪くてわかりづらかったのかもしれません。
もう一度テーブルの参照整合性を書いてみます。

請求前請求書.TBL→請求前納品書.TBL→→→→請求前納品明細.TBL
[仮請求番号]→→→[仮請求番号][納品番号]→[納品番号]
主キー→→→→→→外部キー, 主キー→→→外部キー


請求済請求書.TBL→請求済納品書.TBL→→→→請求済納品明細.TBL
[請求番号]→→→→[請求番号][納品番号]→[納品番号]
主キー→→→→→→外部キー, 主キー→→→外部キー


こんな感じの説明で解かって頂けるでしょうか?


25945 Re:3階層のメイン&サブフォームから別の3階層のメイン&サブフォームへのデータ移動 アックン(=^・^=) 2004/04/19-19:30
記事番号25942へのコメント
しぼうかんさん>
まだ新サンプルをDLしてないんですけど(今夜はこれで帰宅するので試せませんが)、ひとつだけさせてください。
肝心の質問内容は、"請求済納品明細.TBL"にデータ転記されないがなぜか、でいいですか?

25947 Re:3階層のメイン&サブフォームから別の3階層のメイン&サブフォームへのデータ移動 しぼうかん 2004/04/19-19:41
記事番号25917へのコメント
説明に間違いが有りました。

間違い         正しい
"請求前請求明細1.tbl→"請求前納品書.tbl"
"請求前請求明細2.tbl→"請求前納品明細.tbl"
"請求済請求明細1.tbl→"請求済納品書.tbl"
"請求済請求明細2.tbl→"請求済納品明細.tbl"


説明1

請求書と納品書.wfmというフォームが有り、請求済請求書.wfmと
請求前請求書.wfmという2つのサブフォームが配置してあります。

請求済請求書.wfmには請求済請求明細1.wfmというサブフォームが配置してあり、
さらにその請求済請求明細1.wfmには請求済請求明細2.wfmというサブフォームが配置してあります。

請求前請求書.wfmにも請求前請求明細1.wfmというサブフォームが配置してあり、
さらにその請求前請求明細1.wfmには請求前請求明細2.wfmというサブフォームが配置してあります。

それぞれのフォームは以下の様な関係です。


1階層目のメイン&サブフォームの関係

請求書と納品書.wfm(メイン)→/請求済請求書.wfm(サブ1)\
カード型,編集表=無し   \請求前請求書.wfm(サブ2)/


2階層目(請求済請求書.wfm)のメイン&サブフォームの関係

請求済請求書.wfm(メイン)→ 請求済請求明細1(サブ)
編集表=請求済請求書.tbl → 編集表=請求済納品書.tbl
主キー=[請求番号]   → 外部キー=[請求番号]
             → グループ項目=[請求番号]

3階層目(請求済請求明細1.wfm)のメイン&サブフォームの関係

請求済請求明細1.wfm(メイン)→ 請求済請求明細2(サブ)
編集表=請求済納品書   → 編集表=請求済納品明細
主キー=[納品番号]   → 外部キー=[納品番号]
             → グループ項目=[納品番号]

2階層目(請求前請求書.wfm)のメイン&サブフォームの関係

請求前請求書.wfm(メイン)→ 請求前請求明細1(サブ)
編集表=請求前請求書   → 編集表=請求前納品書
主キー=[仮請求番号]  → 外部キー=[仮請求番号]
             → グループ項目=[仮請求番号]

3階層目(請求前請求明細1.wfm)のメイン&サブフォームの関係

請求前請求明細1(メイン)→ 請求前請求明細2(サブ)
編集表=請求前納品書   → 編集表=請求前納品明細
主キー=[納品番号]   → 外部キー=[納品番号] 
             → グループ項目=[納品番号]

説明2

上記のフォームの内の請求前請求書.wfmに"発行"というコマンドボタンを作り、
このコマンドボタンを押すことで請求前請求書.tblの1つの[仮請求番号]でグループ化された請求前納品書.tblと
請求前納品明細.tblの全てのデータを請求済請求書.tbl,請求済納品書.tbl,請求済納品明細.tblに移動したいのです。

ただし移動する時に[請求番号]は請求済請求書に入力済みの[請求番号]の
最大値+1の番号を自動的に付けて移動したいのです。

そこで以下の通りのイベントを書いて見たのですが、請求前請求書.tblと
請求前請求明細1.tblのデータはうまく移動出来たのですが、請求前納品明細.tblのデータが移動できません。


手続き定義開始 発行::マウス左クリック(・・・
&得意先=[得意先]
編集表 &請求済請求書多重化
並べ替え 索引名=請求番号降順
&請求番号=[請求番号]+1
条件(&請求番号=1)&請求番号=1001
編集表 &請求前請求書
行訂正 [仮請求番号]=&請求番号
編集表 &請求済請求書
行追加 [請求番号]=&請求番号,[得意先]=&得意先
ジャンプ 行番号=最終
編集表 &請求済請求明細1
グループ選択解除
読み込み 表,&請求前請求明細1,編集表=する,{[請求番号][仮請求番号],[納
品番号],[得意先]}
編集表 &請求済請求明細2
グループ選択解除
読み込み 表,&請求前請求明細2,編集表=する,{[請求番号][仮請求番号],[納
品番号],[商品名],[金額]}
グループ選択
編集表 &請求済請求明細1
グループ選択
編集表 &請求前請求書
行削除
手続き定義終了

25948 Re:3階層のメイン&サブフォームから別の3階層のメイン&サブフォームへのデータ移動 しぼうかん 2004/04/19-19:55
記事番号25945へのコメント
>まだ新サンプルをDLしてないんですけど(今夜はこれで帰宅するので試せませんが)、ひとつだけさせてください。
>肝心の質問内容は、"請求済納品明細.TBL"にデータ転記されないがなぜか、でいいですか?
>

はいそうです。

請求前請求書.TBL→請求済請求書.TBLと請求前納品書.TBL→請求済納品書.TBLのデータ転記は投稿したイベントで
うまく転記出来ています。

後は請求前納品明細.TBL→請求済納品明細.TBLの転記だけがうまくいかないのです。

また前回の説明は間違いがありましたが、UPしたサンプルに間違いは無い様なので新サンプルはUPしないつもりなのですが、
念のためもう一度DLしてみて頂けますでしょうか?

なおフォーム名と対象表の名前が一致せずわかりずらくてすいません。
以下の3行の説明は蛇足かもしれませんが、一致しない訳を書きます。

今回の質問に関係無いと思うのではずしたのですが、この上記の4つのテーブルはこのテーブルと同名のフォームの対象表として
今回質問のフォームと同時に開いており、そのフォーム(納品書用)と共用して使っている為です。

しかし説明文章力が低いのでサンプルを使って見ていただいたほうがわかりやすいと思います。

25952 Re:3階層のメイン&サブフォームから別の3階層のメイン&サブフォームへのデータ移動 アックン 2004/04/19-21:09
記事番号25948へのコメント
しぼうかんさん>
>後は請求前納品明細.TBL→請求済納品明細.TBLの転記だけがうまくいかないのです。
はい。了解です。質問内容を再確認させていただきました。

>また前回の説明は間違いがありましたが、UPしたサンプルに間違いは無い様なので新サンプルはUPしないつもり
>なのですが、念のためもう一度DLしてみて頂けますでしょうか?
わかりました。さいしょにULしたファイルでいいということでしたら、もう一度解凍してみます。
V9に変換する際に、参照整合性のエラーが頻繁に出ていたので、あれこれいじっていて、意識しないうちに変になっちゃったのかな。(^^;
今自宅で書いているんですが、このパソコンでは解凍できないんです。(^^;
明日は夕方まで時間がとれないかもしれないので、すみませんが、ぼくが試すのは時間をください。
それまでに他の方からお話があれば、すすめていてください。

発言No.25947で、説明文とプログラミングの中に、・・明細1.tbl、・・明細2.tblの記述がまだあちこちにあります。

25956 Re:3階層のメイン&サブフォームから別の3階層のメイン&サブフォームへのデータ移動 しぼうかん 2004/04/19-23:59
記事番号25952へのコメント
わかりにくい説明を読んで頂きありがとうございます。

>発言No.25947で、説明文とプログラミングの中に、・・明細1.tbl、・・明細2.tblの記述がまだあちこちにあります。



>請求済請求書.wfm(メイン)→ 請求済請求明細1(サブ)

請求済請求明細1(サブ)の事でしょうか?
これは請求済請求明細1.wfmの事であり、このフォームの編集表は請求済納品書.tblです。


>編集表 &請求済請求明細1

>編集表 &請求済請求明細2

これらの事でしょうか?
&請求済請求明細1は請求済請求明細1.wfmのイベントファイルのフォーム開始イベントで
&表番号を代入した変数であり、編集する表は請求済納品書.tblです。

同じく&請求済請求明細2は請求済請求明細2.wfmのフォーム開始イベントで
&表番号を代入した変数であり、編集する表は請求済納品明細.tblです。

どうも請求済請求明細1.wfmの編集表が請求済請求明細1.tblでは無くて
請求済納品書.tblだったり、請求済請求明細2.wfmの編集表が請求済請求明細2.tblでは無くて
請求済納品明細.tblだったりフォームと編集表の名前が似ているが違う事も原因かもしれません。

これには訳がありますが、うまく説明出来ないので、今回の質問には直接関係は無いのですが、
全体のファイルを明日(火)UPしてみます。

なぜこんなファイル名を付けたのか、なぜこんな作業をするのかが大まかにわかっていただければいいのですが。
25980 Re:3階層のメイン&サブフォームから別の3階層のメイン&サブフォームへのデータ移動 アックン(=^・^=) 2004/04/20-17:32
記事番号25956へのコメント
しぼうかんさん>
>全体のファイルを明日(火)UPしてみます。
 全体でも一部でも結構です。
動作確認できればいいですから、アップロードよろしくお願いします。
25982 泥沼に引きずり込まないようにしているのですが・・・ しぼうかん 2004/04/20-19:21
記事番号25980へのコメント
アックン(=^・^=)さん、こんばんは.
お世話をお掛けしています。
保険会社のCMではないのですが投稿前によ〜く考えてみるべきでした。

まず、おわびが有ります。

UPしたファイルの内、請求前請求書.kevを古い物をUPしてしまっていて"発行"の左クリックイベントでは
下記の事が出来ないようになっていました。
その他読み込みの項目の指定についても間違いがありました。

>請求前請求書.TBL→請求済請求書.TBLと請求前納品書.TBL→>請求済納品書.TBLのデータ転記は投稿したイベントで
>うまく転記出来ています。


そこで試行錯誤中の最新の請求前請求書.kevを含むファイルを再度UPします。

このファイルでもうまくは行かないのですが、上記の部分についてはうまく転記出来ています。
また請求済納品明細.tblのデータもグループ化されたデータの内1グループ分だけは移動が出来ます。


下手な説明とアホなミスで無駄な時間を取らせてしまい申し訳ありませんでした。m(_ _)m

容量制限の為分割になると思いますがもう少し整理と動作チェックをしてからUPします。
25983 Re:泥沼に引きずり込まないようにしているのですが・・・ しぼうかん 2004/04/20-19:23
記事番号25982へのコメント
>容量制限の為分割になると思いますがもう少し整理と
>動作チェックをしてからUPします。

↑後でUPする予定の全体のファイルの事でした。
前回のファイルを訂正したファイルはUP済みです。
25992 Re:泥沼に引きずり込まないようにしているのですが・・・ しぼうかん 2004/04/20-22:41
記事番号25983へのコメント
全体のファイルはチェック中に重要な点でバグが見つかり、
まだ直っていません。
今日はUP出来そうにありません。
修正次第UPします。
25997 Re:泥沼に引きずり込まないようにしているのですが・・・ アックン(=^・^=) 2004/04/21-09:06
記事番号25992へのコメント
しぼうかんさん> お急ぎにならなくて結構です。(^^)
26023 解決しました。 しぼうかん 2004/04/22-19:07
記事番号25997へのコメント
アックン(=^・^=)さん、こんばんは.

全体のシステムの修正に時間がかかりそうなので、UPしたファイルで試行錯誤した結果無事今回の質問は解決しました。
お手間を取らせました。

一応うまくいったイベントを書いておきます。

手続き定義開始 発行::マウス左クリック(長整数・・・・
&得意先=[得意先]
編集表 &請求済請求書多重化
並べ替え 索引名=請求番号降順
&請求番号=[請求番号]+1
条件(&請求番号=1)&請求番号=1001
編集表 &請求前請求書
行訂正 [仮請求番号]=&請求番号
編集表 &請求前請求明細1
グループ選択解除
グループ選択
グループ値訂正 {[仮請求番号]=&請求番号}
編集表 &請求済請求書
行追加 [請求番号]=&請求番号,[得意先]=&得意先
ジャンプ 行番号=最終
編集表 &請求済請求明細1
グループ選択解除
読み込み 表,&請求前請求明細1,編集表=する,終了状態=&ok,{[請求番号][仮
請求番号],[納品番号],[得意先]}
グループ選択
編集表 &請求前請求明細1
繰り返し (.not #終端行)
編集表 &請求済請求明細2
グループ選択解除
読み込み 表,&請求前請求明細2,編集表=する,終了状態=&ok,{[請求番号][仮
請求番号],[納品番号],[商品名],[金額]}
グループ選択
編集表 &請求前請求明細1
ジャンプ 行番号=次行
繰り返し終了
編集表 &請求前請求書
行削除
手続き定義終了

戻る