package RPS::Portal::Command::History;
use strict;
use warnings;

use lib '/app/tools/common/lib';
use RSApache::Response::XSLT;
use RSApache::Response::Download;
use Common::Assert;
use Common::Debug;

use base 'RPS::Command';

sub area { return "portal"; }
sub cmd  { return "history"; }

use constant kTemplate => '/app/tools/rps/templates/portal/main.xsl';

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

    # Give any inherited methods the first crack at this.
    # (This checks for login and basic access permissions).
    #
    my $response = $self->SUPER::execute();
    return $response if $response;

    my $payeeID = $self->getParam('payeeID');

    # TODO: fill-in XML for this page

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

1;
