Ответ

Elvis 26.08.2006 22:04

 ^void:sql{begin}
 $rule(^int:sql{select max(rule)+1 from users for update}  [$.default{0}])
 ^if($rule<10000){$rule(10000)}
 ^void:sql{update users set rule='$rule' where login='$user'}
 ^void:sql{commit}