#------------------------------------------------------------
# Copyright (C) 2006 RoyaltyShare, Inc.   All Rights Reserved
# $Id$
#------------------------------------------------------------
package RPS::DB::Item::UserAccess;
use strict;
use warnings;
use lib '/app/tools/common/lib';
use Common::Assert;
use Common::DB::Item;
use base 'Common::DB::Item';

use constant kTable => 'user_access';
use constant kDB    => Common::DB::Item::kCommonDB();

sub LookupRoyaltyShareAccess {
    my $class   = shift;
    my $user_id = shift;
    my $dbo     = Common::RSApp::GetCommonDB();

    assert($user_id);

    my $sql =
        "SELECT * FROM "
      . kTable
      . " INNER JOIN access_level on (access_level = access_level_id) "
      . "WHERE name like 'RoyaltyShare%' AND user_id = "
      . $dbo->DBQuote($user_id);
    return $class->SUPER::GetAll($sql);
}

1;