You can find a script to do this in our scripts package:
http://www.omnigroup.com/ftp/pub/sof...fulScripts.dmg Look for the 'Collapse to Level X' and 'Collapse to Level of Selected Item' scripts. We'll probably be making this a built-in ability in OO4.