#------------------------------------------------------------
# Copyright (C) 2006 RoyaltyShare, Inc.   All Rights Reserved
# $Id$
#------------------------------------------------------------
package Support::ServiceAccount::ServiceAccount;

use strict;
use warnings;
use Carp;

use lib '/app/tools/common/lib';
use Common::Assert;

use lib '/app/tools/support/lib';
use Support::ServiceCredential::ServiceCredentialList;

use lib '/app/tools/distribution/lib';
use Distribution::DB::Item::ServiceAccount;

use Support::ServiceAccount::ServiceAccountSimple;
use base 'Support::ServiceAccount::ServiceAccountSimple';

sub _initProperties {
    my $self = shift;

    $self->SUPER::_initProperties(@_);

    $self->{ServiceCredential} = new Support::ServiceCredential::ServiceCredential( serviceCredentialID => $self->ServiceCredentialID );

    #    $self->{ServiceCredentials} = new Support::ServiceCredential::ServiceCredentialList();

    return $self;
}

1;