■14363 / 1階層) |
期間絞込でのエラー時対応について
|
□投稿者/ ONnoji -(2024/05/21(Tue) 18:47:00)
| 2024/05/21(Tue) 18:52:49 編集(投稿者)
やはり変なので確認させてください。
■期間指定絞込.kex
名札 メイン 変数宣言 局所, 日時 { &mRefinementStartDate, &mRefinementEndDate }
表 "日付絞り込み.TBX" &mRefinementStartDate = [日付] &mRefinementEndDate = [日付] *
手続き定義開始 cmd絞込開始Click()
変数宣言 自動, 数値 { &ans } 変数宣言 自動, 文字列 { &title = "cmd絞込開始Click()", &msg }
&msg = "絞り込み開始日 と 絞り込み終了日 が選択されました。" &msg = &msg + "\n日付 " + #文字列( &mRefinementStartDate ) + " 〜 " + #文字列( &mRefinementEndDate ) + "を絞り込みますか?" メッセージボックス &title, &msg, アイコン = i, ボタン指定 = 2, 制御文字展開 = する, &ans
┌if( &ans = 1 ) │ │ 表 "日付絞り込み.TBX" │ 解除 * │ 絞り込み [日付] { &mRefinementStartDate<=[]<=&mRefinementEndDate } │ │┌if( .not #eof ) ││ ││ &msg = "絞り込み完了しました" ││ メッセージボックス &title, &msg, アイコン = i, ボタン指定 = 1, 制御文字展開 = しない ││ メソッド呼び出し 戻り値= &実行リターン, @cmd閉じる. 実行() ││ │├else ││ ││ &msg = "該当日が見当たりません" ││ メッセージボックス &title, &msg, アイコン = i, ボタン指定 = 1, 制御文字展開 = しない ││ │└end │ │ 編集表 "日付絞り込み.TBX" │ 終了 表 編集対象表 │ ├else │ │ &msg = "キャンセルしました" │ メッセージボックス &title, &msg, アイコン = i, ボタン指定 = 1, 制御文字展開 = しない │ │ └end
手続き定義終了
"日付絞り込み.wfx(編集対象表:日付絞り込み.tbx)"から"期間指定絞込.wfx"をモーダルフォームで開き
名札 メイン 変数宣言 局所, 日時 { &mRefinementStartDate, &mRefinementEndDate }
表 "日付絞り込み.TBX" &mRefinementStartDate = [日付] &mRefinementEndDate = [日付] *
ですから、次のような
日付絞り込み.WFX
機能名 機能パラメータリスト 1 表示 2 モーダルフォーム 期間指定絞込.wfx 3 なし 4 なし
主ウィンドウ モーダルフォーム(ダイアログボックス) ┌──────────────────┐ ┌──────────────────┐ │日付絞り込み.wfx │ │期間指定絞込.wfx │ │ │ │ │ │ │ │ 期間指定絞込.kex │ │機能名 機能パラメータリスト │ │ 表 "日付絞り込み.TBX" │ │1 表示 │ │ : │ │2 モーダルフォーム 期間指定絞込.wfm┝━━━┥ : │ │ ┝━━━┥ : │ │ │ │ 編集表 "日付絞り込み.TBX" │ │ │ │ 終了 表 編集対象表 ← エラー │ └───────┬──────────┘ └──────────────────┘ │ 編集対象表 │ ┌───────┴─────────┐ │日付絞り込み.TBX │ │ │ │ │ │ │ │ │ │ │ └─────────────────┘
こういう構成なわけです。
でも
編集表 "日付絞り込み.TBX" 終了 表 編集対象表
なんてやるとエラーでしょ。
KU1066:イベントハンドラでは表示中の表を閉じることはできません
※お前は既に日付絞り込み.wfxで開いている。
そちらでは、エラーになりませんでしたか???
|
|