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

use strict;
use warnings;
use Data::Dumper;

use lib '/app/tools/rps/lib';
use RPS::LabelPayee::LabelPayeeSimple;

use Common::FormObject;
use RPS::CommandLog;

#use base 'Common::XMLObject';
use base 'RPS::CommandLog';

sub _createLogItemFromDBItem {
    my ( $self, $dbItem ) = @_;

    # First call the inherited method to get the log item
    #
    my $logItem = $self->SUPER::_createLogItemFromDBItem($dbItem);

    # Now we can put stuff inside the log item
    #
    if ( 'RPS::LabelPayee::Command::Show' eq $logItem->CommandName() ) {
        my $obj = RPS::LabelPayee::LabelPayeeSimple->new( labelPayeeID => $logItem->CommandID(), loadSubs => 0 );
        $logItem->{LabelPayee} = $obj;
    } else {
        assert( 0, "Unexpected log item encountered: " . Dumper($logItem) );
    }

    return $logItem;
}

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

    $args{command}     = ['RPS::LabelPayee::Command::Show'];
    $args{most_recent} = 1;

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

1;

