218 |
my $retVal = 0; |
my $retVal = 0; |
219 |
# Create a feature data object for storing each result. |
# Create a feature data object for storing each result. |
220 |
my $fd = FeatureData->new($self); |
my $fd = FeatureData->new($self); |
221 |
|
Trace("Starting feature loop.") if T(3); |
222 |
# Loop through all the records returned by the query. |
# Loop through all the records returned by the query. |
223 |
while (my $record = $query->Fetch()) { |
while (my $record = $query->Fetch()) { |
224 |
# Store this feature. |
# Store this feature. |