過去の桐井戸端BBS (桐ver.9)
26463 一括処理等で日付を入力して、ある期間のレコードを簡単に絞り込みするようにしたい。 Hiroshi 2004/05/26-11:11
日付が入力されており、かつ桐をよく知らない人がフォーム画面で編集していることを前提としています。
たとえば、平成16年4月1日から平成16年4月15日までのレコードを絞り込みたいとき、
簡単に絞り込む方法はあるでしょうか。
表編集の場合だと、レコードを選択し右クリック→絞り込み→選択行でできますが、
なにせ桐のことをよく知らない人が使うことを前提としてますので、
一括処理等でできないかと思って質問しました。
よろしくご教授願います。
26471 Re:日付の絞り込み 宮城 2004/05/26-13:52
記事番号26463へのコメント
Hiroshiさん、こんにちは。

&F、&Tとかいう日時変数定義しておいて、テキストで入力してもらいます。
コマンドボタン追加。

機能名      機能パラメータリスト
絞り込み_比較式 [生年月日]>=&F,[生年月日]<=&T

(この機能パラメータの書き方、初めて知った!)

26477 Re:日付の絞り込み 今村 誠 2004/05/26-16:39
記事番号26463へのコメント
Hiroshiさんこんにちは、私の場合日付検索用のフォームを呼び出してカレンダーから入力しています。
>日付が入力されており、かつ桐をよく知らない人がフォーム画面で編集して
>いることを前提としています。
イベントの一部ですので動作はしません。
  else if (&データ型="日時")
   &比較式="",&選択ファイル名=""
  /* フォームからの変数を持ち帰るため組込変数を使用*/
 フォーム呼び出し "検索.wfm", 許可作業=*,編集表=しない, 終了状態=&判定
   cond(&比較式=#u .and &選択ファイル名=#u) &判定=0
   cond(&比較式=#u .and &選択ファイル名=#u) return
   cond (#グループ選択状態<>#u .and #グループ選択状態<>0) \
   グループ選択解除
   解除 *
   cond (&比較式) \
   &開始日=#日時値生成(#年(&比較式),#月(&比較式),#日(&比較式))
   cond (&選択ファイル名) &最終日=#日時値生成(\
   #年(&選択ファイル名),#月(&選択ファイル名),#日(&選択ファイル名)\
               ,23,59,59.99)
   if (&開始日)
    検索 &focusobject名 {[]>=&開始日}
    if (#eof)
     確認 "該当するデータはありません。"
     &判定=0
    else
     if (&最終日)
      select &focusobject名 {&開始日=<[] , []=<&最終日}
     else
      select &focusobject名 {&開始日=<[]}
     end
    end
   else if (&最終日)
    検索 &focusobject名 {[]=<&最終日}
    if (#eof)
     確認 "該当するデータはありません。"
     &判定=0
    else
     select &focusobject名 {[]=<&最終日}
    end
   else
   end

26480 できました Hiroshi 2004/05/27-11:23
記事番号26463へのコメント
宮城さん、今村さん、ありがとうございました。
お二人のお知恵を参考に、自分なりに何とか実行することができました。
ありがとうございました。

戻る