#------------------------------------------------------------
# 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;    #
###
