#------------------------------------------------------------
# Copyright (C) 2006 RoyaltyShare, Inc.   All Rights Reserved
# $Id$
#------------------------------------------------------------
package RPS::DB::Item::RoyaltyRun;
use strict;
use warnings;
use lib '/app/tools/common/lib';
use Common::DB::Item;
use Common::Assert;
use base 'Common::DB::Item';

# !!! DEPRECATED !!!

use constant kRunning   => 0;
use constant kComplete  => 1;
use constant kCommitted => 2;

my $gConfig = {
    _db           => Common::DB::Item::kClientDB(),
    'royalty_run' => {
        _table => 'royalty_run',
        _key   => 1,
        _auto  => 1,
    },
    'start_date' => {
        _table => 'royalty_run',
        _date  => 1,
        _quote => 1,
    },
    'end_date' => {
        _table => 'royalty_run',
        _date  => 1,
        _quote => 1,
    },
    'start_time' => {
        _table => 'royalty_run',
        _quote => 1,
        _date  => 1,
    },
    'end_time' => {
        _table => 'royalty_run',
        _quote => 1,
        _date  => 1,
    },
    'status' => {
        _table => 'royalty_run',
    },
    'pid' => {
        _table => 'royalty_run',
    },
    'hostname' => {
        _table => 'royalty_run',
        _quote => 1,
    },
    'created_by' => {
        _table       => 'royalty_run',
        _currentUser => 1,
        _onCreate    => 1,
    },
};

sub _config {
    return $gConfig;
}

sub GetAll {
    my $sql = "SELECT * from royalty_run ORDER BY start_time DESC";

    my $collection = Common::DB::ItemCollection->new(
        class => "RPS::DB::Item::RoyaltyRun",
        query => $sql,
        dbID  => $gConfig->{_db},
    );

    return $collection;
}

sub DeleteRoyaltyRun {
    my ($id) = @_;

    my $sql = "DELETE FROM royalty_run WHERE royalty_run_id=$id";
    my $dbo = Common::RSApp::GetClientDB();
    $dbo->DoCmd($sql);
}

1;