このディレクトリの索引

# 出典 :: SQL質疑応答スレ 12問目 #984 # ・SQL Server2008R2Express # テーブルデータ # ・2012-08-01 11:35:00, りんご, 1 # ・2012-08-01 16:22:00, みかん, 2 # ・2012-08-02 13:54:00, りんご, 2 # ・2012-08-02 14:32:00, りんご, 1 # ・2012-08-04 16:22:00, みかん, 3 # # ・欲しい結果 # 2012-08-01 # 2012-08-02 # 2012-08-04 # # ・説明 # 件数に関係なく売り上げがあった日だけのリストが欲しいのですが # うまい方法あるでしょうか # # 売上('2012-08-01 11:35:00', りんご, 1 ). 売上('2012-08-01 16:22:00', みかん, 2 ). 売上('2012-08-02 13:54:00', りんご, 2 ). 売上('2012-08-02 14:32:00', りんご, 1 ). 売上('2012-08-04 16:22:00', みかん, 3 ). 件数に関係なく売り上げがあった日(_売上のあった日) :- 件数に関係なく売り上げがあった日だけのリスト(_売上のあった日だけのリスト), member(_売上のあった日,_売上のあった日だけのリスト). 件数に関係なく売り上げがあった日だけのリスト(_売上のあった日だけのリスト) :- setof(_年月日,[_年月日] ^ 売上のあった日(_年月日),_売上のあった日だけのリスト). 売上のあった日(_年月日) :- 売上(_日付時刻,_品名,_件数), _件数 > 0, 日付時刻から年月日を切り取る(_日付時刻,_年月日). 日付時刻から年月日を切り取る(_日付時刻,_年月日) :- sub_atom(_日付時刻,0,10,_,_年月日).