package LATMOS::Accounts::SynchAccess;

use strict;
use warnings;
use base qw(LATMOS::Accounts::SynchAccess::base);
use LATMOS::Accounts::SynchAccess::Objects;

our $VERSION = (q$Rev$ =~ /^Rev: (\d+) /)[0];

sub get_object {
    my ($self, $otype, $uid) = @_;
    my @subobj = $self->_return_all('get_object', $otype, $uid);
    if (scalar(@subobj) != scalar($self->bases)) {
        return;
    }
    return LATMOS::Accounts::SynchAccess::Objects->new(
        [ @subobj ]
    );
}

1;

__END__
