package MySearchApplication
@ISA = qw()

sub new
my ($module, $app) = @_;
#	$this->SUPER::new(
return $this;

sub DESTROY
my $this = shift;
	$this->SUPER::DESTROY(

sub MakeDirectoriesLink
my ($App, $pParams, $path, $LinkOption, $target, $EditLink, $RootDir) = @_;
return $link;

sub BuildHitHash
my ($App, $pParams, $pRetHash0, $pKeywords, $pHash) = @_;
return $pRetHash;

sub SearchPapers
my ($App, $condition, $vars) = @_;
return -1 if($ret <= 0);
return $App->DB()->rows();

sub UpdateReferences
my ($App, $condition, @a) = @_;
return $App->DB()->UpdateData($pParams->{DBReferencesTableName}, $condition, @a);
return $App->DB()->UpdateDataByAutoJudge($pParams->{DBReferencesTableName}, $condition, @a);

sub SearchReferences
my ($App, $condition, $vars) = @_;
return $ret;

sub ConstructSQL
my ($App, $pParams, $key0, $target0, $pTargetHash) = @_;
return $sql0;

sub ConstructSQLAll
my ($App, $pParams, $pHash, $OtherCondition, $pTargetHash, $pOrderArray) = (@_);
return $sql;