method private _cb__after_rem = fun row ->
let (table, model) = select_w#store1#get_data ~row:row#iter in
model#clear ();
select_w#store2#foreach
(fun _ iter ->
let (_, cmodel) = select_w#store2#get_data ~row:iter in
cmodel#clear_table_from_constraints (table.SQL_db.ta_name);
false)