みんなに優しく、解りやすくをモットーに開設しています。 以下のルールを守りみんなで助け合いましょう。
1.ファイルメーカーで解らない事があればここで質問して下さい。 何方でも、ご質問・ご回答お願いします。 (優しく回答しましょう)
You are not logged in.
Pages: 1
FMP13Adです。
ある日誌の印刷用にレイアウトを準備しています。
レイアウトには顧客ID、氏名、年月日、曜日、日誌記録、記入者、印刷済み(チェックボックス)と各フィールドがあり、IDにはOnObjectModifyのスクリプトトリガを設定し、以下のスクリプトを走らせ、全レコードからIDで絞り込んで表示しています。
この表示したレコード一覧にさらに日時の範囲をユーザー側に対話式で入力させ、表示する期間を絞り込みたいのですが、どのようにスクリプトを組んでいけばいいでしょうか?またその方法を教えていただきたいです。
フィールド入力はIDフィールドは検索モードのみオン、その他のフィールドはブラウザ、検索モードともにオフです。
レイアウトは表示する際に検索モードに切り替えるように設定しています。
----------------------------------------
以下IDフィールドのスクリプト
エラ一処理[オン]
検索実行[]
If [ Get ( 対象レコード数 )=0 ]
カスタムダイアログを表示 [ タイトレ: "メッセージ"; メッセージ: "条件に一致するデータは存在しません"; デフォルトボタン: 「OKj, 確定: 「はい」 ]
全レコ一ドを表示 現在のスクリプト終了 [ ]
Else
カスタムダイアログを表示 [ タイトレ: "印刷済みセレクト"; メッセージ: "印刷済みレコードを除きますか?それとも全て表示します か?"; デフォルトボタン: 「除くj, 確定: 「はい」; ボタン 2: 「全て表示j, 確定: 「いいえ」 ]
If [ Get(最終メッセージ選択) = 1 ] 検索モ一ドに切り替え [ ]
対象レコ一ドの絞り込み [ 指定された検索条件: レコードを対象外に; 条件: テーブルA::印刷済み: 「="印刷済み"」 ]
[ 記憶する ]
レコ一ドのソ一ト [ ソートされた順位でレコードを保持; 特定のソート順: テーブルA::年月日; 昇順 ]
[ 記憶する; ダイアログなし ]
Else If [ Get(最終メッセージ選択) = 2 ]
レコ一ドのソ一ト [ ソートされた順位でレコードを保持; 特定のソート順: テーブルA::年月日; 昇順 ]
[ 記憶する; ダイアログなし ]
End If End If
----------------------------------------------------
余談ですが、ユーザー側に年月日フィールドに「0000/00/00...0000/00/00』と入力させる方法も考えたのですが、どうも...を入力する検索方法に抵抗がある?馴染みがないため入力方法が分からないといった声がありまして、出来ればカスタムダイアログなどで分かりやすくしたいと考えています。
環境はWin7、Mac両環境です。
よろしくお願いします。
Offline
年単位、月単位の検索でしたら、2014 とか、2014/1 とかの入力で検索できますが。 簡単に済ますには、これで我慢してもらう、というのはいかが。
Offline
年単位、月単位の検索でしたら、2014 とか、2014/1 とかの入力で検索できますが。 簡単に済ますには、これで我慢してもらう、というのはいかが。
ありがとうございます。
なるほど。そういう手もありますね!そのようにしてみます!!!
Offline
Pages: 1
[ Generated in 0.004 seconds, 7 queries executed - Memory usage: 509.05 KiB (Peak: 516 KiB) ]