сразу не заметил, пользовательский класс к нему

Безымянный 12.11.2004 11:29

@divtables[tbl;div] #$tbl - tablica s odnim polem field ; $div - delitel polia

^if($tbl is table && def $div){

$newtbl[^table::create{id value}]

^tbl.menu{

$new[^tbl.field.split[$div;lh]]
^newtbl.append{$new.0 $new.1}

}

$result[$newtbl]

}{$result[]}

---