#------------------------------------------------------------
# Copyright (C) 2006 RoyaltyShare, Inc.   All Rights Reserved
# $Id$
#------------------------------------------------------------
package RPS::License::CA::AccountForm;
use strict;
use warnings;

use lib '/app/tools/rps/lib';
use RPS::License::CA::TrackLicense;
use RPS::License::CA::TrackLicenseAccount;
use RPS::RoyaltyRun::RoyaltyRunStatusList;

use RPS::License::BaseAccountForm;
use base 'RPS::License::BaseAccountForm';


sub _license { return "RPS::License::CA::TrackLicense"; }
sub _account { return "RPS::License::CA::TrackLicenseAccount"; }
sub _royaltyRunStatus { return RPS::RoyaltyRun::RoyaltyRunStatusList->new( caMechanical => 1 ); }


1;