#------------------------------------------------------------
# Copyright (C) 2006 RoyaltyShare, Inc.   All Rights Reserved
# $Id$
#------------------------------------------------------------
package RPS::License::Command::BasePreEdit;
use strict;
use warnings;

use lib '/app/tools/rps/lib';
use RPS::Catalog::AlbumSimple;
use RPS::DB::Item::AlbumContract;
use RPS::Track::TrackSimple;

use lib '/app/tools/common/lib';
use RSApache::Response::XSLT;
use RSApache::Response::Redirect;
use Common::FormObject;

use RPS::Command;
use base 'RPS::Command';

sub cmd { return "preedit"; }

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

    my $response = $self->SUPER::execute();
    return $response if $response;

    my $trackID = $self->getParam('TrackID');
    my $trackObj = RPS::Track::TrackSimple->new( trackID => $trackID, loadSubs => 0 );

    if ( defined $trackObj ) {
        $self->{xml}{Track} = $trackObj;

        my $albumID = $trackObj->AlbumID();
        my $albumObj = RPS::Catalog::AlbumSimple->new( albumID => $albumID, loadSubs => 0 );
        $self->{xml}{Album} = $albumObj;

        my $coll       = RPS::DB::Item::AlbumContract->GetByAlbumID($albumID);
        my $ccompCount = 0;
        while ( $coll->hasNext() ) {
            my $dbItem  = $coll->next();
            my $dbField = $self->_ccDBtest();
            if ( $dbItem->$dbField() ) {
                $ccompCount++;

                # we need to get the controlled comp id
                #
                my $ccomp = RPS::DB::Item::ControlledComposition->GetByContractID( $dbItem->artist_contract_id );
                $self->{xml}{ControlledCompositionID} = $ccomp->controlled_composition_id;

                last;
            }
        }
        $self->{xml}{HasControlledComposition} = $ccompCount;
    }

    $response = RSApache::Response::XSLT->new( $self->{xml}, $self->_template() );
    return $response;
}

1;