#------------------------------------------------------------
# Copyright (C) 2006 RoyaltyShare, Inc.   All Rights Reserved
# $Id$
#------------------------------------------------------------
package RPS::Statement::Mechanical::StatementPublisherList;

use strict;
use warnings;
use Carp;

use Data::Dumper;

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

use lib '/app/tools/rps/lib';

use RPS::DB::Item::Publisher;

use Common::FormObject;
use base 'Common::FormObject';

# This is going to be a bit tricker...
# We do not have a corresponding table in the database.
# Instead, I need to make a query to determine how many publishers
# will be reported on in this statement.
#  That means a rather nasty query via track license.
# - I need to get all the unique publisher ids associated with all the track licenses that are
#   going to appear on this statement.

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

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

    my $id               = $args{mechanicalStatementID};
    my $focusPublisherID = $args{focusPublisherID};

    $self->{MechanicalStatementPublisher} = [];
    if ($id) {
        my $publisherItems = $self->_getPublisherItemCollection($id);
        while ( my $publisherItem = $publisherItems->next() ) {
            my $pub = $self->_getStatementPublisher( $publisherItem, $focusPublisherID );

            assert($pub);
            push @{ $self->{MechanicalStatementPublisher} }, $pub;
        }

        @{ $self->{MechanicalStatementPublisher} } =
          sort { $a->{Publisher}->PublisherName cmp $b->{Publisher}->PublisherName } @{ $self->{MechanicalStatementPublisher} };
    }

    return $self;
}

sub _getPublisherItemCollection {
    my ( $self, $statementID ) = @_;
    assert( 0, 'override this' );
}

sub _getStatementPublisher {
    my ( $self, $publisherItem, $focusPublisherID ) = @_;
    assert( 0, 'override this' );
}

sub getList {
    my ($self) = @_;

    return $self->{MechanicalStatementPublisher};
}

1;