#------------------------------------------------------------
# Copyright (C) 2006 RoyaltyShare, Inc.   All Rights Reserved
# $Id$
#------------------------------------------------------------
package RPS::Report::Command::CAInactiveLicenses;
use strict;
use warnings;

use lib '/app/tools/rps/lib';
use RPS::Report::Command::BaseReport;
use RPS::Report::CAInactiveLicenses;

use base 'RPS::Report::Command::BaseReport';

sub cmd  { return 'ca_inactive_licenses'; }
sub area { return 'report'; }

sub _getReport {
    my ( $self, $page ) = @_;
    return RPS::Report::CAInactiveLicenses->new( page => $page );
}

sub _getFilenamePrefix {
    my ($self) = @_;
    return 'Inactive_License';
}

1;