*end_trans = *IDZebrac::end_trans;
*trans_no = *IDZebrac::trans_no;
*begin_read = *IDZebrac::begin_read;
-*zts_test = *IDZebrac::zts_test;
*end_read = *IDZebrac::end_read;
*commit = *IDZebrac::commit;
*get_shadow_enable = *IDZebrac::get_shadow_enable;
*cql2pqf = *IDZebrac::cql2pqf;
*records_retrieve = *IDZebrac::records_retrieve;
*record_retrieve = *IDZebrac::record_retrieve;
+*deleteResultSet = *IDZebrac::deleteResultSet;
*sort = *IDZebrac::sort;
*scan_PQF = *IDZebrac::scan_PQF;
sub getScanEntry {
*swig_position_set = *IDZebrac::RetrievalRecord_position_set;
*swig_base_get = *IDZebrac::RetrievalRecord_base_get;
*swig_base_set = *IDZebrac::RetrievalRecord_base_set;
+*swig_sysno_get = *IDZebrac::RetrievalRecord_sysno_get;
+*swig_sysno_set = *IDZebrac::RetrievalRecord_sysno_set;
+*swig_score_get = *IDZebrac::RetrievalRecord_score_get;
+*swig_score_set = *IDZebrac::RetrievalRecord_score_set;
*swig_format_get = *IDZebrac::RetrievalRecord_format_get;
*swig_format_set = *IDZebrac::RetrievalRecord_format_set;
*swig_buf_get = *IDZebrac::RetrievalRecord_buf_get;
}
-############# Class : IDZebra::ScanEntry ##############
+############# Class : IDZebra::scanEntry ##############
-package IDZebra::ScanEntry;
+package IDZebra::scanEntry;
@ISA = qw( IDZebra );
%OWNER = ();
%BLESSEDMEMBERS = (
);
%ITERATORS = ();
-*swig_occurrences_get = *IDZebrac::ScanEntry_occurrences_get;
-*swig_occurrences_set = *IDZebrac::ScanEntry_occurrences_set;
-*swig_term_get = *IDZebrac::ScanEntry_term_get;
-*swig_term_set = *IDZebrac::ScanEntry_term_set;
+*swig_occurrences_get = *IDZebrac::scanEntry_occurrences_get;
+*swig_occurrences_set = *IDZebrac::scanEntry_occurrences_set;
+*swig_term_get = *IDZebrac::scanEntry_term_get;
+*swig_term_set = *IDZebrac::scanEntry_term_set;
sub new {
my $pkg = shift;
my @args = @_;
- my $self = IDZebrac::new_ScanEntry(@args);
+ my $self = IDZebrac::new_scanEntry(@args);
return undef if (!defined($self));
$OWNER{$self} = 1;
my %retval;
- tie %retval, "IDZebra::ScanEntry", $self;
+ tie %retval, "IDZebra::scanEntry", $self;
return bless \%retval, $pkg;
}
return unless defined $self;
delete $ITERATORS{$self};
if (exists $OWNER{$self}) {
- IDZebrac::delete_ScanEntry($self);
+ IDZebrac::delete_scanEntry($self);
delete $OWNER{$self};
}
}
@ISA = qw( IDZebra );
%OWNER = ();
%BLESSEDMEMBERS = (
- entries => 'IDZebra::ScanEntry',
+ entries => 'IDZebra::scanEntry',
);
%ITERATORS = ();