#------------------------------------------------------------
# Copyright (C) 2006 RoyaltyShare, Inc.   All Rights Reserved
# $Id$
#------------------------------------------------------------
package RPS::Publisher::CA::License;

use strict;
use warnings;
use Data::Dumper;
use Carp;

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

use lib '/app/tools/rps/lib';
use RPS::DB::Item::PublisherTrackLicense;

use base 'Common::XMLObject';


sub _init
{
    my ($self, %args) = @_;

	$self->SUPER::_init(%args);

    my $dbItem = $args{dbItem};
    assert($dbItem);


    # Should be pretty straight-forward...
    #
    $self->{TrackLicenseID}     = $dbItem->track_license_id;
    $self->{AlbumTitle}         = $dbItem->album_title;
    $self->{AlbumID}            = $dbItem->album_id;
    $self->{TrackTitle}         = $dbItem->track_title;
    $self->{TrackID}            = $dbItem->track_id;
    $self->{TrackOrder}         = $dbItem->track_order;
    $self->{Crossed}            = $dbItem->crossed;
    $self->{RegionID}           = $dbItem->region_id;
    $self->{RegionName}         = $dbItem->region_name;
    $self->{Share}              = $dbItem->share;
    $self->{AdminID}            = $dbItem->admin_id;
    $self->{AdminName}          = $dbItem->admin_name;
    $self->{AgentID}            = $dbItem->agent_id;
    $self->{AgentName}          = $dbItem->agent_name;
    $self->{Type}               = $dbItem->type;
    $self->{Inactive}           = $dbItem->inactive;
    $self->{ProductTypeID}      = $dbItem->product_type_id;


    return $self;
}

###
1;#
###