このディレクトリの索引
#  
#  mysql 5.5.9 
#  master 
#  code 
#  last_tradingdate 
#  
#  data_tbl 
#  code 
#  data1 
#  tradingdate 
#  
#  で、data_tblにはcode毎に取引日が入っています 
#  それでmasterのlast_tradingdateにcode毎の入力最新日をセット 
#  したいのですが、どう書けばいいんでしょうか。

:- dynamic(master/2,data_tbl/3).

'master 
code 
last_tradingdate 

data_tbl 
code 
data1 
tradingdate 

で、data_tblにはcode毎に取引日が入っています 
それでmasterのlast_tradingdateにcode毎の入力最新日をセット 
したいのですが、どう書けばいいんでしょうか。' :-
        findall([_code,_最終取引日],(
                    master(_code,_),
                    findmax(_trandingdate,(
                                data_tble(_code,_,_tradingdate)),
                           _最終取引日)),
                LL),
        masterの_last_tradingdateを書き換える(LL).

masterの_last_tradingdateを書き換える(LL) :-
        append(_,[[_code,_最終取引日]|R],LL),
        retract(master(_code,_)),
        assertz(master(_code,_最終取引日)),
        R = [].