Объединить таблицы, оставив только уникальные записи, повторы вынести в другую таблицу

off 26.05.2007 21:10

Можно ли тоже сделать изящней?

$tab1[^table::create{number
1
1
2
}]

$tab2[^table::create{number
4
5
5
}]

^tab1.join[$tab2;$.offset[cur]]
^tab1.menu{
$tab1.number
}[<br />]

$tblinclude[^table::create{number}]
$tblexclude[^table::create{number}]

^tab1.menu{
^if(!^tblinclude.locate[number;$tab1.number]){
^tblinclude.append{$tab1.number}
}{
^tblexclude.append{$tab1.number}
}
}

<br />всё по одному<br />
^tblinclude.menu{
$tblinclude.number<br />
}

<br />повторы<br />
^tblexclude.menu{
$tblexclude.number<br />
}

---