このディレクトリの索引
http://toro.2ch.net/test/read.cgi/db/1316769778/953
#  MySQL5.1 
#   
#  セール価格表(P) 
#  商品CD  適用日      単価 
#  aaa     2012-08-01  2500 
#  aaa     2012-08-20  3000 
#  bbb     2012-08-01 10000 
#  bbb     2012-08-15  8500  
#   
#  予約表(Y) 
#  商品CD  購入日      数量 
#  aaa     2012-08-01      2 
#  aaa     2012-08-05      3 
#  aaa     2012-08-25      1 
#  bbb     2012-08-13      4 
#  bbb     2012-08-19      5 
#   
#  ほしい表 
#  aaa    2012-08-01       2      2500 
#  aaa    2012-08-05       3      2500 
#  aaa    2012-08-25       1      3000 
#  bbb    2012-08-13       4     10000 
#  bbb    2012-08-19       5      8500 
#   
#  購入日時点で適用日以降の単価が反映された表を得るにはどうしたらいいでしょうか 
# 
# 

'購入日時点で適用日以降の単価が反映された表を得る'(_商品CD,_購入日,_数量,_単価) :-
        予約表(_商品CD,_購入日,_数量),
        '購入日時点で適用日以降の単価が反映された表を得る'(_商品CD,_購入日,_単価).

'購入日時点で適用日以降の単価が反映された表を得る'(_商品CD,_購入日,_単価) :-
        findmax([_適用日,_単価],(
                    セール価格表(_商品CD,_適用日,_単価),
                    _購入日 @>= _適用日),
                [_適用日,_単価]).