package AppUser::DB::Item::UserTerms;
use strict;
use warnings;
use lib '/app/tools/common/lib';
use Common::DB::Item;
use Common::Assert;
use Common::RSApp;
use base 'Common::DB::Item';

use constant kTable => 'user_terms';
use constant kDB    => Common::DB::Item::kCommonDB();

use constant TERMS_VERSION => '2.0';

sub GetLatestTermsByUserID {
    my ( $class, $userID ) = @_;

    my $sql      = "SELECT version FROM " . kTable . " WHERE user_id=" . $userID . " ORDER BY version DESC LIMIT 1";
    my $dbo      = Common::RSApp::GetCommonDB();
    my $sth      = $dbo->DoCmd($sql);
    my $response = $sth->fetchrow();
    return $response;
}

sub CheckForExistingTerms {
    my ( $class, $userID ) = @_;

    my $sql      = "SELECT COUNT(*) FROM " . kTable . " WHERE user_id=" . $userID;
    my $dbo      = Common::RSApp::GetCommonDB();
    my $sth      = $dbo->DoCmd($sql);
    my $response = $sth->fetchrow();
    return $response;
}

sub Create {
    my ( $self, %args ) = @_;
    my $sql = "INSERT INTO " . kTable . " (user_id,version) VALUES(" . $args{user_id} . "," . TERMS_VERSION . ")";
    my $dbo = Common::RSApp::GetCommonDB();
    my $sth = $dbo->DoCmd($sql);
}

1;