#------------------------------------------------------------
# Copyright (C) 2007 RoyaltyShare, Inc.   All Rights Reserved
#------------------------------------------------------------
package RPS::Report::LabelsWithoutContracts;
use strict;
use warnings;

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

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

use base 'RPS::Report';

sub _baseXMLName { 'Label' }

sub _getDBItem() {
    my $self = shift;
    return RPS::DB::Item::ReportQueries::LabelsWithoutContracts->GetLabelsWithoutContracts();
}

sub _reportColumns {
    my $self = shift;

    return 
    (
        "LabelName"        => "Label",
        "ClientLabelID"    => "Client Label #",
    );
}

sub _fillInHash
{
    my ($self, $label) = @_;

    my %data;


    $data{LabelName}        = $label->label_name;
    $data{LabelID}          = $label->label_id;
    $data{ClientLabelID}    = $label->client_label_id;

    return \%data;
}


###
1;#
###