#------------------------------------------------------------
# Copyright (C) 2006 RoyaltyShare, Inc.   All Rights Reserved
#------------------------------------------------------------
package RPS::Catalog::DAAlbumForm;

use strict;
use warnings;

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

use lib '/app/tools/rps/lib';
use RPS::Catalog::AdditionalArtistHash;
use RPS::Catalog::AlbumSimple;
use RPS::Catalog::EditForm;
use RPS::DB::Item::Product;

use base 'RPS::Catalog::EditForm';

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

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



    my $albumID = $args{albumID};
    my $product;
    if ($albumID)
    {
        $self->{Product} = RPS::Product::Product->new(_dbItem => RPS::DB::Item::Product->GetDigitalAlbumProduct($albumID));
    }
    else
    {
        $self->{Product} = RPS::Product::Product->new();
        $self->{Product}->ProductTypeID(RPS::DB::Item::Product::kProductTypeDigital);
        $self->{Product}->ProductStatusID(RPS::DB::Item::Product::kProductStatusActive);
    }

    $self->{ProductDigital} = RPS::Product::ProductDigital->new( productID => $self->{Product}->ProductID() );

	return $self;
}

sub _instantiateAlbum
{
    my ($self, $albumID) = @_;

	if ($albumID)
	{
		$self->{Album} = RPS::Catalog::AlbumSimple->new(albumID => $albumID, loadSubs => 0);
	}
	else
	{
		$self->{Album} = RPS::Catalog::AlbumSimple->new(loadSubs => 0);
	}
}

sub _propertyIsEditable
{
    my ($self, $propertyName) = @_;

    # The Product (and contained objects) can be edited.

    return 1 if ($propertyName eq 'Album');
    return 1 if ($propertyName eq 'Product');
    return 1 if ($propertyName eq 'ProductDigital');
    return 0;
}


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

    # SUPER::Validate failes because required fields are missing with DA clients
    #my $valid = $self->SUPER::validate();

	my $valid = $self->{Product}->_validateMetadata( %args, assetID => $self->{Album}->AlbumID );

    $valid = 0
        unless($self->{Album}->validate(%args));

	return $valid;
}

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

    $self->SUPER::save();

    # Now save the digital product.
    #
    $self->{Product}->ProductCode( $self->{Product}->UPC . "-D" ) if( $self->{Product}->UPC );
    $self->{Product}->ProductTypeID( RPS::DB::Item::Product::kProductTypeDigital );
	$self->{Product}->AssetID($self->{Album}->AlbumID());
	$self->{Product}->Title($self->{Album}->Title());
	$self->{Product}->TitleClean($self->{Album}->TitleClean());
    $self->{Product}->save();

    $self->{ProductDigital}->ProductID( $self->{Product}->ProductID() );
    $self->{ProductDigital}->save();
}


###
1;#
###