[DerekM]

actually, here's a quicker way to do it:



tell application "OmniOutliner Professional"
tell front document
set totalRows to length of (get rows)
set theLevel to text returned of (display dialog "Enter row level: " default answer "") as integer
set theCount to length of (get every row where level is equal to theLevel)
display dialog "Row total: " & totalRows & "
Level " & theLevel & " total: " & theCount

end tell
end tell