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

use strict;
use warnings;

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

use lib '/app/tools/metadata/lib';
use Metadata::DB::Item::ContentImport;
use Metadata::DB::Item::ContentImportData;
use Metadata::DB::Item::ContentImportDataStatus;

use base 'Common::FormObject';

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

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

    my $lastUpdate = Metadata::DB::Item::ContentImport->getStagedImport();

    $self->{Show} = $args{Show};

    $self->{FileName} =
        $lastUpdate
      ? $lastUpdate->filename
      : $args{filename};

    $self->{ImportStaged} = $lastUpdate ? 1 : 0;

    $self->{ImportValidated} = $lastUpdate && $lastUpdate->validate_date ? 1 : 0;

    # TODO Checksum not calculating correctly.
    # Something do to calculating on a FH not a file
    $self->{Checksum} = $lastUpdate->{checksum};

    $self->{ImportSummary} = Metadata::DB::Item::ContentImportData::GetImportSummary();

    return $self;
}

###
1;    #
###
