sub ownertbl {
    ( $sortby, $ascdesc, $letter ) = @_;