#------------------------------------------------------------
# Copyright (C) 2006 RoyaltyShare, Inc.   All Rights Reserved
#------------------------------------------------------------
package Support::SaleFileExplorer::Command::ListPeriodsAjax;
use strict;
use warnings;

use lib '/app/tools/common/lib';
use lib '/app/tools/support/lib';

use RSApache::Response::XML;
use RSApache::Command::XMLCommand;
use Common::Preference;
use Support::SaleFileExplorer::PeriodList;

use base 'RSApache::Command::XMLCommand';

use constant kTemplate => '/app/tools/support/templates/job_queue/getqueue.xsl';

sub cmd  { return "periods"; }
sub area { return 'sale_file_explorer'; }

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

    $self->{xml}{Periods} = Support::SaleFileExplorer::PeriodList->new();
    my $response = RSApache::Response::XML->new( $self->{xml} );

    return $response;
}

1;